subbasin_close Subroutine

  1. subbasin.f95
  2. subbasin
  3. subbasin_close

public subroutine subbasin_close()

Arguments

None

Called by

proc~~subbasin_close~~CalledByGraph proc~subbasin_close subbasin_close proc~terminate terminate proc~terminate->proc~subbasin_close program~swim swim program~swim->proc~terminate

Contents

Source Code

subbasin_close

Source Code

  subroutine subbasin_close
    deallocate(dart)
    deallocate(flu)
    deallocate(icodes)
    deallocate(ihouts)
    deallocate(inum1s)
    deallocate(inum2s)
    deallocate(neap)
    deallocate(sbar)
    deallocate(sbp)
    deallocate(sda)
    deallocate(smq)
    deallocate(smsq)
    deallocate(station_ids)
    deallocate(subbasin_ids)
    deallocate(subp)
    deallocate(susb)
    deallocate(tx)
    deallocate(subcatch_id)
    deallocate(tp6)
    deallocate(tpnyr)
    deallocate(slope_length)
    deallocate(stp)

    close(discharge_input_file_id)

  end subroutine subbasin_close