! Started logfile: /d2/scr/pima/rdv96_uvs/J0147+5840_X_uvs.log on Fri Dec 20 23:43:37 2013
obs /d2/scr/pima/rdv96_uvs/J0147+5840_X_uva.fits
! Reading UV FITS file: /d2/scr/pima/rdv96_uvs/J0147+5840_X_uva.fits
! AN table 1: 44 integrations on 45 of 45 possible baselines.
! Apparent sampling: 0.888889 visibilities/baseline/integration-bin.
! Found source: J0147+5840
! 
! There are 4 IFs, and a total of 4 channels:
! 
!  IF  Channel    Frequency  Freq offset  Number of   Overall IF
!       origin    at origin  per channel   channels    bandwidth
!  ------------------------------------------------------------- (Hz)
!  01        1  8.40599e+09        8e+06          1        8e+06
!  02        2  8.47599e+09        8e+06          1        8e+06
!  03        3  8.79099e+09        8e+06          1        8e+06
!  04        4  8.89599e+09        8e+06          1        8e+06
! 
! Polarization(s): RR
! 
! Read 0 lines of history.
! 
! Reading 7040 visibilities.
select RR
! Selecting polarization: RR,  channels: 1..4
! Reading IF 1 channels: 1..1
! Reading IF 2 channels: 2..2
! Reading IF 3 channels: 3..3
! Reading IF 4 channels: 4..4
print "field_size =",field_size
! field_size = 1024 
print "field_cell =",field_cell
! field_cell = 0.2 
print "taper_size =",taper_size
! taper_size = 70 
![@/home/lpetrov/bin/rdv_muppet /d2/scr/pima/rdv96_uvs/J0147+5840_X]
integer clean_niter
clean_niter = 100
float clean_gain
clean_gain = 0.03
float dynam
dynam = 6.0
float soltime1
soltime1 = 800000
float soltime2
soltime2 = 15
float soltime3
soltime3 = 1
float thresh
thresh = 0.5
float win_mult
win_mult = 1.8
float old_peak
float new_peak
float flux_cutoff
selfant "",false
! 1:BR       self-cal  status=correctable  weight=1
! 1:FD       self-cal  status=correctable  weight=1
! 1:HN       self-cal  status=correctable  weight=1
! 1:KP       self-cal  status=correctable  weight=1
! 1:LA       self-cal  status=correctable  weight=1
! 1:MK       self-cal  status=correctable  weight=1
! 1:NL       self-cal  status=correctable  weight=1
! 1:OV       self-cal  status=correctable  weight=1
! 1:PT       self-cal  status=correctable  weight=1
! 1:SC       self-cal  status=correctable  weight=1
system "rm /tmp/ff.ff"
mapsize field_size, field_cell
! Map grid = 1024x1024 pixels with 0.200x0.200 milli-arcsec cellsize.
startmod
! Applying default point source starting model.
! Performing phase self-cal
! Adding 1 model components to the UV plane model.
! The established model now contains 1 components and 1 Jy
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Correcting IF 4.
! 
! Fit before self-cal, rms=1.005699Jy  sigma=1.631294
! Fit after  self-cal, rms=0.909602Jy  sigma=1.424203
! clrmod: Cleared the established, tentative and continuum models.
! Redundant starting model cleared.
print "=== Flag out IVS stations"
! === Flag out IVS stations 
integer lun
string  cfg_file
lun = outfile ( "/tmp/ff.ff" ) 
do i=1,nsub
  do j=1,ntel(i)
    fprintf lun, "%s\n", telname(j,i)
    end do
  end do
close ( lun )
system "/home/lpetrov/bin/dimap_flag_process.csh /tmp/ff.ff"
![@/tmp/ff.ff \]
![Exited script file: /tmp/ff.ff]
uvw 2,-1
! Uniform weighting binwidth: 2 (pixels).
! Gridding weights will be scaled by errors raised to the power -1.
! Radial weighting is not currently selected.
flux_cutoff = imstat(rms) * dynam
! Inverting map and beam 
! Estimated beam: bmin=1.059 mas, bmaj=1.168 mas, bpa=-84.41 degrees
! Estimated noise=13.1733 mJy/beam.
repeat
  if (peak(flux) > flux_cutoff) peakwin win_mult
  clean clean_niter,clean_gain
  flux_cutoff = imstat(rms) * dynam
  selfcal
  new_peak = peak(flux)
  until(new_peak<=flux_cutoff)
