On Mon, 16 Jan 2006, Dominique Dhumieres wrote: > > Can you send me this file (and all the files it requires)? > > You can find it on: > > http://www.lps.ens.fr/~dominiq/polyhedron/channel.f90
Ok, without the patch, compile-time is (f951 compiled with checking enabled and -g): [EMAIL PROTECTED]:/space/rguenther/obj/gcc-g/gcc> time ./f951 -quiet -O2 channel.f90 real 0m13.008s user 0m12.817s sys 0m0.160s [EMAIL PROTECTED]:/space/rguenther/obj/gcc-g/gcc> time ./f951 -quiet -O2 channel.f90 real 0m12.967s user 0m12.825s sys 0m0.120s [EMAIL PROTECTED]:/space/rguenther/obj/gcc-g/gcc> time ./f951 -quiet -O2 channel.f90 real 0m12.960s user 0m12.845s sys 0m0.100s [EMAIL PROTECTED]:/space/rguenther/obj/gcc-g/gcc> ls -l channel.s -rw-r--r-- 1 rguenther suse 45913 2006-01-16 15:04 channel.s with the patch applied it improves a little bit ;) [EMAIL PROTECTED]:/space/rguenther/obj/gcc-g/gcc> time ./f951 -quiet -O2 channel.f90 real 0m1.183s user 0m1.156s sys 0m0.024s [EMAIL PROTECTED]:/space/rguenther/obj/gcc-g/gcc> time ./f951 -quiet -O2 channel.f90 real 0m1.188s user 0m1.164s sys 0m0.024s [EMAIL PROTECTED]:/space/rguenther/obj/gcc-g/gcc> time ./f951 -quiet -O2 channel.f90 real 0m1.181s user 0m1.160s sys 0m0.020s [EMAIL PROTECTED]:/space/rguenther/obj/gcc-g/gcc> ls -l channel.s -rw-r--r-- 1 rguenther suse 45913 2006-01-16 15:05 channel.s while seemingly the output is the same (size). Quite impressing for such a little patch ;) Richard.