File |
Line number |
Procedure |
Code |
./pkg/aim/aim_external_forcing.F |
153 |
AIM_EXTERNAL_FORCING_V |
_RL DDTT, vStr_tmp |
./pkg/aim/aim_external_forcing.F |
165 |
AIM_EXTERNAL_FORCING_V |
vStr_tmp = -aim_drag(i,j,bi,bj)*vVel(i,j,kLev,bi,bj) |
./pkg/aim/aim_external_forcing.F |
167 |
AIM_EXTERNAL_FORCING_V |
& + vStr_tmp*gravity*recip_drF(kLev) |
./pkg/aim/aim_external_forcing.F |
169 |
AIM_EXTERNAL_FORCING_V |
VSTRtave(i,j,bi,bj) = VSTRtave(i,j,bi,bj) + vStr_tmp*DDTT |
./pkg/aim/aim_external_forcing.F |
177 |
AIM_EXTERNAL_FORCING_V |
vStr_tmp = -aim_drag(i,j,bi,bj)*vVel(i,j,kLev,bi,bj) |
./pkg/aim/aim_external_forcing.F |
179 |
AIM_EXTERNAL_FORCING_V |
VSTRtave(i,j,bi,bj) = VSTRtave(i,j,bi,bj) + vStr_tmp*DDTT |
./pkg/aim/aim_external_forcing.F |
182 |
AIM_EXTERNAL_FORCING_V |
IF ( maskC(i,j,kLev-1,bi,bj) .EQ. 1. ) vStr_tmp = 0. |
./pkg/aim/aim_external_forcing.F |
184 |
AIM_EXTERNAL_FORCING_V |
& + vStr_tmp*gravity*recip_drF(kLev) |
./pkg/aim/aim_external_forcing.F |
195 |
AIM_EXTERNAL_FORCING_V |
vStr_tmp = |
./pkg/aim/aim_external_forcing.F |
199 |
AIM_EXTERNAL_FORCING_V |
& + vStr_tmp*gravity*recip_drF(kLev) |
./pkg/aim/aim_external_forcing.F |
202 |
AIM_EXTERNAL_FORCING_V |
VSTRtave(i,j,bi,bj) = VSTRtave(i,j,bi,bj) + vStr_tmp*DDTT |
./pkg/aim/aim_external_forcing.F |
211 |
AIM_EXTERNAL_FORCING_V |
vStr_tmp = |
./pkg/aim/aim_external_forcing.F |
216 |
AIM_EXTERNAL_FORCING_V |
& + vStr_tmp*gravity*recip_drF(kLev) |
./pkg/aim/aim_external_forcing.F |
219 |
AIM_EXTERNAL_FORCING_V |
VSTRtave(i,j,bi,bj) = VSTRtave(i,j,bi,bj) + vStr_tmp*DDTT |
./pkg/aim_v23/aim_tendency_apply.F |
159 |
AIM_TENDENCY_APPLY_V |
_RL DDTT, vStr_tmp |
./pkg/aim_v23/aim_tendency_apply.F |
186 |
AIM_TENDENCY_APPLY_V |
vStr_tmp = |
./pkg/aim_v23/aim_tendency_apply.F |
190 |
AIM_TENDENCY_APPLY_V |
& + vStr_tmp*gravity*recip_drF(kLev) |
./pkg/aim_v23/aim_tendency_apply.F |
192 |
AIM_TENDENCY_APPLY_V |
aim_vStress(i,j,bi,bj) = vStr_tmp |
./pkg/aim_v23/aim_tendency_apply.F |
201 |
AIM_TENDENCY_APPLY_V |
vStr_tmp = |
./pkg/aim_v23/aim_tendency_apply.F |
206 |
AIM_TENDENCY_APPLY_V |
& + vStr_tmp*gravity*recip_drF(kLev) |
./pkg/aim_v23/aim_tendency_apply.F |
208 |
AIM_TENDENCY_APPLY_V |
aim_vStress(i,j,bi,bj) = vStr_tmp |
./pkg/aim_compon_interf/atm_store_tauy.F |
52 |
ATM_STORE_TAUY |
_RL vStr_tmp |
./pkg/aim_compon_interf/atm_store_tauy.F |
68 |
ATM_STORE_TAUY |
vStr_tmp = |
./pkg/aim_compon_interf/atm_store_tauy.F |
75 |
ATM_STORE_TAUY |
& + vStr_tmp*cplTimeFraction |
./pkg/aim_compon_interf/atm_store_tauy.F |
87 |
ATM_STORE_TAUY |
vStr_tmp = |
./pkg/aim_compon_interf/atm_store_tauy.F |
91 |
ATM_STORE_TAUY |
& + vStr_tmp*cplTimeFraction |