| Type | Visibility | Attributes | Name | Initial | |||
|---|---|---|---|---|---|---|---|
| integer, | public, | parameter | :: | rk | = | kind(1.d0) | |
| real(kind=rk), | public | :: | ice_cord | = | 1._rk | ||
| real(kind=rk), | public | :: | Cw | = | 4.18e+6_rk | volumetric heat capacity of water (J K-1 m-3) |
|
| real(kind=rk), | public | :: | L_ice | = | 333500._rk | latent heat of freezing (J kg-1) |
|
| real(kind=rk), | public | :: | K_ice | = | 2.1_rk | ice heat conduction coefficient (W m-1 K-1) |
|
| real(kind=rk), | public | :: | lambda_ice | = | 5._rk | ||
| real(kind=rk), | public | :: | rho_ice | = | 910._rk | kg m-3 |
|
| real(kind=rk), | public | :: | init_ice_energy | = | 0._rk | ||
| real(kind=rk), | public, | target | :: | surface_ice_energy | = | 0._rk | |
| real(kind=rk), | public, | target | :: | bottom_ice_energy | = | 0._rk | |
| real(kind=rk), | public, | target | :: | Tf | = | 0._rk | freezing temperature |
| real(kind=rk), | public, | target | :: | Tice_surface | = | 0._rk | |
| real(kind=rk), | public, | allocatable, target | :: | Tice(:) | |||
| real(kind=rk), | public, | target | :: | Hfrazil | = | 0._rk | Total frazil ice thickness |
| real(kind=rk), | public, | target | :: | Hsnow | = | 0._rk | Total snow thickness |
| real(kind=rk), | public, | target | :: | Hice | = | 0._rk | Total ice thickness |
| real(kind=rk), | public, | target | :: | dHis | = | 0._rk | surface ice growth |
| real(kind=rk), | public, | target | :: | dHib | = | 0._rk | bottom ice growth |
| real(kind=rk), | public, | target | :: | albedo_ice | = | 0._rk | |
| real(kind=rk), | public, | target | :: | attenuation_ice | = | 0._rk | |
| real(kind=rk), | public, | target | :: | melt_rate | = | 0._rk | ice melt rate [m/y] !KB why????? |
| real(kind=rk), | public, | target | :: | T_melt | = | 0._rk | melt layer temperature |
| real(kind=rk), | public, | target | :: | S_melt | = | 0._rk | melt layer salinity |
| real(kind=rk), | public, | target | :: | ocean_ice_flux | = | 0._rk | |
| real(kind=rk), | public, | target | :: | ocean_ice_heat_flux | = | 0._rk | upward heat flux [W/m2] |
| real(kind=rk), | public, | target | :: | ocean_ice_salt_flux | = | 0._rk | upward salinity flux [(m/s)*(g/kg)] |
| real(kind=rk), | public, | target | :: | transmissivity | = | 1._rk | |
| real(kind=rk), | public, | target | :: | z0i | = | 0.01_rk | |
| real(kind=rk), | public, | target | :: | fdd |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| integer, | intent(in) | :: | ice_model |