! Started logfile: /scr/pima/rdv72_uvs/J0922-3959_S_uvs.log on Sat Oct  5 08:46:21 2013
obs /scr/pima/rdv72_uvs/J0922-3959_S_uva.fits
! Reading UV FITS file: /scr/pima/rdv72_uvs/J0922-3959_S_uva.fits
! AN table 1: 6 integrations on 6 of 6 possible baselines.
! AN table 2: 11 integrations on 1 of 1 possible baselines.
! Apparent sampling: 1 visibilities/baseline/integration-bin.
! Found source: J0922-3959
! 
! 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  2.23299e+09      1.6e+07          1      1.6e+07
!  02        2  2.26299e+09      1.6e+07          1      1.6e+07
!  03        3  2.35299e+09      1.6e+07          1      1.6e+07
!  04        4  2.37299e+09      1.6e+07          1      1.6e+07
! 
! Polarization(s): RR
! 
! Read 0 lines of history.
! 
! Reading 188 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.5 
print "taper_size =",taper_size
! taper_size = 20 
![@/home/lpetrov/bin/01_muppet /scr/pima/rdv72_uvs/J0922-3959_S]
integer clean_niter
clean_niter = 100
float clean_gain
clean_gain = 0.03
float dynam
dynam = 6.0
float soltime1
soltime1 = 120
float soltime2
soltime2 = 20
float thresh
thresh = 0.5
float win_mult
win_mult = 1.8
float time_av
time_av = 16
float old_peak
float new_peak
float flux_cutoff
mapsize field_size, field_cell
! Map grid = 1024x1024 pixels with 0.500x0.500 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.
!  A total of 22 telescope corrections were flagged in sub-array 2.
! 
! Correcting IF 2.
!  A total of 22 telescope corrections were flagged in sub-array 2.
! 
! Correcting IF 3.
!  A total of 22 telescope corrections were flagged in sub-array 2.
! 
! Correcting IF 4.
!  A total of 22 telescope corrections were flagged in sub-array 2.
! 
! Fit before self-cal, rms=1.477916Jy  sigma=17.944274
! Fit after  self-cal, rms=0.213611Jy  sigma=2.629924
! clrmod: Cleared the established, tentative and continuum models.
! Redundant starting model cleared.
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=25.61 mas, bmaj=124.1 mas, bpa=-26.93 degrees
! Estimated noise=4.9076 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=100  gain=0.03  cutoff=0
! Component: 050  -  total flux cleaned = 0.824432 Jy
! Component: 100  -  total flux cleaned = 0.996336 Jy
! Total flux subtracted in 100 components = 0.996336 Jy
! Clean residual min=-0.079131 max=0.079995 Jy/beam
! Clean residual mean=-0.003769 rms=0.037193 Jy/beam
! Combined flux in latest and established models = 0.996336 Jy
! Performing phase self-cal
! Adding 30 model components to the UV plane model.
! The established model now contains 30 components and 0.996336 Jy
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Correcting IF 4.
! 
! Fit before self-cal, rms=0.194278Jy  sigma=2.443436
! Fit after  self-cal, rms=0.193726Jy  sigma=2.439320
! 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=25.61 mas, bmaj=124.1 mas, bpa=-26.93 degrees
! Estimated noise=4.90761 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.0256172 Jy
! Component: 100  -  total flux cleaned = 0.00834749 Jy
! Component: 150  -  total flux cleaned = 0.00235558 Jy
! Component: 200  -  total flux cleaned = 0.00641483 Jy
! Total flux subtracted in 200 components = 0.00641483 Jy
! Clean residual min=-0.022890 max=0.023422 Jy/beam
! Clean residual mean=-0.000392 rms=0.010824 Jy/beam
! Combined flux in latest and established models = 1.00275 Jy
! Performing phase self-cal
! Adding 113 model components to the UV plane model.
! The established model now contains 143 components and 1.00275 Jy
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Correcting IF 4.
! 
! Fit before self-cal, rms=0.155188Jy  sigma=1.880512
! Fit after  self-cal, rms=0.154147Jy  sigma=1.870515
! Inverting map 
print "************** FINISHED NATURAL WEIGHTING CLEAN **************"
! ************** FINISHED NATURAL WEIGHTING CLEAN ************** 
! 
gscale true
! Performing overall amplitude self-cal
! 
! Correcting IF 1.
!  Telescope amplitude corrections in sub-array 1:
!   FD        0.97     KP        0.96     LA        1.15     PT        1.00     
! 
!  Telescope amplitude corrections in sub-array 2:
!   HO        0.00*    MK        0.00*    
! 
! 
! Correcting IF 2.
!  Telescope amplitude corrections in sub-array 1:
!   FD        1.04     KP        0.98     LA        1.07     PT        0.97     
! 
!  Telescope amplitude corrections in sub-array 2:
!   HO        0.00*    MK        0.00*    
! 
! 
! Correcting IF 3.
!  Telescope amplitude corrections in sub-array 1:
!   FD        0.99     KP        1.12     LA        1.00     PT        1.04     
! 
!  Telescope amplitude corrections in sub-array 2:
!   HO        0.00*    MK        0.00*    
! 
! 
! Correcting IF 4.
!  Telescope amplitude corrections in sub-array 1:
!   FD        1.00     KP        0.96     LA        0.86     PT        0.88     
! 
!  Telescope amplitude corrections in sub-array 2:
!   HO        0.00*    MK        0.00*    
! 
! 
! Fit before self-cal, rms=0.154147Jy  sigma=1.870515
! Fit after  self-cal, rms=0.089918Jy  sigma=0.965231
dynam = dynam - 0.5
flux_cutoff = imstat(rms) * dynam
! Inverting map and beam 
! Estimated beam: bmin=25.71 mas, bmaj=124.2 mas, bpa=-26.9 degrees
! Estimated noise=4.84427 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.0052855 Jy
! Component: 100  -  total flux cleaned = 0.00389728 Jy
! Component: 150  -  total flux cleaned = 0.00390402 Jy
! Component: 200  -  total flux cleaned = 0.00347242 Jy
! Total flux subtracted in 200 components = 0.00347242 Jy
! Clean residual min=-0.009625 max=0.010000 Jy/beam
! Clean residual mean=-0.000023 rms=0.003016 Jy/beam
! Combined flux in latest and established models = 1.00622 Jy
! Performing phase self-cal
! Adding 48 model components to the UV plane model.
! The established model now contains 191 components and 1.00622 Jy
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Correcting IF 4.
! 
! Fit before self-cal, rms=0.086705Jy  sigma=0.940951
! Fit after  self-cal, rms=0.086649Jy  sigma=0.938220
! Inverting map 
selfcal true, true, soltime1
! Performing amp+phase self-cal over 120 minute time intervals
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Correcting IF 4.
! 
! Fit before self-cal, rms=0.086649Jy  sigma=0.938220
! Fit after  self-cal, rms=0.086923Jy  sigma=0.935119
dynam = dynam - 0.75
clean clean_niter,clean_gain
! Inverting map and beam 
! Estimated beam: bmin=25.7 mas, bmaj=124.1 mas, bpa=-26.89 degrees
! Estimated noise=4.86245 mJy/beam.
! clean: niter=200  gain=0.03  cutoff=0
! Component: 050  -  total flux cleaned = 0.000966265 Jy
! Component: 100  -  total flux cleaned = 0.000558944 Jy
! Component: 150  -  total flux cleaned = 0.000754189 Jy
! Component: 200  -  total flux cleaned = 0.000532395 Jy
! Total flux subtracted in 200 components = 0.000532395 Jy
! Clean residual min=-0.006057 max=0.005908 Jy/beam
! Clean residual mean=-0.000062 rms=0.001906 Jy/beam
! Combined flux in latest and established models = 1.00676 Jy
selfcal
! Performing phase self-cal
! Adding 58 model components to the UV plane model.
! The established model now contains 249 components and 1.00676 Jy
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Correcting IF 4.
! 
! Fit before self-cal, rms=0.086267Jy  sigma=0.928861
! Fit after  self-cal, rms=0.086232Jy  sigma=0.928299
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 = -0.00309594 Jy
! Component: 100  -  total flux cleaned = -0.00332085 Jy
! Component: 150  -  total flux cleaned = -0.00312238 Jy
! Component: 200  -  total flux cleaned = -0.00288088 Jy
! Total flux subtracted in 200 components = -0.00288088 Jy
! Clean residual min=-0.003913 max=0.004124 Jy/beam
! Clean residual mean=-0.000061 rms=0.001515 Jy/beam
! Combined flux in latest and established models = 1.00387 Jy
! Performing phase self-cal
! Adding 31 model components to the UV plane model.
! The established model now contains 279 components and 1.00387 Jy
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Correcting IF 4.
! 
! Fit before self-cal, rms=0.085684Jy  sigma=0.919372
! Fit after  self-cal, rms=0.085670Jy  sigma=0.918974
! Inverting map 
selfcal true, true, soltime2
! Performing amp+phase self-cal over 20 minute time intervals
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Correcting IF 4.
! 
! Fit before self-cal, rms=0.085670Jy  sigma=0.918974
! Fit after  self-cal, rms=0.085640Jy  sigma=0.918575
clean clean_niter,clean_gain
! Inverting map and beam 
! Estimated beam: bmin=25.7 mas, bmaj=124.1 mas, bpa=-26.89 degrees
! Estimated noise=4.85856 mJy/beam.
! clean: niter=200  gain=0.03  cutoff=0
! Component: 050  -  total flux cleaned = -0.000352114 Jy
! Component: 100  -  total flux cleaned = 0.000111898 Jy
! Component: 150  -  total flux cleaned = 0.00030552 Jy
! Component: 200  -  total flux cleaned = 0.000336864 Jy
! Total flux subtracted in 200 components = 0.000336864 Jy
! Clean residual min=-0.005056 max=0.005117 Jy/beam
! Clean residual mean=-0.000048 rms=0.001575 Jy/beam
! Combined flux in latest and established models = 1.00421 Jy
selfcal
! Performing phase self-cal
! Adding 64 model components to the UV plane model.
! The established model now contains 338 components and 1.00421 Jy
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Correcting IF 4.
! 
! Fit before self-cal, rms=0.085382Jy  sigma=0.916639
! Fit after  self-cal, rms=0.085343Jy  sigma=0.916127
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 = -0.00266406 Jy
! Component: 100  -  total flux cleaned = -0.00281535 Jy
! Component: 150  -  total flux cleaned = -0.00297369 Jy
! Component: 200  -  total flux cleaned = -0.00301337 Jy
! Total flux subtracted in 200 components = -0.00301337 Jy
! Clean residual min=-0.003945 max=0.003983 Jy/beam
! Clean residual mean=0.000003 rms=0.001290 Jy/beam
! Combined flux in latest and established models = 1.0012 Jy
! Performing phase self-cal
! Adding 44 model components to the UV plane model.
! The established model now contains 379 components and 1.0012 Jy
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Correcting IF 4.
! 
! Fit before self-cal, rms=0.085018Jy  sigma=0.911910
! Fit after  self-cal, rms=0.084978Jy  sigma=0.911173
! Inverting map 
uvtaper 0.3,taper_size
! Gaussian taper: value 0.3 at UV radius = 20 mega-wavelengths.
win_mult = win_mult * 1.2
selfcal true, true, soltime2
! Performing amp+phase self-cal over 20 minute time intervals
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Correcting IF 4.
! 
! Fit before self-cal, rms=0.084978Jy  sigma=0.911173
! Fit after  self-cal, rms=0.084969Jy  sigma=0.910841
clean clean_niter,clean_gain
! Inverting map and beam 
! Estimated beam: bmin=26.06 mas, bmaj=123.5 mas, bpa=-26.84 degrees
! Estimated noise=4.83274 mJy/beam.
! clean: niter=200  gain=0.03  cutoff=0
! Component: 050  -  total flux cleaned = 0.00115196 Jy
! Component: 100  -  total flux cleaned = 0.00153295 Jy
! Component: 150  -  total flux cleaned = 0.001787 Jy
! Component: 200  -  total flux cleaned = 0.001654 Jy
! Total flux subtracted in 200 components = 0.001654 Jy
! Clean residual min=-0.003780 max=0.003710 Jy/beam
! Clean residual mean=-0.000062 rms=0.001199 Jy/beam
! Combined flux in latest and established models = 1.00285 Jy
selfcal
! Performing phase self-cal
! Adding 61 model components to the UV plane model.
! The established model now contains 423 components and 1.00285 Jy
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Correcting IF 4.
! 
! Fit before self-cal, rms=0.084750Jy  sigma=0.908782
! Fit after  self-cal, rms=0.084736Jy  sigma=0.908496
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 = -0.00206634 Jy
! Component: 100  -  total flux cleaned = -0.0021954 Jy
! Component: 150  -  total flux cleaned = -0.00195254 Jy
! Component: 200  -  total flux cleaned = -0.00142164 Jy
! Total flux subtracted in 200 components = -0.00142164 Jy
! Clean residual min=-0.002314 max=0.002320 Jy/beam
! Clean residual mean=-0.000058 rms=0.000935 Jy/beam
! Combined flux in latest and established models = 1.00143 Jy
! Performing phase self-cal
! Adding 46 model components to the UV plane model.
! The established model now contains 452 components and 1.00143 Jy
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Correcting IF 4.
! 
! Fit before self-cal, rms=0.084527Jy  sigma=0.904857
! Fit after  self-cal, rms=0.084528Jy  sigma=0.904726
! Inverting map 
uvtaper 0,0
! No UV-taper is currently set.
win_mult = win_mult / 1.2
print "************** FINISHED AMPLITUDE SELF-CAL **************"
! ************** FINISHED AMPLITUDE SELF-CAL ************** 
restore
! Inverting map and beam 
! Estimated beam: bmin=25.69 mas, bmaj=124.1 mas, bpa=-26.88 degrees
! Estimated noise=4.85859 mJy/beam.
! restore: Substituting estimate of restoring beam from last 'invert'.
! Restoring with beam: 25.69 x 124.1 at -26.88 degrees (North through East)
! Clean map  min=-0.053824  max=0.95179 Jy/beam
if(peak(flux) > thresh)
  selfcal true, true
  clean clean_niter,clean_gain
  selfcal
  flux_cutoff = imstat(rms) * dynam
  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)
  selfcal true, true
  end if
