| File |
Line number |
Procedure |
Code |
|
./pkg/showflops/SHOWFLOPS.h |
10 |
NO PROCEDURE |
REAL*8 utnew, utold, stnew, stold, wtnew, wtold |
|
./pkg/showflops/SHOWFLOPS.h |
11 |
NO PROCEDURE |
DATA utnew, utold, stnew, stold, wtnew, wtold /6*0.0D0/ |
|
./pkg/showflops/SHOWFLOPS_INIT.h |
10 |
NO PROCEDURE |
REAL*8 utnew, utold, stnew, stold, wtnew, wtold |
|
./pkg/showflops/SHOWFLOPS_INIT.h |
11 |
NO PROCEDURE |
DATA utnew, utold, stnew, stold, wtnew, wtold /6*0.0D0/ |
|
./pkg/showflops/showflops_init.F |
101 |
SHOWFLOPS_INIT |
REAL*8 utnew, utold, stnew, stold, wtnew, wtold |
|
./pkg/showflops/showflops_init.F |
102 |
SHOWFLOPS_INIT |
COMMON /timevars/ utnew, utold, stnew, stold, wtnew, wtold |
|
./pkg/showflops/showflops_init.F |
103 |
SHOWFLOPS_INIT |
DATA utnew, utold, stnew, stold, wtnew, wtold /6*0.0D0/ |
|
./pkg/showflops/showflops_init.F |
51 |
SHOWFLOPS_INIT |
CALL TIMER_GET_TIME( utold, stold, wtold ) |
|
./pkg/showflops/showflops_inloop.F |
65 |
SHOWFLOPS_INLOOP |
$ stnew - stold, wtnew - wtold, iloop |
|
./pkg/showflops/showflops_inloop.F |
69 |
SHOWFLOPS_INLOOP |
wtold = wtnew |
|
./pkg/showflops/showflops_insolve.F |
58 |
SHOWFLOPS_INSOLVE |
IF ( wtold .NE. 0.0D0 ) THEN |
|
./pkg/showflops/showflops_insolve.F |
61 |
SHOWFLOPS_INSOLVE |
$ stnew - stold, wtnew - wtold |
|
./pkg/showflops/showflops_insolve.F |
66 |
SHOWFLOPS_INSOLVE |
wtold = wtnew |