! Started logfile: 1726+455_S.log on Fri Jun 20 15:36:12 2008
observe 1726+455_S.edt
! Reading UV FITS file: 1726+455_S.edt
! AN table 1: 136 integrations on 190 of 190 possible baselines.
! AN table 2: 34 integrations on 190 of 190 possible baselines.
! AN table 3: 43 integrations on 190 of 190 possible baselines.
! Apparent sampling: 0.270151 visibilities/baseline/integration-bin.
! *** This seems a bit low - see "help observe" on the binwid argument.
! Found source: 1726+455
! 
! 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.22497e+09        8e+06          1        8e+06
!  02        2  2.24497e+09        8e+06          1        8e+06
!  03        3  2.33497e+09        8e+06          1        8e+06
!  04        4  2.36497e+09        8e+06          1        8e+06
! 
! Polarization(s): RR
! 
! Read 1901 lines of history.
! 
! Reading 43732 visibilities.
![@gonzo5-0.4 1726+455_S]
print "***********************************"
! *********************************** 
print "*** Using gonzo instruction set ***"
! *** Using gonzo instruction set *** 
print "***********************************"
! *********************************** 
float field_size
field_size = 1024
float field_cell
field_cell = 0.4
integer clean_niter
clean_niter = 50
float clean_gain
clean_gain = 0.03
float dynam
dynam = 5.0
float win_mult
win_mult = 1.8
float solint
solint = 3.6/6.0
logical doflt
doflt = true
logical doamp
float new_peak
float flux_cutoff
mapsize field_size,field_cell
! Map grid = 1024x1024 pixels with 0.400x0.400 milli-arcsec cellsize.
select
! 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
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 2027 telescope corrections were flagged in sub-array 1.
!  A total of 338 telescope corrections were flagged in sub-array 2.
!  A total of 582 telescope corrections were flagged in sub-array 3.
! 
! Correcting IF 2.
!  A total of 2037 telescope corrections were flagged in sub-array 1.
!  A total of 338 telescope corrections were flagged in sub-array 2.
!  A total of 582 telescope corrections were flagged in sub-array 3.
! 
! Correcting IF 3.
!  A total of 2040 telescope corrections were flagged in sub-array 1.
!  A total of 342 telescope corrections were flagged in sub-array 2.
!  A total of 582 telescope corrections were flagged in sub-array 3.
! 
! Correcting IF 4.
!  A total of 2037 telescope corrections were flagged in sub-array 1.
!  A total of 337 telescope corrections were flagged in sub-array 2.
!  A total of 582 telescope corrections were flagged in sub-array 3.
! 
! Fit before self-cal, rms=0.590956Jy  sigma=9.651505
! Fit after  self-cal, rms=0.587970Jy  sigma=9.647544
! clrmod: Cleared the established, tentative and continuum models.
! Redundant starting model cleared.
uvweight 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.
doamp = false
flux_cutoff = imstat(rms) * dynam
! Inverting map and beam 
! Estimated beam: bmin=1.938 mas, bmaj=2.623 mas, bpa=1.863 degrees
! Estimated noise=0.583513 mJy/beam.
repeat
  if (peak(flux) > flux_cutoff) peakwin win_mult
  clean clean_niter,clean_gain
  flux_cutoff = imstat(rms) * dynam
  selfcal doamp, doflt, solint
  new_peak = peak(flux)
  until(new_peak<=flux_cutoff)