! Performing amp+phase self-cal
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Correcting IF 4.
! 
! Fit before self-cal, rms=0.084528Jy  sigma=0.904726
! Fit after  self-cal, rms=0.065913Jy  sigma=0.682341
! Inverting map and beam 
! Estimated beam: bmin=25.7 mas, bmaj=124.1 mas, bpa=-26.89 degrees
! Estimated noise=4.85639 mJy/beam.
! clean: niter=200  gain=0.03  cutoff=0
! Component: 050  -  total flux cleaned = 9.92713e-07 Jy
! Component: 100  -  total flux cleaned = 0.000349213 Jy
! Component: 150  -  total flux cleaned = 0.000475283 Jy
! Component: 200  -  total flux cleaned = 0.000480345 Jy
! Total flux subtracted in 200 components = 0.000480345 Jy
! Clean residual min=-0.002536 max=0.002497 Jy/beam
! Clean residual mean=-0.000043 rms=0.000923 Jy/beam
! Combined flux in latest and established models = 1.00191 Jy
! Performing phase self-cal
! Adding 64 model components to the UV plane model.
! The established model now contains 491 components and 1.00191 Jy
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Correcting IF 4.
! 
! Fit before self-cal, rms=0.065621Jy  sigma=0.680115
! Fit after  self-cal, rms=0.065604Jy  sigma=0.679586
! Inverting map 
! clean: niter=200  gain=0.03  cutoff=0
! Component: 050  -  total flux cleaned = -0.000380616 Jy
! Component: 100  -  total flux cleaned = 2.04659e-05 Jy
! Component: 150  -  total flux cleaned = 0.000230228 Jy
! Component: 200  -  total flux cleaned = 0.000357253 Jy
! Total flux subtracted in 200 components = 0.000357253 Jy
! Clean residual min=-0.002821 max=0.002876 Jy/beam
! Clean residual mean=-0.000018 rms=0.000906 Jy/beam
! Combined flux in latest and established models = 1.00227 Jy
! Performing phase self-cal
! Adding 49 model components to the UV plane model.
! The established model now contains 531 components and 1.00227 Jy
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Correcting IF 4.
! 
! Fit before self-cal, rms=0.065396Jy  sigma=0.677806
! Fit after  self-cal, rms=0.065382Jy  sigma=0.677537
! Inverting map 
! Performing amp+phase self-cal
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Correcting IF 4.
! 
! Fit before self-cal, rms=0.065382Jy  sigma=0.677537
! Fit after  self-cal, rms=0.065454Jy  sigma=0.677431
print "************** CLEARING MODEL AND STARTING OVER **********"
! ************** CLEARING MODEL AND STARTING OVER ********** 
clrmod true
! clrmod: Cleared the established and tentative models.
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.
clean clean_niter,clean_gain
! Inverting map and beam 
! Estimated beam: bmin=25.7 mas, bmaj=124.1 mas, bpa=-26.89 degrees
! Estimated noise=4.85912 mJy/beam.
! clean: niter=200  gain=0.03  cutoff=0
! Component: 050  -  total flux cleaned = 0.816234 Jy
! Component: 100  -  total flux cleaned = 0.97334 Jy
! Component: 150  -  total flux cleaned = 0.992464 Jy
! Component: 200  -  total flux cleaned = 1.0012 Jy
! Total flux subtracted in 200 components = 1.0012 Jy
! Clean residual min=-0.050030 max=0.047847 Jy/beam
! Clean residual mean=-0.001042 rms=0.020218 Jy/beam
! Combined flux in latest and established models = 1.0012 Jy
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.
flux_cutoff = imstat(rms) * dynam
! Adding 91 model components to the UV plane model.
! The established model now contains 91 components and 1.0012 Jy
! Inverting map and beam 
! Estimated beam: bmin=25.7 mas, bmaj=124.1 mas, bpa=-26.89 degrees
! Estimated noise=4.85912 mJy/beam.
repeat
  if (peak(flux) > flux_cutoff) peakwin win_mult
  clean clean_niter,clean_gain
  flux_cutoff = imstat(rms) * dynam
  keep
  new_peak = peak(flux)
  until(new_peak<=flux_cutoff)
