finish_antenna_data Subroutine

  subroutine finish_antenna_data
    implicit none
    ant_on = .false.
    !CMR,17/7/2009: add allocated test to avoid severe runtime library error
    if (allocated(a_ant) .and. allocated(b_ant)) deallocate (a_ant, b_ant)
    initialized = .false.
  end subroutine finish_antenna_data