File |
Line number |
Procedure |
Code |
./pkg/cheapaml/cheapaml.F |
354 |
CHEAPAML |
O fsha, flha, evp, xolw, ssqt, q100, cdq, |
./pkg/cheapaml/cheapaml.F |
384 |
CHEAPAML |
q100(i,j) = icFrac*q100(i,j) + opFrac*q100_0 |
./pkg/cheapaml/cheapaml.F |
395 |
CHEAPAML |
O xolw(i,j), ssqt(i,j), q100(i,j) ) |
./pkg/cheapaml/cheapaml.F |
401 |
CHEAPAML |
O ssqt(i,j), q100(i,j), cdq(i,j), |
./pkg/cheapaml/cheapaml.F |
471 |
CHEAPAML |
q=q100(i,j) |
./pkg/cheapaml/cheapaml.F |
562 |
CHEAPAML |
CALL DIAGNOSTICS_FILL( q100,'CH_q100 ',0,1,2,bi,bj,myThid ) |
./pkg/cheapaml/cheapaml.F |
82 |
CHEAPAML |
_RL q100(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
./pkg/cheapaml/cheapaml_coare3_flux.F |
20 |
CHEAPAML_COARE3_FLUX |
O hf, ef, evap, Rnl, ssqt, q100, cdq, cdu, |
./pkg/cheapaml/cheapaml_coare3_flux.F |
234 |
CHEAPAML_COARE3_FLUX |
q100=qs+qsr*(LOG(100. _d 0/zoq)-psit(100. _d 0/L)) |
./pkg/cheapaml/cheapaml_coare3_flux.F |
49 |
CHEAPAML_COARE3_FLUX |
_RL hf, ef, evap, Rnl, ssqt, q100, cdq |
./pkg/cheapaml/cheapaml_lanl_flux.F |
12 |
CHEAPAML_LANL_FLUX |
O fsha, flha, evp, xolw, ssqt, q100 ) |
./pkg/cheapaml/cheapaml_lanl_flux.F |
217 |
CHEAPAML_LANL_FLUX |
q100=ssq+qstar*(dlog(100. _d 0/zice)-psx100) |
./pkg/cheapaml/cheapaml_lanl_flux.F |
37 |
CHEAPAML_LANL_FLUX |
_RL fsha, flha, evp, xolw, ssqt, q100 |
./pkg/cheapaml/cheapaml_seaice.F |
17 |
CHEAPAML_SEAICE |
O fsha, flha, evp, xolw, ssqt, q100, cdq, |
./pkg/cheapaml/cheapaml_seaice.F |
200 |
CHEAPAML_SEAICE |
O ssqt(i,j), q100(i,j), cdq(i,j), cdu, |
./pkg/cheapaml/cheapaml_seaice.F |
211 |
CHEAPAML_SEAICE |
O ssqt(i,j), q100(i,j), cdq(i,j), cdu, |
./pkg/cheapaml/cheapaml_seaice.F |
83 |
CHEAPAML_SEAICE |
_RL q100(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |