UpdateDevice_Scalar3D_t Subroutine

  1. SELF_Scalar_3D_t.f90
  2. SELF_Scalar_3D_t
  3. UpdateDevice_Scalar3D_t

public subroutine UpdateDevice_Scalar3D_t(this)

Arguments

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

Contents

Source Code

UpdateDevice_Scalar3D_t

Source Code

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