%N fbasant %F $MIR/src/subs/fitsio.for
%D Determine antennas from baseline number.
%P jm
%: fits i/o
%B
      subroutine fbasant(bl, ant1, ant2, config)

      integer ant1, ant2,config
      real bl
  ---------------------------------------------------------------------
  fBasAnt is a Miriad routine that returns the antenna numbers that are
  required to produce the input baseline number.

  This uses an extension of the FITS convention to handle antenna
  numbers up to 2047.  The relationship between the baseline and the
  antenna numbers is defined as either
    baseline = (Ant1 * 256) + Ant2.  (when ant1,ant2 < 256)
  or
    baseline = (Ant1 * 2048) + Ant2 + 65536. (otherwise)

  See also: basant

  Input:
    bl       The baseline number.
  Output:
    ant1     The first antenna number.
    ant2     The second antenna number.
    config   Configuration number.