! Added new window around map position (0, 0).
! clean: niter=50  gain=0.03  cutoff=0
! Component: 050  -  total flux cleaned = 0.33468 Jy
! Total flux subtracted in 50 components = 0.33468 Jy
! Clean residual min=-0.017341 max=0.110241 Jy/beam
! Clean residual mean=0.000003 rms=0.004831 Jy/beam
! Combined flux in latest and established models = 0.33468 Jy
! Performing phase self-cal over 0.6 minute time intervals
! Adding 5 model components to the UV plane model.
! The established model now contains 5 components and 0.33468 Jy
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Correcting IF 4.
! 
! Fit before self-cal, rms=0.302020Jy  sigma=3.979256
! Fit after  self-cal, rms=0.301962Jy  sigma=3.978938
! Inverting map 
! clean: niter=50  gain=0.03  cutoff=0
! Component: 050  -  total flux cleaned = 0.119357 Jy
! Total flux subtracted in 50 components = 0.119357 Jy
! Clean residual min=-0.017766 max=0.054684 Jy/beam
! Clean residual mean=-0.000001 rms=0.003607 Jy/beam
! Combined flux in latest and established models = 0.454036 Jy
! Performing phase self-cal over 0.6 minute time intervals
! Adding 5 model components to the UV plane model.
! The established model now contains 8 components and 0.454036 Jy
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Correcting IF 4.
! 
! Fit before self-cal, rms=0.253309Jy  sigma=2.991513
! Fit after  self-cal, rms=0.252991Jy  sigma=2.986945
! Inverting map 
! clean: niter=50  gain=0.03  cutoff=0
! Component: 050  -  total flux cleaned = 0.0620624 Jy
! Total flux subtracted in 50 components = 0.0620624 Jy
! Clean residual min=-0.017868 max=0.031115 Jy/beam
! Clean residual mean=-0.000003 rms=0.003230 Jy/beam
! Combined flux in latest and established models = 0.516099 Jy
! Performing phase self-cal over 0.6 minute time intervals
! Adding 10 model components to the UV plane model.
! The established model now contains 13 components and 0.516099 Jy
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Correcting IF 4.
! 
! Fit before self-cal, rms=0.237265Jy  sigma=2.709971
! Fit after  self-cal, rms=0.237110Jy  sigma=2.706574
! Inverting map 
! clean: niter=50  gain=0.03  cutoff=0
! Component: 050  -  total flux cleaned = 0.0387175 Jy
! Total flux subtracted in 50 components = 0.0387175 Jy
! Clean residual min=-0.017674 max=0.021145 Jy/beam
! Clean residual mean=-0.000005 rms=0.003089 Jy/beam
! Combined flux in latest and established models = 0.554816 Jy
! Performing phase self-cal over 0.6 minute time intervals
! Adding 7 model components to the UV plane model.
! The established model now contains 17 components and 0.554816 Jy
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Correcting IF 4.
! 
! Fit before self-cal, rms=0.231107Jy  sigma=2.633478
! Fit after  self-cal, rms=0.231080Jy  sigma=2.632710
! Inverting map 
! clean: niter=50  gain=0.03  cutoff=0
! Component: 050  -  total flux cleaned = 0.0266081 Jy
! Total flux subtracted in 50 components = 0.0266081 Jy
! Clean residual min=-0.017677 max=0.016960 Jy/beam
! Clean residual mean=-0.000006 rms=0.003031 Jy/beam
! Combined flux in latest and established models = 0.581424 Jy
! Performing phase self-cal over 0.6 minute time intervals
! Adding 7 model components to the UV plane model.
! The established model now contains 20 components and 0.581424 Jy
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Correcting IF 4.
! 
! Fit before self-cal, rms=0.228395Jy  sigma=2.626669
! Fit after  self-cal, rms=0.228390Jy  sigma=2.626404
! Inverting map 
print "****************************************"
! **************************************** 
print "*** Finished Uniform Weighting CLEAN ***"
! *** Finished Uniform Weighting CLEAN *** 
print "****************************************"
! **************************************** 
uvweight 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
doamp = false
flux_cutoff = imstat(rms) * dynam
! Inverting map and beam 
! Estimated beam: bmin=2.374 mas, bmaj=3.245 mas, bpa=0.5741 degrees
! Estimated noise=0.315678 mJy/beam.
repeat
  if (peak(flux) > flux_cutoff) peakwin win_mult
  clean clean_niter,clean_gain
  flux_cutoff = imstat(rms) * dynam
  selfcal doamp, doflt, solint
  new_peak = peak(flux)
  until(new_peak<=flux_cutoff)
