X-Git-Url: http://info.iut-bm.univ-fcomte.fr/pub/gitweb/simgrid.git/blobdiff_plain/2565e83d042a5f01c7f131c4af108028a5c4ce2b..acf4f8b6abb16973948f10851953a817cd5541a8:/examples/smpi/NAS/ep.c diff --git a/examples/smpi/NAS/ep.c b/examples/smpi/NAS/ep.c index 75a35c339b..fa83b5cfdd 100644 --- a/examples/smpi/NAS/ep.c +++ b/examples/smpi/NAS/ep.c @@ -15,13 +15,12 @@ int nprocs; int main(int argc, char **argv) { double dum[3] = {1.,1.,1.}; double x1, x2, sx, sy, tm, an, gc; - XBT_ATTRIB_UNUSED double tt; double Mops; double epsilon=1.0E-8, a = 1220703125., s=271828183.; double t1, t2, t3, t4; double sx_verify_value, sy_verify_value, sx_err, sy_err; - int m; + int m = 24; int mk=16; int nk = (int)(pow(2,mk)), nq=10, @@ -118,9 +117,7 @@ int main(int argc, char **argv) { t2 = randlc(&t1, &t1); } an = t1; - tt = s; gc = 0; - tt = 0.; sx = 0.; sy = 0.; for (i=0; i < nq ; i++) { @@ -135,7 +132,7 @@ int main(int argc, char **argv) { k_offset = no_large_nodes*(np+1) + (node-no_large_nodes)*np -1; int stop = FALSE; - SMPI_SAMPLE_GLOBAL(k = 1, k <= np, k++, 0.25 * np, 0.03, + SMPI_SAMPLE_GLOBAL(k = 1, k <= np, k++, 0.25 * np, 0.03){ stop = FALSE; kk = k_offset + k ; t1 = s; @@ -181,7 +178,7 @@ int main(int argc, char **argv) { } } timer_stop(2); - ) + } TRACE_smpi_set_category ("finalize");