| File |
Line number |
Procedure |
Code |
|
./pkg/aim/aim_initialise.F |
41 |
AIM_INITIALISE |
INTEGER Katm |
|
./pkg/aim/aim_initialise.F |
46 |
AIM_INITIALISE |
Katm = _KD2KA( K ) |
|
./pkg/aim/aim_initialise.F |
47 |
AIM_INITIALISE |
FSG(Katm) = rC(K)/pGround |
|
./pkg/aim/aim_initialise.F |
48 |
AIM_INITIALISE |
HSG(Katm) = rF(K)/pGround |
|
./pkg/aim/aim_initialise.F |
51 |
AIM_INITIALISE |
Katm = _KD2KA( K ) |
|
./pkg/aim/aim_initialise.F |
52 |
AIM_INITIALISE |
HSG(Katm) = rF(K)/pGround |
|
./pkg/aim_v23/aim_write_local.F |
46 |
AIM_WRITE_LOCAL |
INTEGER i,j,k,Katm |
|
./pkg/aim_v23/aim_write_local.F |
56 |
AIM_WRITE_LOCAL |
Katm = _KD2KA( k ) |
|
./pkg/aim_v23/aim_write_local.F |
59 |
AIM_WRITE_LOCAL |
tmpFld(i,j,k) = field(i,j,Katm) |
|
./pkg/aim_v23/aim_dyn2aim.F |
108 |
AIM_DYN2AIM |
Katm = _KD2KA( k ) |
|
./pkg/aim_v23/aim_dyn2aim.F |
112 |
AIM_DYN2AIM |
dpFac(I2,Katm) = h0FacC(i,j,k,bi,bj)*rStarFacC(i,j,bi,bj) |
|
./pkg/aim_v23/aim_dyn2aim.F |
119 |
AIM_DYN2AIM |
Katm = _KD2KA( k ) |
|
./pkg/aim_v23/aim_dyn2aim.F |
124 |
AIM_DYN2AIM |
dpFac(I2,Katm) = hFac_surfC(i,j,bi,bj) |
|
./pkg/aim_v23/aim_dyn2aim.F |
126 |
AIM_DYN2AIM |
dpFac(I2,Katm) = hFacC(i,j,k,bi,bj) |
|
./pkg/aim_v23/aim_dyn2aim.F |
138 |
AIM_DYN2AIM |
Katm = _KD2KA( k ) |
|
./pkg/aim_v23/aim_dyn2aim.F |
142 |
AIM_DYN2AIM |
dpFac(I2,Katm) = hFacC(i,j,k,bi,bj) |
|
./pkg/aim_v23/aim_dyn2aim.F |
161 |
AIM_DYN2AIM |
Katm = _KD2KA( K ) |
|
./pkg/aim_v23/aim_dyn2aim.F |
169 |
AIM_DYN2AIM |
TA(I2,Katm) = theta(I,J,K,bi,bj)*conv_theta2T |
|
./pkg/aim_v23/aim_dyn2aim.F |
173 |
AIM_DYN2AIM |
QA(I2,Katm) = MAX(salt(I,J,K,bi,bj), 0. _d 0) |
|
./pkg/aim_v23/aim_dyn2aim.F |
175 |
AIM_DYN2AIM |
ThA(I2,Katm) = theta(I,J,K,bi,bj) |
|
./pkg/aim_v23/aim_dyn2aim.F |
177 |
AIM_DYN2AIM |
TA(I2,Katm) = 300. _d 0 |
|
./pkg/aim_v23/aim_dyn2aim.F |
178 |
AIM_DYN2AIM |
QA(I2,Katm) = 0. _d 0 |
|
./pkg/aim_v23/aim_dyn2aim.F |
179 |
AIM_DYN2AIM |
ThA(I2,Katm) = 300. _d 0 |
|
./pkg/aim_v23/aim_dyn2aim.F |
205 |
AIM_DYN2AIM |
Katm = _KD2KA( K ) |
|
./pkg/aim_v23/aim_dyn2aim.F |
207 |
AIM_DYN2AIM |
IF ( TA(I2,Katm).LT.lwTemp1 .OR. |
|
./pkg/aim_v23/aim_dyn2aim.F |
208 |
AIM_DYN2AIM |
& TA(I2,Katm).GT.lwTemp2 ) THEN |
|
./pkg/aim_v23/aim_dyn2aim.F |
212 |
AIM_DYN2AIM |
& 'AIM_DYN2AIM: Temp=', TA(I2,Katm), |
|
./pkg/aim_v23/aim_dyn2aim.F |
65 |
AIM_DYN2AIM |
INTEGER I, J, I2, K, Katm |
|
./pkg/aim_v23/aim_aim2dyn.F |
138 |
AIM_AIM2DYN |
& +TT_LSC(I2,Katm,myThid) |
|
./pkg/aim_v23/aim_aim2dyn.F |
141 |
AIM_AIM2DYN |
& +QT_LSC(I2,Katm,myThid) |
|
./pkg/aim_v23/aim_aim2dyn.F |
57 |
AIM_AIM2DYN |
INTEGER I2, Katm |
|
./pkg/aim_v23/aim_aim2dyn.F |
70 |
AIM_AIM2DYN |
Katm = _KD2KA( k ) |
|
./pkg/aim_v23/aim_aim2dyn.F |
78 |
AIM_AIM2DYN |
aim_dTdt(i,j,k,bi,bj) = TT_CNV(I2,Katm,myThid) |
|
./pkg/aim_v23/aim_aim2dyn.F |
79 |
AIM_AIM2DYN |
& +TT_PBL(I2,Katm,myThid) |
|
./pkg/aim_v23/aim_aim2dyn.F |
80 |
AIM_AIM2DYN |
& +TT_RSW(I2,Katm,myThid) |
|
./pkg/aim_v23/aim_aim2dyn.F |
81 |
AIM_AIM2DYN |
& +TT_RLW(I2,Katm,myThid) |
|
./pkg/aim_v23/aim_aim2dyn.F |
83 |
AIM_AIM2DYN |
aim_dSdt(i,j,k,bi,bj) = QT_CNV(I2,Katm,myThid) |
|
./pkg/aim_v23/aim_aim2dyn.F |
84 |
AIM_AIM2DYN |
& +QT_PBL(I2,Katm,myThid) |
|
./pkg/aim_v23/aim_diagnostics.F |
215 |
AIM_DIAGNOSTICS |
Katm = _KD2KA( k ) |
|
./pkg/aim_v23/aim_diagnostics.F |
220 |
AIM_DIAGNOSTICS |
& + RH(I2,Katm,myThid)*DDTT |
|
./pkg/aim_v23/aim_diagnostics.F |
42 |
AIM_DIAGNOSTICS |
INTEGER I,J,K, I2,Katm |
|
./pkg/aim_v23/aim_initialise.F |
43 |
AIM_INITIALISE |
INTEGER Katm |
|
./pkg/aim_v23/aim_initialise.F |
76 |
AIM_INITIALISE |
Katm = _KD2KA( k ) |
|
./pkg/aim_v23/aim_initialise.F |
77 |
AIM_INITIALISE |
HSG(Katm) = rF(k)/pGround |
|
./pkg/aim_v23/aim_initialise.F |
80 |
AIM_INITIALISE |
Katm = _KD2KA( k ) |
|
./pkg/aim_v23/aim_initialise.F |
81 |
AIM_INITIALISE |
HSG(Katm) = rF(k)/pGround |