ice_ic_params_from_config Function

public pure function ice_ic_params_from_config(conc_config, conc, h_ice, h_snow, t_ice, s_ice, arctic_edge, antarctic_edge) result(par)

Small constructor — build once from &ocean_ice_ic_nml. Copies ice_evp_params_from_config’s shape; the one difference is conc_config, a STRING here (parsed internally), because the namelist knob is a nml_enum string, not an already-parsed integer.

Arguments

Type IntentOptional Attributes Name
character(len=*), intent(in) :: conc_config
real(kind=wp), intent(in) :: conc
real(kind=wp), intent(in) :: h_ice
real(kind=wp), intent(in) :: h_snow
real(kind=wp), intent(in) :: t_ice
real(kind=wp), intent(in) :: s_ice
real(kind=wp), intent(in) :: arctic_edge
real(kind=wp), intent(in) :: antarctic_edge

Return Value type(ice_ic_params_t)


Calls

proc~~ice_ic_params_from_config~~CallsGraph proc~ice_ic_params_from_config ice_ic_params_from_config proc~ice_ic_parse_conc_config ice_ic_parse_conc_config proc~ice_ic_params_from_config->proc~ice_ic_parse_conc_config

Called by

proc~~ice_ic_params_from_config~~CalledByGraph proc~ice_ic_params_from_config ice_ic_params_from_config proc~engine_setup engine_setup proc~engine_setup->proc~ice_ic_params_from_config proc~complete_ocean_create complete_ocean_create proc~complete_ocean_create->proc~engine_setup proc~driver_run_ocean driver_run_ocean proc~driver_run_ocean->proc~engine_setup proc~driver_validate driver_validate proc~driver_validate->proc~engine_setup proc~driver_run driver_run proc~driver_run->proc~driver_run_ocean proc~rdb_ocean_create_finalize rdb_ocean_create_finalize proc~rdb_ocean_create_finalize->proc~complete_ocean_create proc~rdb_ocean_create_from_string rdb_ocean_create_from_string proc~rdb_ocean_create_from_string->proc~complete_ocean_create

Source Code

   pure function ice_ic_params_from_config(conc_config, conc, h_ice, h_snow, &
                                           t_ice, s_ice, arctic_edge, &
                                           antarctic_edge) result(par)
      !! Small constructor — build once from `&ocean_ice_ic_nml`. Copies
      !! `ice_evp_params_from_config`'s shape; the one difference is
      !! `conc_config`, a STRING here (parsed internally), because the
      !! namelist knob is a `nml_enum` string, not an already-parsed
      !! integer.
      character(len=*), intent(in) :: conc_config
      real(wp), intent(in) :: conc, h_ice, h_snow, t_ice, s_ice
      real(wp), intent(in) :: arctic_edge, antarctic_edge
      type(ice_ic_params_t) :: par

      par%conc_config = ice_ic_parse_conc_config(conc_config)
      par%conc = conc
      par%h_ice = h_ice
      par%h_snow = h_snow
      par%t_ice = t_ice
      par%s_ice = s_ice
      par%arctic_edge = arctic_edge
      par%antarctic_edge = antarctic_edge
   end function ice_ic_params_from_config