File |
Line number |
Procedure |
Code |
./pkg/aim/aim_external_forcing.F |
102 |
AIM_EXTERNAL_FORCING_U |
& + uStr_tmp*gravity*recip_drF(kLev) |
./pkg/aim/aim_external_forcing.F |
105 |
AIM_EXTERNAL_FORCING_U |
USTRtave(i,j,bi,bj) = USTRtave(i,j,bi,bj) + uStr_tmp*DDTT |
./pkg/aim/aim_external_forcing.F |
41 |
AIM_EXTERNAL_FORCING_U |
_RL DDTT, uStr_tmp |
./pkg/aim/aim_external_forcing.F |
51 |
AIM_EXTERNAL_FORCING_U |
uStr_tmp = -aim_drag(i,j,bi,bj)*uVel(i,j,kLev,bi,bj) |
./pkg/aim/aim_external_forcing.F |
53 |
AIM_EXTERNAL_FORCING_U |
& + uStr_tmp*gravity*recip_drF(kLev) |
./pkg/aim/aim_external_forcing.F |
55 |
AIM_EXTERNAL_FORCING_U |
USTRtave(i,j,bi,bj) = USTRtave(i,j,bi,bj) + uStr_tmp*DDTT |
./pkg/aim/aim_external_forcing.F |
63 |
AIM_EXTERNAL_FORCING_U |
uStr_tmp = -aim_drag(i,j,bi,bj)*uVel(i,j,kLev,bi,bj) |
./pkg/aim/aim_external_forcing.F |
65 |
AIM_EXTERNAL_FORCING_U |
USTRtave(i,j,bi,bj) = USTRtave(i,j,bi,bj) + uStr_tmp*DDTT |
./pkg/aim/aim_external_forcing.F |
68 |
AIM_EXTERNAL_FORCING_U |
IF ( maskC(i,j,kLev-1,bi,bj) .EQ. 1. ) uStr_tmp = 0. |
./pkg/aim/aim_external_forcing.F |
70 |
AIM_EXTERNAL_FORCING_U |
& + uStr_tmp*gravity*recip_drF(kLev) |
./pkg/aim/aim_external_forcing.F |
81 |
AIM_EXTERNAL_FORCING_U |
uStr_tmp = |
./pkg/aim/aim_external_forcing.F |
85 |
AIM_EXTERNAL_FORCING_U |
& + uStr_tmp*gravity*recip_drF(kLev) |
./pkg/aim/aim_external_forcing.F |
88 |
AIM_EXTERNAL_FORCING_U |
USTRtave(i,j,bi,bj) = USTRtave(i,j,bi,bj) + uStr_tmp*DDTT |
./pkg/aim/aim_external_forcing.F |
97 |
AIM_EXTERNAL_FORCING_U |
uStr_tmp = |
./pkg/aim_v23/aim_tendency_apply.F |
46 |
AIM_TENDENCY_APPLY_U |
_RL DDTT, uStr_tmp |
./pkg/aim_v23/aim_tendency_apply.F |
73 |
AIM_TENDENCY_APPLY_U |
uStr_tmp = |
./pkg/aim_v23/aim_tendency_apply.F |
77 |
AIM_TENDENCY_APPLY_U |
& + uStr_tmp*gravity*recip_drF(kLev) |
./pkg/aim_v23/aim_tendency_apply.F |
79 |
AIM_TENDENCY_APPLY_U |
aim_uStress(i,j,bi,bj) = uStr_tmp |
./pkg/aim_v23/aim_tendency_apply.F |
88 |
AIM_TENDENCY_APPLY_U |
uStr_tmp = |
./pkg/aim_v23/aim_tendency_apply.F |
93 |
AIM_TENDENCY_APPLY_U |
& + uStr_tmp*gravity*recip_drF(kLev) |
./pkg/aim_v23/aim_tendency_apply.F |
95 |
AIM_TENDENCY_APPLY_U |
aim_uStress(i,j,bi,bj) = uStr_tmp |
./pkg/aim_compon_interf/atm_store_taux.F |
52 |
ATM_STORE_TAUX |
_RL uStr_tmp |
./pkg/aim_compon_interf/atm_store_taux.F |
68 |
ATM_STORE_TAUX |
uStr_tmp = |
./pkg/aim_compon_interf/atm_store_taux.F |
75 |
ATM_STORE_TAUX |
& + uStr_tmp*cplTimeFraction |
./pkg/aim_compon_interf/atm_store_taux.F |
87 |
ATM_STORE_TAUX |
uStr_tmp = |
./pkg/aim_compon_interf/atm_store_taux.F |
91 |
ATM_STORE_TAUX |
& + uStr_tmp*cplTimeFraction |