barotropic_state_enter_data Subroutine

private subroutine barotropic_state_enter_data(this)

Attach the C-grid barotropic allocatables to the device. The parent struct is mapped by the orchestrating routine. Read+write fields use copyin; pure-workspace fields use create.

Type Bound

barotropic_state_t

Arguments

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

Calls

proc~~barotropic_state_enter_data~~CallsGraph proc~barotropic_state_enter_data barotropic_state_t%barotropic_state_enter_data proc~barotropic_state_enter_data_impl barotropic_state_enter_data_impl proc~barotropic_state_enter_data->proc~barotropic_state_enter_data_impl

Called by

proc~~barotropic_state_enter_data~~CalledByGraph proc~barotropic_state_enter_data barotropic_state_t%barotropic_state_enter_data proc~ocean_state_enter_data ocean_state_enter_data proc~ocean_state_enter_data->proc~barotropic_state_enter_data proc~engine_enter_data engine_enter_data proc~engine_enter_data->proc~ocean_state_enter_data proc~complete_ocean_create complete_ocean_create proc~complete_ocean_create->proc~engine_enter_data proc~driver_run_ocean driver_run_ocean proc~driver_run_ocean->proc~engine_enter_data 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

   subroutine barotropic_state_enter_data(this)
      !! Attach the C-grid barotropic allocatables to the device. The parent
      !! struct is mapped by the orchestrating routine. Read+write fields use
      !! `copyin`; pure-workspace fields use `create`.
      class(barotropic_state_t), intent(inout) :: this
      select type (this)
      type is (barotropic_state_t)
         call barotropic_state_enter_data_impl(this)
      end select
   end subroutine barotropic_state_enter_data