File |
Line number |
Procedure |
Code |
./pkg/longstep/longstep_thermodynamics.F |
121 |
LONGSTEP_THERMODYNAMICS |
INTEGER iterNb, m1, m2 |
./model/src/adams_bashforth3.F |
107 |
ADAMS_BASHFORTH3 |
& + ab2*gTrNm(i,j,k,bi,bj,m2) |
./model/src/adams_bashforth3.F |
108 |
ADAMS_BASHFORTH3 |
gTrNm(i,j,k,bi,bj,m2) = gTracer(i,j,k,bi,bj) |
./model/src/adams_bashforth3.F |
120 |
ADAMS_BASHFORTH3 |
& + ab2*gTrNm(i,j,k,bi,bj,m2) |
./model/src/adams_bashforth3.F |
121 |
ADAMS_BASHFORTH3 |
gTrNm(i,j,k,bi,bj,m2) = gTracer(i,j,k,bi,bj) |
./model/src/adams_bashforth3.F |
74 |
ADAMS_BASHFORTH3 |
INTEGER i,j, k, m1,m2 |
./model/src/adams_bashforth3.F |
80 |
ADAMS_BASHFORTH3 |
m2 = 1 + mod( myIter ,2) |
./model/src/calc_gs.F |
110 |
CALC_GS |
INTEGER m1, m2 |
./model/src/calc_gs.F |
161 |
CALC_GS |
m2 = 1 + MOD( iterNb ,2) |
./model/src/calc_gs.F |
167 |
CALC_GS |
I gsNm(1-Olx,1-Oly,1,1,1,m2), salt, dTtracerLev, |
./model/src/calc_gt.F |
109 |
CALC_GT |
INTEGER m1, m2 |
./model/src/calc_gt.F |
160 |
CALC_GT |
m2 = 1 + MOD( iterNb ,2) |
./model/src/calc_gt.F |
166 |
CALC_GT |
I gtNm(1-Olx,1-Oly,1,1,1,m2), theta, dTtracerLev, |
./model/src/read_pickup.F |
268 |
READ_PICKUP |
m2 = 1 + MOD( myIter ,2) |
./model/src/read_pickup.F |
276 |
READ_PICKUP |
CALL READ_MFLDS_3D_RL( 'GuNm2 ',guNm(1-Olx,1-Oly,1,1,1,m2), |
./model/src/read_pickup.F |
285 |
READ_PICKUP |
CALL READ_MFLDS_3D_RL( 'GvNm2 ',gvNm(1-Olx,1-Oly,1,1,1,m2), |
./model/src/read_pickup.F |
296 |
READ_PICKUP |
CALL READ_MFLDS_3D_RL( 'GtNm2 ',gtNm(1-Olx,1-Oly,1,1,1,m2), |
./model/src/read_pickup.F |
305 |
READ_PICKUP |
CALL READ_MFLDS_3D_RL( 'TempNm2 ',gtNm(1-Olx,1-Oly,1,1,1,m2), |
./model/src/read_pickup.F |
316 |
READ_PICKUP |
CALL READ_MFLDS_3D_RL( 'GsNm2 ',gsNm(1-Olx,1-Oly,1,1,1,m2), |
./model/src/read_pickup.F |
325 |
READ_PICKUP |
CALL READ_MFLDS_3D_RL( 'SaltNm2 ',gsNm(1-Olx,1-Oly,1,1,1,m2), |
./model/src/read_pickup.F |
337 |
READ_PICKUP |
CALL READ_MFLDS_3D_RL( 'GwNm2 ',gwNm(1-Olx,1-Oly,1,1,1,m2), |
./model/src/read_pickup.F |
67 |
READ_PICKUP |
INTEGER m1, m2 |
./model/src/thermodynamics.F |
185 |
THERMODYNAMICS |
INTEGER iterNb, m1, m2 |
./model/src/thermodynamics.F |
322 |
THERMODYNAMICS |
m2 = 1 + MOD( iterNb ,2) |
./model/src/thermodynamics.F |
635 |
THERMODYNAMICS |
I gtNm(1-Olx,1-Oly,1,1,1,m2), |
./model/src/thermodynamics.F |
685 |
THERMODYNAMICS |
I gsNm(1-Olx,1-Oly,1,1,1,m2), |
./model/src/write_pickup.F |
127 |
WRITE_PICKUP |
m2 = 1 + MOD( myIter ,2) |
./model/src/write_pickup.F |
138 |
WRITE_PICKUP |
CALL WRITE_REC_3D_RL( fn, fp, Nr, guNm(1-Olx,1-Oly,1,1,1,m2), |
./model/src/write_pickup.F |
151 |
WRITE_PICKUP |
CALL WRITE_REC_3D_RL( fn, fp, Nr, gvNm(1-Olx,1-Oly,1,1,1,m2), |
./model/src/write_pickup.F |
169 |
WRITE_PICKUP |
CALL WRITE_REC_3D_RL( fn, fp, Nr, gtNm(1-Olx,1-Oly,1,1,1,m2), |
./model/src/write_pickup.F |
190 |
WRITE_PICKUP |
CALL WRITE_REC_3D_RL( fn, fp, Nr, gsNm(1-Olx,1-Oly,1,1,1,m2), |
./model/src/write_pickup.F |
209 |
WRITE_PICKUP |
CALL WRITE_REC_3D_RL( fn, fp, Nr, gwNm(1-Olx,1-Oly,1,1,1,m2), |
./model/src/write_pickup.F |
70 |
WRITE_PICKUP |
INTEGER m1, m2 |