deallocate_pixel Subroutine

private pure elemental subroutine deallocate_pixel(this)

Type Bound

pixel

Arguments

Type IntentOptional Attributes Name
class(pixel), intent(inout) :: this

Called by

proc~~deallocate_pixel~~CalledByGraph proc~deallocate_pixel forsvd::pixel%deallocate_pixel program~test5 test5 program~test5->proc~deallocate_pixel

Source Code

   elemental pure subroutine deallocate_pixel(this)
      class(pixel), intent(inout) :: this
      if (allocated(this%pixels)) deallocate(this%pixels)
      if (allocated(this%pixels_app)) deallocate(this%pixels_app)
   end subroutine deallocate_pixel