UpdateHost_TwoPointVector3D Subroutine

public subroutine UpdateHost_TwoPointVector3D(this)

Arguments

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

Calls

proc~~updatehost_twopointvector3d~~CallsGraph proc~updatehost_twopointvector3d UpdateHost_TwoPointVector3D interface~hipmemcpy hipMemcpy proc~updatehost_twopointvector3d->interface~hipmemcpy proc~gpucheck gpuCheck proc~updatehost_twopointvector3d->proc~gpucheck

Contents


Source Code

  subroutine UpdateHost_TwoPointVector3D(this)
    implicit none
    class(TwoPointVector3D),intent(inout) :: this

    call gpuCheck(hipMemcpy(c_loc(this%interior),this%interior_gpu, &
                            sizeof(this%interior),hipMemcpyDeviceToHost))

  endsubroutine UpdateHost_TwoPointVector3D