! Added new window around map position (-12.8, -13.2).
! clean: niter=100  gain=0.03  cutoff=0
! Component: 050  -  total flux cleaned = 0.0176197 Jy
! Component: 100  -  total flux cleaned = 0.0240059 Jy
! Total flux subtracted in 100 components = 0.0240059 Jy
! Clean residual min=-0.017850 max=0.017195 Jy/beam
! Clean residual mean=0.000008 rms=0.003548 Jy/beam
! Combined flux in latest and established models = 0.60543 Jy
! Performing phase self-cal over 0.6 minute time intervals
! Adding 11 model components to the UV plane model.
! The established model now contains 30 components and 0.60543 Jy
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Correcting IF 4.
! 
! Fit before self-cal, rms=0.226581Jy  sigma=2.604672
! Fit after  self-cal, rms=0.226518Jy  sigma=2.602388
! Inverting map 
print "****************************************"
! **************************************** 
print "*** Finished Natural Weighting CLEAN ***"
! *** Finished Natural Weighting CLEAN *** 
print "****************************************"
! **************************************** 
gscale true
! Performing overall amplitude self-cal
! 
! Correcting IF 1.
!  A total of 57 telescope corrections were flagged in sub-array 1.
!  Telescope amplitude corrections in sub-array 1:
!   BR        0.97     FD        0.83     GC        0.82     HH        1.00*    
!   HN        1.03     KK        0.93     KP        0.57     LA        0.77     
!   MA        2.31     MC        1.01     MK        0.90     NL        0.72     
!   NY        1.16     ON        0.88     OV        0.85     PT        1.00     
!   SC        1.10     TS        1.00     WF        0.83     WZ        0.78     
! 
!  A total of 3 telescope corrections were flagged in sub-array 2.
!  Telescope amplitude corrections in sub-array 2:
!   BR        1.02     FD        1.04     GC        1.03     HH        1.00*    
!   HN        0.65     KK        0.77     KP        0.93     LA        0.96     
!   MA        1.00*    MC        1.00*    MK        0.80     NL        0.96     
!   NY        0.73     ON        0.95     OV        1.05     PT        0.92     
!   SC        1.00*    TS        0.97     WF        0.79     WZ        1.39     
! 
!  A total of 6 telescope corrections were flagged in sub-array 3.
!  Telescope amplitude corrections in sub-array 3:
!   BR        1.11     FD        1.17     GC        1.13     HH        1.00*    
!   HN        1.25     KK        1.06     KP        1.20     LA        1.10     
!   MA        1.00*    MC        1.00*    MK        1.13     NL        1.18     
!   NY        1.13     ON        9.13     OV        1.18     PT        1.10     
!   SC        1.00*    TS        1.01     WF        1.06     WZ        1.00*    
! 
! 
! Correcting IF 2.
!  A total of 39 telescope corrections were flagged in sub-array 1.
!  Telescope amplitude corrections in sub-array 1:
!   BR        0.94     FD        0.85     GC        0.88     HH        1.00*    
!   HN        0.94     KK        0.85     KP        0.87     LA        0.78     
!   MA        3.10     MC        1.38     MK        0.96     NL        0.96     
!   NY        1.21     ON        0.83     OV        0.67     PT        0.87     
!   SC        1.07     TS        0.97     WF        0.77     WZ        0.84     
! 
!  A total of 3 telescope corrections were flagged in sub-array 2.
!  Telescope amplitude corrections in sub-array 2:
!   BR        0.95     FD        1.02     GC        0.92     HH        1.00*    
!   HN        0.86     KK        0.81     KP        0.92     LA        0.89     
!   MA        1.00*    MC        1.00*    MK        0.94     NL        0.89     
!   NY        0.79     ON        1.20     OV        1.05     PT        0.98     
!   SC        1.00*    TS        0.92     WF        0.86     WZ        1.38     
! 
!  A total of 6 telescope corrections were flagged in sub-array 3.
!  Telescope amplitude corrections in sub-array 3:
!   BR        1.17     FD        1.12     GC        1.26     HH        1.00*    
!   HN        1.17     KK        1.09     KP        1.06     LA        1.07     
!   MA        1.00*    MC        1.00*    MK        1.11     NL        1.14     
!   NY        1.07     ON        8.28     OV        1.13     PT        1.12     
!   SC        1.00*    TS        0.96     WF        1.09     WZ        1.00*    
! 
! 
! Correcting IF 3.
!  A total of 39 telescope corrections were flagged in sub-array 1.
!  Telescope amplitude corrections in sub-array 1:
!   BR        0.97     FD        0.91     GC        0.97     HH        1.00*    
!   HN        0.89     KK        0.87     KP        0.86     LA        0.65     
!   MA        1.58     MC        1.09     MK        0.95     NL        1.04     
!   NY        1.28     ON        0.82     OV        0.83     PT        0.92     
!   SC        1.14     TS        1.03     WF        0.84     WZ        0.76     
! 
!  A total of 3 telescope corrections were flagged in sub-array 2.
!  Telescope amplitude corrections in sub-array 2:
!   BR        1.00     FD        1.07     GC        1.03     HH        1.00*    
!   HN        0.95     KK        0.75     KP        2.30     LA        0.81     
!   MA        1.00*    MC        1.00*    MK        0.64     NL        0.91     
!   NY        0.73     ON        1.08     OV        1.14     PT        0.94     
!   SC        1.00*    TS        0.92     WF        0.87     WZ        1.16     
! 
!  A total of 6 telescope corrections were flagged in sub-array 3.
!  Telescope amplitude corrections in sub-array 3:
!   BR        1.17     FD        1.16     GC        1.16     HH        1.00*    
!   HN        1.20     KK        1.08     KP        1.53     LA        1.09     
!   MA        1.00*    MC        1.00*    MK        1.11     NL        1.10     
!   NY        1.04     ON        7.07     OV        1.12     PT        1.11     
!   SC        1.00*    TS        1.01     WF        1.05     WZ        1.00*    
! 
! 
! Correcting IF 4.
!  A total of 39 telescope corrections were flagged in sub-array 1.
!  Telescope amplitude corrections in sub-array 1:
!   BR        1.00     FD        0.98     GC        0.89     HH        1.00*    
!   HN        0.99     KK        0.93     KP        0.85     LA        1.00     
!   MA        1.88     MC        1.06     MK        0.99     NL        0.76     
!   NY        1.07     ON        0.82     OV        0.72     PT        1.05     
!   SC        1.12     TS        1.02     WF        0.94     WZ        0.85     
! 
!  A total of 3 telescope corrections were flagged in sub-array 2.
!  Telescope amplitude corrections in sub-array 2:
!   BR        1.03     FD        1.00     GC        1.03     HH        1.00*    
!   HN        0.99     KK        0.85     KP        1.01     LA        0.78     
!   MA        1.00*    MC        1.00*    MK        0.75     NL        0.97     
!   NY        0.69     ON        0.99     OV        1.08     PT        1.01     
!   SC        1.00*    TS        0.94     WF        0.90     WZ        1.18     
! 
!  A total of 6 telescope corrections were flagged in sub-array 3.
!  Telescope amplitude corrections in sub-array 3:
!   BR        1.15     FD        1.17     GC        1.17     HH        1.00*    
!   HN        1.25     KK        1.12     KP        1.16     LA        1.11     
!   MA        1.00*    MC        1.00*    MK        1.12     NL        1.02     
!   NY        1.06     ON        5.52     OV        1.03     PT        1.10     
!   SC        1.00*    TS        0.98     WF        1.07     WZ        1.00*    
! 
! 
! Fit before self-cal, rms=0.226518Jy  sigma=2.602388
! Fit after  self-cal, rms=0.310978Jy  sigma=1.437775
dynam = dynam - 0.5
doamp = false
flux_cutoff = imstat(rms) * dynam
! Inverting map and beam 
! Estimated beam: bmin=2.384 mas, bmaj=3.313 mas, bpa=-1.349 degrees
! Estimated noise=0.312991 mJy/beam.
repeat
  if (peak(flux) > flux_cutoff) peakwin win_mult
  clean clean_niter,clean_gain
  flux_cutoff = imstat(rms) * dynam
  selfcal doamp, doflt, solint
  new_peak = peak(flux)
  until(new_peak<=flux_cutoff)
