! Started logfile: J0237+2848_X_2001_03_12_pus_uvs.log on Wed Jan  2 19:49:39 2013
obs J0237+2848_X_2001_03_12_pus_uva.fits
! Reading UV FITS file: J0237+2848_X_2001_03_12_pus_uva.fits
! AN table 1: 16 integrations on 136 of 136 possible baselines.
! AN table 2: 72 integrations on 136 of 136 possible baselines.
! AN table 3: 148 integrations on 136 of 136 possible baselines.
! AN table 4: 88 integrations on 136 of 136 possible baselines.
! Apparent sampling: 0.169367 visibilities/baseline/integration-bin.
! *** This seems a bit low - see "help observe" on the binwid argument.
! Found source: J0237+2848
! 
! There are 4 IFs, and a total of 4 channels:
! 
!  IF  Channel    Frequency  Freq offset  Number of   Overall IF
!       origin    at origin  per channel   channels    bandwidth
!  ------------------------------------------------------------- (Hz)
!  01        1  8.40997e+09        8e+06          1        8e+06
!  02        2  8.47997e+09        8e+06          1        8e+06
!  03        3  8.79497e+09        8e+06          1        8e+06
!  04        4  8.89997e+09        8e+06          1        8e+06
! 
! Polarization(s): RR
! 
! Read 1749 lines of history.
! 
! Reading 29852 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.2 
print "taper_size =",taper_size
! taper_size = 70 
![@muppet J0237+2848_X_2001_03_12_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.200x0.200 milli-arcsec cellsize.
startmod
! Applying default point source starting model.
! Performing phase self-cal
! Adding 1 model components to the UV plane model.
! The established model now contains 1 components and 1 Jy
! 
! Correcting IF 1.
!  A total of 166 telescope corrections were flagged in sub-array 1.
!  A total of 597 telescope corrections were flagged in sub-array 2.
!  A total of 1624 telescope corrections were flagged in sub-array 3.
!  A total of 1324 telescope corrections were flagged in sub-array 4.
! 
! Correcting IF 2.
!  A total of 166 telescope corrections were flagged in sub-array 1.
!  A total of 597 telescope corrections were flagged in sub-array 2.
!  A total of 1624 telescope corrections were flagged in sub-array 3.
!  A total of 1324 telescope corrections were flagged in sub-array 4.
! 
! Correcting IF 3.
!  A total of 166 telescope corrections were flagged in sub-array 1.
!  A total of 597 telescope corrections were flagged in sub-array 2.
!  A total of 1624 telescope corrections were flagged in sub-array 3.
!  A total of 1324 telescope corrections were flagged in sub-array 4.
! 
! Correcting IF 4.
!  A total of 166 telescope corrections were flagged in sub-array 1.
!  A total of 597 telescope corrections were flagged in sub-array 2.
!  A total of 1624 telescope corrections were flagged in sub-array 3.
!  A total of 1324 telescope corrections were flagged in sub-array 4.
! 
! Fit before self-cal, rms=1.434192Jy  sigma=0.012962
! Fit after  self-cal, rms=1.237566Jy  sigma=0.011167
! 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 
! Your choice of large map pixels excluded 4.65% of the data.
!  The x-axis pixel size should ideally be below 0.1672 milli-arcsec
!  The y-axis pixel size should ideally be below 0.1842 milli-arcsec
! Estimated beam: bmin=0.5656 mas, bmaj=1.068 mas, bpa=0.5235 degrees
! Estimated noise=966.205 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 = 1.61205 Jy
! Component: 100  -  total flux cleaned = 2.07227 Jy
! Total flux subtracted in 100 components = 2.07227 Jy
! Clean residual min=-0.045857 max=0.188452 Jy/beam
! Clean residual mean=-0.000396 rms=0.013636 Jy/beam
! Combined flux in latest and established models = 2.07226 Jy
! Performing phase self-cal
! Adding 5 model components to the UV plane model.
! The established model now contains 5 components and 2.07226 Jy
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Correcting IF 4.
! 
! Fit before self-cal, rms=0.399666Jy  sigma=0.003496
! Fit after  self-cal, rms=0.399476Jy  sigma=0.003495
! Inverting map 
! Your choice of large map pixels excluded 4.65% of the data.
!  The x-axis pixel size should ideally be below 0.1672 milli-arcsec
!  The y-axis pixel size should ideally be below 0.1842 milli-arcsec
! clean: niter=100  gain=0.03  cutoff=0
! Component: 050  -  total flux cleaned = 0.201972 Jy
! Component: 100  -  total flux cleaned = 0.306394 Jy
! Total flux subtracted in 100 components = 0.306394 Jy
! Clean residual min=-0.042204 max=0.055576 Jy/beam
! Clean residual mean=-0.000123 rms=0.009537 Jy/beam
! Combined flux in latest and established models = 2.37866 Jy
! Performing phase self-cal
! Adding 11 model components to the UV plane model.
! The established model now contains 12 components and 2.37866 Jy
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Correcting IF 4.
! 
! Fit before self-cal, rms=0.305439Jy  sigma=0.002322
! Fit after  self-cal, rms=0.305495Jy  sigma=0.002322
! Inverting map 
! Your choice of large map pixels excluded 4.65% of the data.
!  The x-axis pixel size should ideally be below 0.1672 milli-arcsec
!  The y-axis pixel size should ideally be below 0.1842 milli-arcsec
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 
! Your choice of large map pixels excluded 4.65% of the data.
!  The x-axis pixel size should ideally be below 0.1672 milli-arcsec
!  The y-axis pixel size should ideally be below 0.1842 milli-arcsec
! Estimated beam: bmin=0.8094 mas, bmaj=1.263 mas, bpa=7.055 degrees
! Estimated noise=513.976 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.8, 4.4).
! clean: niter=200  gain=0.03  cutoff=0
! Component: 050  -  total flux cleaned = 0.0825184 Jy
! Component: 100  -  total flux cleaned = 0.130919 Jy
! Component: 150  -  total flux cleaned = 0.163842 Jy
! Component: 200  -  total flux cleaned = 0.186867 Jy
! Total flux subtracted in 200 components = 0.186867 Jy
! Clean residual min=-0.028327 max=0.030842 Jy/beam
! Clean residual mean=-0.000634 rms=0.007099 Jy/beam
! Combined flux in latest and established models = 2.56553 Jy
! Performing phase self-cal
! Adding 33 model components to the UV plane model.
! The established model now contains 42 components and 2.56553 Jy
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Correcting IF 4.
! 
! Fit before self-cal, rms=0.284021Jy  sigma=0.002071
! Fit after  self-cal, rms=0.281147Jy  sigma=0.002044
! Inverting map 
! Your choice of large map pixels excluded 4.65% of the data.
!  The x-axis pixel size should ideally be below 0.1672 milli-arcsec
!  The y-axis pixel size should ideally be below 0.1842 milli-arcsec
print "************** FINISHED NATURAL WEIGHTING CLEAN **************"
! ************** FINISHED NATURAL WEIGHTING CLEAN ************** 
! 
gscale true
! Performing overall amplitude self-cal
! 
! Correcting IF 1.
!  A total of 3 telescope corrections were flagged in sub-array 1.
!  Telescope amplitude corrections in sub-array 1:
!   BR        1.00     FD        1.00*    HH        1.00*    HN        1.00*    
!   KK        0.90     KP        1.13     LA        1.06     MA        1.00*    
!   MC        1.00*    MK        0.94     NL        1.00*    ON        1.00*    
!   OV        1.00     PT        1.03     SC        1.00*    TS        0.99     
!   WZ        1.00*    
! 
!  A total of 3 telescope corrections were flagged in sub-array 2.
!  Telescope amplitude corrections in sub-array 2:
!   BR        0.97     FD        1.03     HH        1.00*    HN        1.05     
!   KK        0.93     KP        1.02     LA        0.99     MA        0.99     
!   MC        1.00*    MK        0.99     NL        1.02     ON        1.00*    
!   OV        0.97     PT        0.96     SC        0.89     TS        1.13     
!   WZ        1.00*    
! 
!  A total of 21 telescope corrections were flagged in sub-array 3.
!  Telescope amplitude corrections in sub-array 3:
!   BR        1.00     FD        1.04     HH        1.00     HN        1.00     
!   KK        1.01     KP        1.06     LA        1.00     MA        0.91     
!   MC        1.00*    MK        0.95     NL        1.02     ON        1.00*    
!   OV        0.96     PT        0.99     SC        0.97     TS        1.00*    
!   WZ        1.04     
! 
!  A total of 6 telescope corrections were flagged in sub-array 4.
!  Telescope amplitude corrections in sub-array 4:
!   BR        0.97     FD        1.03     HH        1.00*    HN        0.99     
!   KK        0.99     KP        0.95     LA        0.93     MA        1.00*    
!   MC        1.00*    MK        0.98     NL        0.96     ON        1.00*    
!   OV        0.94     PT        0.95     SC        1.00*    TS        2.08     
!   WZ        1.00*    
! 
! 
! Correcting IF 2.
!  A total of 3 telescope corrections were flagged in sub-array 1.
!  Telescope amplitude corrections in sub-array 1:
!   BR        1.00     FD        1.00*    HH        1.00*    HN        1.00*    
!   KK        0.90     KP        1.07     LA        1.06     MA        1.00*    
!   MC        1.00*    MK        0.93     NL        1.00*    ON        1.00*    
!   OV        1.00     PT        1.06     SC        1.00*    TS        0.99     
!   WZ        1.00*    
! 
!  A total of 3 telescope corrections were flagged in sub-array 2.
!  Telescope amplitude corrections in sub-array 2:
!   BR        0.98     FD        1.02     HH        1.00*    HN        1.04     
!   KK        0.92     KP        0.97     LA        0.99     MA        0.98     
!   MC        1.00*    MK        0.99     NL        0.98     ON        1.00*    
!   OV        0.97     PT        1.00     SC        0.88     TS        1.12     
!   WZ        1.00*    
! 
!  A total of 21 telescope corrections were flagged in sub-array 3.
!  Telescope amplitude corrections in sub-array 3:
!   BR        1.01     FD        1.03     HH        0.99     HN        1.00     
!   KK        1.00     KP        1.00     LA        0.99     MA        0.90     
!   MC        1.00*    MK        0.94     NL        0.98     ON        1.00*    
!   OV        0.96     PT        1.03     SC        0.95     TS        1.00*    
!   WZ        1.05     
! 
!  A total of 6 telescope corrections were flagged in sub-array 4.
!  Telescope amplitude corrections in sub-array 4:
!   BR        0.98     FD        1.02     HH        1.00*    HN        0.99     
!   KK        0.98     KP        0.90     LA        0.93     MA        1.00*    
!   MC        1.00*    MK        0.97     NL        0.91     ON        1.00*    
!   OV        0.93     PT        0.99     SC        1.00*    TS        2.12     
!   WZ        1.00*    
! 
! 
! Correcting IF 3.
!  A total of 3 telescope corrections were flagged in sub-array 1.
!  Telescope amplitude corrections in sub-array 1:
!   BR        1.02     FD        1.00*    HH        1.00*    HN        1.00*    
!   KK        1.00     KP        1.03     LA        1.08     MA        1.00*    
!   MC        1.00*    MK        0.93     NL        1.00*    ON        1.00*    
!   OV        1.02     PT        1.08     SC        1.00*    TS        0.98     
!   WZ        1.00*    
! 
!  A total of 3 telescope corrections were flagged in sub-array 2.
!  Telescope amplitude corrections in sub-array 2:
!   BR        1.00     FD        0.99     HH        1.00*    HN        1.04     
!   KK        0.97     KP        0.95     LA        1.00     MA        1.05     
!   MC        1.00*    MK        1.00     NL        1.01     ON        1.00*    
!   OV        0.99     PT        1.02     SC        0.88     TS        1.12     
!   WZ        1.00*    
! 
!  A total of 21 telescope corrections were flagged in sub-array 3.
!  Telescope amplitude corrections in sub-array 3:
!   BR        1.03     FD        1.00     HH        1.11     HN        1.00     
!   KK        1.06     KP        0.98     LA        1.01     MA        0.94     
!   MC        1.00*    MK        0.96     NL        1.01     ON        1.00*    
!   OV        0.98     PT        1.05     SC        0.96     TS        1.00*    
!   WZ        1.06     
! 
!  A total of 6 telescope corrections were flagged in sub-array 4.
!  Telescope amplitude corrections in sub-array 4:
!   BR        1.00     FD        0.99     HH        1.00*    HN        0.99     
!   KK        1.05     KP        0.88     LA        0.94     MA        1.00*    
!   MC        1.00*    MK        0.98     NL        0.95     ON        1.00*    
!   OV        0.96     PT        1.01     SC        1.00*    TS        2.12     
!   WZ        1.00*    
! 
! 
! Correcting IF 4.
!  A total of 3 telescope corrections were flagged in sub-array 1.
!  Telescope amplitude corrections in sub-array 1:
!   BR        0.99     FD        1.00*    HH        1.00*    HN        1.00*    
!   KK        0.92     KP        1.06     LA        1.06     MA        1.00*    
!   MC        1.00*    MK        0.96     NL        1.00*    ON        1.00*    
!   OV        1.00     PT        1.07     SC        1.00*    TS        0.99     
!   WZ        1.00*    
! 
!  A total of 3 telescope corrections were flagged in sub-array 2.
!  Telescope amplitude corrections in sub-array 2:
!   BR        0.98     FD        0.98     HH        1.00*    HN        1.05     
!   KK        0.94     KP        0.96     LA        0.97     MA        1.13     
!   MC        1.00*    MK        1.03     NL        1.01     ON        1.00*    
!   OV        0.97     PT        1.01     SC        0.93     TS        1.14     
!   WZ        1.00*    
! 
!  A total of 21 telescope corrections were flagged in sub-array 3.
!  Telescope amplitude corrections in sub-array 3:
!   BR        1.01     FD        0.99     HH        1.11     HN        1.01     
!   KK        1.01     KP        0.99     LA        0.99     MA        0.98     
!   MC        1.00*    MK        0.98     NL        1.01     ON        1.00*    
!   OV        0.96     PT        1.04     SC        1.00     TS        1.00*    
!   WZ        1.07     
! 
!  A total of 6 telescope corrections were flagged in sub-array 4.
!  Telescope amplitude corrections in sub-array 4:
!   BR        0.98     FD        0.98     HH        1.00*    HN        0.99     
!   KK        0.99     KP        0.90     LA        0.92     MA        1.00*    
!   MC        1.00*    MK        1.01     NL        0.95     ON        1.00*    
!   OV        0.94     PT        1.00     SC        1.00*    TS        2.16     
!   WZ        1.00*    
! 
! 
! Fit before self-cal, rms=0.281147Jy  sigma=0.002044
! Fit after  self-cal, rms=0.241928Jy  sigma=0.001548
dynam = dynam - 0.5
flux_cutoff = imstat(rms) * dynam
! Inverting map and beam 
! Your choice of large map pixels excluded 4.67% of the data.
!  The x-axis pixel size should ideally be below 0.1672 milli-arcsec
!  The y-axis pixel size should ideally be below 0.1842 milli-arcsec
! Estimated beam: bmin=0.8243 mas, bmaj=1.265 mas, bpa=5.781 degrees
! Estimated noise=513.115 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.6, 7.6).
! clean: niter=200  gain=0.03  cutoff=0
! Component: 050  -  total flux cleaned = 0.0290508 Jy
! Component: 100  -  total flux cleaned = 0.0394595 Jy
! Component: 150  -  total flux cleaned = 0.0469694 Jy
! Component: 200  -  total flux cleaned = 0.0533285 Jy
! Total flux subtracted in 200 components = 0.0533285 Jy
! Clean residual min=-0.017928 max=0.019136 Jy/beam
! Clean residual mean=-0.000369 rms=0.004005 Jy/beam
! Combined flux in latest and established models = 2.61885 Jy
! Performing phase self-cal
! Adding 27 model components to the UV plane model.
! The established model now contains 65 components and 2.61885 Jy
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Correcting IF 4.
! 
! Fit before self-cal, rms=0.234785Jy  sigma=0.001477
! Fit after  self-cal, rms=0.234336Jy  sigma=0.001473
! Inverting map 
! Your choice of large map pixels excluded 4.67% of the data.
!  The x-axis pixel size should ideally be below 0.1672 milli-arcsec
!  The y-axis pixel size should ideally be below 0.1842 milli-arcsec
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.234336Jy  sigma=0.001473
! Fit after  self-cal, rms=0.214139Jy  sigma=0.001305
dynam = dynam - 0.75
clean clean_niter,clean_gain
! Inverting map and beam 
! Your choice of large map pixels excluded 4.67% of the data.
!  The x-axis pixel size should ideally be below 0.1672 milli-arcsec
!  The y-axis pixel size should ideally be below 0.1842 milli-arcsec
! Estimated beam: bmin=0.8202 mas, bmaj=1.269 mas, bpa=6.203 degrees
! Estimated noise=511.935 mJy/beam.
! clean: niter=200  gain=0.03  cutoff=0
! Component: 050  -  total flux cleaned = 0.0183261 Jy
! Component: 100  -  total flux cleaned = 0.0268418 Jy
! Component: 150  -  total flux cleaned = 0.0324085 Jy
! Component: 200  -  total flux cleaned = 0.0366935 Jy
! Total flux subtracted in 200 components = 0.0366935 Jy
! Clean residual min=-0.007222 max=0.009581 Jy/beam
! Clean residual mean=0.000060 rms=0.001858 Jy/beam
! Combined flux in latest and established models = 2.65555 Jy
selfcal
! Performing phase self-cal
! Adding 29 model components to the UV plane model.
! The established model now contains 91 components and 2.65555 Jy
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Correcting IF 4.
! 
! Fit before self-cal, rms=0.212348Jy  sigma=0.001282
! Fit after  self-cal, rms=0.212126Jy  sigma=0.001280
flux_cutoff = imstat(rms) * dynam
! Inverting map 
! Your choice of large map pixels excluded 4.67% of the data.
!  The x-axis pixel size should ideally be below 0.1672 milli-arcsec
!  The y-axis pixel size should ideally be below 0.1842 milli-arcsec
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 (-2.4, 4.4).
! clean: niter=200  gain=0.03  cutoff=0
! Component: 050  -  total flux cleaned = 0.00919115 Jy
! Component: 100  -  total flux cleaned = 0.012516 Jy
! Component: 150  -  total flux cleaned = 0.0137002 Jy
! Component: 200  -  total flux cleaned = 0.0147983 Jy
! Total flux subtracted in 200 components = 0.0147983 Jy
! Clean residual min=-0.007547 max=0.007206 Jy/beam
! Clean residual mean=-0.000003 rms=0.001656 Jy/beam
! Combined flux in latest and established models = 2.67035 Jy
! Performing phase self-cal
! Adding 24 model components to the UV plane model.
! The established model now contains 103 components and 2.67035 Jy
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Correcting IF 4.
! 
! Fit before self-cal, rms=0.211368Jy  sigma=0.001272
! Fit after  self-cal, rms=0.211284Jy  sigma=0.001271
! Inverting map 
! Your choice of large map pixels excluded 4.67% of the data.
!  The x-axis pixel size should ideally be below 0.1672 milli-arcsec
!  The y-axis pixel size should ideally be below 0.1842 milli-arcsec
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.211284Jy  sigma=0.001271
! Fit after  self-cal, rms=0.211290Jy  sigma=0.001267
clean clean_niter,clean_gain
! Inverting map and beam 
! Your choice of large map pixels excluded 4.67% of the data.
!  The x-axis pixel size should ideally be below 0.1672 milli-arcsec
!  The y-axis pixel size should ideally be below 0.1842 milli-arcsec
! Estimated beam: bmin=0.8205 mas, bmaj=1.269 mas, bpa=6.03 degrees
! Estimated noise=511.659 mJy/beam.
! clean: niter=200  gain=0.03  cutoff=0
! Component: 050  -  total flux cleaned = 0.00541976 Jy
! Component: 100  -  total flux cleaned = 0.009606 Jy
! Component: 150  -  total flux cleaned = 0.0118007 Jy
! Component: 200  -  total flux cleaned = 0.0127928 Jy
! Total flux subtracted in 200 components = 0.0127928 Jy
! Clean residual min=-0.005921 max=0.007648 Jy/beam
! Clean residual mean=0.000095 rms=0.001435 Jy/beam
! Combined flux in latest and established models = 2.68314 Jy
selfcal
! Performing phase self-cal
! Adding 26 model components to the UV plane model.
! The established model now contains 112 components and 2.68314 Jy
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Correcting IF 4.
! 
! Fit before self-cal, rms=0.210749Jy  sigma=0.001262
! Fit after  self-cal, rms=0.210690Jy  sigma=0.001261
flux_cutoff = imstat(rms) * dynam
! Inverting map 
! Your choice of large map pixels excluded 4.67% of the data.
!  The x-axis pixel size should ideally be below 0.1672 milli-arcsec
!  The y-axis pixel size should ideally be below 0.1842 milli-arcsec
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 (-2.2, 7.6).
! clean: niter=200  gain=0.03  cutoff=0
! Component: 050  -  total flux cleaned = 0.00569176 Jy
! Component: 100  -  total flux cleaned = 0.00772055 Jy
! Component: 150  -  total flux cleaned = 0.00827166 Jy
! Component: 200  -  total flux cleaned = 0.00897136 Jy
! Total flux subtracted in 200 components = 0.00897136 Jy
! Clean residual min=-0.005990 max=0.006018 Jy/beam
! Clean residual mean=0.000055 rms=0.001311 Jy/beam
! Combined flux in latest and established models = 2.69211 Jy
! Performing phase self-cal
! Adding 31 model components to the UV plane model.
! The established model now contains 124 components and 2.69211 Jy
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Correcting IF 4.
! 
! Fit before self-cal, rms=0.210308Jy  sigma=0.001257
! Fit after  self-cal, rms=0.210280Jy  sigma=0.001257
! Inverting map 
! Your choice of large map pixels excluded 4.67% of the data.
!  The x-axis pixel size should ideally be below 0.1672 milli-arcsec
!  The y-axis pixel size should ideally be below 0.1842 milli-arcsec
uvtaper 0.3,taper_size
! Gaussian taper: value 0.3 at UV radius = 70 mega-wavelengths.
win_mult = win_mult * 1.2
selfcal true, true, soltime2
! Performing amp+phase self-cal over 20 minute time intervals
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Correcting IF 4.
! 
! Fit before self-cal, rms=0.210280Jy  sigma=0.001257
! Fit after  self-cal, rms=0.210641Jy  sigma=0.001256
clean clean_niter,clean_gain
! Inverting map and beam 
! Your choice of large map pixels excluded 4.67% of the data.
!  The x-axis pixel size should ideally be below 0.1672 milli-arcsec
!  The y-axis pixel size should ideally be below 0.1842 milli-arcsec
! Estimated beam: bmin=2.716 mas, bmaj=2.898 mas, bpa=-82.95 degrees
! Estimated noise=626 mJy/beam.
! clean: niter=200  gain=0.03  cutoff=0
! Component: 050  -  total flux cleaned = 0.00653983 Jy
! Component: 100  -  total flux cleaned = 0.00872034 Jy
! Component: 150  -  total flux cleaned = 0.0104242 Jy
! Component: 200  -  total flux cleaned = 0.0111467 Jy
! Total flux subtracted in 200 components = 0.0111467 Jy
! Clean residual min=-0.003979 max=0.005085 Jy/beam
! Clean residual mean=0.000148 rms=0.001343 Jy/beam
! Combined flux in latest and established models = 2.70326 Jy
selfcal
! Performing phase self-cal
! Adding 28 model components to the UV plane model.
! The established model now contains 149 components and 2.70326 Jy
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Correcting IF 4.
! 
! Fit before self-cal, rms=0.210573Jy  sigma=0.001254
! Fit after  self-cal, rms=0.210558Jy  sigma=0.001253
flux_cutoff = imstat(rms) * dynam
! Inverting map 
! Your choice of large map pixels excluded 4.67% of the data.
!  The x-axis pixel size should ideally be below 0.1672 milli-arcsec
!  The y-axis pixel size should ideally be below 0.1842 milli-arcsec
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.00140682 Jy
! Component: 100  -  total flux cleaned = 0.00193617 Jy
! Component: 150  -  total flux cleaned = 0.0024637 Jy
! Component: 200  -  total flux cleaned = 0.00285658 Jy
! Total flux subtracted in 200 components = 0.00285658 Jy
! Clean residual min=-0.003995 max=0.004803 Jy/beam
! Clean residual mean=0.000121 rms=0.001305 Jy/beam
! Combined flux in latest and established models = 2.70611 Jy
! Performing phase self-cal
! Adding 21 model components to the UV plane model.
! The established model now contains 156 components and 2.70611 Jy
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Correcting IF 4.
! 
! Fit before self-cal, rms=0.210615Jy  sigma=0.001253
! Fit after  self-cal, rms=0.210600Jy  sigma=0.001253
! Inverting map 
! Your choice of large map pixels excluded 4.67% of the data.
!  The x-axis pixel size should ideally be below 0.1672 milli-arcsec
!  The y-axis pixel size should ideally be below 0.1842 milli-arcsec
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 
! Your choice of large map pixels excluded 4.67% of the data.
!  The x-axis pixel size should ideally be below 0.1672 milli-arcsec
!  The y-axis pixel size should ideally be below 0.1842 milli-arcsec
! Estimated beam: bmin=0.8213 mas, bmaj=1.27 mas, bpa=5.916 degrees
! Estimated noise=511.637 mJy/beam.
! restore: Substituting estimate of restoring beam from last 'invert'.
! Restoring with beam: 0.8213 x 1.27 at 5.916 degrees (North through East)
! Clean map  min=-0.0048746  max=2.1484 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.210600Jy  sigma=0.001253
! Fit after  self-cal, rms=0.200100Jy  sigma=0.001149
! Inverting map and beam 
! Your choice of large map pixels excluded 4.67% of the data.
!  The x-axis pixel size should ideally be below 0.1672 milli-arcsec
!  The y-axis pixel size should ideally be below 0.1842 milli-arcsec
! Estimated beam: bmin=0.8218 mas, bmaj=1.27 mas, bpa=5.843 degrees
! Estimated noise=511.432 mJy/beam.
! clean: niter=200  gain=0.03  cutoff=0
! Component: 050  -  total flux cleaned = -0.000743498 Jy
! Component: 100  -  total flux cleaned = -0.000407213 Jy
! Component: 150  -  total flux cleaned = -0.000246578 Jy
! Component: 200  -  total flux cleaned = -9.11939e-05 Jy
! Total flux subtracted in 200 components = -9.11939e-05 Jy
! Clean residual min=-0.004962 max=0.005436 Jy/beam
! Clean residual mean=0.000115 rms=0.001108 Jy/beam
! Combined flux in latest and established models = 2.70602 Jy
! Performing phase self-cal
! Adding 22 model components to the UV plane model.
! The established model now contains 160 components and 2.70602 Jy
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Correcting IF 4.
! 
! Fit before self-cal, rms=0.199703Jy  sigma=0.001147
! Fit after  self-cal, rms=0.199651Jy  sigma=0.001147
! Inverting map 
! Your choice of large map pixels excluded 4.67% of the data.
!  The x-axis pixel size should ideally be below 0.1672 milli-arcsec
!  The y-axis pixel size should ideally be below 0.1842 milli-arcsec
! Added new window around map position (-0.6, 1.2).
! clean: niter=200  gain=0.03  cutoff=0
! Component: 050  -  total flux cleaned = 0.00181499 Jy
! Component: 100  -  total flux cleaned = 0.00145615 Jy
! Component: 150  -  total flux cleaned = 0.00146252 Jy
! Component: 200  -  total flux cleaned = 0.00162184 Jy
! Total flux subtracted in 200 components = 0.00162184 Jy
! Clean residual min=-0.005025 max=0.004191 Jy/beam
! Clean residual mean=0.000108 rms=0.001074 Jy/beam
! Combined flux in latest and established models = 2.70764 Jy
! Performing phase self-cal
! Adding 16 model components to the UV plane model.
! The established model now contains 170 components and 2.70764 Jy
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Correcting IF 4.
! 
! Fit before self-cal, rms=0.199225Jy  sigma=0.001144
! Fit after  self-cal, rms=0.199202Jy  sigma=0.001144
! Inverting map 
! Your choice of large map pixels excluded 4.67% of the data.
!  The x-axis pixel size should ideally be below 0.1672 milli-arcsec
!  The y-axis pixel size should ideally be below 0.1842 milli-arcsec
! Performing amp+phase self-cal
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Correcting IF 4.
! 
! Fit before self-cal, rms=0.199202Jy  sigma=0.001144
! Fit after  self-cal, rms=0.199537Jy  sigma=0.001143
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 
! Your choice of large map pixels excluded 4.67% of the data.
!  The x-axis pixel size should ideally be below 0.1672 milli-arcsec
!  The y-axis pixel size should ideally be below 0.1842 milli-arcsec
! Estimated beam: bmin=0.5858 mas, bmaj=1.089 mas, bpa=-1.662 degrees
! Estimated noise=957.327 mJy/beam.
! clean: niter=200  gain=0.03  cutoff=0
! Component: 050  -  total flux cleaned = 1.6273 Jy
! Component: 100  -  total flux cleaned = 2.04284 Jy
! Component: 150  -  total flux cleaned = 2.20904 Jy
! Component: 200  -  total flux cleaned = 2.28994 Jy
! Total flux subtracted in 200 components = 2.28994 Jy
! Clean residual min=-0.014740 max=0.041568 Jy/beam
! Clean residual mean=-0.000156 rms=0.004344 Jy/beam
! Combined flux in latest and established models = 2.28994 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 14 model components to the UV plane model.
! The established model now contains 14 components and 2.28994 Jy
! Inverting map and beam 
! Your choice of large map pixels excluded 4.67% of the data.
!  The x-axis pixel size should ideally be below 0.1672 milli-arcsec
!  The y-axis pixel size should ideally be below 0.1842 milli-arcsec
! Estimated beam: bmin=0.8224 mas, bmaj=1.271 mas, bpa=5.729 degrees
! Estimated noise=511.308 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.1095 Jy
! Component: 100  -  total flux cleaned = 0.180809 Jy
! Component: 150  -  total flux cleaned = 0.232155 Jy
! Component: 200  -  total flux cleaned = 0.270699 Jy
! Total flux subtracted in 200 components = 0.270699 Jy
! Clean residual min=-0.007584 max=0.022490 Jy/beam
! Clean residual mean=0.000743 rms=0.004015 Jy/beam
! Combined flux in latest and established models = 2.56064 Jy
! Adding 74 model components to the UV plane model.
! The established model now contains 78 components and 2.56064 Jy
! Inverting map 
! Your choice of large map pixels excluded 4.67% of the data.
!  The x-axis pixel size should ideally be below 0.1672 milli-arcsec
!  The y-axis pixel size should ideally be below 0.1842 milli-arcsec
! Added new window around map position (0.4, 4.8).
! clean: niter=200  gain=0.03  cutoff=0
! Component: 050  -  total flux cleaned = 0.0297736 Jy
! Component: 100  -  total flux cleaned = 0.0532935 Jy
! Component: 150  -  total flux cleaned = 0.0720834 Jy
! Component: 200  -  total flux cleaned = 0.0872961 Jy
! Total flux subtracted in 200 components = 0.0872961 Jy
! Clean residual min=-0.005125 max=0.009172 Jy/beam
! Clean residual mean=0.000374 rms=0.001888 Jy/beam
! Combined flux in latest and established models = 2.64793 Jy
! Adding 67 model components to the UV plane model.
! The established model now contains 120 components and 2.64793 Jy
! Inverting map 
! Your choice of large map pixels excluded 4.67% of the data.
!  The x-axis pixel size should ideally be below 0.1672 milli-arcsec
!  The y-axis pixel size should ideally be below 0.1842 milli-arcsec
! Added new window around map position (0.6, 8.6).
! clean: niter=200  gain=0.03  cutoff=0
! Component: 050  -  total flux cleaned = 0.0124757 Jy
! Component: 100  -  total flux cleaned = 0.0227599 Jy
! Component: 150  -  total flux cleaned = 0.0312624 Jy
! Component: 200  -  total flux cleaned = 0.0383254 Jy
! Total flux subtracted in 200 components = 0.0383254 Jy
! Clean residual min=-0.004618 max=0.004395 Jy/beam
! Clean residual mean=0.000210 rms=0.001178 Jy/beam
! Combined flux in latest and established models = 2.68626 Jy
! Adding 55 model components to the UV plane model.
! The established model now contains 146 components and 2.68626 Jy
! Inverting map 
! Your choice of large map pixels excluded 4.67% of the data.
!  The x-axis pixel size should ideally be below 0.1672 milli-arcsec
!  The y-axis pixel size should ideally be below 0.1842 milli-arcsec
uvtaper 0.3,taper_size
! Gaussian taper: value 0.3 at UV radius = 70 mega-wavelengths.
clean clean_niter,clean_gain
! Inverting map and beam 
! Your choice of large map pixels excluded 4.67% of the data.
!  The x-axis pixel size should ideally be below 0.1672 milli-arcsec
!  The y-axis pixel size should ideally be below 0.1842 milli-arcsec
! Estimated beam: bmin=2.715 mas, bmaj=2.898 mas, bpa=-82.94 degrees
! Estimated noise=625.532 mJy/beam.
! clean: niter=200  gain=0.03  cutoff=0
! Component: 050  -  total flux cleaned = 0.008809 Jy
! Component: 100  -  total flux cleaned = 0.0144942 Jy
! Component: 150  -  total flux cleaned = 0.0185382 Jy
! Component: 200  -  total flux cleaned = 0.0215028 Jy
! Total flux subtracted in 200 components = 0.0215028 Jy
! Clean residual min=-0.003622 max=0.004836 Jy/beam
! Clean residual mean=0.000247 rms=0.001140 Jy/beam
! Combined flux in latest and established models = 2.70776 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.00220212 Jy
! Component: 100  -  total flux cleaned = 0.00385011 Jy
! Component: 150  -  total flux cleaned = 0.00509291 Jy
! Component: 200  -  total flux cleaned = 0.0055731 Jy
! Total flux subtracted in 200 components = 0.0055731 Jy
! Clean residual min=-0.003603 max=0.004704 Jy/beam
! Clean residual mean=0.000193 rms=0.001092 Jy/beam
! Combined flux in latest and established models = 2.71334 Jy
! Adding 97 model components to the UV plane model.
! The established model now contains 226 components and 2.71334 Jy
! Inverting map 
! Your choice of large map pixels excluded 4.67% of the data.
!  The x-axis pixel size should ideally be below 0.1672 milli-arcsec
!  The y-axis pixel size should ideally be below 0.1842 milli-arcsec
! Added new window around map position (-3.4, 13).
! clean: niter=200  gain=0.03  cutoff=0
! Component: 050  -  total flux cleaned = 0.00407107 Jy
! Component: 100  -  total flux cleaned = 0.00575507 Jy
! Component: 150  -  total flux cleaned = 0.00619881 Jy
! Component: 200  -  total flux cleaned = 0.00653365 Jy
! Total flux subtracted in 200 components = 0.00653365 Jy
! Clean residual min=-0.003463 max=0.003022 Jy/beam
! Clean residual mean=0.000091 rms=0.000981 Jy/beam
! Combined flux in latest and established models = 2.71987 Jy
! Adding 29 model components to the UV plane model.
! The established model now contains 254 components and 2.71987 Jy
! Inverting map 
! Your choice of large map pixels excluded 4.67% of the data.
!  The x-axis pixel size should ideally be below 0.1672 milli-arcsec
!  The y-axis pixel size should ideally be below 0.1842 milli-arcsec
uvtaper 0,0
! No UV-taper is currently set.
clean
! Inverting map and beam 
! Your choice of large map pixels excluded 4.67% of the data.
!  The x-axis pixel size should ideally be below 0.1672 milli-arcsec
!  The y-axis pixel size should ideally be below 0.1842 milli-arcsec
! Estimated beam: bmin=0.8224 mas, bmaj=1.271 mas, bpa=5.729 degrees
! Estimated noise=511.308 mJy/beam.
! clean: niter=200  gain=0.03  cutoff=0
! Component: 050  -  total flux cleaned = -0.00114133 Jy
! Component: 100  -  total flux cleaned = -0.00113739 Jy
! Component: 150  -  total flux cleaned = -0.00138986 Jy
! Component: 200  -  total flux cleaned = -0.00126521 Jy
! Total flux subtracted in 200 components = -0.00126521 Jy
! Clean residual min=-0.003998 max=0.003417 Jy/beam
! Clean residual mean=0.000050 rms=0.000900 Jy/beam
! Combined flux in latest and established models = 2.7186 Jy
selfcal
! Performing phase self-cal
! Adding 19 model components to the UV plane model.
! The established model now contains 265 components and 2.7186 Jy
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Correcting IF 4.
! 
! Fit before self-cal, rms=0.200521Jy  sigma=0.001137
! Fit after  self-cal, rms=0.199636Jy  sigma=0.001136
wmodel J0237+2848_X_2001_03_12_pus_map.mod
! Writing 265 model components to file: J0237+2848_X_2001_03_12_pus_map.mod
wobs J0237+2848_X_2001_03_12_pus_uvs.fits
! Writing UV FITS file: J0237+2848_X_2001_03_12_pus_uvs.fits
wwins J0237+2848_X_2001_03_12_pus_map.win
! wwins: Wrote 9 windows to J0237+2848_X_2001_03_12_pus_map.win
x = (field_size-8) * field_cell / 4
addwin -x,x,-x,x
clean (field_size*4),0.01
! Inverting map 
! Your choice of large map pixels excluded 4.67% of the data.
!  The x-axis pixel size should ideally be below 0.1672 milli-arcsec
!  The y-axis pixel size should ideally be below 0.1842 milli-arcsec
! clean: niter=2048  gain=0.01  cutoff=0
! Component: 050  -  total flux cleaned = -0.00177651 Jy
! Component: 100  -  total flux cleaned = -0.00305897 Jy
! Component: 150  -  total flux cleaned = -0.00391226 Jy
! Component: 200  -  total flux cleaned = -0.00455939 Jy
! Component: 250  -  total flux cleaned = -0.00501647 Jy
! Component: 300  -  total flux cleaned = -0.00546213 Jy
! Component: 350  -  total flux cleaned = -0.00584436 Jy
! Component: 400  -  total flux cleaned = -0.0061123 Jy
! Component: 450  -  total flux cleaned = -0.00637572 Jy
! Component: 500  -  total flux cleaned = -0.00642746 Jy
! Component: 550  -  total flux cleaned = -0.006581 Jy
! Component: 600  -  total flux cleaned = -0.00663152 Jy
! Component: 650  -  total flux cleaned = -0.00678055 Jy
! Component: 700  -  total flux cleaned = -0.00678069 Jy
! Component: 750  -  total flux cleaned = -0.00697475 Jy
! Component: 800  -  total flux cleaned = -0.00697508 Jy
! Component: 850  -  total flux cleaned = -0.00716553 Jy
! Component: 900  -  total flux cleaned = -0.00725931 Jy
! Component: 950  -  total flux cleaned = -0.00725966 Jy
! Component: 1000  -  total flux cleaned = -0.00739806 Jy
! Component: 1050  -  total flux cleaned = -0.00739787 Jy
! Component: 1100  -  total flux cleaned = -0.00726284 Jy
! Component: 1150  -  total flux cleaned = -0.00735232 Jy
! Component: 1200  -  total flux cleaned = -0.00726337 Jy
! Component: 1250  -  total flux cleaned = -0.00708745 Jy
! Component: 1300  -  total flux cleaned = -0.00700077 Jy
! Component: 1350  -  total flux cleaned = -0.00695767 Jy
! Component: 1400  -  total flux cleaned = -0.00704316 Jy
! Component: 1450  -  total flux cleaned = -0.00687303 Jy
! Component: 1500  -  total flux cleaned = -0.006873 Jy
! Component: 1550  -  total flux cleaned = -0.00674698 Jy
! Component: 1600  -  total flux cleaned = -0.00666381 Jy
! Component: 1650  -  total flux cleaned = -0.00670492 Jy
! Component: 1700  -  total flux cleaned = -0.00658168 Jy
! Component: 1750  -  total flux cleaned = -0.0065001 Jy
! Component: 1800  -  total flux cleaned = -0.00662192 Jy
! Component: 1850  -  total flux cleaned = -0.00658156 Jy
! Component: 1900  -  total flux cleaned = -0.00670158 Jy
! Component: 1950  -  total flux cleaned = -0.00650246 Jy
! Component: 2000  -  total flux cleaned = -0.00654217 Jy
! Total flux subtracted in 2048 components = -0.00654214 Jy
! Clean residual min=-0.002039 max=0.001985 Jy/beam
! Clean residual mean=0.000061 rms=0.000691 Jy/beam
! Combined flux in latest and established models = 2.71206 Jy
keep
! Adding 158 model components to the UV plane model.
! The established model now contains 422 components and 2.71206 Jy
![Exited script file: muppet]
wmap "J0237+2848_X_2001_03_12_pus\_map.fits"
! Inverting map 
! Your choice of large map pixels excluded 4.67% of the data.
!  The x-axis pixel size should ideally be below 0.1672 milli-arcsec
!  The y-axis pixel size should ideally be below 0.1842 milli-arcsec
! restore: Substituting estimate of restoring beam from last 'invert'.
! Restoring with beam: 0.8224 x 1.271 at 5.729 degrees (North through East)
! Clean map  min=-0.0028183  max=2.1552 Jy/beam
! Writing clean map to FITS file: J0237+2848_X_2001_03_12_pus_map.fits
float peak_flux
peak_flux = peak(flux,max)
print "The peak flux is",peak_flux
! The peak flux is 2.15524 
invert
! Inverting map 
! Your choice of large map pixels excluded 4.67% of the data.
!  The x-axis pixel size should ideally be below 0.1672 milli-arcsec
!  The y-axis pixel size should ideally be below 0.1842 milli-arcsec
float image_rms
image_rms = imstat(rms)
print "The final image rms is",image_rms
! The final image rms is 0.000689605 
device "J0237+2848_X_2001_03_12_pus\_map.eps/VPS"
! Attempting to open device: 'J0237+2848_X_2001_03_12_pus_map.eps/VPS'
loglevs 100*3*image_rms/peak_flux
! The new contour levels are:
!  -0.0959899 0.0959899 0.19198 0.38396 0.767919 1.53584 3.07168 6.14335 12.2867 24.5734 49.1468 98.2937
print "clev=",int(3*image_rms*10000)/10000
! clev= 0.002 
print "peak=",int(1000*peak_flux)/1000
! peak= 2.155 
mapcolor none
! Mapplot colormap: none, contrast: 1 brightness: 0.5.
mapplot cln
! restore: Substituting estimate of restoring beam from last 'invert'.
! Restoring with beam: 0.8224 x 1.271 at 5.729 degrees (North through East)
! Clean map  min=-0.0028183  max=2.1552 Jy/beam
mapcolor color, 0.9
! Mapplot colormap: rainbow, contrast: 0.9 brightness: 0.5.
quit
! Quitting program
! Log file J0237+2848_X_2001_03_12_pus_uvs.log closed on Wed Jan  2 19:49:50 2013