ID_13510

default fitld
clint 0.166667
datain 'PWD:BF135AL.idifits
outname 'BF135AL
outclass 'uvdata'
outseq 1
outdisk 1
inp 
go

recat


default 'listr'
getn 1
optype 'SCAN'
docrt -1
outprint 'PWD:BF135AL_listr.txt
go listr

default 'prtan'
getn 1
docrt -1
outprint 'PWD:BF135AL_prtan.txt
go prtan

run vlbautil

default TECOR
getn 1
aparm 1 0
infile 'PWD:jplg3530.24i
go

curl -u anonymous:daip@nrao.edu --ftp-ssl ftp://gdc.cddis.eosdis.nasa.gov/vlbi/gsfc/ancillary/solve_apriori/usno_finals.erp  > ./usno_finals.erp

default CLCOR
getn 1
opcode 'eops'
infile 'PWD:usno_finals.erp
go

default vlbaccor
getn 1
inp
vlbaccor

default spflg
getn 1
source 'J0841+7053'
timer 0 09 50 44 0 09 51 00
docal 1
gainu 0
flagv 0
go

default vlbacrpl
getn 1
stokes 'half'
refant 2
gainuse 0
solint -1
dotv 1
source 'J0841+7053'
inp
vlbacrpl

default VLBAMPCL
getn 1
calsour 'J0841+7053' '
timer 0 09 50 44 0 09 51 00
refant 2 
inp
VLBAMPCL

tget possm 
gainu 0
timer 0 09 50 44 0 09 51 00
inp
go

default vlbaamp
getn 1
inp
vlbaamp

default snplt
getn 1
dotv 1
inext 'cl'
invers 0
opty 'amp' 
nplots 10
opco 'alsi' 
do3col 1 
inp
tvin 
go


default editr
getn 1
docal 1
gainuse 0 
crowded 1 
do3col 1
antuse 1 2 3 4 5 6 7 8 9 10 
source 'J0841+7053''
inp
go

source 'J0831+7035''
inp
go

source 'HOLMBERGIIX1''
inp
go


default vlbapang
getn 1
inp
vlbapang



default fring
getn 1
calsour 'J0841+7053', 'J0831+7035' 
refant 2
search 9 5 4 1 3 7 8 
solint 0.25
aparm(6) 2 
aparm(9) 1 
docal 1
gainu 8
inp
go

default clcal
getn 1
gainv 8 
gainu 9 
snver 5
interpol '2pt' 
refant 2
sour 'J0841+7053', 'J0831+7035'
calsour sour
inp
go

source 'HOLMBERGIIX1'
interpol '2pt'
go clcal


default vlbabpss
getn 1
calsour 'J0841+7053'  
refant 2
inp
vlbabpss


tget possm
baseline=0
aparm=0
aparm(8)=2
aparm(9)=1
bpver=1; doband=1
go

default tasav
getn 1
outdisk 1
inp
go

default 'fittp'
getn 4
dataout 'PWD:BF135AL_tasav.fits
go fittp

default 'split'
getn 1
source 'HOLMBERGIIX1'
docal 1
gainu 9
doband 1
bpver 1
flagv 0
aparm 2 1 0
go split

default wiper
getn 1
source 'HOLMBERGIIX1''
imsi 512
inp
go


default 'fittp'
getn 5
dataout 'PWD:HOLMBERGIIX1_v1.uvfits
go fittp


default 'split'
getn 1
source 'J0831+7035'
docal 1
gainu 9
doband 1
bpver 1
flagv 0
aparm 2 1 0
go split

default 'fittp'
getn 6
dataout 'PWD:J0831+7035_v1.uvfits
go fittp


default editr
getn 1
docal 1
gainuse 0 
crowded 1 
do3col 1
antuse 1 2 3 4 5 6 7 8 9 10 
source 'HOLMBERGIIX1''
doband 1
bpver 1
inp
go

source 'J0831+7035''
inp
go

source 'HOLMBERGIIX1''
inp
go



default 'fitld'
datain 'PWD:J0831+7035_v1.uvfits.fits
digicor -1
doconcat 1
ncount 1
outname 'cln
go fitld

default calib
getn 1
get2n 
CALSOUR 'J0831+7035
nmaps 1
refant 2
weightit 1
soltype 'l1r'
cmethod 'dft'
solint 1
aparm 3 0
solmode 'p'
docal 1
gainu 9
doband 1
bpver 1
flagv 0
go calib

default clcal
getn 1
calsour 'J0831+7035'
sour 'J0831+7035'
docal 1
gainv 9
gainu 10
snver 6
refant 2
interpol 'self'
opcode 'CALI'
doband 1
bpver 1
go clcal

tget clcal
source 'HOLMBERGIIX1', ''
interpol '2PT'
go clcal


default fring
getn 1
calsour 'J0831+7035' '
refant 2
search 9 5 4 1 3 7 8 
solint 0.75
aparm(6) 2 
aparm(9) 1 
docal 1
gainu 10
inp
go

default clcal
getn 1
gainv 10 
gainu 11 
snver 9
interpol '2pt' 
refant 2
sour 'J0831+7035''
calsour sour
inp
go

source 'HOLMBERGIIX1'
interpol '2pt'
go clcal



default 'split'
getn 1
source 'HOLMBERGIIX1'
docal 1
gainu 11
doband 1
bpver 1
flagv 0
aparm 2 1 0
go split

default wiper
getn 1
source 'HOLMBERGIIX1''
imsi 512
inp
go


default 'fittp'
getn 8
dataout 'PWD:HOLMBERGIIX1_v3.uvfits
go fittp