| File |
Line number |
Procedure |
Code |
|
./pkg/fizhi/fizhi_moist.F |
2275 |
RNCL |
PARAMETER (P4=400.0, P6=401.0) |
|
./pkg/fizhi/fizhi_moist.F |
2277 |
RNCL |
PARAMETER (CUCLD=0.5,CFAC=CUCLD/(P6-P4)) |
|
./pkg/fizhi/fizhi_moist.F |
2300 |
RNCL |
IF (PL(I) .GE. P4 .AND. PL(I) .LE. P6) THEN |
|
./pkg/ebm/ebm_atmosphere.F |
105 |
EBM_ATMOSPHERE |
P4(i,j,bj) = 0.0 |
|
./pkg/ebm/ebm_atmosphere.F |
231 |
EBM_ATMOSPHERE |
P4(i,j,bj) = 0.12 _d 0 * |
|
./pkg/ebm/ebm_atmosphere.F |
251 |
EBM_ATMOSPHERE |
& (1. _d 0 - A0 - A2*P2(i,j,bj) - A4*P4(i,j,bj) ) |
|
./pkg/ebm/ebm_atmosphere.F |
68 |
EBM_ATMOSPHERE |
_RL P4(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSy) |