| File |
Line number |
Procedure |
Code |
|
./pkg/kpp/kpp_routines.F |
1906 |
KPP_DOUBLEDIFF |
_RL numol, rFac, nutmp |
|
./pkg/kpp/kpp_routines.F |
1911 |
KPP_DOUBLEDIFF |
rFac = 1. _d 0 / (Rrho0 - 1. _d 0 ) |
|
./pkg/kpp/kpp_routines.F |
1946 |
KPP_DOUBLEDIFF |
nutmp = ( 1. _d 0 - (Rrho - 1. _d 0) * rFac ) |
|
./pkg/seaice/seaice_bottomdrag_coeffs.F |
150 |
SEAICE_BOTTOMDRAG_COEFFS |
& * LOG(EXP( fac*(hActual - hCrit) ) + 1. _d 0)*rFac |
|
./pkg/seaice/seaice_bottomdrag_coeffs.F |
81 |
SEAICE_BOTTOMDRAG_COEFFS |
_RL tmp, hActual, hCrit, recip_k1, u0sq, fac, rFac |
|
./pkg/seaice/seaice_bottomdrag_coeffs.F |
92 |
SEAICE_BOTTOMDRAG_COEFFS |
rFac = 1./fac |
|
./pkg/shelfice/shelfice_thermodynamics.F |
177 |
SHELFICE_THERMODYNAMICS |
rFac = 1. _d 0 |
|
./pkg/shelfice/shelfice_thermodynamics.F |
178 |
SHELFICE_THERMODYNAMICS |
IF ( SHELFICEconserve .AND. useRealFreshWaterFlux ) rFac = 0. _d 0 |
|
./pkg/shelfice/shelfice_thermodynamics.F |
547 |
SHELFICE_THERMODYNAMICS |
& - HeatCapacity_Cp*( thetaFreeze - rFac*tLoc(I,J) ) ) |
|
./pkg/shelfice/shelfice_thermodynamics.F |
97 |
SHELFICE_THERMODYNAMICS |
_RL cFac, rFac, dFac, fwflxFac |