File |
Line number |
Procedure |
Code |
./pkg/monitor/mon_ke.F |
198 |
MON_KE |
tmpVal = abFac1*guNm1(i,j,k,bi,bj) |
./model/src/dynamics.F |
713 |
DYNAMICS |
CALL DEBUG_STATS_RL(Nr,guNm1,'GuNm1 (DYNAMICS)',myThid) |
./model/src/ini_dynvars.F |
76 |
INI_DYNVARS |
guNm1(i,j,k,bi,bj) = 0. _d 0 |
./model/src/read_pickup.F |
170 |
READ_PICKUP |
CALL READ_REC_3D_RL( fn, fp, Nr, guNm1, 3, myIter,myThid ) |
./model/src/read_pickup.F |
220 |
READ_PICKUP |
CALL READ_REC_3D_RL( fn, fp, Nr, guNm1, 2, myIter,myThid ) |
./model/src/read_pickup.F |
358 |
READ_PICKUP |
CALL READ_MFLDS_3D_RL( 'GuNm1 ', guNm1, |
./model/src/read_pickup.F |
475 |
READ_PICKUP |
CALL MNC_CW_RL_R('D',fn,0,0,'gUnm1',guNm1, myThid) |
./model/src/read_pickup.F |
528 |
READ_PICKUP |
CALL EXCH_UV_3D_RL( guNm1, gvNm1, .TRUE., Nr, myThid ) |
./model/src/timestep.F |
179 |
TIMESTEP |
U guNm1(1-OLx,1-OLy,1,bi,bj), |
./model/src/write_pickup.F |
231 |
WRITE_PICKUP |
CALL WRITE_REC_3D_RL( fn, fp, Nr, guNm1, -j, myIter, myThid ) |
./model/src/write_pickup.F |
380 |
WRITE_PICKUP |
CALL MNC_CW_RL_W('D',fn,0,0,'gUnm1', guNm1, myThid) |
./pkg/autodiff/autodiff_restore.F |
144 |
AUTODIFF_RESTORE |
guNm1(I,J,K,bi,bj) = StoreDynVars3D(I,J,K,bi,bj,3) |
./pkg/autodiff/autodiff_store.F |
154 |
AUTODIFF_STORE |
StoreDynVars3D(I,J,K,bi,bj,3) = guNm1(I,J,K,bi,bj) |
./model/inc/DYNVARS.h |
46 |
NO PROCEDURE |
& guNm1,gvNm1,gtNm1,gsNm1 |
./model/inc/DYNVARS.h |
62 |
NO PROCEDURE |
_RL guNm1(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy) |