! Added new window around map position (0, 0).
! clean: niter=100  gain=0.03  cutoff=0
! Component: 050  -  total flux cleaned = 0.0753666 Jy
! Component: 100  -  total flux cleaned = 0.101874 Jy
! Total flux subtracted in 100 components = 0.101874 Jy
! Clean residual min=-0.008047 max=0.022978 Jy/beam
! Clean residual mean=0.000043 rms=0.002012 Jy/beam
! Combined flux in latest and established models = 0.101874 Jy
! Performing phase self-cal
! Adding 10 model components to the UV plane model.
! The established model now contains 10 components and 0.101874 Jy
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Correcting IF 4.
! 
! Fit before self-cal, rms=0.066004Jy  sigma=0.098931
! Fit after  self-cal, rms=0.065134Jy  sigma=0.097916
! Inverting map 
! Added new window around map position (-0.8, -1.4).
! clean: niter=100  gain=0.03  cutoff=0
! Component: 050  -  total flux cleaned = 0.0229078 Jy
! Component: 100  -  total flux cleaned = 0.0340463 Jy
! Total flux subtracted in 100 components = 0.0340463 Jy
! Clean residual min=-0.005101 max=0.009587 Jy/beam
! Clean residual mean=0.000013 rms=0.001211 Jy/beam
! Combined flux in latest and established models = 0.13592 Jy
! Performing phase self-cal
! Adding 12 model components to the UV plane model.
! The established model now contains 19 components and 0.13592 Jy
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Correcting IF 4.
! 
! Fit before self-cal, rms=0.056772Jy  sigma=0.080432
! Fit after  self-cal, rms=0.056089Jy  sigma=0.079272
! Inverting map 
! clean: niter=100  gain=0.03  cutoff=0
! Component: 050  -  total flux cleaned = 0.00794053 Jy
! Component: 100  -  total flux cleaned = 0.00937888 Jy
! Total flux subtracted in 100 components = 0.00937888 Jy
! Clean residual min=-0.004314 max=0.005454 Jy/beam
! Clean residual mean=0.000005 rms=0.001017 Jy/beam
! Combined flux in latest and established models = 0.145299 Jy
! Performing phase self-cal
! Adding 12 model components to the UV plane model.
! The established model now contains 26 components and 0.145299 Jy
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Correcting IF 4.
! 
! Fit before self-cal, rms=0.054545Jy  sigma=0.077574
! Fit after  self-cal, rms=0.054258Jy  sigma=0.077241
! Inverting map 
print "=== Finished uniform weighting clean ==="
! === Finished uniform weighting clean === 
uvw 0,-1
! Uniform weighting is not currently selected.
! Gridding weights will be scaled by errors raised to the power -1.
! Radial weighting is not currently selected.
win_mult = win_mult * 1.6
clean_niter = clean_niter * 2
dynam = dynam - 0.5
flux_cutoff = imstat(rms) * dynam
! Inverting map and beam 
! Estimated beam: bmin=1.493 mas, bmaj=1.614 mas, bpa=69.54 degrees
! Estimated noise=5.78879 mJy/beam.
repeat
  if (peak(flux) > flux_cutoff) peakwin win_mult
  clean clean_niter,clean_gain
  flux_cutoff = imstat(rms) * dynam
  selfcal
  new_peak = peak(flux)
  until(new_peak<=flux_cutoff)
