File |
Line number |
Procedure |
Code |
./pkg/streamice/adstreamice_invert_surf_forthick.F |
100 |
ADSTRMICE_H_INV |
hf = -1.0 * i_r * R (i,j,bi,bj) |
./pkg/streamice/adstreamice_invert_surf_forthick.F |
104 |
ADSTRMICE_H_INV |
& H (i,j,bi,bj)-hf, |
./pkg/streamice/adstreamice_invert_surf_forthick.F |
107 |
ADSTRMICE_H_INV |
& delta*hf, |
./pkg/streamice/adstreamice_invert_surf_forthick.F |
34 |
ADSTRMICE_H_INV |
_RL resid, f, fp, hf, htmp |
./pkg/streamice/adstreamice_invert_surf_forthick.F |
98 |
ADSTRMICE_H_INV |
hf = -1.0 * i_r * R_low_si (i,j,bi,bj) |
./pkg/streamice/streamice_invert_surf_forthick.F |
44 |
STREAMICE_INVERT_SURF_FORTHICK |
_RL resid, f, fp, hf, htmp |
./pkg/streamice/streamice_invert_surf_forthick.F |
58 |
STREAMICE_INVERT_SURF_FORTHICK |
hf = (-1. _d 0) * R(i,j,bi,bj) / |
./pkg/streamice/streamice_invert_surf_forthick.F |
75 |
STREAMICE_INVERT_SURF_FORTHICK |
hf = (-1. _d 0) * R(i,j,bi,bj) / |
./pkg/streamice/streamice_upd_ffrac_uncoupled.F |
31 |
STREAMICE_UPD_FFRAC_UNCOUPLED |
_RL OD, rhoi, rhow, delta, r, h, hf, i_r, rlo |
./pkg/streamice/streamice_upd_ffrac_uncoupled.F |
70 |
STREAMICE_UPD_FFRAC_UNCOUPLED |
hf = -1.0 * i_r * R_low_si (i,j,bi,bj) |
./pkg/streamice/streamice_upd_ffrac_uncoupled.F |
72 |
STREAMICE_UPD_FFRAC_UNCOUPLED |
hf = -1.0 * i_r * R_low (i,j,bi,bj) |
./pkg/streamice/streamice_upd_ffrac_uncoupled.F |
77 |
STREAMICE_UPD_FFRAC_UNCOUPLED |
& h-hf, |
./pkg/streamice/streamice_upd_ffrac_uncoupled.F |
80 |
STREAMICE_UPD_FFRAC_UNCOUPLED |
& delta*hf, |
./pkg/streamice/streamice_upd_ffrac_uncoupled.F |
88 |
STREAMICE_UPD_FFRAC_UNCOUPLED |
& h-hf, |
./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 |
228 |
CHEAPAML_COARE3_FLUX |
hf=-cpair*rhoa*usr*tsr !sensible W/m2 |
./pkg/cheapaml/cheapaml_coare3_flux.F |
49 |
CHEAPAML_COARE3_FLUX |
_RL hf, ef, evap, Rnl, ssqt, q100, cdq |