Martha starts 09.01.17

** Beam 6B is on tonight. FAA radar, too 
 
** The drift is 10p2 +022600          
** This is a spring drift....
** The pos file name is therefore:    pos_090109_+022600s.sav
**
-- Working in:  /home/rutados/data/idl/work/spr09/09.01.09
   cp /home/dorado13/galaxy/idlraw/09.01.09/*list* .
   gedit cal090109.list   
   gedit drift090109.list 

   >idl
   >@wasinit2
   >@alfinit

--  > callist='cal090109.list'        
   > dir='/home/dorado13/galaxy/idlraw/09.01.09' 
   > calib1,callist,dcalON,dcalOFF,dir=dir
   > help,dcalon,/st
   > calib2,dcalON,dcalOFF,ncalib
   > Any bad boards in system?
   n
   > help,ncalib,/st
   > save, ncalib,file='ncalib_090109.sav'    
** There are 42 cal values for this run ***
** The calibration for this run looks fine

**RG lost the last CALON file apparently so there are only
**42 cals for this run, but 43 drifts.
**The first time I run BPD, it fails on the last drift. 
**I check the fits file; the last one is no good (short)
**So dropping it from drift list and rerun BPD

--  bpdgui
   Set the list of files (upper left; use "browse"): drift090109.list.
   Enter the new calsession: calsession_090109.sav
   Enter the new runpos: pos_090109_+022600s.sav 
   set CRAT to "fit", not "median"

**The interp regions here are [3474 to 3520] **

-- restore,'pos_090109_+022600s.sav'
   help,pos
** There are 42 drifts for this run **

MARTHA STOPS HERE AFTER FLAGGING 1st DRIFT (bb exists)
Now martha is continuing with this one........

-- restore,'pos_090109_+022600s.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_090109_+022600s.sav'
--------------------------------------------------------------------------------

  d071901+022600.900900029.sav  q1  nada      GPS burst 495-560
  d072909+022600.900900031.sav  q1  nada      GPS burst 280-474
  d073916+022600.900900033.sav  q1  nada      
  d074923+022600.900900035.sav  q1  nada      
  d075930+022600.900900037.sav  q1  nada      
  d080937+022600.900900039.sav  q1  nada      
  d081943+022600.900900041.sav  q1  1 AGC
  d082950+022600.900900043.sav  q1  nada      
  d083958+022600.900900045.sav  q1  2 AGC
  d085004+022600.900900047.sav  q1  2 AGC
  d090011+022600.900900049.sav  q1  nada
  d091018+022560.900900051.sav  q1  nada
  d092025+022600.900900053.sav  q1  1 AGC
  d093031+022560.900900055.sav  q1  2 AGC
  d094039+022600.900900057.sav  q1  2 AGC
  d095046+022600.900900059.sav  q1  2 AGC
  d100052+022560.900900061.sav  q1  1 AGC
  d101059+022560.900900063.sav  q1  nada
  d102107+022600.900900065.sav  q1  nada    GPS 199-339
  d103114+022600.900900067.sav  q1  2 AGC   abs in 715637?
  d104121+022600.900900069.sav  q1  1 AGC   GPS games 418-599
  d105128+022600.900900071.sav  q1  2 AGC   GPS 0-15
  d110135+022600.900900073.sav  q1  1 AGC   GPS 570-599
  d111142+022600.900900075.sav  q1  2 AGC   GPS 0-33
  d112148+022600.900900077.sav  q1  1 AGC   GPS 100-162
  d113155+022600.900900079.sav  q1  2 AGC   
  d114202+022600.900900081.sav  q1  1 AGC   GPS 538-599
  d115208+022600.900900083.sav  q1  1 AGC   FAA strong
  d120215+022600.900900085.sav  q1  1 AGC   ditto
  d121223+022600.900900087.sav  q1  1 AGC   ditto
  d122230+022600.900900089.sav  q2  1 AGC   bad recs? 321-445 fluxt set stat 3or4
  d123236+022600.900900091.sav  q1  1 AGC   
  d124243+022600.900900093.sav  q1  1 AGC   
  d125251+022601.900900095.sav  q1  1 AGC   cont 4,3
  d130258+022601.900900097.sav  q1  1 AGC   
  d131305+022601.900900099.sav  q1  1 AGC   cont 3,5
  d132312+022600.900900101.sav  q1  1 AGC   
  d133320+022600.900900103.sav  q1  2 AGC  
  d134327+022600.900900105.sav  q1  2 AGC  cont 1
  d135333+022601.900900107.sav  q2  nada   broadband, sunrise? 247-289
  d140340+022601.900900109.sav  q3  1 AGC  broadband rfi recs  mask it; nasty; probably after sunrise
  d141347+022600.900900111.sav  q2  nada   some rfi bursts  recs 271-300; reduce status

   save,pos,file='pos_090109_+022600s.sav'
   restore,'pos_090109_+022600s.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, with good baselines and not much rfi except
   for our GPS friends who must have been having a field day**