File |
Line number |
Procedure |
Code |
./pkg/cheapaml/cheapaml.F |
354 |
CHEAPAML |
O fsha, flha, evp, xolw, ssqt, q100, cdq, |
./pkg/cheapaml/cheapaml.F |
382 |
CHEAPAML |
xolw(i,j) = icFrac*xolw(i,j) + opFrac*xolw0 |
./pkg/cheapaml/cheapaml.F |
395 |
CHEAPAML |
O xolw(i,j), ssqt(i,j), q100(i,j) ) |
./pkg/cheapaml/cheapaml.F |
400 |
CHEAPAML |
O fsha(i,j), flha(i,j), evp(i,j), xolw(i,j), |
./pkg/cheapaml/cheapaml.F |
427 |
CHEAPAML |
xfld = ( -solar(i,j,bi,bj) - xalwd + xolw(i,j) |
./pkg/cheapaml/cheapaml.F |
432 |
CHEAPAML |
xlwnet = xolw(i,j)-cheapdlongwave(i,j,bi,bj) |
./pkg/cheapaml/cheapaml.F |
80 |
CHEAPAML |
_RL xolw(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
./pkg/cheapaml/cheapaml_lanl_flux.F |
12 |
CHEAPAML_LANL_FLUX |
O fsha, flha, evp, xolw, ssqt, q100 ) |
./pkg/cheapaml/cheapaml_lanl_flux.F |
205 |
CHEAPAML_LANL_FLUX |
xolw=stefan*(toa)**4 |
./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 |
210 |
CHEAPAML_SEAICE |
O fsha(i,j), flha(i,j), evp(i,j), xolw(i,j), |
./pkg/cheapaml/cheapaml_seaice.F |
214 |
CHEAPAML_SEAICE |
sFlx(i,j,1) = lwDown(i,j)- xolw(i,j) |
./pkg/cheapaml/cheapaml_seaice.F |
240 |
CHEAPAML_SEAICE |
xolw(i,j) = xolw0(i,j) |
./pkg/cheapaml/cheapaml_seaice.F |
246 |
CHEAPAML_SEAICE |
xolw(i,j) = xolw(i,j) + dTsurf(i,j)*dLwdTs(i,j) |
./pkg/cheapaml/cheapaml_seaice.F |
258 |
CHEAPAML_SEAICE |
& + lwDown(i,j)- xolw(i,j) |
./pkg/cheapaml/cheapaml_seaice.F |
81 |
CHEAPAML_SEAICE |
_RL xolw(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |