2/11/03

cold sky, aborted
2003_02_11_22:14:12A.fits scan: 1 cold_sky 2 spectra 4 phases 1 recs
2003_02_11_22:14:12B.fits scan: 1 cold_sky 2 spectra 4 phases 1 recs
2003_02_11_22:14:12C.fits scan: 1 cold_sky 2 spectra 4 phases 1 recs
2003_02_11_22:14:12D.fits scan: 1 cold_sky 2 spectra 4 phases 1 recs

cold sky
2003_02_11_22:28:28A.fits scan: 2 cold_sky 2 spectra 4 phases 60 recs
   az: 44.15 el: 60.1 ra2000: 5.077 dec2000: 54.99 freq: 8000
2003_02_11_22:28:28B.fits scan: 2 cold_sky 2 spectra 4 phases 60 recs
   az: 44.15 el: 60.1 ra2000: 5.077 dec2000: 54.99 freq: 8000
2003_02_11_22:28:28C.fits scan: 2 cold_sky 2 spectra 4 phases 60 recs
   az: 44.15 el: 60.1 ra2000: 5.077 dec2000: 54.99 freq: 8000
2003_02_11_22:28:28D.fits scan: 2 cold_sky 2 spectra 4 phases 60 recs
   az: 44.15 el: 60.1 ra2000: 5.077 dec2000: 54.99 freq: 8000

IF noise source
2003_02_11_23:12:02A.fits scan: 3 cold_sky 2 spectra 4 phases 659 recs
2003_02_11_23:12:02B.fits scan: 3 cold_sky 2 spectra 4 phases 659 recs
2003_02_11_23:12:02C.fits scan: 3 cold_sky 2 spectra 4 phases 659 recs
2003_02_11_23:12:02D.fits scan: 3 cold_sky 2 spectra 4 phases 659 recs
show_record_dsmror(3.2, phase=1, rec_num=[2,30], spec_num=1, decimate=1, linecolor=2, newplot=T, cf_offset=1200, usb=F) 
# samplerB1_spectrum.ps
spectrum_fft(smsdiff, bandwidth=F);
pg.setxscale(0, 60);
pg.setyscale(-0.01, 0.65);
# spec3B1_fft.ps
show_record_dsmror(3.1, phase=1, rec_num=[2,48], spec_num=1, decimate=1, linecolor=2, newplot=T, cf_offset=1200, usb=F) 
# samplerA1_spectrum.ps
spectrum_fft(smsdiff, bandwidth=F);
pg.setxscale(0, 60);
pg.setyscale(-0.01, 0.65);
# spec3A1_fft.ps

make_fft_record_array(3.1, ref_rec=2, decimate=4)
cp ~/Applications/GBTchecks/Spectrometer/fft_array /home/users/groups/baseline/Projects/TBASEJRF030211/ifnsA
make_fft_record_array(3.2, ref_rec=2, decimate=4)
cp ~/Applications/GBTchecks/Spectrometer/fft_array /home/users/groups/baseline/Projects/TBASEJRF030211/ifnsB
make_fft_record_array(3.3, ref_rec=2, decimate=4)
cp ~/Applications/GBTchecks/Spectrometer/fft_array /home/users/groups/baseline/Projects/TBASEJRF030211/ifnsC
make_fft_record_array(3.4, ref_rec=2, decimate=4)
cp ~/Applications/GBTchecks/Spectrometer/fft_array /home/users/groups/baseline/Projects/TBASEJRF030211/ifnsD

for(i in 3:600){plot_fft('ifnsA', bw=800, scan=1, rec=i, spec=1, xmax=50, ymax=0.2, lc=2, np=T);for(j in 1:10000)x:=43.*89.;}

x := [=];
x[1] := [7,8];
x[2] := [8,11,14,15,23];
x[3] := [7,8,9,15,16,23,24,25,26,29,30,31,41,42,43,44,45];
x[4] := [16];
x[5] := [11,12,18];
x[6] := [7,8,9,11,13,18,23];
x[7] := [7,9,12,14,15,16,17,18,27,28,29,39,40,41,42,43,44];
x[8] := [9,10,13,16,19,20,25,26,29,32];
x[9] := [9,10,14,16];
x[10] := [30,39,41];
x[11] := [41]
X := [=];
X[1] := [11,12,13];
X[2] := [100];
X[3] := [13,14];
X[4] := [13,14,15];
X[5] := [13,14];
X[6] := [100];
X[7] := [13];
X[8] := [14,15];
X[9] := [11,13];
X[10] := [36];
X[11] := [39];
lbl := ['A1', 'A2', 'B1', 'B2', 'C1', 'C2', 'D1', 'D2', '63', '23', '21'];
pg.clear();
np := T;
ch := pg.qch();
for (i in 1:11) {
    y := array(12 - i, length(x[i]));
    pg.sch(1.7);
    pg.plotxy(x[i], y, plotlines=F, newplot=np, ptsymbol=6,
		xtitle='FFT Channel', ytitle='Spectrometer Output Spectrum');
    pg.sch(1.4);
    pg.ptxt(-1.0, 12 - i - 0.2, 0.0, 0.0, lbl[i]);
    if (np) {
	pg.setxscale(-2.0, 46.0);
	pg.setyscale(0.0, 12.0);
    }
    np := F;
    y := array(12 - i, length(X[i]));
    pg.sch(2.5);
    pg.plotxy(X[i], y, plotlines=F, newplot=F, ptsymbol=16);
}
pg.plotxy([1,41], [3.5,3.5], linecolor=1, newplot=F);
pg.sch(ch);
# fft11_matrix.ps

plot_fft_chan('ifnsA', bw=F, scan=1, rec=[3:600], spec=1, ch=13, ph=[1,4], time=T, lc=2, np=T)
plot_rack_temp(3, offset=-0.02, scale=0.2, lc=6, np=F)
plot_room_temp(3, offset=-0.04, scale=0.2, lc=3, np=F) 
pg.setyscale(-0.09, 0.09)
# temp3A1cor.ps

plot_fft_chan('ifnsA', bw=F, scan=1, rec=[3:600], spec=1, ch=13, ph=[1,4], offset=0.0, time=T, lc=2, np=T)  
pg.setyscale(0, 0.7) 
plot_fft_chan('ifnsA', bw=F, scan=1, rec=[3:600], spec=2, ch=13, ph=[1,4], offset=0.1, time=T, lc=3, np=F) 
plot_fft_chan('ifnsB', bw=F, scan=1, rec=[3:600], spec=1, ch=13, ph=[1,4], offset=0.12, time=T, lc=4, np=F) 
plot_fft_chan('ifnsB', bw=F, scan=1, rec=[3:600], spec=2, ch=13, ph=[1,4], offset=0.16, time=T, lc=5, np=F) 
plot_fft_chan('ifnsC', bw=F, scan=1, rec=[3:600], spec=1, ch=13, ph=[1,4], offset=0.26, time=T, lc=2, np=F) 
plot_fft_chan('ifnsC', bw=F, scan=1, rec=[3:600], spec=2, ch=13, ph=[1,4], offset=0.36, time=T, lc=3, np=F) 
plot_fft_chan('ifnsD', bw=F, scan=1, rec=[3:600], spec=1, ch=13, ph=[1,4], offset=0.40, time=T, lc=4, np=F) 
plot_fft_chan('ifnsD', bw=F, scan=1, rec=[3:600], spec=2, ch=13, ph=[1,4], offset=0.54, time=T, lc=5, np=F)  
# ch13cor.ps

plot_fft_chan('ifnsA', bw=F, scan=1, rec=[3:600], spec=1, ch=13, ph=[1,4], offset=0.0, time=T, lc=2, np=T)  
pg.setyscale(0, 0.2) 
plot_fft_chan('ifnsA', bw=F, scan=1, rec=[3:600], spec=1, ch=12, ph=[1,4], offset=0.05, time=T, lc=3, np=F)  
plot_fft_chan('ifnsA', bw=F, scan=1, rec=[3:600], spec=1, ch=11, ph=[1,4], offset=0.1, time=T, lc=6, np=F)   
# ch11_12_13cor.ps

plot_fft_chan('ifnsB', bw=F, scan=1, rec=[3:600], spec=1, ch=13, ph=[1,4], offset=0.0, time=T, lc=2, np=T)  
pg.setyscale(0, 0.4) 
plot_fft_chan('ifnsB', bw=F, scan=1, rec=[3:600], spec=1, ch=14, ph=[1,4], offset=0.05, time=T, lc=3, np=F)  
plot_fft_chan('ifnsB', bw=F, scan=1, rec=[3:600], spec=1, ch=15, ph=[1,4], offset=0.2, time=T, lc=6, np=F)   
plot_fft_chan('ifnsB', bw=F, scan=1, rec=[3:600], spec=1, ch=30, ph=[1,4], offset=0.28, time=T, lc=4, np=F)   
# ch113_14_15_30cor.ps

--------------------------------------------------------------------
2/13/03

IF noise source
2003_02_13_22:41:45A.fits scan: 1 if_noise 2 spectra 4 phases 4 recs
2003_02_13_22:41:45B.fits scan: 1 if_noise 2 spectra 4 phases 4 recs
2003_02_13_22:41:45C.fits scan: 1 if_noise 2 spectra 4 phases 4 recs
2003_02_13_22:41:45D.fits scan: 1 if_noise 2 spectra 4 phases 4 recs

IF noise source
2003_02_13_22:45:38A.fits scan: 2 if_noise 2 spectra 4 phases 719 recs
2003_02_13_22:45:38B.fits scan: 2 if_noise 2 spectra 4 phases 719 recs
2003_02_13_22:45:38C.fits scan: 2 if_noise 2 spectra 4 phases 719 recs
2003_02_13_22:45:38D.fits scan: 2 if_noise 2 spectra 4 phases 719 recs

make_fft_record_array(2.1, ref_rec=2, decimate=4)
cp ~/Applications/GBTchecks/Spectrometer/fft_array /home/users/groups/baseline/Projects/TBASEJRF030213/ifnsA
make_fft_record_array(2.2, ref_rec=2, decimate=4)
cp ~/Applications/GBTchecks/Spectrometer/fft_array /home/users/groups/baseline/Projects/TBASEJRF030213/ifnsB
make_fft_record_array(2.3, ref_rec=2, decimate=4)
cp ~/Applications/GBTchecks/Spectrometer/fft_array /home/users/groups/baseline/Projects/TBASEJRF030213/ifnsC
make_fft_record_array(2.4, ref_rec=2, decimate=4)
cp ~/Applications/GBTchecks/Spectrometer/fft_array /home/users/groups/baseline/Projects/TBASEJRF030213/ifnsD

show_record_dsmror(2.2, phase=1, rec_num=[2,300], spec_num=1, decimate=1, linecolor=2, newplot=T, cf_offset=1200, usb=F) 
spectrum_fft(smsdiff, bandwidth=F);
pg.setxscale(0, 60);
pg.setyscale(-0.01, 0.65);


x := [=];
x[1] := [16,18,26,28,32,33,34];
x[2] := [10,19,22,23,33,34,35];
x[3] := [10,11,18,19];
x[4] := [11,15,16,22,23,24];
x[5] := [14,15,24,28];
x[6] := [8,11,12,13,18,19,20,23,24,25,30,31,32,33];
x[7] := [11,13,14,22,23];
x[8] := [12];
x[9] := [9,10,14,16];
x[10] := [30,39,41];
x[11] := [41]
X := [=];
X[1] := [12,13,14,27];
X[2] := [12,13,1420,21,24];
X[3] := [12,13];
X[4] := [13];
X[5] := [11,12,16];
X[6] := [100];
X[7] := [12];
X[8] := [11,13];
X[9] := [11,13];
X[10] := [36];
X[11] := [39];
lbl := ['A1', 'A2', 'B1', 'B2', 'C1', 'C2', 'D1', 'D2', '63', '23', '21'];
pg.clear();
np := T;
ch := pg.qch();
for (i in 1:11) {
    y := array(12 - i, length(x[i]));
    pg.sch(1.7);
    pg.plotxy(x[i], y, plotlines=F, newplot=np, ptsymbol=6,
		xtitle='FFT Channel', ytitle='Spectrometer Output Spectrum');
    pg.sch(1.4);
    pg.ptxt(-1.0, 12 - i - 0.2, 0.0, 0.0, lbl[i]);
    if (np) {
	pg.setxscale(-2.0, 46.0);
	pg.setyscale(0.0, 12.0);
    }
    np := F;
    y := array(12 - i, length(X[i]));
    pg.sch(2.5);
    pg.plotxy(X[i], y, plotlines=F, newplot=F, ptsymbol=16);
}
pg.plotxy([1,41], [3.5,3.5], linecolor=1, newplot=F);
pg.sch(ch);
# fft13_matrix.ps
---------------------------------
FFT's of Roger's data:

dir := '/home/gbtdata/TBASErdn030221/';

show_avg_scan_diff(28, 27, spec_num=1, linecolor=2, newplot=T)
spectrum_fft(sdiff, bandwidth=F)
pg.setxscale(0, 30)
#fft63mhz.ps

show_avg_scan_diff(32, 31, spec_num=1, linecolor=2, newplot=T)
spectrum_fft(sdiff, bandwidth=F)
pg.setxscale(0, 60)
#fft23mhz.ps

show_avg_scan_diff(30, 29, spec_num=1, linecolor=2, newplot=T)
spectrum_fft(sdiff, bandwidth=F)
pg.setxscale(0, 60)
#fft21mhz.ps