! clean: niter=200  gain=0.03  cutoff=0
! Component: 050  -  total flux cleaned = 0.00246452 Jy
! Component: 100  -  total flux cleaned = 0.00282624 Jy
! Component: 150  -  total flux cleaned = 0.0032122 Jy
! Component: 200  -  total flux cleaned = 0.00354591 Jy
! Total flux subtracted in 200 components = 0.00354591 Jy
! Clean residual min=-0.003576 max=0.003203 Jy/beam
! Clean residual mean=0.000010 rms=0.000816 Jy/beam
! Combined flux in latest and established models = 0.148845 Jy
! Performing phase self-cal
! Adding 7 model components to the UV plane model.
! The established model now contains 27 components and 0.148845 Jy
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Correcting IF 4.
! 
! Fit before self-cal, rms=0.053635Jy  sigma=0.076826
! Fit after  self-cal, rms=0.053584Jy  sigma=0.076746
! Inverting map 
print "=== Finished natural weighting clean for VLBI sites ==="
! === Finished natural weighting clean for VLBI sites === 
gscale true
! Performing overall amplitude self-cal
! 
! Correcting IF 1.
!  Telescope amplitude corrections in sub-array 1:
!   BR        0.98     FD        1.03     HN        0.97     KP        0.99     
!   LA        1.05     MK        0.97     NL        1.00     OV        0.97     
!   PT        0.97     SC        1.04     
! 
! 
! Correcting IF 2.
!  Telescope amplitude corrections in sub-array 1:
!   BR        0.97     FD        1.00     HN        1.02     KP        0.92     
!   LA        1.02     MK        1.02     NL        0.96     OV        0.97     
!   PT        1.02     SC        1.11     
! 
! 
! Correcting IF 3.
!  Telescope amplitude corrections in sub-array 1:
!   BR        1.04     FD        1.01     HN        1.05     KP        0.85     
!   LA        1.09     MK        1.00     NL        1.02     OV        1.01     
!   PT        1.02     SC        1.01     
! 
! 
! Correcting IF 4.
!  Telescope amplitude corrections in sub-array 1:
!   BR        1.06     FD        1.04     HN        1.02     KP        0.88     
!   LA        1.07     MK        1.03     NL        1.04     OV        1.00     
!   PT        1.04     SC        0.98     
! 
! 
! Fit before self-cal, rms=0.053584Jy  sigma=0.076746
! Fit after  self-cal, rms=0.053775Jy  sigma=0.075133
dynam = dynam - 0.5
flux_cutoff = imstat(rms) * dynam
! Inverting map and beam 
! Estimated beam: bmin=1.5 mas, bmaj=1.619 mas, bpa=70.1 degrees
! Estimated noise=5.78607 mJy/beam.
repeat
  if (peak(flux) > flux_cutoff) peakwin win_mult
  clean clean_niter,clean_gain
  flux_cutoff = imstat(rms) * dynam
  selfcal
  new_peak = peak(flux)
  until(new_peak<=flux_cutoff)
! clean: niter=200  gain=0.03  cutoff=0
! Component: 050  -  total flux cleaned = 0.000214156 Jy
! Component: 100  -  total flux cleaned = 2.06313e-05 Jy
! Component: 150  -  total flux cleaned = -0.000131445 Jy
! Component: 200  -  total flux cleaned = -0.00034158 Jy
! Total flux subtracted in 200 components = -0.00034158 Jy
! Clean residual min=-0.001953 max=0.002251 Jy/beam
! Clean residual mean=0.000028 rms=0.000504 Jy/beam
! Combined flux in latest and established models = 0.148503 Jy
! Performing phase self-cal
! Adding 13 model components to the UV plane model.
! The established model now contains 33 components and 0.148503 Jy
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Correcting IF 4.
! 
! Fit before self-cal, rms=0.053506Jy  sigma=0.075050
! Fit after  self-cal, rms=0.053517Jy  sigma=0.075000
! Inverting map 
selfcal true, true, soltime1
! Performing amp+phase self-cal over 800000 minute time intervals
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Correcting IF 4.
! 
! Fit before self-cal, rms=0.053517Jy  sigma=0.075000
! Fit after  self-cal, rms=0.053544Jy  sigma=0.074995
dynam = dynam - 0.75
clean clean_niter,clean_gain
! Inverting map and beam 
! Estimated beam: bmin=1.503 mas, bmaj=1.624 mas, bpa=68.98 degrees
! Estimated noise=5.77864 mJy/beam.
! clean: niter=200  gain=0.03  cutoff=0
! Component: 050  -  total flux cleaned = 8.56964e-05 Jy
! Component: 100  -  total flux cleaned = -4.98807e-05 Jy
! Component: 150  -  total flux cleaned = -0.000232125 Jy
! Component: 200  -  total flux cleaned = -0.000324382 Jy
! Total flux subtracted in 200 components = -0.000324382 Jy
! Clean residual min=-0.001894 max=0.002206 Jy/beam
! Clean residual mean=0.000029 rms=0.000493 Jy/beam
! Combined flux in latest and established models = 0.148179 Jy
selfcal
! Performing phase self-cal
! Adding 9 model components to the UV plane model.
! The established model now contains 35 components and 0.148179 Jy
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Correcting IF 4.
! 
! Fit before self-cal, rms=0.053404Jy  sigma=0.074952
! Fit after  self-cal, rms=0.053405Jy  sigma=0.074938
flux_cutoff = imstat(rms) * dynam
! Inverting map 
repeat
  if (peak(flux) > flux_cutoff) peakwin win_mult
  clean clean_niter,clean_gain
  flux_cutoff = imstat(rms) * dynam
  selfcal
  new_peak = peak(flux)
  until(new_peak<=flux_cutoff)
