| File |
Line number |
Procedure |
Code |
|
./pkg/aim_v23/aim_aim2dyn.F |
105 |
AIM_AIM2DYN |
Katm = _KD2KA( k ) |
|
./pkg/aim_v23/aim_aim2dyn.F |
114 |
AIM_AIM2DYN |
aim_dTdt(i,j,k,bi,bj) = ( TT_CNV(I2,Katm,myThid) |
|
./pkg/aim_v23/aim_aim2dyn.F |
115 |
AIM_AIM2DYN |
& +TT_PBL(I2,Katm,myThid) |
|
./pkg/aim_v23/aim_aim2dyn.F |
116 |
AIM_AIM2DYN |
& +TT_RSW(I2,Katm,myThid) |
|
./pkg/aim_v23/aim_aim2dyn.F |
117 |
AIM_AIM2DYN |
& +TT_RLW(I2,Katm,myThid) |
|
./pkg/aim_v23/aim_aim2dyn.F |
118 |
AIM_AIM2DYN |
& +TT_LSC(I2,Katm,myThid) |
|
./pkg/aim_v23/aim_aim2dyn.F |
121 |
AIM_AIM2DYN |
aim_dSdt(i,j,k,bi,bj) = QT_CNV(I2,Katm,myThid) |
|
./pkg/aim_v23/aim_aim2dyn.F |
122 |
AIM_AIM2DYN |
& +QT_PBL(I2,Katm,myThid) |
|
./pkg/aim_v23/aim_aim2dyn.F |
123 |
AIM_AIM2DYN |
& +QT_LSC(I2,Katm,myThid) |
|
./pkg/aim_v23/aim_aim2dyn.F |
66 |
AIM_AIM2DYN |
INTEGER I2, Katm |
|
./pkg/aim_v23/aim_diagnostics.F |
365 |
AIM_DIAGNOSTICS |
Katm = _KD2KA( k ) |
|
./pkg/aim_v23/aim_diagnostics.F |
370 |
AIM_DIAGNOSTICS |
& + RH(I2,Katm,myThid)*DDTT |
|
./pkg/aim_v23/aim_diagnostics.F |
57 |
AIM_DIAGNOSTICS |
INTEGER I,J,K, I2,Katm |
|
./pkg/aim_v23/aim_dyn2aim.F |
111 |
AIM_DYN2AIM |
Katm = _KD2KA( k ) |
|
./pkg/aim_v23/aim_dyn2aim.F |
115 |
AIM_DYN2AIM |
dpFac(I2,Katm) = h0FacC(i,j,k,bi,bj)*rStarFacC(i,j,bi,bj) |
|
./pkg/aim_v23/aim_dyn2aim.F |
122 |
AIM_DYN2AIM |
Katm = _KD2KA( k ) |
|
./pkg/aim_v23/aim_dyn2aim.F |
127 |
AIM_DYN2AIM |
dpFac(I2,Katm) = hFac_surfC(i,j,bi,bj) |
|
./pkg/aim_v23/aim_dyn2aim.F |
129 |
AIM_DYN2AIM |
dpFac(I2,Katm) = hFacC(i,j,k,bi,bj) |
|
./pkg/aim_v23/aim_dyn2aim.F |
141 |
AIM_DYN2AIM |
Katm = _KD2KA( k ) |
|
./pkg/aim_v23/aim_dyn2aim.F |
145 |
AIM_DYN2AIM |
dpFac(I2,Katm) = hFacC(i,j,k,bi,bj) |
|
./pkg/aim_v23/aim_dyn2aim.F |
164 |
AIM_DYN2AIM |
Katm = _KD2KA( k ) |
|
./pkg/aim_v23/aim_dyn2aim.F |
172 |
AIM_DYN2AIM |
TA(I2,Katm) = theta(i,j,k,bi,bj)*conv_theta2T |
|
./pkg/aim_v23/aim_dyn2aim.F |
176 |
AIM_DYN2AIM |
QA(I2,Katm) = MAX( salt(i,j,k,bi,bj), zeroRL ) |
|
./pkg/aim_v23/aim_dyn2aim.F |
178 |
AIM_DYN2AIM |
ThA(I2,Katm) = theta(i,j,k,bi,bj) |
|
./pkg/aim_v23/aim_dyn2aim.F |
180 |
AIM_DYN2AIM |
TA(I2,Katm) = 300. _d 0 |
|
./pkg/aim_v23/aim_dyn2aim.F |
181 |
AIM_DYN2AIM |
QA(I2,Katm) = 0. _d 0 |
|
./pkg/aim_v23/aim_dyn2aim.F |
182 |
AIM_DYN2AIM |
ThA(I2,Katm) = 300. _d 0 |
|
./pkg/aim_v23/aim_dyn2aim.F |
191 |
AIM_DYN2AIM |
TA(I2,Katm) = TA(I2,Katm)*pStarFacK(i,j,bi,bj) |
|
./pkg/aim_v23/aim_dyn2aim.F |
218 |
AIM_DYN2AIM |
Katm = _KD2KA( k ) |
|
./pkg/aim_v23/aim_dyn2aim.F |
220 |
AIM_DYN2AIM |
IF ( TA(I2,Katm).LT.lwTemp1 .OR. |
|
./pkg/aim_v23/aim_dyn2aim.F |
221 |
AIM_DYN2AIM |
& TA(I2,Katm).GT.lwTemp2 ) THEN |
|
./pkg/aim_v23/aim_dyn2aim.F |
225 |
AIM_DYN2AIM |
& 'AIM_DYN2AIM: Temp=', TA(I2,Katm), |
|
./pkg/aim_v23/aim_dyn2aim.F |
68 |
AIM_DYN2AIM |
INTEGER i, j, I2, k, Katm |
|
./pkg/aim_v23/aim_initialise.F |
50 |
AIM_INITIALISE |
INTEGER Katm |
|
./pkg/aim_v23/aim_initialise.F |
60 |
AIM_INITIALISE |
Katm = _KD2KA( k ) |
|
./pkg/aim_v23/aim_initialise.F |
61 |
AIM_INITIALISE |
HSG(Katm) = rF(k)/pGround |
|
./pkg/aim_v23/aim_initialise.F |
64 |
AIM_INITIALISE |
Katm = _KD2KA( k ) |
|
./pkg/aim_v23/aim_initialise.F |
65 |
AIM_INITIALISE |
HSG(Katm) = rF(k)/pGround |
|
./pkg/aim_v23/aim_write_local.F |
52 |
AIM_WRITE_LOCAL |
INTEGER i, j, k, Katm |
|
./pkg/aim_v23/aim_write_local.F |
74 |
AIM_WRITE_LOCAL |
Katm = _KD2KA( k ) |
|
./pkg/aim_v23/aim_write_local.F |
77 |
AIM_WRITE_LOCAL |
tmpFld(i,j,k) = field(i,j,Katm) |
|
./pkg/aim_v23/aim_write_phys.F |
113 |
AIM_WRITE_PHYS |
Katm = _KD2KA( k ) |
|
./pkg/aim_v23/aim_write_phys.F |
116 |
AIM_WRITE_PHYS |
tmpFld(i,j,k) = field(i,j,Katm,ith) |
|
./pkg/aim_v23/aim_write_phys.F |
55 |
AIM_WRITE_PHYS |
INTEGER i, j, k, Katm, nLoc |