| File |
Line number |
Procedure |
Code |
|
./pkg/fizhi/slprs.F |
33 |
SLPRS |
_RL tm (im*jm) |
|
./pkg/fizhi/slprs.F |
44 |
SLPRS |
tm(i) = 0.0 |
|
./pkg/fizhi/slprs.F |
52 |
SLPRS |
tm(i) = tm(i) + thz(i,L)*(ple(i,L+1)-ple(i,L)) |
|
./pkg/fizhi/slprs.F |
58 |
SLPRS |
tm(i) = tm(i)/(ple(i,lm+1)-ple(i,Ltop(i))) |
|
./pkg/runclock/runclock_gettime.F |
46 |
RUNCLOCK_GETTIME |
INTEGER tm |
|
./pkg/runclock/runclock_gettime.F |
60 |
RUNCLOCK_GETTIME |
tm=int( TM_wallClockTime ) |
|
./pkg/runclock/runclock_gettime.F |
61 |
RUNCLOCK_GETTIME |
sc=mod(tm,60) |
|
./pkg/runclock/runclock_gettime.F |
62 |
RUNCLOCK_GETTIME |
tm=(tm-sc)/60 |
|
./pkg/runclock/runclock_gettime.F |
63 |
RUNCLOCK_GETTIME |
mi=mod(tm,60) |
|
./pkg/runclock/runclock_gettime.F |
64 |
RUNCLOCK_GETTIME |
tm=(tm-mi)/60 |
|
./pkg/runclock/runclock_gettime.F |
65 |
RUNCLOCK_GETTIME |
hr=mod(tm,24) |
|
./pkg/runclock/runclock_gettime.F |
66 |
RUNCLOCK_GETTIME |
tm=(tm-hr)/24 |
|
./pkg/runclock/runclock_gettime.F |
67 |
RUNCLOCK_GETTIME |
dy=mod(tm,30) |
|
./pkg/runclock/runclock_gettime.F |
68 |
RUNCLOCK_GETTIME |
tm=(tm-dy)/30 |
|
./pkg/runclock/runclock_gettime.F |
69 |
RUNCLOCK_GETTIME |
mo=mod(tm,12) |
|
./pkg/runclock/runclock_gettime.F |
70 |
RUNCLOCK_GETTIME |
yr=(tm-mo)/12 |