ocean_sea_ice_exit_data Subroutine

private subroutine ocean_sea_ice_exit_data(this)

Type Bound

ocean_sea_ice_t

Arguments

Type IntentOptional Attributes Name
class(ocean_sea_ice_t), intent(inout) :: this

Calls

proc~~ocean_sea_ice_exit_data~~CallsGraph proc~ocean_sea_ice_exit_data ocean_sea_ice_t%ocean_sea_ice_exit_data proc~ocean_sea_ice_exit_data_impl ocean_sea_ice_exit_data_impl proc~ocean_sea_ice_exit_data->proc~ocean_sea_ice_exit_data_impl proc~evp_workspace_exit_data evp_workspace_t%evp_workspace_exit_data proc~ocean_sea_ice_exit_data_impl->proc~evp_workspace_exit_data proc~evp_workspace_exit_data_impl evp_workspace_exit_data_impl proc~evp_workspace_exit_data->proc~evp_workspace_exit_data_impl

Source Code

   subroutine ocean_sea_ice_exit_data(this)
      class(ocean_sea_ice_t), intent(inout) :: this
      select type (this)
      type is (ocean_sea_ice_t)
         call ocean_sea_ice_exit_data_impl(this)
      end select
   end subroutine ocean_sea_ice_exit_data