diff --git a/phi-GRAPE.c b/phi-GRAPE.c index 0c6cedf..f4e6981 100644 --- a/phi-GRAPE.c +++ b/phi-GRAPE.c @@ -1237,7 +1237,7 @@ void write_snap_data() void write_cont_data() { out = fopen("data.con","w"); - fprintf(out,"%06d \n", (time_cur>=t_disk)?diskstep+1:diskstep); + fprintf(out,"%06d \n", diskstep); //#ifdef STEVOL // fprintf(out,"%06d \n", N); @@ -5238,7 +5238,12 @@ if(myRank == rootRank) } /* if(myRank == rootRank) */ - +#ifdef ETICS_DUMP + if (diskstep==0) { + sprintf(out_fname, "coeffs.%06d.%02d.dat", 0, myRank); + grapite_dump(out_fname, 2); + } +#endif /* Wait to all processors to finish his works... */ @@ -7073,7 +7078,10 @@ for(i=0; i