File |
Line number |
Procedure |
Code |
./pkg/ebm/ebm_atmosphere.F |
142 |
EBM_ATMOSPHERE |
T_var(1) = SIN(latBnd(2)*deg2rad) - SIN(latBnd(1)*deg2rad) |
./pkg/ebm/ebm_atmosphere.F |
143 |
EBM_ATMOSPHERE |
T_var(2) = SIN(latBnd(3)*deg2rad) - SIN(latBnd(2)*deg2rad) |
./pkg/ebm/ebm_atmosphere.F |
144 |
EBM_ATMOSPHERE |
T_var(3) = SIN(latBnd(2)*deg2rad)**3 - SIN(latBnd(1)*deg2rad)**3 |
./pkg/ebm/ebm_atmosphere.F |
145 |
EBM_ATMOSPHERE |
T_var(4) = SIN(latBnd(3)*deg2rad)**3 - SIN(latBnd(2)*deg2rad)**3 |
./pkg/ebm/ebm_atmosphere.F |
153 |
EBM_ATMOSPHERE |
T2(1) = 2.*(TtS - TmlS)*T_var(1)*T_var(2)/ |
./pkg/ebm/ebm_atmosphere.F |
154 |
EBM_ATMOSPHERE |
& (T_var(3)*T_var(2) - T_var(4)*T_var(1)) |
./pkg/ebm/ebm_atmosphere.F |
155 |
EBM_ATMOSPHERE |
T0(1) = TtS - 0.5*T2(1)*((T_var(3)/T_var(1)) - 1.) |
./pkg/ebm/ebm_atmosphere.F |
159 |
EBM_ATMOSPHERE |
T2(2) = 2.*(TtN - TmlN)*T_var(1)*T_var(2)/ |
./pkg/ebm/ebm_atmosphere.F |
160 |
EBM_ATMOSPHERE |
& (T_var(3)*T_var(2) - T_var(4)*T_var(1)) |
./pkg/ebm/ebm_atmosphere.F |
161 |
EBM_ATMOSPHERE |
T0(2) = TtN - 0.5*T2(2)*((T_var(3)/T_var(1)) - 1.) |
./pkg/ebm/ebm_atmosphere.F |
79 |
EBM_ATMOSPHERE |
_RL T_var(4), T0(2), T2(2), T35(2), DTDy35(2) |