! Added new window around map position (-8, -4).
! clean: niter=100  gain=0.03  cutoff=0
! Component: 050  -  total flux cleaned = 0.00148633 Jy
! Component: 100  -  total flux cleaned = 0.00152661 Jy
! Total flux subtracted in 100 components = 0.00152661 Jy
! Clean residual min=-0.003662 max=0.007036 Jy/beam
! Clean residual mean=0.000043 rms=0.000858 Jy/beam
! Combined flux in latest and established models = 0.606957 Jy
! Performing phase self-cal over 0.6 minute time intervals
! Adding 16 model components to the UV plane model.
! The established model now contains 45 components and 0.606957 Jy
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Correcting IF 4.
! 
! Fit before self-cal, rms=0.310762Jy  sigma=1.420371
! Fit after  self-cal, rms=0.310891Jy  sigma=1.418730
! Inverting map 
! Added new window around map position (-2.8, -0.4).
! clean: niter=100  gain=0.03  cutoff=0
! Component: 050  -  total flux cleaned = 0.00250284 Jy
! Component: 100  -  total flux cleaned = 0.00191204 Jy
! Total flux subtracted in 100 components = 0.00191204 Jy
! Clean residual min=-0.003149 max=0.003693 Jy/beam
! Clean residual mean=0.000036 rms=0.000806 Jy/beam
! Combined flux in latest and established models = 0.608869 Jy
! Performing phase self-cal over 0.6 minute time intervals
! Adding 22 model components to the UV plane model.
! The established model now contains 57 components and 0.608869 Jy
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Correcting IF 4.
! 
! Fit before self-cal, rms=0.310719Jy  sigma=1.411348
! Fit after  self-cal, rms=0.310749Jy  sigma=1.410506
! Inverting map 
! clean: niter=100  gain=0.03  cutoff=0
! Component: 050  -  total flux cleaned = 0.000337451 Jy
! Component: 100  -  total flux cleaned = 3.16643e-05 Jy
! Total flux subtracted in 100 components = 3.16643e-05 Jy
! Clean residual min=-0.003073 max=0.003535 Jy/beam
! Clean residual mean=0.000036 rms=0.000783 Jy/beam
! Combined flux in latest and established models = 0.6089 Jy
! Performing phase self-cal over 0.6 minute time intervals
! Adding 25 model components to the UV plane model.
! The established model now contains 69 components and 0.608901 Jy
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Correcting IF 4.
! 
! Fit before self-cal, rms=0.310661Jy  sigma=1.407242
! Fit after  self-cal, rms=0.310688Jy  sigma=1.407015
! Inverting map 
! Added new window around map position (-18.8, -5.6).
! clean: niter=100  gain=0.03  cutoff=0
! Component: 050  -  total flux cleaned = 0.0017451 Jy
! Component: 100  -  total flux cleaned = 0.00215902 Jy
! Total flux subtracted in 100 components = 0.00215902 Jy
! Clean residual min=-0.002984 max=0.003078 Jy/beam
! Clean residual mean=0.000029 rms=0.000761 Jy/beam
! Combined flux in latest and established models = 0.61106 Jy
! Performing phase self-cal over 0.6 minute time intervals
! Adding 31 model components to the UV plane model.
! The established model now contains 83 components and 0.61106 Jy
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Correcting IF 4.
! 
! Fit before self-cal, rms=0.310611Jy  sigma=1.404358
! Fit after  self-cal, rms=0.310624Jy  sigma=1.404217
! Inverting map 
! Added new window around map position (-64.4, 15.2).
! clean: niter=100  gain=0.03  cutoff=0
! Component: 050  -  total flux cleaned = 0.00135082 Jy
! Component: 100  -  total flux cleaned = 0.00171203 Jy
! Total flux subtracted in 100 components = 0.00171203 Jy
! Clean residual min=-0.002982 max=0.002767 Jy/beam
! Clean residual mean=0.000024 rms=0.000746 Jy/beam
! Combined flux in latest and established models = 0.612772 Jy
! Performing phase self-cal over 0.6 minute time intervals
! Adding 35 model components to the UV plane model.
! The established model now contains 93 components and 0.612772 Jy
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Correcting IF 4.
! 
! Fit before self-cal, rms=0.310567Jy  sigma=1.402324
! Fit after  self-cal, rms=0.310576Jy  sigma=1.402226
! Inverting map 
dynam = dynam - 1.0
doamp = true
solint = solint * (6.0/3.6)
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 doamp, doflt, solint
  new_peak = peak(flux)
  until(new_peak<=flux_cutoff)
