Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
class(Tensor3D), | intent(inout) | :: | this |
subroutine UpdateDevice_Tensor3D(this)
implicit none
class(Tensor3D),intent(inout) :: this
call gpuCheck(hipMemcpy(this%interior_gpu,c_loc(this%interior),sizeof(this%interior),hipMemcpyHostToDevice))
call gpuCheck(hipMemcpy(this%boundary_gpu,c_loc(this%boundary),sizeof(this%boundary),hipMemcpyHostToDevice))
call gpuCheck(hipMemcpy(this%extboundary_gpu,c_loc(this%extboundary),sizeof(this%extboundary),hipMemcpyHostToDevice))
endsubroutine UpdateDevice_Tensor3D