25 |
C salt flux into shelfice (m/s) |
C salt flux into shelfice (m/s) |
26 |
C SHELFICElatentHeat - latent heat of fusion (J/kg) |
C SHELFICElatentHeat - latent heat of fusion (J/kg) |
27 |
C useISOMIPTD - use simple ISOMIP thermodynamics |
C useISOMIPTD - use simple ISOMIP thermodynamics |
28 |
|
C SHELFICEconserve - use conservative form of H&O-thermodynamics |
29 |
|
C following Jenkins et al. (2001, JPO) |
30 |
C SHELFICEboundaryLayer - turn on vertical merging of cells to for a |
C SHELFICEboundaryLayer - turn on vertical merging of cells to for a |
31 |
C boundary layer of drF thickness |
C boundary layer of drF thickness |
32 |
C no_slip_shelfice - set slip conditions for shelfice separately, |
C no_slip_shelfice - set slip conditions for shelfice separately, |
90 |
|
|
91 |
LOGICAL SHELFICEisOn |
LOGICAL SHELFICEisOn |
92 |
LOGICAL useISOMIPTD |
LOGICAL useISOMIPTD |
93 |
|
LOGICAL SHELFICEconserve |
94 |
LOGICAL SHELFICEboundaryLayer |
LOGICAL SHELFICEboundaryLayer |
95 |
LOGICAL no_slip_shelfice |
LOGICAL no_slip_shelfice |
96 |
LOGICAL SHELFICEwriteState |
LOGICAL SHELFICEwriteState |
101 |
COMMON /SHELFICE_PARMS_L/ |
COMMON /SHELFICE_PARMS_L/ |
102 |
& SHELFICEisOn, |
& SHELFICEisOn, |
103 |
& useISOMIPTD, |
& useISOMIPTD, |
104 |
|
& SHELFICEconserve, |
105 |
& SHELFICEboundaryLayer, |
& SHELFICEboundaryLayer, |
106 |
& no_slip_shelfice, |
& no_slip_shelfice, |
107 |
& SHELFICEwriteState, |
& SHELFICEwriteState, |