File |
Line number |
Procedure |
Code |
./pkg/gmredi/gmredi_calc_tensor.F |
243 |
GMREDI_CALC_TENSOR |
deltaH=abs(GM_Visbeck_depth)-abs(rF(k)) |
./pkg/gmredi/gmredi_calc_tensor.F |
245 |
GMREDI_CALC_TENSOR |
deltaH=min(deltaH,drF(k)) |
./pkg/gmredi/gmredi_calc_tensor.F |
247 |
GMREDI_CALC_TENSOR |
deltaH=max(deltaH,zero_rs) |
./pkg/gmredi/gmredi_calc_tensor.F |
249 |
GMREDI_CALC_TENSOR |
deltaH=deltaH/GM_Visbeck_depth |
./pkg/gmredi/gmredi_calc_tensor.F |
255 |
GMREDI_CALC_TENSOR |
VisbeckK(i,j,bi,bj)=VisbeckK(i,j,bi,bj)+deltaH |
./pkg/gmredi/gmredi_calc_tensor.F |
59 |
GMREDI_CALC_TENSOR |
_RL deltaH,zero_rs |