| File |
Line number |
Procedure |
Code |
|
./model/src/ini_vertical_grid.F |
223 |
INI_VERTICAL_GRID |
rSigBndRS = rSigmaBnd |
|
./model/src/ini_vertical_grid.F |
226 |
INI_VERTICAL_GRID |
IF ( usingPCoords ) rSigBndRS = rF(Nr+1) |
|
./model/src/ini_vertical_grid.F |
227 |
INI_VERTICAL_GRID |
IF ( usingZCoords ) rSigBndRS = rF(1) |
|
./model/src/ini_vertical_grid.F |
261 |
INI_VERTICAL_GRID |
tmpRS = MIN( rF(k), rSigBndRS ) |
|
./model/src/ini_vertical_grid.F |
262 |
INI_VERTICAL_GRID |
bHybSigmF(k) = ( rF(k) - tmpRS )/(rF(1)-rSigBndRS) |
|
./model/src/ini_vertical_grid.F |
279 |
INI_VERTICAL_GRID |
tmpRS = MIN( rC(k), rSigBndRS ) |
|
./model/src/ini_vertical_grid.F |
280 |
INI_VERTICAL_GRID |
bHybSigmC(k) = ( rC(k) - tmpRS )/(rF(1)-rSigBndRS) |
|
./model/src/ini_vertical_grid.F |
298 |
INI_VERTICAL_GRID |
tmpRS = MAX( rF(k), rSigBndRS ) |
|
./model/src/ini_vertical_grid.F |
314 |
INI_VERTICAL_GRID |
tmpRS = MAX( rC(k), rSigBndRS ) |
|
./model/src/ini_vertical_grid.F |
40 |
INI_VERTICAL_GRID |
_RS rSigBndRS, tmpRS |