array_nullify_i1d Subroutine

private pure subroutine array_nullify_i1d(array)

Arguments

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

Source Code

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

      NULLIFY (array%low)
   END SUBROUTINE array_nullify_i1d