File |
Line number |
Procedure |
Code |
./pkg/ebm/ebm_atmosphere.F |
204 |
EBM_ATMOSPHERE |
Fw35(no_so) = 2.*PI*rSphere*COS(latBnd(2)*deg2rad) |
./pkg/ebm/ebm_atmosphere.F |
209 |
EBM_ATMOSPHERE |
Fw35(no_so) = 0. |
./pkg/ebm/ebm_atmosphere.F |
213 |
EBM_ATMOSPHERE |
Fw35(1) = 929944128. |
./pkg/ebm/ebm_atmosphere.F |
214 |
EBM_ATMOSPHERE |
Fw35(2) = 678148032. |
./pkg/ebm/ebm_atmosphere.F |
306 |
EBM_ATMOSPHERE |
EmPmR(i,j,bi,bj) = -1. _d -3*Fw35(no_so) |
./pkg/ebm/ebm_atmosphere.F |
327 |
EBM_ATMOSPHERE |
EmPmR(i,j,bi,bj) = -1. _d -3*(Fw35(no_so)* |
./pkg/ebm/ebm_atmosphere.F |
338 |
EBM_ATMOSPHERE |
EmPmR(i,j,bi,bj) = -1. _d -3*(Fw35(no_so)* |
./pkg/ebm/ebm_atmosphere.F |
349 |
EBM_ATMOSPHERE |
EmPmR(i,j,bi,bj) = -1. _d -3*(Fw35(no_so) |
./pkg/ebm/ebm_atmosphere.F |
76 |
EBM_ATMOSPHERE |
_RL Fw(1-OLy:sNy+OLy,nSy), Fw35(2) |