UpdateHost_Tensor3D_t Subroutine

public subroutine UpdateHost_Tensor3D_t(this)

Arguments

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

Contents

Source Code


Source Code

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