ice_t_freeze Function

public pure elemental function ice_t_freeze(s) result(t_fr)

Freezing temperature (degC) of the ice brine at bulk salinity s — SIS2 T_Freeze (SIS2_ice_thm.F90:1622), linear liquidus. RAW s (no max(0,s) clamp) — faithful to SIS2, which clamps only in enth_from_TS. Do not unify with ice_enth_from_ts’s internal t_fr.

Arguments

Type IntentOptional Attributes Name
real(kind=wp), intent(in) :: s

Ice bulk salinity (PSU).

Return Value real(kind=wp)


Called by

proc~~ice_t_freeze~~CalledByGraph proc~ice_t_freeze ice_t_freeze proc~ice_frazil_uptake_column ice_frazil_uptake_column proc~ice_frazil_uptake_column->proc~ice_t_freeze proc~ice_optics_csim4 ice_optics_csim4 proc~ice_optics_csim4->proc~ice_t_freeze proc~ice_temp_sis2 ice_temp_sis2 proc~ice_temp_sis2->proc~ice_t_freeze proc~update_lay_enth update_lay_enth proc~ice_temp_sis2->proc~update_lay_enth proc~update_lay_enth->proc~ice_t_freeze proc~validate_config validate_config proc~validate_config->proc~ice_t_freeze proc~build_pending_handle build_pending_handle proc~build_pending_handle->proc~validate_config proc~ice_column_step ice_column_step proc~ice_column_step->proc~ice_optics_csim4 proc~ice_column_step->proc~ice_temp_sis2 proc~ice_frazil_uptake_impl ice_frazil_uptake_impl proc~ice_frazil_uptake_impl->proc~ice_frazil_uptake_column proc~ice_frazil_uptake_multicat_impl ice_frazil_uptake_multicat_impl proc~ice_frazil_uptake_multicat_impl->proc~ice_frazil_uptake_column proc~ice_frazil_uptake ice_frazil_uptake proc~ice_frazil_uptake->proc~ice_frazil_uptake_impl proc~ice_frazil_uptake->proc~ice_frazil_uptake_multicat_impl proc~ice_thermo_columns ice_thermo_columns proc~ice_thermo_columns->proc~ice_column_step proc~rdb_ocean_create_from_string rdb_ocean_create_from_string proc~rdb_ocean_create_from_string->proc~build_pending_handle proc~rdb_ocean_create_pending rdb_ocean_create_pending proc~rdb_ocean_create_pending->proc~build_pending_handle proc~engine_step_ice engine_step_ice proc~engine_step_ice->proc~ice_frazil_uptake proc~ice_thermo_driver_step ice_thermo_driver_step proc~engine_step_ice->proc~ice_thermo_driver_step proc~ice_thermo_driver_step->proc~ice_thermo_columns proc~driver_run_ocean driver_run_ocean proc~driver_run_ocean->proc~engine_step_ice proc~rdb_ocean_step rdb_ocean_step proc~rdb_ocean_step->proc~engine_step_ice

Source Code

   pure elemental function ice_t_freeze(s) result(t_fr)
      !! Freezing temperature (degC) of the ice brine at bulk salinity
      !! `s` — SIS2 `T_Freeze` (SIS2_ice_thm.F90:1622), linear liquidus.
      !! RAW `s` (no max(0,s) clamp) — faithful to SIS2, which clamps
      !! only in enth_from_TS. Do not unify with ice_enth_from_ts's
      !! internal t_fr.
      !$acc routine seq
      real(wp), intent(in) :: s
         !! Ice bulk salinity (PSU).
      real(wp) :: t_fr

      t_fr = ICE_DTF_DS*s
   end function ice_t_freeze