Martha starts 070114

** Observers noticed: RFI 1380 (narrow and wide). 
** Some intermittent RFI bursts at ~1400 MHz.

** The drift is 19p2 +043724           {Be sure to note the declination!}
** This is a spring drift....
** The pos file name is therefore:    pos_061207a_+043724s.sav
**
-- Working in:  /share/a2010-2/work/haynes/06.12.07a
   cp /share/a2010-2/data/06.12.07a/*list* .
   gedit cal061207a.list   [make triplets]
   gedit drift061207a.list [add directory to name]

   >idl
   >@wasinit2
   >@alfinit

-- > callist='cal061207a.list'               
   > dir='/share/a2010-2/data/06.12.07a'     
   > 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_061207a.sav'     

** There are 23 cal values for this run ***
** The calibration for this run looks fine **

-- > bpdgui

   Enter the new calsession: calsession_061207a.sav
   Enter the new runpos: pos_061207a_+043724s.sav                
   CRAT to "fit", not "median"

**The interp regions here are [3478 to 3516] 

-- restore,'pos_061207a_+043724s.sav'
   help,pos

** There are 23 drifts for this run **

Next, start working on FLAGBB:

-- restore,'pos_061207a_+043724s.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_061207a_+043724s.sav'

------------------------------------------------------------------------------
  d073101+043724.634110484.sav  q2  1 AGC     sw 5.1,6.0/1 +burst ch 2595-2830, rec 4-73
  d074108+043724.634111089.sav  q2  nada      sw 6.0/1 1400 burst 209-380 & 444-474
  d075114+043724.634111694.sav  q1  nada      better 
  d080121+043724.634112299.sav  q3  nada      bursty stuff at 1400 and also 1378
  d081128+043724.634112904.sav  q1  2 AGC     better
  d082135+043724.634113509.sav  q2  2 AGC     1400 burst 251-289
  d083141+043724.634114114.sav  q2  4 AGC     1400 burst 110-157 & 400?
  d084148+043724.634114719.sav  q2  nada      1400 burst 165-218
  d085155+043724.634115324.sav  q2  1 AGC     GPS 161-276; 1400 burst 274-315 & 544-573
  d090201+043725.634115929.sav  q2  nada      1400 burst 239-280, 325-260, 437-587
  d091208+043724.634116534.sav  q2  1 AGC     1400 bursts (5 separate ones)
  d092215+043724.634117139.sav  q1  nada      no bursts
  d093222+043724.634117744.sav  q2  1 AGC     GPS burst 363-590
  d094228+043724.634118349.sav  q1  1 AGC     ok
  d095235+043724.634118954.sav  q1  1 AGC     burst 438-468 (1398-1402)
  d100242+043724.634119559.sav  q3  nada      several bursts; also 1375-1378 yuck
  d101249+043724.634120164.sav  q1  1 AGC     ok
  d102255+043724.634120769.sav  q1  2 AGC     cont 6, GPS 133-336; small 1400 burst 0-22
  d103302+043724.634121374.sav  q2  1 AGC     6 bursts@1400
  d104309+043724.634121979.sav  q2  1 AGC     1400 burst 46-103
  d105316+043724.634122584.sav  q2  2 AGC     1400 bursts 0-157 & 235-278
  d110322+043724.634123189.sav  q3  3 AGC     1400 bursts 5X
  d111329+043724.634123794.sav  q1  4 AGC     ok


   save,pos,file='pos_061207a_+043724s.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)


**  This was a really fun dataset to flag...
**  There are repeated bursts of RFI between chans 2662-2830 (1400-1404 MHz) (pol A)
**       and 2564-2756 or a2830 (pol B)
**  Additional burst (d080121) chans 1710-1812 uncorrelated with above.