! Added new window around map position (36, 37).
! clean: niter=200  gain=0.03  cutoff=0
! Component: 050  -  total flux cleaned = 0.00185099 Jy
! Component: 100  -  total flux cleaned = 0.00214026 Jy
! Component: 150  -  total flux cleaned = 0.00217501 Jy
! Component: 200  -  total flux cleaned = 0.00223784 Jy
! Total flux subtracted in 200 components = 0.00223784 Jy
! Clean residual min=-0.001863 max=0.001796 Jy/beam
! Clean residual mean=0.000025 rms=0.000462 Jy/beam
! Combined flux in latest and established models = 0.150417 Jy
! Performing phase self-cal
! Adding 19 model components to the UV plane model.
! The established model now contains 50 components and 0.150417 Jy
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Correcting IF 4.
! 
! Fit before self-cal, rms=0.053300Jy  sigma=0.074822
! Fit after  self-cal, rms=0.053295Jy  sigma=0.074810
! Inverting map 
selfcal true, true, soltime2
! Performing amp+phase self-cal over 15 minute time intervals
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Correcting IF 4.
! 
! Fit before self-cal, rms=0.053295Jy  sigma=0.074810
! Fit after  self-cal, rms=0.053924Jy  sigma=0.074631
clean clean_niter,clean_gain
! Inverting map and beam 
! Estimated beam: bmin=1.505 mas, bmaj=1.621 mas, bpa=71.79 degrees
! Estimated noise=5.79003 mJy/beam.
! clean: niter=200  gain=0.03  cutoff=0
! Component: 050  -  total flux cleaned = 0.000567964 Jy
! Component: 100  -  total flux cleaned = 0.000504789 Jy
! Component: 150  -  total flux cleaned = 0.000476625 Jy
! Component: 200  -  total flux cleaned = 0.000476786 Jy
! Total flux subtracted in 200 components = 0.000476786 Jy
! Clean residual min=-0.001822 max=0.001740 Jy/beam
! Clean residual mean=0.000009 rms=0.000430 Jy/beam
! Combined flux in latest and established models = 0.150893 Jy
selfcal
! Performing phase self-cal
! Adding 19 model components to the UV plane model.
! The established model now contains 58 components and 0.150893 Jy
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Correcting IF 4.
! 
! Fit before self-cal, rms=0.053876Jy  sigma=0.074593
! Fit after  self-cal, rms=0.053902Jy  sigma=0.074588
flux_cutoff = imstat(rms) * dynam
! Inverting map 
repeat
  if (peak(flux) > flux_cutoff) peakwin win_mult
  clean clean_niter,clean_gain
  flux_cutoff = imstat(rms) * dynam
  selfcal
  new_peak = peak(flux)
  until(new_peak<=flux_cutoff)
! clean: niter=200  gain=0.03  cutoff=0
! Component: 050  -  total flux cleaned = -2.54455e-05 Jy
! Component: 100  -  total flux cleaned = -2.03055e-06 Jy
! Component: 150  -  total flux cleaned = -2.57945e-05 Jy
! Component: 200  -  total flux cleaned = -2.58411e-05 Jy
! Total flux subtracted in 200 components = -2.58411e-05 Jy
! Clean residual min=-0.001801 max=0.001763 Jy/beam
! Clean residual mean=0.000009 rms=0.000427 Jy/beam
! Combined flux in latest and established models = 0.150868 Jy
! Performing phase self-cal
! Adding 22 model components to the UV plane model.
! The established model now contains 61 components and 0.150868 Jy
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Correcting IF 4.
! 
! Fit before self-cal, rms=0.053869Jy  sigma=0.074569
! Fit after  self-cal, rms=0.053868Jy  sigma=0.074567
! Inverting map 
uvtaper 0.3,taper_size
! Gaussian taper: value 0.3 at UV radius = 70 mega-wavelengths.
win_mult = win_mult * 1.2
selfcal true, true, soltime2
! Performing amp+phase self-cal over 15 minute time intervals
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Correcting IF 4.
! 
! Fit before self-cal, rms=0.053868Jy  sigma=0.074567
! Fit after  self-cal, rms=0.054042Jy  sigma=0.074546
clean clean_niter,clean_gain
! Inverting map and beam 
! Estimated beam: bmin=2.587 mas, bmaj=3.274 mas, bpa=37.53 degrees
! Estimated noise=5.62879 mJy/beam.
! clean: niter=200  gain=0.03  cutoff=0
! Component: 050  -  total flux cleaned = 7.89388e-05 Jy
! Component: 100  -  total flux cleaned = 0.000173079 Jy
! Component: 150  -  total flux cleaned = 0.000255147 Jy
! Component: 200  -  total flux cleaned = 0.000303592 Jy
! Total flux subtracted in 200 components = 0.000303592 Jy
! Clean residual min=-0.001957 max=0.001632 Jy/beam
! Clean residual mean=0.000014 rms=0.000489 Jy/beam
! Combined flux in latest and established models = 0.151171 Jy
selfcal
! Performing phase self-cal
! Adding 16 model components to the UV plane model.
! The established model now contains 74 components and 0.151171 Jy
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Correcting IF 4.
! 
! Fit before self-cal, rms=0.054038Jy  sigma=0.074534
! Fit after  self-cal, rms=0.054038Jy  sigma=0.074533
flux_cutoff = imstat(rms) * dynam
! Inverting map 
repeat
  if (peak(flux) > flux_cutoff) peakwin win_mult
  clean clean_niter,clean_gain
  flux_cutoff = imstat(rms) * dynam
  selfcal
  new_peak = peak(flux)
  until(new_peak<=flux_cutoff)
