bt_wide_exit_data Subroutine

private subroutine bt_wide_exit_data(this)

Detach all wide arrays from the GPU present table.

Type Bound

bt_wide_t

Arguments

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

Calls

proc~~bt_wide_exit_data~~CallsGraph proc~bt_wide_exit_data bt_wide_t%bt_wide_exit_data proc~bt_wide_exit_data_impl bt_wide_exit_data_impl proc~bt_wide_exit_data->proc~bt_wide_exit_data_impl proc~ocean_metrics_exit_data ocean_metrics_t%ocean_metrics_exit_data proc~bt_wide_exit_data_impl->proc~ocean_metrics_exit_data proc~ocean_metrics_exit_data_impl ocean_metrics_exit_data_impl proc~ocean_metrics_exit_data->proc~ocean_metrics_exit_data_impl

Called by

proc~~bt_wide_exit_data~~CalledByGraph proc~bt_wide_exit_data bt_wide_t%bt_wide_exit_data proc~ocean_dyn_exit_data_impl ocean_dyn_exit_data_impl proc~ocean_dyn_exit_data_impl->proc~bt_wide_exit_data proc~ocean_dyn_exit_data ocean_dyn_t%ocean_dyn_exit_data proc~ocean_dyn_exit_data->proc~ocean_dyn_exit_data_impl

Source Code

   subroutine bt_wide_exit_data(this)
      !! Detach all wide arrays from the GPU present table.
      class(bt_wide_t), intent(inout) :: this
      select type (this)
      type is (bt_wide_t)
         call bt_wide_exit_data_impl(this)
      end select
   end subroutine bt_wide_exit_data