Martha starts 080317

** WAPP error means there is no cal for last 2 scans.
 
** The drift is drift33p1   Declination is +075430
** This is a fall drift....
** The pos file name is therefore:    pos_060906_+075430f.sav
**

-- Working in:  /home/arecibo10/galaxy/proc/06.09.06
   cp /home/arecibo10/galaxy/idlraw/06.09.06/*list* .
   gedit cal060906.list   
   gedit drift060906.list 

   >idl
   >@wasinit2
   >@alfinit

-- > callist='cal060906.list'              
   > dir='/home/arecibo10/galaxy/idlraw/06.09.06' 
   > calib1,callist,dcalON,dcalOFF,dir=dir
   > help,dcalon,/st
   > calib2,dcalON,dcalOFF,ncalib
   > Any bad boards in system?
   > help,ncalib,/st
   > save, ncalib,file='ncalib_060906.sav'         


** There are 12 cal values for this  short run ***
** There is one high point, midrun, in several beams**

-- > bpdgui
   Enter the new calsession: calsession_060906.sav
   Enter the new runpos: pos_060906_+075430f.sav  
   Be sure to set CRAT to "fit", not "median"

**The interp regions here are [3487 to 3510] **

-- restore,'pos_060906_+075430f.sav'
   help,pos
 
** There are 12 drifts for this run **

-- restore,'pos_060906_+075430f.sav'
-- restore,'  d214400+294831.526180333.sav'
-- flagbb,dred,cont_pt,mask,pos,GAUSAV=11,HAN=3,AGC=1,n1=0,n2=6
   save,pos,file='pos_060906_+075430f.sav'

--------------------------------------------------------------------------------

  d212702+075431.624982209.sav  q1  2 AGC   FAA on + 8,12
  d213708+075431.624982814.sav  q1  1 AGC   GPS 328-544
  d214715+075431.624983419.sav  q1  nada    cont 0,2,6
  d215721+075431.624984024.sav  q1  nada    
  d220728+075431.624984629.sav  q1  nada    
  d221735+075431.624985234.sav  q1  nada    
  d222741+075431.624985839.sav  q1  nada    
  d223748+075431.625000044.sav  q1  2 AGC   
  d224754+075431.625000649.sav  q1  HVC
  d225801+075431.625001254.sav  q1  1 AGC   
  d230808+075431.625001859.sav  q1  1 AGC + HVC 
  d231814+075431.625002464.sav  q1  2 AGC + HVC 

   save,pos,file='pos_060906_+075430f.sav'
   
   strip_pv,dred,cont_pt,msmooth,n1=0,n2=6,showpol=3,gausav=11,han=5,rfimod=0,units=1
   inspect,msmooth,showpol=3,nstrip=4,agc=1
   reviewbb,dred,cont_pt,mask,pos,GAUSAV=11,HAN=3,AGC=1,n1=0,n2=6

>   print,where(pos.badbox[0,0,0,2] eq 0)

Overall this is a good dataset. The FAA is on so there is also rfi 8,12.