! clean: niter=200  gain=0.03  cutoff=0
! Component: 050  -  total flux cleaned = -1.78509e-05 Jy
! Component: 100  -  total flux cleaned = 3.00382e-05 Jy
! Component: 150  -  total flux cleaned = 6.23223e-05 Jy
! Component: 200  -  total flux cleaned = 7.30119e-05 Jy
! Total flux subtracted in 200 components = 7.30119e-05 Jy
! Clean residual min=-0.001944 max=0.001637 Jy/beam
! Clean residual mean=0.000014 rms=0.000486 Jy/beam
! Combined flux in latest and established models = 0.151244 Jy
! Performing phase self-cal
! Adding 22 model components to the UV plane model.
! The established model now contains 82 components and 0.151244 Jy
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Correcting IF 4.
! 
! Fit before self-cal, rms=0.054035Jy  sigma=0.074526
! Fit after  self-cal, rms=0.054033Jy  sigma=0.074525
! Inverting map 
uvtaper 0,0
! No UV-taper is currently set.
win_mult = win_mult / 1.2
print "=== Finished amplitude self-cal for VLBA stations ==="
! === Finished amplitude self-cal for VLBA stations === 
unflag *
! Unflagging all baselines in the currently selected channels.
uncalib false, false, true
! uncal: All telescope correction flags have been un-done.
integer lun
lun = outfile ( "/tmp/ff.ff" )
do i=1,nsub
  do j=1,ntel(i)
    fprintf lun, "%s\n", telname(j,i)
    end do
  end do
close ( lun )
system "/home/lpetrov/bin/dimap_selfant_process.csh /tmp/ff.ff"
![@/tmp/ff.ff]
1:BR
! Syntax error in line:
! 1:BR
! ^
! Found constant: 1.000 
! Where a command or assignment expression was expected.
![Exited script file: /tmp/ff.ff]
![Exited script file: /home/lpetrov/bin/rdv_muppet]
! 
wmap "/d2/scr/pima/rdv96_uvs/J0147+5840_X\_map.fits"
! Inverting map and beam 
! Estimated beam: bmin=1.508 mas, bmaj=1.624 mas, bpa=71.86 degrees
! Estimated noise=5.79701 mJy/beam.
! restore: Substituting estimate of restoring beam from last 'invert'.
! Restoring with beam: 1.508 x 1.624 at 71.86 degrees (North through East)
! Clean map  min=-0.0016882  max=0.087636 Jy/beam
! Writing clean map to FITS file: /d2/scr/pima/rdv96_uvs/J0147+5840_X_map.fits
float peak_flux
peak_flux = peak(flux,max)
invert
! Inverting map 
float image_peak
image_peak = int(10000*peak_flux)/10000
float image_rms
image_rms  = int(100000*imstat(rms))/100000
print "========================================="
! ========================================= 
print "The image peak= ", image_peak, " rms= ", image_rms, " Jy"
! The image peak=  0.0876  rms=  0.00042  Jy 
quit
! Quitting program
! Log file /d2/scr/pima/rdv96_uvs/J0147+5840_X_uvs.log closed on Fri Dec 20 23:43:39 2013