| File |
Line number |
Procedure |
Code |
|
./pkg/seaice/seaice_budget_ice_if.F |
101 |
SEAICE_BUDGET_ICE_IF |
cc1 = cc0*aa1*bb1*Ppascals*log(10.0) |
|
./pkg/seaice/seaice_budget_ice_if.F |
236 |
SEAICE_BUDGET_ICE_IF |
qhice_mm(I,J) = bb1*mm_pi / (Ppascals - (1.0 - bb1) * mm_pi) |
|
./pkg/seaice/seaice_budget_ice_if.F |
241 |
SEAICE_BUDGET_ICE_IF |
dqhice_dTice = cc1 * cc3t /( (cc2-cc3t*Ppascals)**2 * t2) |
|
./pkg/seaice/seaice_budget_ice_if.F |
291 |
SEAICE_BUDGET_ICE_IF |
qhice_mm(I,J) = bb1*mm_pi / (Ppascals - (1.0 - bb1) * mm_pi) |
|
./pkg/seaice/seaice_budget_ice_if.F |
93 |
SEAICE_BUDGET_ICE_IF |
_RL aa1,aa2,bb1,bb2,Ppascals,cc0,cc1,cc2,cc3t,dFiDTs1 |
|
./pkg/seaice/seaice_budget_ice_if.F |
99 |
SEAICE_BUDGET_ICE_IF |
Ppascals = 1000.*100. |