! clean: niter=100  gain=0.03  cutoff=0
! Component: 050  -  total flux cleaned = 0.00058083 Jy
! Component: 100  -  total flux cleaned = 0.000891541 Jy
! Total flux subtracted in 100 components = 0.000891541 Jy
! Clean residual min=-0.002976 max=0.002774 Jy/beam
! Clean residual mean=0.000021 rms=0.000735 Jy/beam
! Combined flux in latest and established models = 0.613663 Jy
! Performing amp+phase self-cal over 1 minute time intervals
! Adding 32 model components to the UV plane model.
! The established model now contains 97 components and 0.613663 Jy
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Correcting IF 4.
! 
! Fit before self-cal, rms=0.310534Jy  sigma=1.400964
! Fit after  self-cal, rms=0.355580Jy  sigma=1.288961
! Inverting map and beam 
! Estimated beam: bmin=2.381 mas, bmaj=3.321 mas, bpa=-1.637 degrees
! Estimated noise=0.312854 mJy/beam.
! clean: niter=100  gain=0.03  cutoff=0
! Component: 050  -  total flux cleaned = -0.000120071 Jy
! Component: 100  -  total flux cleaned = -0.000431457 Jy
! Total flux subtracted in 100 components = -0.000431457 Jy
! Clean residual min=-0.001820 max=0.002105 Jy/beam
! Clean residual mean=0.000019 rms=0.000441 Jy/beam
! Combined flux in latest and established models = 0.613232 Jy
! Performing amp+phase self-cal over 1 minute time intervals
! Adding 12 model components to the UV plane model.
! The established model now contains 102 components and 0.613232 Jy
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Correcting IF 4.
! 
! Fit before self-cal, rms=0.355556Jy  sigma=1.287379
! Fit after  self-cal, rms=0.356665Jy  sigma=1.282325
! Inverting map and beam 
! Estimated beam: bmin=2.379 mas, bmaj=3.322 mas, bpa=-1.73 degrees
! Estimated noise=0.312092 mJy/beam.
doamp = false
solint = solint / (6.0/3.6)
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 doamp, doflt, solint
  new_peak = peak(flux)
  until(new_peak<=flux_cutoff)
