File |
Line number |
Procedure |
Code |
./model/src/ini_vertical_grid.F |
224 |
INI_VERTICAL_GRID |
tmpRS = MIN( rF(k), rSigBndRS ) |
./model/src/ini_vertical_grid.F |
225 |
INI_VERTICAL_GRID |
bHybSigmF(k) = ( rF(k) - tmpRS )/(rF(1)-rSigBndRS) |
./model/src/ini_vertical_grid.F |
227 |
INI_VERTICAL_GRID |
& *( tmpRS -rF(Nr+1) )*recip_fullDepth |
./model/src/ini_vertical_grid.F |
242 |
INI_VERTICAL_GRID |
tmpRS = MIN( rC(k), rSigBndRS ) |
./model/src/ini_vertical_grid.F |
243 |
INI_VERTICAL_GRID |
bHybSigmC(k) = ( rC(k) - tmpRS )/(rF(1)-rSigBndRS) |
./model/src/ini_vertical_grid.F |
245 |
INI_VERTICAL_GRID |
& *( tmpRS -rF(Nr+1) )*recip_fullDepth |
./model/src/ini_vertical_grid.F |
261 |
INI_VERTICAL_GRID |
tmpRS = MAX( rF(k), rSigBndRS ) |
./model/src/ini_vertical_grid.F |
262 |
INI_VERTICAL_GRID |
bHybSigmF(k) = ( rF(k)-rF(Nr+1) )/( tmpRS-rF(Nr+1) ) |
./model/src/ini_vertical_grid.F |
263 |
INI_VERTICAL_GRID |
aHybSigmF(k) = bHybSigmF(k)*( tmpRS-rF(1) )*recip_fullDepth |
./model/src/ini_vertical_grid.F |
277 |
INI_VERTICAL_GRID |
tmpRS = MAX( rC(k), rSigBndRS ) |
./model/src/ini_vertical_grid.F |
278 |
INI_VERTICAL_GRID |
bHybSigmC(k) = ( rC(k)-rF(Nr+1) )/( tmpRS-rF(Nr+1) ) |
./model/src/ini_vertical_grid.F |
279 |
INI_VERTICAL_GRID |
aHybSigmC(k) = bHybSigmC(k)*( tmpRS-rF(1) )*recip_fullDepth |
./model/src/ini_vertical_grid.F |
40 |
INI_VERTICAL_GRID |
_RS rSigBndRS, tmpRS |