| File |
Line number |
Procedure |
Code |
|
./pkg/icefront/icefront_thermodynamics.F |
140 |
ICEFRONT_THERMODYNAMICS |
thetaFreeze = a0*saltFreeze + eps4 |
|
./pkg/icefront/icefront_thermodynamics.F |
147 |
ICEFRONT_THERMODYNAMICS |
& eps1 * ( thetaFreeze - tLoc ) / |
|
./pkg/icefront/icefront_thermodynamics.F |
149 |
ICEFRONT_THERMODYNAMICS |
& (thetaFreeze - thetaIce)) |
|
./pkg/icefront/icefront_thermodynamics.F |
152 |
ICEFRONT_THERMODYNAMICS |
& FreshWaterFlux(I,J) ) * ( thetaFreeze - tLoc ) |
|
./pkg/icefront/icefront_thermodynamics.F |
64 |
ICEFRONT_THERMODYNAMICS |
_RL thetaFreeze, saltFreeze |
|
./pkg/shelfice/shelfice_thermodynamics.F |
345 |
SHELFICE_THERMODYNAMICS |
thetaFreeze = |
|
./pkg/shelfice/shelfice_thermodynamics.F |
351 |
SHELFICE_THERMODYNAMICS |
& * ( tLoc(I,J) - thetaFreeze ) |
|
./pkg/shelfice/shelfice_thermodynamics.F |
367 |
SHELFICE_THERMODYNAMICS |
& * ( thetaFreeze - tLoc(I,J) ) |
|
./pkg/shelfice/shelfice_thermodynamics.F |
396 |
SHELFICE_THERMODYNAMICS |
thetaFreeze = a0*sLoc(I,J)+c0+b*pLoc(I,J) |
|
./pkg/shelfice/shelfice_thermodynamics.F |
398 |
SHELFICE_THERMODYNAMICS |
IF ( tLoc(I,J) .GT. thetaFreeze ) fwflxFac = dFac |
|
./pkg/shelfice/shelfice_thermodynamics.F |
469 |
SHELFICE_THERMODYNAMICS |
thetaFreeze = a0*saltFreeze + eps4 |
|
./pkg/shelfice/shelfice_thermodynamics.F |
487 |
SHELFICE_THERMODYNAMICS |
& * ( thetaFreeze - SHELFICEthetaSurface ) |
|
./pkg/shelfice/shelfice_thermodynamics.F |
489 |
SHELFICE_THERMODYNAMICS |
& - HeatCapacity_Cp*( thetaFreeze - rFac*tLoc(I,J) ) ) |
|
./pkg/shelfice/shelfice_thermodynamics.F |
495 |
SHELFICE_THERMODYNAMICS |
& * ( thetaFreeze - tLoc(I,J) ) |
|
./pkg/shelfice/shelfice_thermodynamics.F |
84 |
SHELFICE_THERMODYNAMICS |
_RL thetaFreeze, saltFreeze, recip_Cp |