array_nullify_i1d Subroutine

private pure subroutine array_nullify_i1d(array)

Arguments

Type	Intent	Optional	Attributes		Name
type(array_i1d_obj),	intent(inout)			::	array

Contents

Source Code

array_nullify_i1d

Source Code

   PURE SUBROUTINE array_nullify_i1d(array)
      TYPE(array_i1d_obj), INTENT(INOUT)                 :: array

      NULLIFY (array%low)
   END SUBROUTINE array_nullify_i1d