| File |
Line number |
Procedure |
Code |
|
./model/src/the_main_loop.F |
162 |
THE_MAIN_LOOP |
REAL*8 fp_result(5) |
|
./model/src/the_main_loop.F |
163 |
THE_MAIN_LOOP |
COMMON /pclvars/ i_result, descr, fp_result, pcl_counter_list, |
|
./model/src/the_main_loop.F |
265 |
THE_MAIN_LOOP |
res = PCLstop(descr, i_result, fp_result, nevents) |
|
./model/src/the_main_loop.F |
269 |
THE_MAIN_LOOP |
$ 'before timestepping:', fp_result(ipcl) |
|
./model/src/the_main_loop.F |
500 |
THE_MAIN_LOOP |
res = PCLstop(descr, i_result, fp_result, nevents) |
|
./model/src/the_main_loop.F |
502 |
THE_MAIN_LOOP |
WRITE(msgBuf,'(F10.6,A2,A22,A17,I8)'), fp_result(ipcl), |
|
./model/src/solve_for_pressure.F |
577 |
SOLVE_FOR_PRESSURE |
PCLstop(descr, i_result, fp_result, nevents) |
|
./model/src/solve_for_pressure.F |
93 |
SOLVE_FOR_PRESSURE |
REAL*8 fp_result(5) |
|
./model/src/solve_for_pressure.F |
94 |
SOLVE_FOR_PRESSURE |
COMMON /pclvars/ i_result, descr, fp_result, pcl_counter_list, |
|
./eesupp/src/timers.F |
1001 |
TIMER_STOP |
REAL*8 fp_result(nmaxevents, maxTimers, MAX_NO_THREADS) |
|
./eesupp/src/timers.F |
1002 |
TIMER_STOP |
COMMON /pclvars/ i_result, descr, fp_result, pcl_counter_list, |
|
./eesupp/src/timers.F |
1004 |
TIMER_STOP |
DATA fp_result /size*0.0D0/ |
|
./eesupp/src/timers.F |
1024 |
TIMER_STOP |
REAL*8 fp_result(5) |
|
./eesupp/src/timers.F |
1025 |
TIMER_STOP |
COMMON /pclvars/ i_result, descr, fp_result, pcl_counter_list, |
|
./eesupp/src/timers.F |
1027 |
TIMER_STOP |
DATA fp_result /5*0.0D0/ |
|
./eesupp/src/timers.F |
199 |
TIMER_CONTROL |
REAL*8 fp_result(nmaxevents, maxTimers, MAX_NO_THREADS) |
|
./eesupp/src/timers.F |
203 |
TIMER_CONTROL |
REAL*8 fp_result(5) |
|
./eesupp/src/timers.F |
208 |
TIMER_CONTROL |
COMMON /pclvars/ i_result, descr, fp_result, pcl_counter_list, |
|
./eesupp/src/timers.F |
273 |
TIMER_CONTROL |
$ fp_result(1,iTimer,myThreadId), nevents) |
|
./eesupp/src/timers.F |
293 |
TIMER_CONTROL |
$ fp_result(1,iTimer,myThreadId), nevents) |
|
./pkg/ecco/the_main_loop.F |
1072 |
THE_MAIN_LOOP |
res = PCLstop(descr, i_result, fp_result, nevents) |
|
./pkg/ecco/the_main_loop.F |
1074 |
THE_MAIN_LOOP |
WRITE(msgBuf,'(F10.6,A2,A22,A17,I8)'), fp_result(ipcl), |
|
./pkg/ecco/the_main_loop.F |
214 |
THE_MAIN_LOOP |
REAL*8 fp_result(5) |
|
./pkg/ecco/the_main_loop.F |
215 |
THE_MAIN_LOOP |
COMMON /pclvars/ i_result, descr, fp_result, pcl_counter_list, |
|
./pkg/ecco/the_main_loop.F |
335 |
THE_MAIN_LOOP |
res = PCLstop(descr, i_result, fp_result, nevents) |
|
./pkg/ecco/the_main_loop.F |
339 |
THE_MAIN_LOOP |
$ 'before timestepping:', fp_result(ipcl) |