UpdateDevice_Vector3D_t Subroutine

public subroutine UpdateDevice_Vector3D_t(this)

Arguments

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

Contents


Source Code

  subroutine UpdateDevice_Vector3D_t(this)
    implicit none
    class(Vector3D_t),intent(inout) :: this
    if(.false.) this%N = this%N ! CPU stub; suppress unused-dummy-argument warning
  endsubroutine UpdateDevice_Vector3D_t