| File |
Line number |
Procedure |
Code |
|
./pkg/aim_v23/aim_aim2dyn.F |
103 |
AIM_AIM2DYN |
aim_dTdt(i,j,k,bi,bj) = ( TT_CNV(I2,Katm,myThid) |
|
./pkg/aim_v23/aim_aim2dyn.F |
104 |
AIM_AIM2DYN |
& +TT_PBL(I2,Katm,myThid) |
|
./pkg/aim_v23/aim_aim2dyn.F |
105 |
AIM_AIM2DYN |
& +TT_RSW(I2,Katm,myThid) |
|
./pkg/aim_v23/aim_aim2dyn.F |
106 |
AIM_AIM2DYN |
& +TT_RLW(I2,Katm,myThid) |
|
./pkg/aim_v23/aim_aim2dyn.F |
107 |
AIM_AIM2DYN |
& +TT_LSC(I2,Katm,myThid) |
|
./pkg/aim_v23/aim_aim2dyn.F |
110 |
AIM_AIM2DYN |
aim_dSdt(i,j,k,bi,bj) = QT_CNV(I2,Katm,myThid) |
|
./pkg/aim_v23/aim_aim2dyn.F |
111 |
AIM_AIM2DYN |
& +QT_PBL(I2,Katm,myThid) |
|
./pkg/aim_v23/aim_aim2dyn.F |
112 |
AIM_AIM2DYN |
& +QT_LSC(I2,Katm,myThid) |
|
./pkg/aim_v23/aim_aim2dyn.F |
66 |
AIM_AIM2DYN |
INTEGER I2, Katm |
|
./pkg/aim_v23/aim_aim2dyn.F |
94 |
AIM_AIM2DYN |
Katm = _KD2KA( k ) |
|
./pkg/aim_v23/aim_diagnostics.F |
354 |
AIM_DIAGNOSTICS |
Katm = _KD2KA( k ) |
|
./pkg/aim_v23/aim_diagnostics.F |
359 |
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 |
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_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 |