File |
Line number |
Procedure |
Code |
./model/src/ini_vertical_grid.F |
43 |
INI_VERTICAL_GRID |
IF (delRc(K).LE.0.) THEN |
./model/src/ini_vertical_grid.F |
45 |
INI_VERTICAL_GRID |
& 'S/R INI_VERTICAL_GRID: delRc(K=',K,' )=',delRc(K) |
./model/src/ini_vertical_grid.F |
56 |
INI_VERTICAL_GRID |
rC(1) = rF(1) + rkSign*delRc(1) |
./model/src/ini_vertical_grid.F |
57 |
INI_VERTICAL_GRID |
drC(1) = delRc(1) |
./model/src/ini_vertical_grid.F |
58 |
INI_VERTICAL_GRID |
drF(1) = delRc(1) |
./model/src/ini_vertical_grid.F |
60 |
INI_VERTICAL_GRID |
drC(K) = delRc(K) |
./model/src/ini_vertical_grid.F |
61 |
INI_VERTICAL_GRID |
drF(K-1) = drF(K-1) + 0.5 _d 0*delRc(K) |
./model/src/ini_vertical_grid.F |
62 |
INI_VERTICAL_GRID |
drF(K) = 0.5 _d 0*delRc(K) |
./model/src/ini_vertical_grid.F |
66 |
INI_VERTICAL_GRID |
drF(Nr) = drF(Nr) + delRc(Nr+1) |
./model/src/ini_parms.F |
1084 |
INI_PARMS |
IF (delRc(1).NE.UNSET_RL) setCenterDr=.TRUE. |
./model/src/ini_parms.F |
1086 |
INI_PARMS |
IF (delRc(K).EQ.UNSET_RL) setCenterDr = .FALSE. |
./model/src/ini_parms.F |
212 |
INI_PARMS |
& delP, delR, rkFac, Ro_SeaLevel, groundAtK1, delRc, |
./model/inc/PARAMS.h |
573 |
NO PROCEDURE |
& delR, delRc, delX, delY, |
./model/inc/PARAMS.h |
615 |
NO PROCEDURE |
_RL delRc(Nr+1) |
./pkg/kpp/kpp_readparms.F |
72 |
KPP_READPARMS |
minKPPhbl = delRc(1) |
./model/src/set_defaults.F |
50 |
SET_DEFAULTS |
delRc(k) = UNSET_RL |