# High level glish script to set up the GBT for 
# 200 MHz mode with the Spectrometer.
#
# Observing the H20 line in an extragalactic source
# with double beam-switching.
#
include '/users/gbtops/include/gfuncs/gbtsetup.g'

# switching mode for beam switching.

  swdat := [ mode='sp', type='bsw', swper=1.0, df=[ 0, 0] ]

# Receiver setup 

  rcv_par  := [ cal='lo', pol='circ', beams='B12', xfer='ext']

# Velocity info

  velinfo := [ v=[ 470.0, 470.0], frame='lsrk', vdef='radio']

# Spectrometer params
  spect_par := [ levels=3, quads=2]


# master setup routine:
# gbtsetup( <receiver>, <obstype>, <backend>, <restfreq>, <bandwidth>,
#		<integrationtime>, sw=<switchinfo>, rcv=<receiverinfo>,
#		vel=<velocityinfo>, df=<freqoffset>,
#		back_par=<backend parameters>


  gbtsetup( 'Rcvr18_22', 'spec', 'acs', 22235.08, 200, 30.0, 
	sw=swdat, rcv=rcv_par, vel=velinfo, df=0.0, back_par=spect_par)


exit