bt_wide_enter_data Subroutine

private subroutine bt_wide_enter_data(this)

Attach all wide arrays (and wide metrics leaf arrays) to the GPU present table. The containing ocean_dyn_t is already mapped by the caller; this routine attaches the components.

Type Bound

bt_wide_t

Arguments

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

Calls

proc~~bt_wide_enter_data~~CallsGraph proc~bt_wide_enter_data bt_wide_t%bt_wide_enter_data proc~bt_wide_enter_data_impl bt_wide_enter_data_impl proc~bt_wide_enter_data->proc~bt_wide_enter_data_impl proc~ocean_metrics_enter_data ocean_metrics_t%ocean_metrics_enter_data proc~bt_wide_enter_data_impl->proc~ocean_metrics_enter_data proc~ocean_metrics_enter_data_impl ocean_metrics_enter_data_impl proc~ocean_metrics_enter_data->proc~ocean_metrics_enter_data_impl

Called by

proc~~bt_wide_enter_data~~CalledByGraph proc~bt_wide_enter_data bt_wide_t%bt_wide_enter_data proc~ocean_dyn_enable_bt_wide ocean_dyn_enable_bt_wide proc~ocean_dyn_enable_bt_wide->proc~bt_wide_enter_data proc~engine_enter_data engine_enter_data proc~engine_enter_data->proc~ocean_dyn_enable_bt_wide 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 bt_wide_enter_data(this)
      !! Attach all wide arrays (and wide metrics leaf arrays) to the GPU
      !! present table.  The containing `ocean_dyn_t` is already mapped by
      !! the caller; this routine attaches the components.
      class(bt_wide_t), intent(inout) :: this
      select type (this)
      type is (bt_wide_t)
         call bt_wide_enter_data_impl(this)
      end select
   end subroutine bt_wide_enter_data