File |
Line number |
Procedure |
Code |
./model/inc/GRID.h |
427 |
NO PROCEDURE |
& aHybSigmF, bHybSigmF, aHybSigmC, bHybSigmC, |
./model/inc/GRID.h |
486 |
NO PROCEDURE |
_RS bHybSigmF (Nr+1) |
./model/src/calc_phi_hyd.F |
482 |
CALC_PHI_HYD |
& + bHybSigmF( k )*locDepth |
./model/src/calc_phi_hyd.F |
490 |
CALC_PHI_HYD |
& + bHybSigmF(k+1)*locDepth |
./model/src/config_summary.F |
893 |
CONFIG_SUMMARY |
CALL WRITE_COPY1D_RS(bufRL,bHybSigmF,Nr+1,INDEX_K,'bHybSigmF =', |
./model/src/ini_vertical_grid.F |
209 |
INI_VERTICAL_GRID |
bHybSigmF(k) = 0. _d 0 |
./model/src/ini_vertical_grid.F |
262 |
INI_VERTICAL_GRID |
bHybSigmF(k) = ( rF(k) - tmpRS )/(rF(1)-rSigBndRS) |
./model/src/ini_vertical_grid.F |
263 |
INI_VERTICAL_GRID |
aHybSigmF(k) = (1. _d 0 - bHybSigmF(k)) |
./model/src/ini_vertical_grid.F |
299 |
INI_VERTICAL_GRID |
bHybSigmF(k) = ( rF(k)-rF(Nr+1) )/( tmpRS-rF(Nr+1) ) |
./model/src/ini_vertical_grid.F |
300 |
INI_VERTICAL_GRID |
aHybSigmF(k) = bHybSigmF(k)*( tmpRS-rF(1) )*recip_fullDepth |
./model/src/ini_vertical_grid.F |
329 |
INI_VERTICAL_GRID |
bHybSigmF(1) = 1. _d 0 |
./model/src/ini_vertical_grid.F |
331 |
INI_VERTICAL_GRID |
bHybSigmF(Nr+1) = 0. _d 0 |
./model/src/ini_vertical_grid.F |
334 |
INI_VERTICAL_GRID |
bHybSigmF(k) = ( bHybSigmC(k) + bHybSigmC(k-1) )*0.5 _d 0 |
./model/src/ini_vertical_grid.F |
341 |
INI_VERTICAL_GRID |
bHybSigmC(k) = ( bHybSigmF(k) + bHybSigmF(k+1) )*0.5 _d 0 |
./model/src/ini_vertical_grid.F |
349 |
INI_VERTICAL_GRID |
dBHybSigF(k) = ( bHybSigmF(k+1) - bHybSigmF(k) )*rkSign |
./model/src/ini_vertical_grid.F |
356 |
INI_VERTICAL_GRID |
dBHybSigC(1) = ( bHybSigmC(1) - bHybSigmF(1) )*rkSign |
./model/src/ini_vertical_grid.F |
358 |
INI_VERTICAL_GRID |
dBHybSigC(Nr+1) = ( bHybSigmF(Nr+1) - bHybSigmC(Nr) )*rkSign |
./model/src/ini_vertical_grid.F |
382 |
INI_VERTICAL_GRID |
& - ( aHybSigmF(k)+bHybSigmF(k) ) |
./model/src/ini_vertical_grid.F |
391 |
INI_VERTICAL_GRID |
& ' , a & b=', aHybSigmF(k), bHybSigmF(k) |
./model/src/load_grid_spacing.F |
104 |
LOAD_GRID_SPACING |
CALL READ_GLVEC_RS( hybSigmFile,' ',bHybSigmF,Nr+1, 2,myThid ) |
./model/src/write_grid.F |
133 |
WRITE_GRID |
CALL WRITE_GLVEC_RS( 'BHybSigF',' ',bHybSigmF,1+Nr,-1,myThid ) |