X-Git-Url: http://info.iut-bm.univ-fcomte.fr/pub/gitweb/simgrid.git/blobdiff_plain/d51e11eeca324570cf038a3bf6a5d05109903633..9b73466ada27682d1729f394549479da83ef4a99:/examples/smpi/MM/Summa.c diff --git a/examples/smpi/MM/Summa.c b/examples/smpi/MM/Summa.c index 9edf3c8a78..a53ac43490 100644 --- a/examples/smpi/MM/Summa.c +++ b/examples/smpi/MM/Summa.c @@ -6,6 +6,8 @@ #include "Matrix_init.h" #include "Summa.h" #include "xbt/log.h" +#include + XBT_LOG_NEW_DEFAULT_CATEGORY(MM_Summa, "Messages specific for this msg example"); @@ -76,8 +78,8 @@ inline double Summa( XBT_DEBUG( "pivot: %zu, iter: %zu, B_proc_col: %zu, " "size_col:%zu, size_row: %zu\n", pivot_row, iter, B_proc_row,size_col,size_row); - MPI_Barrier(row_comm); - MPI_Barrier(col_comm); +/* MPI_Barrier(row_comm);*/ +/* MPI_Barrier(col_comm);*/ start_time_intern = MPI_Wtime(); //Broadcast the row @@ -125,10 +127,10 @@ inline double Summa( XBT_DEBUG("position of B_b: %zu \n", pos_b); } end_time_intern = MPI_Wtime(); - communication_time += start_time_intern - end_time_intern; + communication_time += end_time_intern - start_time_intern; - MPI_Barrier(row_comm); - MPI_Barrier(col_comm); +/* MPI_Barrier(row_comm);*/ +/* MPI_Barrier(col_comm);*/ start_time_intern = MPI_Wtime(); XBT_DEBUG("execute Gemm number: %zu\n", iter); //We have recieved a line of block and a colomn @@ -142,16 +144,16 @@ inline double Summa( c[i*ldc+j] += B_a[i*lda_local+k]*B_b[k*ldb_local+j]; end_time_intern = MPI_Wtime(); - computation_time += start_time_intern - end_time_intern; + computation_time += end_time_intern - start_time_intern; } MPI_Barrier(row_comm); MPI_Barrier(col_comm); end_time = MPI_Wtime(); - time = start_time - end_time; - printf("communication time: %le nanoseconds, " - "computation time: %le nanoseconds\n", + time = end_time - start_time ; + printf("communication time: %e seconds, " + "computation time: %e seconds\n", communication_time, computation_time);