File |
Line number |
Procedure |
Code |
./pkg/thsice/thsice_get_exf.F |
104 |
THSICE_GET_EXF |
_RL delq (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
./pkg/thsice/thsice_get_exf.F |
208 |
THSICE_GET_EXF |
delq(i,j) = 0. _d 0 |
./pkg/thsice/thsice_get_exf.F |
244 |
THSICE_GET_EXF |
delq(i,j) = aqh(i,j,bi,bj) - ssq(i,j) |
./pkg/thsice/thsice_get_exf.F |
297 |
THSICE_GET_EXF |
qstar(i,j) = ren*delq(i,j) |
./pkg/thsice/thsice_get_exf.F |
392 |
THSICE_GET_EXF |
qstar(i,j) = re(i,j)*delq(i,j) |
./pkg/thsice/thsice_get_exf.F |
432 |
THSICE_GET_EXF |
evapLoc(i,j) = -tau*delq(i,j) |
./pkg/bulk_force/bulkf_formula_lanl.F |
154 |
BULKF_FORMULA_LANL |
delq = Qa - ssq |
./pkg/bulk_force/bulkf_formula_lanl.F |
163 |
BULKF_FORMULA_LANL |
qstar=ren*delq |
./pkg/bulk_force/bulkf_formula_lanl.F |
186 |
BULKF_FORMULA_LANL |
qstar = re*delq |
./pkg/bulk_force/bulkf_formula_lanl.F |
196 |
BULKF_FORMULA_LANL |
flha = clha*delq |
./pkg/bulk_force/bulkf_formula_lanl.F |
82 |
BULKF_FORMULA_LANL |
_RL delq ! specific humidity difference [kg/kg] |
./pkg/bulk_force/bulkf_formula_lay.F |
169 |
BULKF_FORMULA_LAY |
delq = Qa - ssq |
./pkg/bulk_force/bulkf_formula_lay.F |
184 |
BULKF_FORMULA_LAY |
qstar=ren*delq |
./pkg/bulk_force/bulkf_formula_lay.F |
222 |
BULKF_FORMULA_LAY |
qstar = re*delq |
./pkg/bulk_force/bulkf_formula_lay.F |
234 |
BULKF_FORMULA_LAY |
flha = clha*delq |
./pkg/bulk_force/bulkf_formula_lay.F |
91 |
BULKF_FORMULA_LAY |
_RL delq ! specific humidity difference [kg/kg] |
./pkg/cheapaml/cheapaml.F |
293 |
CHEAPAML |
delq = (Qa - 1)* ssq |
./pkg/cheapaml/cheapaml.F |
302 |
CHEAPAML |
qstar=ren*delq |
./pkg/cheapaml/cheapaml.F |
326 |
CHEAPAML |
qstar = re*delq |
./pkg/cheapaml/cheapaml.F |
338 |
CHEAPAML |
flha = clha*delq |
./pkg/cheapaml/cheapaml.F |
88 |
CHEAPAML |
_RL lath,p0,deltap,delq |
./pkg/exf/exf_bulkformulae.F |
188 |
EXF_BULKFORMULAE |
_RL delq (1:sNx,1:sNy) ! specific humidity difference [kg/kg] |
./pkg/exf/exf_bulkformulae.F |
276 |
EXF_BULKFORMULAE |
delq(i,j) = 0. _d 0 |
./pkg/exf/exf_bulkformulae.F |
293 |
EXF_BULKFORMULAE |
delq(i,j) = aqh(i,j,bi,bj) - ssq |
./pkg/exf/exf_bulkformulae.F |
295 |
EXF_BULKFORMULAE |
IF ( noNegativeEvap ) delq(i,j) = MIN( 0. _d 0, delq(i,j) ) |
./pkg/exf/exf_bulkformulae.F |
328 |
EXF_BULKFORMULAE |
qstar(i,j)=ren*delq(i,j) |
./pkg/exf/exf_bulkformulae.F |
453 |
EXF_BULKFORMULAE |
qstar(i,j) = re*delq(i,j) |