20 November 2015 12:33:20.835 PM TIMER_CPU_TIME FORTRAN77 version. Attempt to use of the CPU_TIME timer. CPU_TIME is a FORTRAN 95 built in routine which might be available to a F77 program. call cpu_time ( reading ) TEST03 Time the unvectorized loops: do i = 1, n y(i) = x(i) y(i) = PI * x(i) y(i) = sqrt ( x(i) ) y(i) = exp ( x(i) ) end do Data vectors will be of minimum size 4096 Data vectors will be of maximum size 4194304 Number of repetitions of the operation: 5 Timing Results: Vector Size Rep #1 Rep #2 Rep #3 Rep #4 Rep #5 4096 0.000000 0.000000 0.000000 0.000000 0.000000 8192 0.000000 0.000000 0.000000 0.000000 0.000000 16384 0.000000 0.000000 0.000000 0.000000 0.000000 32768 0.000000 0.000000 0.000000 0.000000 0.001000 65536 0.001000 0.000000 0.000000 0.000000 0.001000 131072 0.001000 0.000000 0.000000 0.000000 0.000000 262144 0.001000 0.001000 0.001000 0.001000 0.001000 524288 0.002999 0.003000 0.002999 0.003000 0.002999 1048576 0.006999 0.005999 0.004999 0.004999 0.004999 2097152 0.013998 0.010998 0.009998 0.009999 0.010998 4194304 0.085987 0.021997 0.020997 0.019997 0.020997 Timing Results: Vector Size Rep #1 Rep #2 Rep #3 Rep #4 Rep #5 4096 0.000000 0.000000 0.000000 0.000000 0.000000 8192 0.000000 0.000000 0.000000 0.000000 0.000000 16384 0.000000 0.000000 0.000000 0.000000 0.000000 32768 0.000000 0.000000 0.000000 0.000000 0.000000 65536 0.001000 0.000000 0.000000 0.001000 0.000000 131072 0.001000 0.000000 0.001000 0.001000 0.000000 262144 0.001000 0.001000 0.001000 0.001000 0.001000 524288 0.003000 0.002000 0.003000 0.003000 0.002000 1048576 0.004999 0.004999 0.005000 0.004999 0.004999 2097152 0.009998 0.009999 0.009999 0.009998 0.008999 4194304 0.019997 0.018997 0.018998 0.019997 0.018997 Timing Results: Vector Size Rep #1 Rep #2 Rep #3 Rep #4 Rep #5 4096 0.000000 0.000000 0.000000 0.000000 0.000000 8192 0.001000 0.000000 0.000000 0.000000 0.000000 16384 0.000000 0.000000 0.001000 0.000000 0.000000 32768 0.000000 0.001000 0.001000 0.001000 0.001000 65536 0.002000 0.002000 0.001000 0.001000 0.002000 131072 0.002999 0.002000 0.003000 0.003000 0.002000 262144 0.005999 0.005999 0.005999 0.005000 0.005999 524288 0.010998 0.010998 0.010998 0.011998 0.011998 1048576 0.022996 0.022996 0.022996 0.022996 0.022996 2097152 0.045993 0.044993 0.045993 0.044993 0.045993 4194304 0.090986 0.091986 0.091986 0.090987 0.091986 Timing Results: Vector Size Rep #1 Rep #2 Rep #3 Rep #4 Rep #5 4096 0.000000 0.001000 0.000000 0.000000 0.000000 8192 0.001000 0.000000 0.001000 0.000000 0.000000 16384 0.001000 0.001000 0.001000 0.000000 0.000000 32768 0.002000 0.001000 0.002000 0.002000 0.001000 65536 0.002999 0.003000 0.002999 0.003999 0.003999 131072 0.006999 0.006999 0.006999 0.005999 0.006999 262144 0.013998 0.012998 0.013998 0.012998 0.012998 524288 0.026996 0.026996 0.026996 0.026995 0.026996 1048576 0.053992 0.053992 0.053992 0.052992 0.053992 2097152 0.106984 0.106984 0.106984 0.107984 0.107984 4194304 0.214967 0.214967 0.215968 0.214967 0.214968 TEST04 Time the 2D nearest neighbor problem. Given X(2,N) and Y(2), find X(2,*) closest to Y(2). do i = 1, n if distance ( x(2,i), y ) < minimum so far x_min = x(2,i) end do Data vectors will be of minimum size 1024 Data vectors will be of maximum size 1048576 Number of repetitions of the operation: 5 Timing Results: Vector Size Rep #1 Rep #2 Rep #3 Rep #4 Rep #5 1024 0.000000 0.000000 0.000000 0.000000 0.000000 2048 0.000000 0.000000 0.000000 0.000000 0.000000 4096 0.000000 0.000000 0.000000 0.000000 0.000000 8192 0.000000 0.000000 0.000000 0.000000 0.000000 16384 0.000000 0.001000 0.000000 0.000000 0.000000 32768 0.000000 0.000000 0.000000 0.001000 0.000000 65536 0.001000 0.000000 0.000999 0.000000 0.001000 131072 0.001000 0.000999 0.001000 0.001000 0.000000 262144 0.000999 0.002000 0.001000 0.002000 0.002000 524288 0.004000 0.003000 0.004000 0.002999 0.003999 1048576 0.006999 0.006999 0.006998 0.007999 0.006999 TIMER_CPU_TIME Normal end of execution. 20 November 2015 12:33:32.303 PM