UpdateHost_TwoPointVector3D_t Subroutine

public subroutine UpdateHost_TwoPointVector3D_t(this)

Arguments

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

Contents


Source Code

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