! Started logfile: J0646+4451_S_2001_04_09_pus_uvs.log on Fri Oct  5 15:55:40 2007
obs J0646+4451_S_2001_04_09_pus_uva.fits
! Reading UV FITS file: J0646+4451_S_2001_04_09_pus_uva.fits
! AN table 1: 37 integrations on 190 of 190 possible baselines.
! AN table 2: 161 integrations on 190 of 190 possible baselines.
! AN table 3: 194 integrations on 190 of 190 possible baselines.
! AN table 4: 109 integrations on 190 of 190 possible baselines.
! AN table 5: 256 integrations on 190 of 190 possible baselines.
! AN table 6: 27 integrations on 190 of 190 possible baselines.
! Apparent sampling: 0.158788 visibilities/baseline/integration-bin.
! *** This seems a bit low - see "help observe" on the binwid argument.
! Found source: J0646+4451
! 
! 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.22997e+09        8e+06          1        8e+06
!  02        2  2.25997e+09        8e+06          1        8e+06
!  03        3  2.34997e+09        8e+06          1        8e+06
!  04        4  2.36997e+09        8e+06          1        8e+06
! 
! Polarization(s): RR
! 
! Read 1949 lines of history.
! 
! Reading 94612 visibilities.
select I
! Polarization I is unavailable.
! 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 = 512 
print "field_cell =",field_cell
! field_cell = 0.5 
print "taper_size =",taper_size
! taper_size = 20 
![@muppet J0646+4451_S_2001_04_09_pus]
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 = 512x512 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 429 telescope corrections were flagged in sub-array 1.
!  A total of 2579 telescope corrections were flagged in sub-array 2.
!  A total of 3122 telescope corrections were flagged in sub-array 3.
!  A total of 1275 telescope corrections were flagged in sub-array 4.
!  A total of 2972 telescope corrections were flagged in sub-array 5.
!  A total of 213 telescope corrections were flagged in sub-array 6.
! 
! Correcting IF 2.
!  A total of 429 telescope corrections were flagged in sub-array 1.
!  A total of 2579 telescope corrections were flagged in sub-array 2.
!  A total of 3122 telescope corrections were flagged in sub-array 3.
!  A total of 1275 telescope corrections were flagged in sub-array 4.
!  A total of 2974 telescope corrections were flagged in sub-array 5.
!  A total of 213 telescope corrections were flagged in sub-array 6.
! 
! Correcting IF 3.
!  A total of 429 telescope corrections were flagged in sub-array 1.
!  A total of 2579 telescope corrections were flagged in sub-array 2.
!  A total of 3122 telescope corrections were flagged in sub-array 3.
!  A total of 1275 telescope corrections were flagged in sub-array 4.
!  A total of 2975 telescope corrections were flagged in sub-array 5.
!  A total of 213 telescope corrections were flagged in sub-array 6.
! 
! Correcting IF 4.
!  A total of 429 telescope corrections were flagged in sub-array 1.
!  A total of 2579 telescope corrections were flagged in sub-array 2.
!  A total of 3122 telescope corrections were flagged in sub-array 3.
!  A total of 1275 telescope corrections were flagged in sub-array 4.
!  A total of 2975 telescope corrections were flagged in sub-array 5.
!  A total of 213 telescope corrections were flagged in sub-array 6.
! 
! Fit before self-cal, rms=0.805184Jy  sigma=0.005817
! Fit after  self-cal, rms=0.467327Jy  sigma=0.003005
! 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=1.958 mas, bmaj=2.427 mas, bpa=-13.6 degrees
! Estimated noise=615.602 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.526726 Jy
! Component: 100  -  total flux cleaned = 0.642992 Jy
! Total flux subtracted in 100 components = 0.642992 Jy
! Clean residual min=-0.010153 max=0.039214 Jy/beam
! Clean residual mean=-0.000039 rms=0.003063 Jy/beam
! Combined flux in latest and established models = 0.642992 Jy
! Performing phase self-cal
! Adding 6 model components to the UV plane model.
! The established model now contains 6 components and 0.642992 Jy
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Correcting IF 4.
! 
! Fit before self-cal, rms=0.361580Jy  sigma=0.001985
! Fit after  self-cal, rms=0.361542Jy  sigma=0.001985
! Inverting map 
! clean: niter=100  gain=0.03  cutoff=0
! Component: 050  -  total flux cleaned = 0.0437736 Jy
! Component: 100  -  total flux cleaned = 0.0705029 Jy
! Total flux subtracted in 100 components = 0.0705029 Jy
! Clean residual min=-0.010516 max=0.027815 Jy/beam
! Clean residual mean=-0.000040 rms=0.002625 Jy/beam
! Combined flux in latest and established models = 0.713494 Jy
! Performing phase self-cal
! Adding 14 model components to the UV plane model.
! The established model now contains 17 components and 0.713494 Jy
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Correcting IF 4.
! 
! Fit before self-cal, rms=0.353878Jy  sigma=0.001852
! Fit after  self-cal, rms=0.353782Jy  sigma=0.001852
! Inverting map 
! Added new window around map position (3.5, 0).
! clean: niter=100  gain=0.03  cutoff=0
! Component: 050  -  total flux cleaned = 0.0254031 Jy
! Component: 100  -  total flux cleaned = 0.0419344 Jy
! Total flux subtracted in 100 components = 0.0419344 Jy
! Clean residual min=-0.010563 max=0.013671 Jy/beam
! Clean residual mean=-0.000043 rms=0.002462 Jy/beam
! Combined flux in latest and established models = 0.755429 Jy
! Performing phase self-cal
! Adding 13 model components to the UV plane model.
! The established model now contains 25 components and 0.755429 Jy
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Correcting IF 4.
! 
! Fit before self-cal, rms=0.351115Jy  sigma=0.001805
! Fit after  self-cal, rms=0.350929Jy  sigma=0.001804
! 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=2.456 mas, bmaj=3.076 mas, bpa=-27.35 degrees
! Estimated noise=293.424 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.0238164 Jy
! Component: 100  -  total flux cleaned = 0.0376251 Jy
! Component: 150  -  total flux cleaned = 0.0461568 Jy
! Component: 200  -  total flux cleaned = 0.0514717 Jy
! Total flux subtracted in 200 components = 0.0514717 Jy
! Clean residual min=-0.007231 max=0.010530 Jy/beam
! Clean residual mean=-0.000537 rms=0.001886 Jy/beam
! Combined flux in latest and established models = 0.806901 Jy
! Performing phase self-cal
! Adding 15 model components to the UV plane model.
! The established model now contains 36 components and 0.806901 Jy
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Correcting IF 4.
! 
! Fit before self-cal, rms=0.349663Jy  sigma=0.001777
! Fit after  self-cal, rms=0.349511Jy  sigma=0.001776
! Inverting map 
! Added new window around map position (6, 3).
! clean: niter=200  gain=0.03  cutoff=0
! Component: 050  -  total flux cleaned = 0.00427989 Jy
! Component: 100  -  total flux cleaned = 0.00571792 Jy
! Component: 150  -  total flux cleaned = 0.00687975 Jy
! Component: 200  -  total flux cleaned = 0.00754255 Jy
! Total flux subtracted in 200 components = 0.00754255 Jy
! Clean residual min=-0.007466 max=0.009469 Jy/beam
! Clean residual mean=-0.000565 rms=0.001777 Jy/beam
! Combined flux in latest and established models = 0.814443 Jy
! Performing phase self-cal
! Adding 20 model components to the UV plane model.
! The established model now contains 52 components and 0.814443 Jy
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Correcting IF 4.
! 
! Fit before self-cal, rms=0.349163Jy  sigma=0.001771
! Fit after  self-cal, rms=0.349132Jy  sigma=0.001771
! Inverting map 
print "************** FINISHED NATURAL WEIGHTING CLEAN **************"
! ************** FINISHED NATURAL WEIGHTING CLEAN ************** 
! 
gscale true
! Performing overall amplitude self-cal
! 
! Correcting IF 1.
!  A total of 6 telescope corrections were flagged in sub-array 1.
!  Telescope amplitude corrections in sub-array 1:
!   BR        1.06     FD        1.00*    GC        1.04     GG        1.00*    
!   HH        1.05     HN        1.03     KK        1.00*    KP        1.00*    
!   LA        1.00*    MA        0.93     MC        0.94     MK        1.00*    
!   NL        1.04     NY        0.99     OV        1.00*    PT        1.00*    
!   SC        1.00     TS        1.10     WF        1.08     WZ        1.05     
! 
!  A total of 24 telescope corrections were flagged in sub-array 2.
!  Telescope amplitude corrections in sub-array 2:
!   BR        1.00*    FD        1.00*    GC        1.04     GG        1.00*    
!   HH        1.05     HN        1.05     KK        1.00*    KP        1.00*    
!   LA        1.00*    MA        1.10     MC        2.24     MK        1.00*    
!   NL        1.00*    NY        0.99     OV        1.00*    PT        1.00*    
!   SC        1.00*    TS        1.02     WF        1.05     WZ        0.99     
! 
!  A total of 261 telescope corrections were flagged in sub-array 3.
!  Telescope amplitude corrections in sub-array 3:
!   BR        1.01     FD        1.00*    GC        1.07     GG        1.00*    
!   HH        1.00*    HN        1.00*    KK        1.02     KP        1.00*    
!   LA        1.00*    MA        1.00     MC        1.18     MK        1.07     
!   NL        1.00*    NY        0.98     OV        1.15     PT        1.00*    
!   SC        1.00*    TS        0.93     WF        1.00*    WZ        0.95     
! 
!  A total of 21 telescope corrections were flagged in sub-array 4.
!  Telescope amplitude corrections in sub-array 4:
!   BR        1.02     FD        1.06     GC        1.07     GG        1.00*    
!   HH        1.00*    HN        1.02     KK        1.01     KP        1.11     
!   LA        1.04     MA        1.06     MC        1.12     MK        0.97     
!   NL        1.05     NY        0.99     OV        1.08     PT        1.02     
!   SC        0.98     TS        0.93     WF        1.07     WZ        1.32     
! 
!  A total of 303 telescope corrections were flagged in sub-array 5.
!  Telescope amplitude corrections in sub-array 5:
!   BR        1.00     FD        1.01     GC        1.05     GG        1.00*    
!   HH        1.00*    HN        1.05     KK        0.92     KP        1.04     
!   LA        0.99     MA        0.97     MC        1.87     MK        0.99     
!   NL        1.01     NY        0.94     OV        1.04     PT        0.97     
!   SC        1.05     TS        1.00     WF        0.91     WZ        0.98     
! 
!  Telescope amplitude corrections in sub-array 6:
!   BR        0.98     FD        0.96     GC        0.96     GG        1.00*    
!   HH        1.00*    HN        0.97     KK        1.09     KP        0.92     
!   LA        0.98     MA        1.01     MC        2.15     MK        1.08     
!   NL        0.97     NY        0.89     OV        1.02     PT        0.97     
!   SC        0.96     TS        1.00*    WF        1.00*    WZ        0.98     
! 
! 
! Correcting IF 2.
!  A total of 6 telescope corrections were flagged in sub-array 1.
!  Telescope amplitude corrections in sub-array 1:
!   BR        1.07     FD        1.00*    GC        1.00     GG        1.00*    
!   HH        1.03     HN        0.99     KK        1.00*    KP        1.00*    
!   LA        1.00*    MA        0.94     MC        1.27     MK        1.00*    
!   NL        1.06     NY        1.03     OV        1.00*    PT        1.00*    
!   SC        1.04     TS        1.13     WF        1.03     WZ        0.99     
! 
!  A total of 24 telescope corrections were flagged in sub-array 2.
!  Telescope amplitude corrections in sub-array 2:
!   BR        1.00*    FD        1.00*    GC        1.03     GG        1.00*    
!   HH        1.04     HN        1.03     KK        1.00*    KP        1.00*    
!   LA        1.00*    MA        0.87     MC        0.98     MK        1.00*    
!   NL        1.00*    NY        0.99     OV        1.00*    PT        1.00*    
!   SC        1.00*    TS        1.06     WF        1.06     WZ        0.97     
! 
!  A total of 261 telescope corrections were flagged in sub-array 3.
!  Telescope amplitude corrections in sub-array 3:
!   BR        0.99     FD        1.00*    GC        1.02     GG        1.00*    
!   HH        1.00*    HN        1.00*    KK        1.05     KP        1.00*    
!   LA        1.00*    MA        1.10     MC        1.01     MK        1.07     
!   NL        1.00*    NY        1.02     OV        1.13     PT        1.00*    
!   SC        1.00*    TS        0.93     WF        1.00*    WZ        0.94     
! 
!  A total of 21 telescope corrections were flagged in sub-array 4.
!  Telescope amplitude corrections in sub-array 4:
!   BR        1.03     FD        1.06     GC        1.04     GG        1.00*    
!   HH        1.00*    HN        0.99     KK        0.95     KP        1.05     
!   LA        1.05     MA        1.24     MC        0.96     MK        0.96     
!   NL        1.04     NY        1.00     OV        1.03     PT        1.06     
!   SC        0.97     TS        0.96     WF        1.05     WZ        1.31     
! 
!  A total of 303 telescope corrections were flagged in sub-array 5.
!  Telescope amplitude corrections in sub-array 5:
!   BR        0.98     FD        0.99     GC        1.01     GG        1.00*    
!   HH        1.00*    HN        1.04     KK        0.98     KP        1.02     
!   LA        1.01     MA        0.89     MC        1.07     MK        0.98     
!   NL        1.00     NY        0.94     OV        1.00     PT        1.00     
!   SC        1.03     TS        1.04     WF        1.03     WZ        0.94     
! 
!  Telescope amplitude corrections in sub-array 6:
!   BR        0.95     FD        0.95     GC        0.94     GG        1.00*    
!   HH        1.00*    HN        0.94     KK        1.02     KP        0.99     
!   LA        1.01     MA        1.36     MC        0.92     MK        1.12     
!   NL        0.96     NY        0.95     OV        0.97     PT        0.98     
!   SC        0.94     TS        1.00*    WF        1.00*    WZ        0.96     
! 
! 
! Correcting IF 3.
!  A total of 6 telescope corrections were flagged in sub-array 1.
!  Telescope amplitude corrections in sub-array 1:
!   BR        1.07     FD        1.00*    GC        0.97     GG        1.00*    
!   HH        1.02     HN        1.02     KK        1.00*    KP        1.00*    
!   LA        1.00*    MA        0.90     MC        0.98     MK        1.00*    
!   NL        1.02     NY        0.94     OV        1.00*    PT        1.00*    
!   SC        0.99     TS        1.11     WF        0.98     WZ        1.00     
! 
!  A total of 24 telescope corrections were flagged in sub-array 2.
!  Telescope amplitude corrections in sub-array 2:
!   BR        1.00*    FD        1.00*    GC        0.99     GG        1.00*    
!   HH        0.93     HN        1.02     KK        1.00*    KP        1.00*    
!   LA        1.00*    MA        1.06     MC        1.15     MK        1.00*    
!   NL        1.00*    NY        0.92     OV        1.00*    PT        1.00*    
!   SC        1.00*    TS        1.01     WF        1.03     WZ        0.98     
! 
!  A total of 261 telescope corrections were flagged in sub-array 3.
!  Telescope amplitude corrections in sub-array 3:
!   BR        0.98     FD        1.00*    GC        1.00     GG        1.00*    
!   HH        1.00*    HN        1.00*    KK        1.00     KP        1.00*    
!   LA        1.00*    MA        1.21     MC        0.94     MK        1.02     
!   NL        1.00*    NY        0.94     OV        1.06     PT        1.00*    
!   SC        1.00*    TS        0.91     WF        1.00*    WZ        0.94     
! 
!  A total of 21 telescope corrections were flagged in sub-array 4.
!  Telescope amplitude corrections in sub-array 4:
!   BR        1.04     FD        1.03     GC        1.01     GG        1.00*    
!   HH        1.00*    HN        1.01     KK        0.95     KP        1.05     
!   LA        0.99     MA        0.91     MC        0.93     MK        0.92     
!   NL        1.01     NY        0.92     OV        1.01     PT        1.00     
!   SC        0.94     TS        0.95     WF        0.99     WZ        1.27     
! 
!  A total of 303 telescope corrections were flagged in sub-array 5.
!  Telescope amplitude corrections in sub-array 5:
!   BR        0.99     FD        0.97     GC        0.97     GG        1.00*    
!   HH        1.00*    HN        1.04     KK        0.98     KP        0.98     
!   LA        0.94     MA        1.04     MC        3.42     MK        0.93     
!   NL        0.97     NY        0.93     OV        0.97     PT        0.97     
!   SC        0.99     TS        1.01     WF        1.01     WZ        0.99     
! 
!  Telescope amplitude corrections in sub-array 6:
!   BR        0.97     FD        0.93     GC        0.90     GG        1.00*    
!   HH        1.00*    HN        0.94     KK        1.02     KP        0.97     
!   LA        0.93     MA        0.92     MC        1.12     MK        1.03     
!   NL        0.95     NY        0.91     OV        0.96     PT        0.97     
!   SC        0.90     TS        1.00*    WF        1.00*    WZ        0.94     
! 
! 
! Correcting IF 4.
!  A total of 6 telescope corrections were flagged in sub-array 1.
!  Telescope amplitude corrections in sub-array 1:
!   BR        1.03     FD        1.00*    GC        1.01     GG        1.00*    
!   HH        1.02     HN        1.01     KK        1.00*    KP        1.00*    
!   LA        1.00*    MA        0.84     MC        1.23     MK        1.00*    
!   NL        1.02     NY        0.99     OV        1.00*    PT        1.00*    
!   SC        1.01     TS        1.10     WF        1.01     WZ        0.97     
! 
!  A total of 24 telescope corrections were flagged in sub-array 2.
!  Telescope amplitude corrections in sub-array 2:
!   BR        1.00*    FD        1.00*    GC        0.90     GG        1.00*    
!   HH        1.08     HN        1.17     KK        1.00*    KP        1.00*    
!   LA        1.00*    MA        1.02     MC        0.47     MK        1.00*    
!   NL        1.00*    NY        0.88     OV        1.00*    PT        1.00*    
!   SC        1.00*    TS        1.75     WF        0.94     WZ        1.26     
! 
!  A total of 261 telescope corrections were flagged in sub-array 3.
!  Telescope amplitude corrections in sub-array 3:
!   BR        0.94     FD        1.00*    GC        1.05     GG        1.00*    
!   HH        1.00*    HN        1.00*    KK        1.03     KP        1.00*    
!   LA        1.00*    MA        1.13     MC        0.64     MK        0.99     
!   NL        1.00*    NY        0.94     OV        1.08     PT        1.00*    
!   SC        1.00*    TS        0.93     WF        1.00*    WZ        1.05     
! 
!  A total of 21 telescope corrections were flagged in sub-array 4.
!  Telescope amplitude corrections in sub-array 4:
!   BR        0.98     FD        1.02     GC        1.02     GG        1.00*    
!   HH        1.00*    HN        1.01     KK        0.92     KP        1.04     
!   LA        1.01     MA        0.99     MC        1.00     MK        0.91     
!   NL        1.00     NY        0.99     OV        1.01     PT        0.91     
!   SC        0.92     TS        0.90     WF        0.99     WZ        1.31     
! 
!  A total of 303 telescope corrections were flagged in sub-array 5.
!  Telescope amplitude corrections in sub-array 5:
!   BR        0.93     FD        0.97     GC        1.02     GG        1.00*    
!   HH        1.00*    HN        1.04     KK        0.96     KP        0.98     
!   LA        0.97     MA        1.64     MC        0.84     MK        0.91     
!   NL        0.97     NY        0.94     OV        0.97     PT        1.00     
!   SC        1.00     TS        0.97     WF        1.01     WZ        0.91     
! 
!  Telescope amplitude corrections in sub-array 6:
!   BR        0.93     FD        0.94     GC        0.93     GG        1.00*    
!   HH        1.00*    HN        0.92     KK        0.99     KP        0.94     
!   LA        0.97     MA        0.71     MC        1.12     MK        1.02     
!   NL        0.92     NY        0.92     OV        0.95     PT        1.10     
!   SC        0.89     TS        1.00*    WF        1.00*    WZ        0.94     
! 
! 
! Fit before self-cal, rms=0.349132Jy  sigma=0.001771
! Fit after  self-cal, rms=0.354407Jy  sigma=0.001630
dynam = dynam - 0.5
flux_cutoff = imstat(rms) * dynam
! Inverting map and beam 
! Estimated beam: bmin=2.467 mas, bmaj=3.075 mas, bpa=-25.95 degrees
! Estimated noise=298.761 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.000150391 Jy
! Component: 100  -  total flux cleaned = -0.000822188 Jy
! Component: 150  -  total flux cleaned = -0.00123297 Jy
! Component: 200  -  total flux cleaned = -0.00135121 Jy
! Total flux subtracted in 200 components = -0.00135121 Jy
! Clean residual min=-0.002935 max=0.003252 Jy/beam
! Clean residual mean=0.000051 rms=0.000736 Jy/beam
! Combined flux in latest and established models = 0.813092 Jy
! Performing phase self-cal
! Adding 21 model components to the UV plane model.
! The established model now contains 66 components and 0.813092 Jy
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Correcting IF 4.
! 
! Fit before self-cal, rms=0.354252Jy  sigma=0.001628
! Fit after  self-cal, rms=0.356483Jy  sigma=0.001624
! 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.356483Jy  sigma=0.001624
! Fit after  self-cal, rms=0.362586Jy  sigma=0.001615
dynam = dynam - 0.75
clean clean_niter,clean_gain
! Inverting map and beam 
! Estimated beam: bmin=2.469 mas, bmaj=3.079 mas, bpa=-25.58 degrees
! Estimated noise=298.203 mJy/beam.
! clean: niter=200  gain=0.03  cutoff=0
! Component: 050  -  total flux cleaned = -0.00207132 Jy
! Component: 100  -  total flux cleaned = -0.00242709 Jy
! Component: 150  -  total flux cleaned = -0.00273216 Jy
! Component: 200  -  total flux cleaned = -0.00291341 Jy
! Total flux subtracted in 200 components = -0.00291341 Jy
! Clean residual min=-0.002757 max=0.002747 Jy/beam
! Clean residual mean=0.000054 rms=0.000637 Jy/beam
! Combined flux in latest and established models = 0.810178 Jy
selfcal
! Performing phase self-cal
! Adding 16 model components to the UV plane model.
! The established model now contains 70 components and 0.810178 Jy
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Correcting IF 4.
! 
! Fit before self-cal, rms=0.362516Jy  sigma=0.001614
! Fit after  self-cal, rms=0.363578Jy  sigma=0.001613
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 (30, -26).
! clean: niter=200  gain=0.03  cutoff=0
! Component: 050  -  total flux cleaned = 0.0012856 Jy
! Component: 100  -  total flux cleaned = 0.00128364 Jy
! Component: 150  -  total flux cleaned = 0.00143306 Jy
! Component: 200  -  total flux cleaned = 0.00157055 Jy
! Total flux subtracted in 200 components = 0.00157055 Jy
! Clean residual min=-0.002623 max=0.002357 Jy/beam
! Clean residual mean=0.000029 rms=0.000626 Jy/beam
! Combined flux in latest and established models = 0.811749 Jy
! Performing phase self-cal
! Adding 19 model components to the UV plane model.
! The established model now contains 76 components and 0.811749 Jy
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Correcting IF 4.
! 
! Fit before self-cal, rms=0.363542Jy  sigma=0.001612
! Fit after  self-cal, rms=0.363548Jy  sigma=0.001612
! 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.363548Jy  sigma=0.001612
! Fit after  self-cal, rms=0.369311Jy  sigma=0.001612
clean clean_niter,clean_gain
! Inverting map and beam 
! Estimated beam: bmin=2.471 mas, bmaj=3.085 mas, bpa=-25.22 degrees
! Estimated noise=297.952 mJy/beam.
! clean: niter=200  gain=0.03  cutoff=0
! Component: 050  -  total flux cleaned = -0.00218655 Jy
! Component: 100  -  total flux cleaned = -0.00210839 Jy
! Component: 150  -  total flux cleaned = -0.00196566 Jy
! Component: 200  -  total flux cleaned = -0.00190219 Jy
! Total flux subtracted in 200 components = -0.00190219 Jy
! Clean residual min=-0.002310 max=0.002333 Jy/beam
! Clean residual mean=0.000065 rms=0.000611 Jy/beam
! Combined flux in latest and established models = 0.809847 Jy
selfcal
! Performing phase self-cal
! Adding 19 model components to the UV plane model.
! The established model now contains 82 components and 0.809847 Jy
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Correcting IF 4.
! 
! Fit before self-cal, rms=0.369279Jy  sigma=0.001612
! Fit after  self-cal, rms=0.369603Jy  sigma=0.001611
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 = 5.70298e-05 Jy
! Component: 100  -  total flux cleaned = 0.000235185 Jy
! Component: 150  -  total flux cleaned = 0.000290335 Jy
! Component: 200  -  total flux cleaned = 0.000395208 Jy
! Total flux subtracted in 200 components = 0.000395208 Jy
! Clean residual min=-0.002345 max=0.002335 Jy/beam
! Clean residual mean=0.000055 rms=0.000606 Jy/beam
! Combined flux in latest and established models = 0.810242 Jy
! Performing phase self-cal
! Adding 29 model components to the UV plane model.
! The established model now contains 87 components and 0.810242 Jy
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Correcting IF 4.
! 
! Fit before self-cal, rms=0.369585Jy  sigma=0.001611
! Fit after  self-cal, rms=0.369595Jy  sigma=0.001611
! 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.369595Jy  sigma=0.001611
! Fit after  self-cal, rms=0.372255Jy  sigma=0.001611
clean clean_niter,clean_gain
! Inverting map and beam 
! Estimated beam: bmin=7.64 mas, bmaj=8.487 mas, bpa=0.2866 degrees
! Estimated noise=443.824 mJy/beam.
! clean: niter=200  gain=0.03  cutoff=0
! Component: 050  -  total flux cleaned = -0.000482096 Jy
! Component: 100  -  total flux cleaned = -0.000335328 Jy
! Component: 150  -  total flux cleaned = -0.000194558 Jy
! Component: 200  -  total flux cleaned = -0.000147897 Jy
! Total flux subtracted in 200 components = -0.000147897 Jy
! Clean residual min=-0.002701 max=0.002619 Jy/beam
! Clean residual mean=0.000180 rms=0.000927 Jy/beam
! Combined flux in latest and established models = 0.810094 Jy
selfcal
! Performing phase self-cal
! Adding 16 model components to the UV plane model.
! The established model now contains 97 components and 0.810094 Jy
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Correcting IF 4.
! 
! Fit before self-cal, rms=0.372251Jy  sigma=0.001611
! Fit after  self-cal, rms=0.372328Jy  sigma=0.001611
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.000153067 Jy
! Component: 100  -  total flux cleaned = 0.000171978 Jy
! Component: 150  -  total flux cleaned = 0.000188445 Jy
! Component: 200  -  total flux cleaned = 0.000220011 Jy
! Total flux subtracted in 200 components = 0.000220011 Jy
! Clean residual min=-0.002681 max=0.002585 Jy/beam
! Clean residual mean=0.000166 rms=0.000917 Jy/beam
! Combined flux in latest and established models = 0.810314 Jy
! Performing phase self-cal
! Adding 15 model components to the UV plane model.
! The established model now contains 102 components and 0.810314 Jy
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Correcting IF 4.
! 
! Fit before self-cal, rms=0.372328Jy  sigma=0.001611
! Fit after  self-cal, rms=0.372336Jy  sigma=0.001611
! 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=2.473 mas, bmaj=3.088 mas, bpa=-24.99 degrees
! Estimated noise=297.762 mJy/beam.
! restore: Substituting estimate of restoring beam from last 'invert'.
! Restoring with beam: 2.473 x 3.088 at -24.99 degrees (North through East)
! Clean map  min=-0.0028207  max=0.6947 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.372336Jy  sigma=0.001611
! Fit after  self-cal, rms=4.204397Jy  sigma=0.001487
! Inverting map and beam 
! Estimated beam: bmin=2.473 mas, bmaj=3.082 mas, bpa=-25.17 degrees
! Estimated noise=297.167 mJy/beam.
! clean: niter=200  gain=0.03  cutoff=0
! Component: 050  -  total flux cleaned = -0.00208693 Jy
! Component: 100  -  total flux cleaned = -0.00311468 Jy
! Component: 150  -  total flux cleaned = -0.00337454 Jy
! Component: 200  -  total flux cleaned = -0.00351754 Jy
! Total flux subtracted in 200 components = -0.00351754 Jy
! Clean residual min=-0.002183 max=0.002104 Jy/beam
! Clean residual mean=0.000019 rms=0.000530 Jy/beam
! Combined flux in latest and established models = 0.806797 Jy
! Performing phase self-cal
! Adding 21 model components to the UV plane model.
! The established model now contains 110 components and 0.806797 Jy
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Correcting IF 4.
! 
! Fit before self-cal, rms=4.204397Jy  sigma=0.001487
! Fit after  self-cal, rms=4.204414Jy  sigma=0.001487
! Inverting map 
! clean: niter=200  gain=0.03  cutoff=0
! Component: 050  -  total flux cleaned = -0.000323962 Jy
! Component: 100  -  total flux cleaned = -0.000406048 Jy
! Component: 150  -  total flux cleaned = -0.000519568 Jy
! Component: 200  -  total flux cleaned = -0.000627162 Jy
! Total flux subtracted in 200 components = -0.000627162 Jy
! Clean residual min=-0.002162 max=0.002094 Jy/beam
! Clean residual mean=0.000022 rms=0.000527 Jy/beam
! Combined flux in latest and established models = 0.80617 Jy
! Performing phase self-cal
! Adding 33 model components to the UV plane model.
! The established model now contains 118 components and 0.80617 Jy
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Correcting IF 4.
! 
! Fit before self-cal, rms=4.204414Jy  sigma=0.001487
! Fit after  self-cal, rms=4.204417Jy  sigma=0.001487
! Inverting map 
! Performing amp+phase self-cal
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Correcting IF 4.
! 
! Fit before self-cal, rms=4.204417Jy  sigma=0.001487
! Fit after  self-cal, rms=7.395744Jy  sigma=0.001487
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=1.982 mas, bmaj=2.46 mas, bpa=-12.5 degrees
! Estimated noise=621.955 mJy/beam.
! clean: niter=200  gain=0.03  cutoff=0
! Component: 050  -  total flux cleaned = 0.528053 Jy
! Component: 100  -  total flux cleaned = 0.643619 Jy
! Component: 150  -  total flux cleaned = 0.68638 Jy
! Component: 200  -  total flux cleaned = 0.714013 Jy
! Total flux subtracted in 200 components = 0.714013 Jy
! Clean residual min=-0.005326 max=0.015032 Jy/beam
! Clean residual mean=0.000013 rms=0.001482 Jy/beam
! Combined flux in latest and established models = 0.714013 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 13 model components to the UV plane model.
! The established model now contains 13 components and 0.714013 Jy
! Inverting map and beam 
! Estimated beam: bmin=2.474 mas, bmaj=3.084 mas, bpa=-25.04 degrees
! Estimated noise=296.956 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.0325462 Jy
! Component: 100  -  total flux cleaned = 0.0511025 Jy
! Component: 150  -  total flux cleaned = 0.0627899 Jy
! Component: 200  -  total flux cleaned = 0.0706218 Jy
! Total flux subtracted in 200 components = 0.0706218 Jy
! Clean residual min=-0.002263 max=0.004318 Jy/beam
! Clean residual mean=0.000153 rms=0.000681 Jy/beam
! Combined flux in latest and established models = 0.784635 Jy
! Adding 49 model components to the UV plane model.
! The established model now contains 56 components and 0.784635 Jy
! Inverting map 
! clean: niter=200  gain=0.03  cutoff=0
! Component: 050  -  total flux cleaned = 0.00541861 Jy
! Component: 100  -  total flux cleaned = 0.00922229 Jy
! Component: 150  -  total flux cleaned = 0.012035 Jy
! Component: 200  -  total flux cleaned = 0.0141739 Jy
! Total flux subtracted in 200 components = 0.0141739 Jy
! Clean residual min=-0.002152 max=0.002355 Jy/beam
! Clean residual mean=0.000064 rms=0.000543 Jy/beam
! Combined flux in latest and established models = 0.798809 Jy
! Adding 26 model components to the UV plane model.
! The established model now contains 70 components and 0.798809 Jy
! Inverting map 
! Added new window around map position (58.5, -0.5).
! clean: niter=200  gain=0.03  cutoff=0
! Component: 050  -  total flux cleaned = 0.00151264 Jy
! Component: 100  -  total flux cleaned = 0.0019801 Jy
! Component: 150  -  total flux cleaned = 0.00228651 Jy
! Component: 200  -  total flux cleaned = 0.0025745 Jy
! Total flux subtracted in 200 components = 0.0025745 Jy
! Clean residual min=-0.002142 max=0.002082 Jy/beam
! Clean residual mean=0.000047 rms=0.000531 Jy/beam
! Combined flux in latest and established models = 0.801383 Jy
! Adding 38 model components to the UV plane model.
! The established model now contains 85 components and 0.801384 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=7.647 mas, bmaj=8.494 mas, bpa=0.5484 degrees
! Estimated noise=442.033 mJy/beam.
! clean: niter=200  gain=0.03  cutoff=0
! Component: 050  -  total flux cleaned = 0.00200661 Jy
! Component: 100  -  total flux cleaned = 0.00312266 Jy
! Component: 150  -  total flux cleaned = 0.00371073 Jy
! Component: 200  -  total flux cleaned = 0.00392662 Jy
! Total flux subtracted in 200 components = 0.00392662 Jy
! Clean residual min=-0.002103 max=0.002240 Jy/beam
! Clean residual mean=0.000073 rms=0.000750 Jy/beam
! Combined flux in latest and established models = 0.80531 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.000100934 Jy
! Component: 100  -  total flux cleaned = 0.00015433 Jy
! Component: 150  -  total flux cleaned = 0.000203048 Jy
! Component: 200  -  total flux cleaned = 0.000261614 Jy
! Total flux subtracted in 200 components = 0.000261614 Jy
! Clean residual min=-0.002130 max=0.002258 Jy/beam
! Clean residual mean=0.000067 rms=0.000748 Jy/beam
! Combined flux in latest and established models = 0.805572 Jy
! Adding 25 model components to the UV plane model.
! The established model now contains 105 components and 0.805572 Jy
! Inverting map 
uvtaper 0,0
! No UV-taper is currently set.
clean
! Inverting map and beam 
! Estimated beam: bmin=2.474 mas, bmaj=3.084 mas, bpa=-25.04 degrees
! Estimated noise=296.956 mJy/beam.
! clean: niter=200  gain=0.03  cutoff=0
! Component: 050  -  total flux cleaned = -0.00105075 Jy
! Component: 100  -  total flux cleaned = -0.0010978 Jy
! Component: 150  -  total flux cleaned = -0.00109602 Jy
! Component: 200  -  total flux cleaned = -0.00105204 Jy
! Total flux subtracted in 200 components = -0.00105204 Jy
! Clean residual min=-0.002110 max=0.002135 Jy/beam
! Clean residual mean=0.000028 rms=0.000521 Jy/beam
! Combined flux in latest and established models = 0.80452 Jy
selfcal
! Performing phase self-cal
! Adding 26 model components to the UV plane model.
! The established model now contains 113 components and 0.80452 Jy
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Correcting IF 4.
! 
! Fit before self-cal, rms=7.395767Jy  sigma=0.001487
! Fit after  self-cal, rms=7.395769Jy  sigma=0.001486
wmodel J0646+4451_S_2001_04_09_pus_map.mod
! Writing 113 model components to file: J0646+4451_S_2001_04_09_pus_map.mod
wobs J0646+4451_S_2001_04_09_pus_uvs.fits
! Writing UV FITS file: J0646+4451_S_2001_04_09_pus_uvs.fits
wwins J0646+4451_S_2001_04_09_pus_map.win
! wwins: Wrote 5 windows to J0646+4451_S_2001_04_09_pus_map.win
x = (field_size-8) * field_cell / 4
addwin -x,x,-x,x
clean (field_size*4),0.01
! Inverting map 
! clean: niter=2048  gain=0.01  cutoff=0
! Component: 050  -  total flux cleaned = 0.000354238 Jy
! Component: 100  -  total flux cleaned = 0.000608089 Jy
! Component: 150  -  total flux cleaned = 0.000817091 Jy
! Component: 200  -  total flux cleaned = 0.000884291 Jy
! Component: 250  -  total flux cleaned = 0.00104718 Jy
! Component: 300  -  total flux cleaned = 0.00117394 Jy
! Component: 350  -  total flux cleaned = 0.00117356 Jy
! Component: 400  -  total flux cleaned = 0.00126507 Jy
! Component: 450  -  total flux cleaned = 0.00126478 Jy
! Component: 500  -  total flux cleaned = 0.00141314 Jy
! Component: 550  -  total flux cleaned = 0.00150089 Jy
! Component: 600  -  total flux cleaned = 0.00152988 Jy
! Component: 650  -  total flux cleaned = 0.00161571 Jy
! Component: 700  -  total flux cleaned = 0.00158708 Jy
! Component: 750  -  total flux cleaned = 0.00164304 Jy
! Component: 800  -  total flux cleaned = 0.00167054 Jy
! Component: 850  -  total flux cleaned = 0.00169808 Jy
! Component: 900  -  total flux cleaned = 0.00175278 Jy
! Component: 950  -  total flux cleaned = 0.00177999 Jy
! Component: 1000  -  total flux cleaned = 0.00178031 Jy
! Component: 1050  -  total flux cleaned = 0.00194072 Jy
! Component: 1100  -  total flux cleaned = 0.00188759 Jy
! Component: 1150  -  total flux cleaned = 0.00204563 Jy
! Component: 1200  -  total flux cleaned = 0.00199318 Jy
! Component: 1250  -  total flux cleaned = 0.00201924 Jy
! Component: 1300  -  total flux cleaned = 0.00207099 Jy
! Component: 1350  -  total flux cleaned = 0.00207093 Jy
! Component: 1400  -  total flux cleaned = 0.00209628 Jy
! Component: 1450  -  total flux cleaned = 0.00207089 Jy
! Component: 1500  -  total flux cleaned = 0.0021215 Jy
! Component: 1550  -  total flux cleaned = 0.00217174 Jy
! Component: 1600  -  total flux cleaned = 0.00214669 Jy
! Component: 1650  -  total flux cleaned = 0.0022213 Jy
! Component: 1700  -  total flux cleaned = 0.00222119 Jy
! Component: 1750  -  total flux cleaned = 0.00219664 Jy
! Component: 1800  -  total flux cleaned = 0.00222121 Jy
! Component: 1850  -  total flux cleaned = 0.00229432 Jy
! Component: 1900  -  total flux cleaned = 0.00227011 Jy
! Component: 1950  -  total flux cleaned = 0.00231846 Jy
! Component: 2000  -  total flux cleaned = 0.00234249 Jy
! Total flux subtracted in 2048 components = 0.00236626 Jy
! Clean residual min=-0.001726 max=0.001372 Jy/beam
! Clean residual mean=0.000009 rms=0.000454 Jy/beam
! Combined flux in latest and established models = 0.806886 Jy
keep
! Adding 174 model components to the UV plane model.
! The established model now contains 287 components and 0.806886 Jy
![Exited script file: muppet]
wmap "J0646+4451_S_2001_04_09_pus\_map.fits"
! Inverting map 
! restore: Substituting estimate of restoring beam from last 'invert'.
! Restoring with beam: 2.474 x 3.084 at -25.04 degrees (North through East)
! Clean map  min=-0.0019734  max=0.69371 Jy/beam
! Writing clean map to FITS file: J0646+4451_S_2001_04_09_pus_map.fits
float peak_flux
peak_flux = peak(flux,max)
print "The peak flux is",peak_flux
! The peak flux is 0.69371 
invert
! Inverting map 
float image_rms
image_rms = imstat(rms)
print "The final image rms is",image_rms
! The final image rms is 0.000454685 
device "J0646+4451_S_2001_04_09_pus\_map.eps/VPS"
! Attempting to open device: 'J0646+4451_S_2001_04_09_pus_map.eps/VPS'
loglevs 100*3*image_rms/peak_flux
! The new contour levels are:
!  -0.196632 0.196632 0.393264 0.786528 1.57306 3.14611 6.29222 12.5844 25.1689 50.3378
print "clev=",int(3*image_rms*10000)/10000
! clev= 0.0013 
print "peak=",int(1000*peak_flux)/1000
! peak= 0.693 
mapcolor none
! Mapplot colormap: none, contrast: 1 brightness: 0.5.
mapplot cln
! restore: Substituting estimate of restoring beam from last 'invert'.
! Restoring with beam: 2.474 x 3.084 at -25.04 degrees (North through East)
! Clean map  min=-0.0019734  max=0.69371 Jy/beam
mapcolor color, 0.9
! Mapplot colormap: rainbow, contrast: 0.9 brightness: 0.5.
device "J0646+4451_S_2001_04_09_pus\_map.gif/vgif"
! Attempting to open device: 'J0646+4451_S_2001_04_09_pus_map.gif/vgif'
mapplot cln
quit
! Quitting program
! Log file J0646+4451_S_2001_04_09_pus_uvs.log closed on Fri Oct  5 15:56:20 2007