! clean: niter=200  gain=0.03  cutoff=0
! Component: 050  -  total flux cleaned = 0.000347331 Jy
! Component: 100  -  total flux cleaned = -0.00672639 Jy
! Component: 150  -  total flux cleaned = -0.00271739 Jy
! Component: 200  -  total flux cleaned = -0.0012844 Jy
! Total flux subtracted in 200 components = -0.0012844 Jy
! Clean residual min=-0.014674 max=0.014863 Jy/beam
! Clean residual mean=0.000051 rms=0.006067 Jy/beam
! Combined flux in latest and established models = 0.999916 Jy
! Adding 103 model components to the UV plane model.
! The established model now contains 194 components and 0.999916 Jy
! Inverting map 
uvtaper 0.3,taper_size
! Gaussian taper: value 0.3 at UV radius = 20 mega-wavelengths.
clean clean_niter,clean_gain
! Inverting map and beam 
! Estimated beam: bmin=26.07 mas, bmaj=123.4 mas, bpa=-26.85 degrees
! Estimated noise=4.83321 mJy/beam.
! clean: niter=200  gain=0.03  cutoff=0
! Component: 050  -  total flux cleaned = 0.0129828 Jy
! Component: 100  -  total flux cleaned = 0.0176936 Jy
! Component: 150  -  total flux cleaned = 0.0176927 Jy
! Component: 200  -  total flux cleaned = 0.0172348 Jy
! Total flux subtracted in 200 components = 0.0172348 Jy
! Clean residual min=-0.008145 max=0.008413 Jy/beam
! Clean residual mean=0.000053 rms=0.002274 Jy/beam
! Combined flux in latest and established models = 1.01715 Jy
flux_cutoff = imstat(rms) * dynam
repeat
  if (peak(flux) > flux_cutoff) peakwin win_mult
  clean clean_niter,clean_gain
  flux_cutoff = imstat(rms) * dynam
  keep
  new_peak = peak(flux)
  until(new_peak<=flux_cutoff)
