! Started logfile: /scr/pima/bp171a8_uvs/J0907-3155_C_uvs.log on Fri Dec 27 16:28:01 2013
obs /scr/pima/bp171a8_uvs/J0907-3155_C_uva.fits
! Reading UV FITS file: /scr/pima/bp171a8_uvs/J0907-3155_C_uva.fits
! AN table 1: 9 integrations on 15 of 15 possible baselines.
! Apparent sampling: 0.592593 visibilities/baseline/integration-bin.
! Found source: J0907-3155
! 
! There are 8 IFs, and a total of 8 channels:
! 
!  IF  Channel    Frequency  Freq offset  Number of   Overall IF
!       origin    at origin  per channel   channels    bandwidth
!  ------------------------------------------------------------- (Hz)
!  01        1  4.14397e+09      3.2e+07          1      3.2e+07
!  02        2  4.17597e+09      3.2e+07          1      3.2e+07
!  03        3  4.20797e+09      3.2e+07          1      3.2e+07
!  04        4  4.23997e+09      3.2e+07          1      3.2e+07
!  05        5  4.43197e+09      3.2e+07          1      3.2e+07
!  06        6  4.52797e+09      3.2e+07          1      3.2e+07
!  07        7  4.55997e+09      3.2e+07          1      3.2e+07
!  08        8  4.59197e+09      3.2e+07          1      3.2e+07
! 
! Polarization(s): RR
! 
! Read 0 lines of history.
! 
! Reading 640 visibilities.
select RR
! Selecting polarization: RR,  channels: 1..8
! Reading IF 1 channels: 1..1
! Reading IF 2 channels: 2..2
! Reading IF 3 channels: 3..3
! Reading IF 4 channels: 4..4
! Reading IF 5 channels: 5..5
! Reading IF 6 channels: 6..6
! Reading IF 7 channels: 7..7
! Reading IF 8 channels: 8..8
print "field_size =",field_size
! field_size = 1024 
print "field_cell =",field_cell
! field_cell = 0.3 
print "taper_size =",taper_size
! taper_size = 40 
![@/home/lpetrov/bin/01_muppet /scr/pima/bp171a8_uvs/J0907-3155_C]
float lim_self
lim_self = 120.0
float lim_val
lim_va   = 1.2
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.300x0.300 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 9 telescope corrections were flagged in sub-array 1.
! 
! Correcting IF 2.
!  A total of 9 telescope corrections were flagged in sub-array 1.
! 
! Correcting IF 3.
!  A total of 9 telescope corrections were flagged in sub-array 1.
! 
! Correcting IF 4.
!  A total of 9 telescope corrections were flagged in sub-array 1.
! 
! Correcting IF 5.
!  A total of 9 telescope corrections were flagged in sub-array 1.
! 
! Correcting IF 6.
!  A total of 9 telescope corrections were flagged in sub-array 1.
! 
! Correcting IF 7.
!  A total of 9 telescope corrections were flagged in sub-array 1.
! 
! Correcting IF 8.
!  A total of 9 telescope corrections were flagged in sub-array 1.
! 
! Fit before self-cal, rms=1.002993Jy  sigma=0.678275
! Fit after  self-cal, rms=0.975176Jy  sigma=0.656669
! 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=6.229 mas, bmaj=23.07 mas, bpa=19.29 degrees
! Estimated noise=69.1557 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.0205535 Jy
! Component: 100  -  total flux cleaned = 0.0217051 Jy
! Total flux subtracted in 100 components = 0.0217051 Jy
! Clean residual min=-0.003832 max=0.003874 Jy/beam
! Clean residual mean=-0.000177 rms=0.001896 Jy/beam
! Combined flux in latest and established models = 0.0217051 Jy
! Performing phase self-cal
! Adding 36 model components to the UV plane model.
! The established model now contains 36 components and 0.0217051 Jy
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Correcting IF 4.
! 
! Correcting IF 5.
! 
! Correcting IF 6.
! 
! Correcting IF 7.
! 
! Correcting IF 8.
! 
! Fit before self-cal, rms=0.029635Jy  sigma=0.019706
! Fit after  self-cal, rms=0.027665Jy  sigma=0.018316
! 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=6.805 mas, bmaj=22.51 mas, bpa=16.36 degrees
! Estimated noise=43.8743 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 = 7.00921e-06 Jy
! Component: 100  -  total flux cleaned = -0.000821732 Jy
! Component: 150  -  total flux cleaned = -0.00137948 Jy
! Component: 200  -  total flux cleaned = -0.0019506 Jy
! Total flux subtracted in 200 components = -0.0019506 Jy
! Clean residual min=-0.001487 max=0.001472 Jy/beam
! Clean residual mean=-0.000078 rms=0.000758 Jy/beam
! Combined flux in latest and established models = 0.0197545 Jy
! Performing phase self-cal
! Adding 90 model components to the UV plane model.
! The established model now contains 126 components and 0.0197545 Jy
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Correcting IF 4.
! 
! Correcting IF 5.
! 
! Correcting IF 6.
! 
! Correcting IF 7.
! 
! Correcting IF 8.
! 
! Fit before self-cal, rms=0.026345Jy  sigma=0.017512
! Fit after  self-cal, rms=0.026211Jy  sigma=0.017422
! Inverting map 
print "************** FINISHED NATURAL WEIGHTING CLEAN **************"
! ************** FINISHED NATURAL WEIGHTING CLEAN ************** 
! 
restore
! restore: Substituting estimate of restoring beam from last 'invert'.
! Restoring with beam: 6.805 x 22.51 at 16.36 degrees (North through East)
! Clean map  min=-0.0043827  max=0.020709 Jy/beam
if ( peak(flux,max)/imstat(rms) < lim_self ) selflim lim_val
! Selfcal amplitude corrections will be limited to 0.833333 -> 1.2.
! Selfcal phase corrections will not be limited.
gscale true
! Performing overall amplitude self-cal
! 
! Correcting IF 1.
!  Telescope amplitude corrections in sub-array 1:
!   BR        1.00*    FD        1.00*    KP        1.00*    LA        1.00*    
!   NL        1.00*    OV        1.00*    
! 
! 
! Correcting IF 2.
!  Telescope amplitude corrections in sub-array 1:
!   BR        1.00*    FD        1.00*    KP        1.00*    LA        1.00*    
!   NL        1.00*    OV        1.00*    
! 
! 
! Correcting IF 3.
!  Telescope amplitude corrections in sub-array 1:
!   BR        1.00*    FD        1.00*    KP        1.00*    LA        1.00*    
!   NL        1.00*    OV        1.00*    
! 
! 
! Correcting IF 4.
!  Telescope amplitude corrections in sub-array 1:
!   BR        1.00*    FD        1.00*    KP        1.00*    LA        1.00*    
!   NL        1.00*    OV        1.00*    
! 
! 
! Correcting IF 5.
!  Telescope amplitude corrections in sub-array 1:
!   BR        1.00*    FD        1.00*    KP        1.00*    LA        1.00*    
!   NL        1.00*    OV        1.00*    
! 
! 
! Correcting IF 6.
!  Telescope amplitude corrections in sub-array 1:
!   BR        1.00*    FD        1.00*    KP        1.00*    LA        1.00*    
!   NL        1.00*    OV        1.00*    
! 
! 
! Correcting IF 7.
!  Telescope amplitude corrections in sub-array 1:
!   BR        0.85     FD        1.08     KP        0.91     LA        1.06     
!   NL        1.00*    OV        0.89     
! 
! 
! Correcting IF 8.
!  Telescope amplitude corrections in sub-array 1:
!   BR        1.00*    FD        1.00*    KP        1.00*    LA        1.00*    
!   NL        1.00*    OV        1.00*    
! 
! 
! Fit before self-cal, rms=0.026211Jy  sigma=0.017422
! Fit after  self-cal, rms=0.025830Jy  sigma=0.017360
dynam = dynam - 0.5
flux_cutoff = imstat(rms) * dynam
! Inverting map and beam 
! Estimated beam: bmin=6.801 mas, bmaj=22.41 mas, bpa=16.51 degrees
! Estimated noise=43.2531 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.000674883 Jy
! Component: 100  -  total flux cleaned = 0.00087444 Jy
! Component: 150  -  total flux cleaned = 0.000883345 Jy
! Component: 200  -  total flux cleaned = 0.000665178 Jy
! Total flux subtracted in 200 components = 0.000665178 Jy
! Clean residual min=-0.000679 max=0.000678 Jy/beam
! Clean residual mean=-0.000025 rms=0.000297 Jy/beam
! Combined flux in latest and established models = 0.0204197 Jy
! Performing phase self-cal
! Adding 83 model components to the UV plane model.
! The established model now contains 209 components and 0.0204197 Jy
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Correcting IF 4.
! 
! Correcting IF 5.
! 
! Correcting IF 6.
! 
! Correcting IF 7.
! 
! Correcting IF 8.
! 
! Fit before self-cal, rms=0.025567Jy  sigma=0.017204
! Fit after  self-cal, rms=0.025508Jy  sigma=0.017161
! 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.
! 
! Correcting IF 5.
! 
! Correcting IF 6.
! 
! Correcting IF 7.
! 
! Correcting IF 8.
! 
! Fit before self-cal, rms=0.025508Jy  sigma=0.017161
! Fit after  self-cal, rms=0.025551Jy  sigma=0.017153
dynam = dynam - 0.75
clean clean_niter,clean_gain
! Inverting map and beam 
! Estimated beam: bmin=6.801 mas, bmaj=22.41 mas, bpa=16.5 degrees
! Estimated noise=43.2738 mJy/beam.
! clean: niter=200  gain=0.03  cutoff=0
! Component: 050  -  total flux cleaned = 0.000663388 Jy
! Component: 100  -  total flux cleaned = 0.000839239 Jy
! Component: 150  -  total flux cleaned = 0.000877142 Jy
! Component: 200  -  total flux cleaned = 0.000972736 Jy
! Total flux subtracted in 200 components = 0.000972736 Jy
! Clean residual min=-0.000512 max=0.000517 Jy/beam
! Clean residual mean=-0.000012 rms=0.000215 Jy/beam
! Combined flux in latest and established models = 0.0213924 Jy
selfcal
! Performing phase self-cal
! Adding 90 model components to the UV plane model.
! The established model now contains 294 components and 0.0213924 Jy
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Correcting IF 4.
! 
! Correcting IF 5.
! 
! Correcting IF 6.
! 
! Correcting IF 7.
! 
! Correcting IF 8.
! 
! Fit before self-cal, rms=0.025437Jy  sigma=0.017081
! Fit after  self-cal, rms=0.025328Jy  sigma=0.017009
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.000527311 Jy
! Component: 100  -  total flux cleaned = 0.000704524 Jy
! Component: 150  -  total flux cleaned = 0.00100694 Jy
! Component: 200  -  total flux cleaned = 0.00124885 Jy
! Total flux subtracted in 200 components = 0.00124885 Jy
! Clean residual min=-0.000427 max=0.000424 Jy/beam
! Clean residual mean=-0.000002 rms=0.000161 Jy/beam
! Combined flux in latest and established models = 0.0226413 Jy
! Performing phase self-cal
! Adding 59 model components to the UV plane model.
! The established model now contains 351 components and 0.0226413 Jy
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Correcting IF 4.
! 
! Correcting IF 5.
! 
! Correcting IF 6.
! 
! Correcting IF 7.
! 
! Correcting IF 8.
! 
! Fit before self-cal, rms=0.025253Jy  sigma=0.016958
! Fit after  self-cal, rms=0.025231Jy  sigma=0.016949
! 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.
! 
! Correcting IF 5.
! 
! Correcting IF 6.
! 
! Correcting IF 7.
! 
! Correcting IF 8.
! 
! Fit before self-cal, rms=0.025231Jy  sigma=0.016949
! Fit after  self-cal, rms=0.025067Jy  sigma=0.016882
clean clean_niter,clean_gain
! Inverting map and beam 
! Estimated beam: bmin=6.78 mas, bmaj=22.39 mas, bpa=16.48 degrees
! Estimated noise=42.9218 mJy/beam.
! clean: niter=200  gain=0.03  cutoff=0
! Component: 050  -  total flux cleaned = -0.000414816 Jy
! Component: 100  -  total flux cleaned = -0.000536634 Jy
! Component: 150  -  total flux cleaned = -0.000482025 Jy
! Component: 200  -  total flux cleaned = -0.000669998 Jy
! Total flux subtracted in 200 components = -0.000669998 Jy
! Clean residual min=-0.000446 max=0.000447 Jy/beam
! Clean residual mean=0.000001 rms=0.000173 Jy/beam
! Combined flux in latest and established models = 0.0219713 Jy
selfcal
! Performing phase self-cal
! Adding 57 model components to the UV plane model.
! The established model now contains 405 components and 0.0219713 Jy
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Correcting IF 4.
! 
! Correcting IF 5.
! 
! Correcting IF 6.
! 
! Correcting IF 7.
! 
! Correcting IF 8.
! 
! Fit before self-cal, rms=0.025009Jy  sigma=0.016844
! Fit after  self-cal, rms=0.025023Jy  sigma=0.016838
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 = -7.91192e-05 Jy
! Component: 100  -  total flux cleaned = 1.11659e-05 Jy
! Component: 150  -  total flux cleaned = -9.9092e-06 Jy
! Component: 200  -  total flux cleaned = 9.9496e-06 Jy
! Total flux subtracted in 200 components = 9.9496e-06 Jy
! Clean residual min=-0.000331 max=0.000332 Jy/beam
! Clean residual mean=0.000000 rms=0.000125 Jy/beam
! Combined flux in latest and established models = 0.0219812 Jy
! Performing phase self-cal
! Adding 81 model components to the UV plane model.
! The established model now contains 473 components and 0.0219812 Jy
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Correcting IF 4.
! 
! Correcting IF 5.
! 
! Correcting IF 6.
! 
! Correcting IF 7.
! 
! Correcting IF 8.
! 
! Fit before self-cal, rms=0.024987Jy  sigma=0.016816
! Fit after  self-cal, rms=0.024983Jy  sigma=0.016813
! Inverting map 
uvtaper 0.3,taper_size
! Gaussian taper: value 0.3 at UV radius = 40 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.
! 
! Correcting IF 5.
! 
! Correcting IF 6.
! 
! Correcting IF 7.
! 
! Correcting IF 8.
! 
! Fit before self-cal, rms=0.024983Jy  sigma=0.016813
! Fit after  self-cal, rms=0.024875Jy  sigma=0.016804
clean clean_niter,clean_gain
! Inverting map and beam 
! Estimated beam: bmin=6.971 mas, bmaj=22.22 mas, bpa=16.6 degrees
! Estimated noise=42.7687 mJy/beam.
! clean: niter=200  gain=0.03  cutoff=0
! Component: 050  -  total flux cleaned = -0.000151181 Jy
! Component: 100  -  total flux cleaned = -0.000175728 Jy
! Component: 150  -  total flux cleaned = -0.000395604 Jy
! Component: 200  -  total flux cleaned = -0.000616208 Jy
! Total flux subtracted in 200 components = -0.000616208 Jy
! Clean residual min=-0.000370 max=0.000366 Jy/beam
! Clean residual mean=-0.000001 rms=0.000141 Jy/beam
! Combined flux in latest and established models = 0.021365 Jy
selfcal
! Performing phase self-cal
! Adding 64 model components to the UV plane model.
! The established model now contains 513 components and 0.021365 Jy
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Correcting IF 4.
! 
! Correcting IF 5.
! 
! Correcting IF 6.
! 
! Correcting IF 7.
! 
! Correcting IF 8.
! 
! Fit before self-cal, rms=0.024838Jy  sigma=0.016780
! Fit after  self-cal, rms=0.024836Jy  sigma=0.016778
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 = 3.8997e-05 Jy
! Component: 100  -  total flux cleaned = 5.91881e-05 Jy
! Component: 150  -  total flux cleaned = -2.84129e-05 Jy
! Component: 200  -  total flux cleaned = -8.02849e-05 Jy
! Total flux subtracted in 200 components = -8.02849e-05 Jy
! Clean residual min=-0.000285 max=0.000285 Jy/beam
! Clean residual mean=-0.000000 rms=0.000111 Jy/beam
! Combined flux in latest and established models = 0.0212847 Jy
! Performing phase self-cal
! Adding 71 model components to the UV plane model.
! The established model now contains 557 components and 0.0212847 Jy
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Correcting IF 4.
! 
! Correcting IF 5.
! 
! Correcting IF 6.
! 
! Correcting IF 7.
! 
! Correcting IF 8.
! 
! Fit before self-cal, rms=0.024809Jy  sigma=0.016763
! Fit after  self-cal, rms=0.024800Jy  sigma=0.016762
! 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=6.764 mas, bmaj=22.38 mas, bpa=16.45 degrees
! Estimated noise=42.6152 mJy/beam.
! restore: Substituting estimate of restoring beam from last 'invert'.
! Restoring with beam: 6.764 x 22.38 at 16.45 degrees (North through East)
! Clean map  min=-0.0031647  max=0.019825 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
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=6.212 mas, bmaj=22.99 mas, bpa=19.25 degrees
! Estimated noise=67.3936 mJy/beam.
! clean: niter=200  gain=0.03  cutoff=0
! Component: 050  -  total flux cleaned = 0.0161673 Jy
! Component: 100  -  total flux cleaned = 0.0187025 Jy
! Component: 150  -  total flux cleaned = 0.0192946 Jy
! Component: 200  -  total flux cleaned = 0.0194885 Jy
! Total flux subtracted in 200 components = 0.0194885 Jy
! Clean residual min=-0.002231 max=0.002235 Jy/beam
! Clean residual mean=-0.000091 rms=0.001061 Jy/beam
! Combined flux in latest and established models = 0.0194885 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 79 model components to the UV plane model.
! The established model now contains 79 components and 0.0194885 Jy
! Inverting map and beam 
! Estimated beam: bmin=6.764 mas, bmaj=22.38 mas, bpa=16.45 degrees
! Estimated noise=42.6152 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.000632336 Jy
! Component: 100  -  total flux cleaned = -0.000173021 Jy
! Component: 150  -  total flux cleaned = -0.000676812 Jy
! Component: 200  -  total flux cleaned = -0.00123972 Jy
! Total flux subtracted in 200 components = -0.00123972 Jy
! Clean residual min=-0.000976 max=0.000967 Jy/beam
! Clean residual mean=-0.000023 rms=0.000367 Jy/beam
! Combined flux in latest and established models = 0.0182487 Jy
! Adding 67 model components to the UV plane model.
! The established model now contains 145 components and 0.0182487 Jy
! Inverting map 
uvtaper 0.3,taper_size
! Gaussian taper: value 0.3 at UV radius = 40 mega-wavelengths.
clean clean_niter,clean_gain
! Inverting map and beam 
! Estimated beam: bmin=6.971 mas, bmaj=22.22 mas, bpa=16.6 degrees
! Estimated noise=42.7687 mJy/beam.
! clean: niter=200  gain=0.03  cutoff=0
! Component: 050  -  total flux cleaned = -0.000383744 Jy
! Component: 100  -  total flux cleaned = -0.000740584 Jy
! Component: 150  -  total flux cleaned = -0.000999031 Jy
! Component: 200  -  total flux cleaned = -0.00125478 Jy
! Total flux subtracted in 200 components = -0.00125478 Jy
! Clean residual min=-0.000605 max=0.000611 Jy/beam
! Clean residual mean=-0.000008 rms=0.000216 Jy/beam
! Combined flux in latest and established models = 0.016994 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.000181792 Jy
! Component: 100  -  total flux cleaned = -0.000326959 Jy
! Component: 150  -  total flux cleaned = -0.000436208 Jy
! Component: 200  -  total flux cleaned = -0.00058396 Jy
! Total flux subtracted in 200 components = -0.00058396 Jy
! Clean residual min=-0.000611 max=0.000615 Jy/beam
! Clean residual mean=-0.000007 rms=0.000214 Jy/beam
! Combined flux in latest and established models = 0.01641 Jy
! Adding 85 model components to the UV plane model.
! The established model now contains 230 components and 0.01641 Jy
! Inverting map 
uvtaper 0,0
! No UV-taper is currently set.
clean
! Inverting map and beam 
! Estimated beam: bmin=6.764 mas, bmaj=22.38 mas, bpa=16.45 degrees
! Estimated noise=42.6152 mJy/beam.
! clean: niter=200  gain=0.03  cutoff=0
! Component: 050  -  total flux cleaned = -0.00027715 Jy
! Component: 100  -  total flux cleaned = -0.000434261 Jy
! Component: 150  -  total flux cleaned = -0.000583016 Jy
! Component: 200  -  total flux cleaned = -0.000500185 Jy
! Total flux subtracted in 200 components = -0.000500185 Jy
! Clean residual min=-0.000340 max=0.000341 Jy/beam
! Clean residual mean=-0.000001 rms=0.000137 Jy/beam
! Combined flux in latest and established models = 0.0159098 Jy
selfcal
! Performing phase self-cal
! Adding 66 model components to the UV plane model.
! The established model now contains 289 components and 0.0159098 Jy
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Correcting IF 4.
! 
! Correcting IF 5.
! 
! Correcting IF 6.
! 
! Correcting IF 7.
! 
! Correcting IF 8.
! 
! Fit before self-cal, rms=0.024844Jy  sigma=0.016802
! Fit after  self-cal, rms=0.024827Jy  sigma=0.016796
wmodel /scr/pima/bp171a8_uvs/J0907-3155_C_map.mod
! Writing 289 model components to file: /scr/pima/bp171a8_uvs/J0907-3155_C_map.mod
wobs /scr/pima/bp171a8_uvs/J0907-3155_C_uvs.fits
! Writing UV FITS file: /scr/pima/bp171a8_uvs/J0907-3155_C_uvs.fits
wwins /scr/pima/bp171a8_uvs/J0907-3155_C_map.win
! wwins: No CLEAN windows to write.
! Error occured in command: wwins
![Exited script file: /home/lpetrov/bin/01_muppet]
! 
wmap "/scr/pima/bp171a8_uvs/J0907-3155_C\_map.fits"
! Inverting map 
! restore: Substituting estimate of restoring beam from last 'invert'.
! Restoring with beam: 6.764 x 22.38 at 16.45 degrees (North through East)
! Clean map  min=-0.0030696  max=0.015738 Jy/beam
! Writing clean map to FITS file: /scr/pima/bp171a8_uvs/J0907-3155_C_map.fits
float peak_flux
peak_flux = peak(flux,max)
print "The peak flux is",peak_flux
! The peak flux is 0.0157381 
invert
! Inverting map 
float image_rms
image_rms = imstat(rms)
print "The final image rms is",image_rms
! The final image rms is 0.000141569 
loglevs 100*3*image_rms/peak_flux
! The new contour levels are:
!  -2.69859 2.69859 5.39718 10.7944 21.5887 43.1774 86.3548
print "clev=      ", int(3*image_rms*10000)/10000
! clev=       0.0004 
print "peak=      ", int(1000*peak_flux)/1000
! peak=       0.015 
print "dyn_range= ", int(1000*peak_flux/image_rms)/1000
! dyn_range=  111.169 
quit
! Quitting program
! Log file /scr/pima/bp171a8_uvs/J0907-3155_C_uvs.log closed on Fri Dec 27 16:28:08 2013