| File |
Line number |
Procedure |
Code |
|
./pkg/seaice/seaice_budget_ice_if.F |
106 |
SEAICE_BUDGET_ICE_IF |
TB=273.15 _d + 00 - 1.96 _d + 00 |
|
./pkg/seaice/seaice_budget_ice_if.F |
250 |
SEAICE_BUDGET_ICE_IF |
F_c(I,J) = -effConduct * (TB - t1) |
|
./pkg/seaice/seaice_budget_ice_if.F |
295 |
SEAICE_BUDGET_ICE_IF |
F_c(I,J) = -effConduct * (TB - t1) |
|
./pkg/seaice/seaice_budget_ice_if.F |
76 |
SEAICE_BUDGET_ICE_IF |
_RL QS1, C1, C2, C3, C4, C5, TB, D1, D1I, D3,IAN1 |
|
./pkg/seaice/seaice_budget_ocean_if.F |
59 |
SEAICE_BUDGET_OCEAN_IF |
_RL QS1, TB, D1, D1W, D3, TMELT |
|
./pkg/seaice/seaice_budget_ocean_if.F |
83 |
SEAICE_BUDGET_OCEAN_IF |
TB=271.2 _d +00 |
|
./pkg/seaice/seaice_solve4temp.F |
115 |
SEAICE_SOLVE4TEMP |
_RL TB (1:sNx,1:sNy) |
|
./pkg/seaice/seaice_solve4temp.F |
247 |
SEAICE_SOLVE4TEMP |
TB(I,J) = -0.0575 _d 0*salt(I,J,kSrf,bi,bj) + 0.0901 _d 0 |
|
./pkg/seaice/seaice_solve4temp.F |
252 |
SEAICE_SOLVE4TEMP |
TB(I,J) = 271.2 _d 0 |
|
./pkg/seaice/seaice_solve4temp.F |
254 |
SEAICE_SOLVE4TEMP |
TB(I,J) = celsius2K + SEAICE_freeze |
|
./pkg/seaice/seaice_solve4temp.F |
441 |
SEAICE_SOLVE4TEMP |
F_c(I,J) = -effConduct(I,J)*(TB(I,J)-tsurfLoc(I,J)) |
|
./pkg/seaice/seaice_solve4temp.F |
573 |
SEAICE_SOLVE4TEMP |
F_c(I,J) = -effConduct(I,J) * (TB(I,J) - t1) |