! clean: niter=200  gain=0.03  cutoff=0
! Component: 050  -  total flux cleaned = -0.000554052 Jy
! Component: 100  -  total flux cleaned = -0.000563085 Jy
! Component: 150  -  total flux cleaned = -0.00210082 Jy
! Component: 200  -  total flux cleaned = -0.00209959 Jy
! Total flux subtracted in 200 components = -0.00209959 Jy
! Clean residual min=-0.017838 max=0.017778 Jy/beam
! Clean residual mean=0.000046 rms=0.006633 Jy/beam
! Combined flux in latest and established models = 1.01505 Jy
! Adding 80 model components to the UV plane model.
! The established model now contains 273 components and 1.01505 Jy
! Inverting map 
uvtaper 0,0
! No UV-taper is currently set.
clean
! Inverting map and beam 
! Estimated beam: bmin=25.7 mas, bmaj=124.1 mas, bpa=-26.89 degrees
! Estimated noise=4.85912 mJy/beam.
! clean: niter=200  gain=0.03  cutoff=0
! Component: 050  -  total flux cleaned = 0.00288773 Jy
! Component: 100  -  total flux cleaned = 0.00434866 Jy
! Component: 150  -  total flux cleaned = 0.00577565 Jy
! Component: 200  -  total flux cleaned = 0.00723801 Jy
! Total flux subtracted in 200 components = 0.00723801 Jy
! Clean residual min=-0.008372 max=0.008143 Jy/beam
! Clean residual mean=-0.000050 rms=0.002921 Jy/beam
! Combined flux in latest and established models = 1.02229 Jy
selfcal
! Performing phase self-cal
! Adding 73 model components to the UV plane model.
! The established model now contains 346 components and 1.02229 Jy
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Correcting IF 4.
! 
! Fit before self-cal, rms=0.066970Jy  sigma=0.694228
! Fit after  self-cal, rms=0.066390Jy  sigma=0.684273
wmodel /scr/pima/rdv72_uvs/J0922-3959_S_map.mod
! Writing 346 model components to file: /scr/pima/rdv72_uvs/J0922-3959_S_map.mod
wobs /scr/pima/rdv72_uvs/J0922-3959_S_uvs.fits
! Writing UV FITS file: /scr/pima/rdv72_uvs/J0922-3959_S_uvs.fits
wwins /scr/pima/rdv72_uvs/J0922-3959_S_map.win
! wwins: No CLEAN windows to write.
! Error occured in command: wwins
![Exited script file: /home/lpetrov/bin/01_muppet]
! 
wmap "/scr/pima/rdv72_uvs/J0922-3959_S\_map.fits"
! Inverting map 
! restore: Substituting estimate of restoring beam from last 'invert'.
! Restoring with beam: 25.7 x 124.1 at -26.89 degrees (North through East)
! Clean map  min=-0.083642  max=0.95192 Jy/beam
! Writing clean map to FITS file: /scr/pima/rdv72_uvs/J0922-3959_S_map.fits
float peak_flux
peak_flux = peak(flux,max)
print "The peak flux is",peak_flux
! The peak flux is 0.95192 
invert
! Inverting map 
float image_rms
image_rms = imstat(rms)
print "The final image rms is",image_rms
! The final image rms is 0.00254726 
loglevs 100*3*image_rms/peak_flux
! The new contour levels are:
!  -0.802776 0.802776 1.60555 3.2111 6.4222 12.8444 25.6888 51.3776
print "clev=",int(3*image_rms*10000)/10000
! clev= 0.0076 
print "peak=",int(1000*peak_flux)/1000
! peak= 0.951 
quit
! Quitting program
! Log file /scr/pima/rdv72_uvs/J0922-3959_S_uvs.log closed on Sat Oct  5 08:46:29 2013