UpdateHost_Tensor2D Subroutine

  1. SELF_Tensor_2D.f90
  2. SELF_Tensor_2D
  3. UpdateHost_Tensor2D

public subroutine UpdateHost_Tensor2D(this)

Arguments

TypeIntentOptionalAttributesName
class(Tensor2D), intent(inout) :: this

Contents

Source Code

UpdateHost_Tensor2D

Source Code

  subroutine UpdateHost_Tensor2D(this)
    implicit none
    class(Tensor2D),intent(inout) :: this

    call gpuCheck(hipMemcpy(c_loc(this%interior),this%interior_gpu,sizeof(this%interior),hipMemcpyDeviceToHost))
    call gpuCheck(hipMemcpy(c_loc(this%boundary),this%boundary_gpu,sizeof(this%boundary),hipMemcpyDeviceToHost))
    call gpuCheck(hipMemcpy(c_loc(this%extboundary),this%extboundary_gpu,sizeof(this%extboundary),hipMemcpyDeviceToHost))

  endsubroutine UpdateHost_Tensor2D