wnml_antenna Subroutine

  subroutine wnml_antenna(unit)
    implicit none
    integer, intent(in) :: unit
    integer :: i
    if (no_driver) return
    call driver_config%write(unit)
    do i=1,nk_stir
       call stir_config(i)%write(unit)
    end do
  end subroutine wnml_antenna