File |
Line number |
Procedure |
Code |
./pkg/gmredi/gmredi_calc_tensor.F |
109 |
GMREDI_CALC_TENSOR |
_RL deltaH, integrDepth |
./pkg/gmredi/gmredi_calc_tensor.F |
346 |
GMREDI_CALC_TENSOR |
integrDepth = -rC( kLowC(i,j,bi,bj) ) |
./pkg/gmredi/gmredi_calc_tensor.F |
348 |
GMREDI_CALC_TENSOR |
integrDepth = MIN( integrDepth, GM_Visbeck_depth ) |
./pkg/gmredi/gmredi_calc_tensor.F |
350 |
GMREDI_CALC_TENSOR |
integrDepth = MAX( integrDepth, GM_Visbeck_minDepth ) |
./pkg/gmredi/gmredi_calc_tensor.F |
352 |
GMREDI_CALC_TENSOR |
deltaH = integrDepth + rC(k-1) |
./pkg/gmredi/gmredi_calc_tensor.F |
358 |
GMREDI_CALC_TENSOR |
deltaH = deltaH/( integrDepth+rC(1) ) |
./pkg/gmredi/gmredi_calc_tensor.F |
474 |
GMREDI_CALC_TENSOR |
integrDepth = drF(k) |
./pkg/gmredi/gmredi_calc_tensor.F |
475 |
GMREDI_CALC_TENSOR |
deltaH=min(deltaH,integrDepth) |