I removed all the flush(6) except the one in decoder.f90. There was an unprotected one in jt9c.f90 which may explain the long runtimes I see one-in-a-great while on my Windows 10 system. Last long runtime was 7 seconds using 2 threads before I removed the flushes. I am now running a loop test to see if any long run times are seen on both my computers. Mike W9MDB #include <stdio.h>
int main(int argc,char *argv[]) { char *cmd = "TimeMem-1.0.exe jt9_omp -p 1 -d 3 -w 2 -m 2 130610_2343.wav | grep Elapsed | cut -f2 -d: >doit.txt"; double total=0; int n=0; char buf[4096]; while(1) { system(cmd); FILE *fp=fopen("doit.txt","r"); fgets(buf,sizeof(buf),fp); fclose(fp); double sec = atof(buf); ++n; total+=sec; double avg = total/n; if (sec > avg*1.5) { printf("long run %.2f avg=.2f\n",sec,avg); } printf("%d\r",n); fflush(stdout); } } Looking at how the output comes out of jt9_omp it would appear to me these flushes are not necessary as it appears each line is being flushed anyways. Not really any change in the timing Mike W9MDB Thread 1 2 %Diff !flush 4930 1.1 1.28 -16.36% 1.11 1.21 -9.01% 1.08 1.21 -12.04% 1.11 1.22 -9.91% 1.08 1.2 -11.11% 1.09 1.22 -11.93% 1.1 1.22 -10.91% 1.07 1.22 -14.02% 1.08 1.23 -13.89% 1.07 1.23 -14.95% 1.08 1.22 -12.96% 1.14 1.22 -7.02% 1.09 1.22 -11.93% 1.08 1.23 -13.89% 1.07 1.23 -14.95% 1.08 1.24 -14.81% 1.09 1.23 -12.84% 1.09 1.25 -14.68% 1.13 1.22 -7.96% 1.1 1.26 -14.55% 1.09 1.22 -11.93% 1.09 1.26 -15.60% 1.08 1.22 -12.96% 1.08 1.26 -16.67% 1.08 1.25 -15.74% 1.09 1.21 -11.01% 1.08 1.22 -12.96% 1.09 1.23 -12.84% 1.11 1.24 -11.71% 1.06 1.26 -18.87% 1.09 1.22 -11.93% 1.09 1.24 -13.76% 1.11 1.24 -11.71% 1.07 1.23 -14.95% 1.1 1.22 -10.91% 1.08 1.24 -14.81% 1.08 1.2 -11.11% 1.07 1.22 -14.02% 1.09 1.2 -10.09% 1.08 1.21 -12.04% Avg 1.0905 1.2245 -12.30% 1.087 1.233 -13.47% ------------------------------------------------------------------------------ Dive into the World of Parallel Programming. The Go Parallel Website, sponsored by Intel and developed in partnership with Slashdot Media, is your hub for all things parallel software development, from weekly thought leadership blogs to news, videos, case studies, tutorials and more. Take a look and join the conversation now. http://goparallel.sourceforge.net/ _______________________________________________ wsjt-devel mailing list wsjt-devel@lists.sourceforge.net https://lists.sourceforge.net/lists/listinfo/wsjt-devel