| File |
Line number |
Procedure |
Code |
|
./pkg/streamice/streamice_upd_ffrac_uncoupled.F |
115 |
STREAMICE_UPD_FFRAC_UNCOUPLED |
OD = -1.0 * rlo - streamice_density_firn/rhow * |
|
./pkg/streamice/streamice_upd_ffrac_uncoupled.F |
118 |
STREAMICE_UPD_FFRAC_UNCOUPLED |
OD = -1.0 * rlo - rhoi/rhow * |
|
./pkg/streamice/streamice_upd_ffrac_uncoupled.F |
123 |
STREAMICE_UPD_FFRAC_UNCOUPLED |
OD = -1.0 * Rlo - |
|
./pkg/streamice/streamice_upd_ffrac_uncoupled.F |
129 |
STREAMICE_UPD_FFRAC_UNCOUPLED |
IF (OD .ge. 0. _d 0) THEN |
|
./pkg/streamice/streamice_upd_ffrac_uncoupled.F |
133 |
STREAMICE_UPD_FFRAC_UNCOUPLED |
base_el_streamice(i,j,bi,bj) = Rlo+OD |
|
./pkg/streamice/streamice_upd_ffrac_uncoupled.F |
31 |
STREAMICE_UPD_FFRAC_UNCOUPLED |
_RL OD, rhoi, rhow, delta, r, h, hf, i_r, rlo |