! clean: niter=100  gain=0.03  cutoff=0
! Component: 050  -  total flux cleaned = -0.000807246 Jy
! Component: 100  -  total flux cleaned = -0.000815183 Jy
! Total flux subtracted in 100 components = -0.000815183 Jy
! Clean residual min=-0.001754 max=0.002135 Jy/beam
! Clean residual mean=0.000019 rms=0.000425 Jy/beam
! Combined flux in latest and established models = 0.612417 Jy
! Performing phase self-cal over 0.6 minute time intervals
! Adding 17 model components to the UV plane model.
! The established model now contains 105 components and 0.612417 Jy
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Correcting IF 4.
! 
! Fit before self-cal, rms=0.356641Jy  sigma=1.281630
! Fit after  self-cal, rms=0.356671Jy  sigma=1.281211
! Inverting map 
! Added new window around map position (-74.4, 34.8).
! clean: niter=100  gain=0.03  cutoff=0
! Component: 050  -  total flux cleaned = 0.00115203 Jy
! Component: 100  -  total flux cleaned = 0.00168876 Jy
! Total flux subtracted in 100 components = 0.00168876 Jy
! Clean residual min=-0.001739 max=0.001767 Jy/beam
! Clean residual mean=0.000012 rms=0.000418 Jy/beam
! Combined flux in latest and established models = 0.614106 Jy
! Performing phase self-cal over 0.6 minute time intervals
! Adding 17 model components to the UV plane model.
! The established model now contains 112 components and 0.614105 Jy
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Correcting IF 4.
! 
! Fit before self-cal, rms=0.356648Jy  sigma=1.280814
! Fit after  self-cal, rms=0.356673Jy  sigma=1.280798
! Inverting map 
! Added new window around map position (-25.6, -5.2).
! clean: niter=100  gain=0.03  cutoff=0
! Component: 050  -  total flux cleaned = 0.00142438 Jy
! Component: 100  -  total flux cleaned = 0.00198445 Jy
! Total flux subtracted in 100 components = 0.00198445 Jy
! Clean residual min=-0.001718 max=0.001695 Jy/beam
! Clean residual mean=0.000006 rms=0.000410 Jy/beam
! Combined flux in latest and established models = 0.61609 Jy
! Performing phase self-cal over 0.6 minute time intervals
! Adding 23 model components to the UV plane model.
! The established model now contains 123 components and 0.61609 Jy
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Correcting IF 4.
! 
! Fit before self-cal, rms=0.356657Jy  sigma=1.280356
! Fit after  self-cal, rms=0.356676Jy  sigma=1.280353
! Inverting map 
! Added new window around map position (41.6, -90.4).
! clean: niter=100  gain=0.03  cutoff=0
! Component: 050  -  total flux cleaned = 0.0011438 Jy
! Component: 100  -  total flux cleaned = 0.00158837 Jy
! Total flux subtracted in 100 components = 0.00158837 Jy
! Clean residual min=-0.001696 max=0.001638 Jy/beam
! Clean residual mean=0.000002 rms=0.000405 Jy/beam
! Combined flux in latest and established models = 0.617678 Jy
! Performing phase self-cal over 0.6 minute time intervals
! Adding 27 model components to the UV plane model.
! The established model now contains 132 components and 0.617678 Jy
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Correcting IF 4.
! 
! Fit before self-cal, rms=0.356661Jy  sigma=1.280022
! Fit after  self-cal, rms=0.356675Jy  sigma=1.280004
! Inverting map 
print "***********************************"
! *********************************** 
print "*** Finished Amplitude Self-Cal ***"
! *** Finished Amplitude Self-Cal *** 
print "***********************************"
! *********************************** 
save 1726+455_S
! Writing UV FITS file: 1726+455_S.uvf
! Writing 132 model components to file: 1726+455_S.mod
! wwins: Wrote 9 windows to 1726+455_S.win
! restore: Substituting estimate of restoring beam from last 'invert'.
! Restoring with beam: 2.379 x 3.322 at -1.73 degrees (North through East)
! Clean map  min=-0.0015747  max=0.44997 Jy/beam
! Writing clean map to FITS file: 1726+455_S.fits
! Writing difmap environment to: 1726+455_S.par
print "****************************"
! **************************** 
print "*** Now, make some plots ***"
! *** Now, make some plots *** 
print "****************************"
! **************************** 
![@gonzo_plot 1726+455_S]
device 1726+455_Suv.ps/vps,1,2
! Attempting to open device: '1726+455_Suv.ps/vps'
radplot
! Using default options string "m1"
uvplot
! Using default options string ""
device 1726+455_Sim.ps/vps
! Attempting to open device: '1726+455_Sim.ps/vps'
uvweight 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.
loglevs -1,2048,2
! The new contour levels are:
!  -1 1 2 4 8 16 32 64 128 256 512 1024 2048
cmul = imstat(rms)*3
! Inverting map and beam 
! Estimated beam: bmin=2.379 mas, bmaj=3.322 mas, bpa=-1.73 degrees
! Estimated noise=0.312092 mJy/beam.
mappl cln
! restore: Substituting estimate of restoring beam from last 'invert'.
! Restoring with beam: 2.379 x 3.322 at -1.73 degrees (North through East)
! Clean map  min=-0.0015747  max=0.44997 Jy/beam
![Exited script file: gonzo_plot]
![Exited script file: gonzo5-0.4]
quit
! Quitting program
! Log file 1726+455_S.log closed on Fri Jun 20 15:36:34 2008