! Started logfile: 4C39.25_X.log on Wed Jun  9 20:04:23 1999
observe 4C39.25_X.edt
! Reading UV FITS file: 4C39.25_X.edt
! AN table 1: 95 integrations on 52 of 78 possible baselines.
! AN table 2: 20 integrations on 119 of 120 possible baselines.
! AN table 3: 93 integrations on 117 of 120 possible baselines.
! AN table 4: 15 integrations on 27 of 28 possible baselines.
! Apparent sampling: 0.333602 visibilities/baseline/integration-bin.
! *** This seems a bit low - see "help observe" on the binwid argument.
! Found source: 4C39.25
! 
! 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 918 lines of history.
! 
! Reading 24828 visibilities.
print "***********************************"
! *********************************** 
print "*** Using gonzo instruction set ***"
! *** Using gonzo instruction set *** 
print "***********************************"
! *********************************** 
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
float field_size
field_size = 1024
float field_cell
field_cell = 0.1
integer clean_niter
clean_niter = 50
float clean_gain
clean_gain = 0.03
float dynam
dynam = 7.0
float win_mult
win_mult = 1.8
float solint
solint = 4.0/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.100x0.100 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 768 telescope corrections were flagged in sub-array 1.
!  A total of 92 telescope corrections were flagged in sub-array 2.
!  A total of 701 telescope corrections were flagged in sub-array 3.
!  A total of 21 telescope corrections were flagged in sub-array 4.
! 
! Correcting IF 2.
!  A total of 768 telescope corrections were flagged in sub-array 1.
!  A total of 92 telescope corrections were flagged in sub-array 2.
!  A total of 701 telescope corrections were flagged in sub-array 3.
!  A total of 21 telescope corrections were flagged in sub-array 4.
! 
! Correcting IF 3.
!  A total of 768 telescope corrections were flagged in sub-array 1.
!  A total of 92 telescope corrections were flagged in sub-array 2.
!  A total of 701 telescope corrections were flagged in sub-array 3.
!  A total of 21 telescope corrections were flagged in sub-array 4.
! 
! Correcting IF 4.
!  A total of 769 telescope corrections were flagged in sub-array 1.
!  A total of 92 telescope corrections were flagged in sub-array 2.
!  A total of 701 telescope corrections were flagged in sub-array 3.
!  A total of 21 telescope corrections were flagged in sub-array 4.
! 
! Fit before self-cal, rms=7.819661Jy  sigma=30.778873
! Fit after  self-cal, rms=7.819710Jy  sigma=30.779093
! 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=0.6201 mas, bmaj=0.8204 mas, bpa=-11.86 degrees
! Estimated noise=2.06474 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 = 5.59822 Jy
! Total flux subtracted in 50 components = 5.59822 Jy
! Clean residual min=-0.235553 max=1.834711 Jy/beam
! Clean residual mean=-0.002121 rms=0.079619 Jy/beam
! Combined flux in latest and established models = 5.59822 Jy
! Performing phase self-cal over 0.666667 minute time intervals
! Adding 7 model components to the UV plane model.
! The established model now contains 7 components and 5.59822 Jy
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Correcting IF 4.
! 
! Fit before self-cal, rms=3.716154Jy  sigma=14.640140
! Fit after  self-cal, rms=3.716093Jy  sigma=14.639879
! Inverting map 
! clean: niter=50  gain=0.03  cutoff=0
! Component: 050  -  total flux cleaned = 1.90735 Jy
! Total flux subtracted in 50 components = 1.90735 Jy
! Clean residual min=-0.168713 max=0.876760 Jy/beam
! Clean residual mean=-0.001385 rms=0.050741 Jy/beam
! Combined flux in latest and established models = 7.50557 Jy
! Performing phase self-cal over 0.666667 minute time intervals
! Adding 11 model components to the UV plane model.
! The established model now contains 16 components and 7.50557 Jy
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Correcting IF 4.
! 
! Fit before self-cal, rms=2.364104Jy  sigma=9.322560
! Fit after  self-cal, rms=2.363515Jy  sigma=9.320253
! Inverting map 
! clean: niter=50  gain=0.03  cutoff=0
! Component: 050  -  total flux cleaned = 1.04953 Jy
! Total flux subtracted in 50 components = 1.04953 Jy
! Clean residual min=-0.141920 max=0.551400 Jy/beam
! Clean residual mean=-0.000963 rms=0.038288 Jy/beam
! Combined flux in latest and established models = 8.5551 Jy
! Performing phase self-cal over 0.666667 minute time intervals
! Adding 20 model components to the UV plane model.
! The established model now contains 33 components and 8.5551 Jy
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Correcting IF 4.
! 
! Fit before self-cal, rms=1.763529Jy  sigma=6.963371
! Fit after  self-cal, rms=1.763270Jy  sigma=6.962391
! Inverting map 
! clean: niter=50  gain=0.03  cutoff=0
! Component: 050  -  total flux cleaned = 0.682524 Jy
! Total flux subtracted in 50 components = 0.682524 Jy
! Clean residual min=-0.129746 max=0.365169 Jy/beam
! Clean residual mean=-0.000684 rms=0.031601 Jy/beam
! Combined flux in latest and established models = 9.23762 Jy
! Performing phase self-cal over 0.666667 minute time intervals
! Adding 9 model components to the UV plane model.
! The established model now contains 37 components and 9.23762 Jy
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Correcting IF 4.
! 
! Fit before self-cal, rms=1.442154Jy  sigma=5.701267
! Fit after  self-cal, rms=1.441721Jy  sigma=5.699616
! Inverting map 
! clean: niter=50  gain=0.03  cutoff=0
! Component: 050  -  total flux cleaned = 0.45556 Jy
! Total flux subtracted in 50 components = 0.45556 Jy
! Clean residual min=-0.125446 max=0.303377 Jy/beam
! Clean residual mean=-0.000496 rms=0.028095 Jy/beam
! Combined flux in latest and established models = 9.69318 Jy
! Performing phase self-cal over 0.666667 minute time intervals
! Adding 14 model components to the UV plane model.
! The established model now contains 45 components and 9.69318 Jy
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Correcting IF 4.
! 
! Fit before self-cal, rms=1.275895Jy  sigma=5.048203
! Fit after  self-cal, rms=1.275453Jy  sigma=5.046506
! Inverting map 
! Added new window around map position (-1.5, 0.5).
! clean: niter=50  gain=0.03  cutoff=0
! Component: 050  -  total flux cleaned = 0.348283 Jy
! Total flux subtracted in 50 components = 0.348283 Jy
! Clean residual min=-0.114103 max=0.218941 Jy/beam
! Clean residual mean=-0.000343 rms=0.025667 Jy/beam
! Combined flux in latest and established models = 10.0415 Jy
! Performing phase self-cal over 0.666667 minute time intervals
! Adding 12 model components to the UV plane model.
! The established model now contains 52 components and 10.0415 Jy
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Correcting IF 4.
! 
! Fit before self-cal, rms=1.161368Jy  sigma=4.594243
! Fit after  self-cal, rms=1.159481Jy  sigma=4.586979
! Inverting map 
! Added new window around map position (-0.8, -0.1).
! clean: niter=50  gain=0.03  cutoff=0
! Component: 050  -  total flux cleaned = 0.267885 Jy
! Total flux subtracted in 50 components = 0.267885 Jy
! Clean residual min=-0.107661 max=0.180544 Jy/beam
! Clean residual mean=-0.000227 rms=0.024054 Jy/beam
! Combined flux in latest and established models = 10.3094 Jy
! Performing phase self-cal over 0.666667 minute time intervals
! Adding 18 model components to the UV plane model.
! The established model now contains 60 components and 10.3094 Jy
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Correcting IF 4.
! 
! Fit before self-cal, rms=1.088118Jy  sigma=4.303445
! Fit after  self-cal, rms=1.087061Jy  sigma=4.299368
! Inverting map 
! Added new window around map position (0.7, 0.2).
! clean: niter=50  gain=0.03  cutoff=0
! Component: 050  -  total flux cleaned = 0.216445 Jy
! Total flux subtracted in 50 components = 0.216445 Jy
! Clean residual min=-0.108660 max=0.144617 Jy/beam
! Clean residual mean=-0.000134 rms=0.022919 Jy/beam
! Combined flux in latest and established models = 10.5258 Jy
! Performing phase self-cal over 0.666667 minute time intervals
! Adding 15 model components to the UV plane model.
! The established model now contains 62 components and 10.5258 Jy
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Correcting IF 4.
! 
! Fit before self-cal, rms=1.038697Jy  sigma=4.105979
! Fit after  self-cal, rms=1.038031Jy  sigma=4.103436
! 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=0.8761 mas, bmaj=1.053 mas, bpa=-45.31 degrees
! Estimated noise=1.16176 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)
! clean: niter=100  gain=0.03  cutoff=0
! Component: 050  -  total flux cleaned = 0.301029 Jy
! Component: 100  -  total flux cleaned = 0.478586 Jy
! Total flux subtracted in 100 components = 0.478586 Jy
! Clean residual min=-0.139680 max=0.196216 Jy/beam
! Clean residual mean=0.000679 rms=0.038364 Jy/beam
! Combined flux in latest and established models = 11.0044 Jy
! Performing phase self-cal over 0.666667 minute time intervals
! Adding 18 model components to the UV plane model.
! The established model now contains 74 components and 11.0044 Jy
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Correcting IF 4.
! 
! Fit before self-cal, rms=0.956502Jy  sigma=3.769604
! Fit after  self-cal, rms=0.953545Jy  sigma=3.758061
! 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 21 telescope corrections were flagged in sub-array 1.
!  Telescope amplitude corrections in sub-array 1:
!   BR        1.03     FD        1.03     GC        1.54     HN        0.98     
!   KP        1.13     LA        1.04     MK        1.00*    NL        0.97     
!   NY        1.02     ON        1.07     PT        1.00*    SC        0.96     
!   WF        0.96     
! 
!  Telescope amplitude corrections in sub-array 2:
!   BR        0.98     FD        0.98     GC        1.00     GN        0.87     
!   HN        0.97     KK        1.05     KP        0.98     LA        1.03     
!   MC        1.13     MK        1.01     NL        0.95     ON        1.01     
!   OV        1.00     PT        1.05     SC        0.95     WF        0.97     
! 
!  A total of 6 telescope corrections were flagged in sub-array 3.
!  Telescope amplitude corrections in sub-array 3:
!   BR        0.99     FD        0.99     GC        1.03     GN        0.95     
!   HN        1.12     KK        0.96     KP        1.00     LA        0.99     
!   MC        1.01     MK        0.99     NL        1.01     ON        1.11     
!   OV        1.00     PT        1.06     SC        0.95     WF        0.99     
! 
!  Telescope amplitude corrections in sub-array 4:
!   BR        1.04     GC        0.84     GN        0.96     HN        1.09     
!   NL        0.98     ON        1.00*    SC        0.99     WF        0.94     
! 
! 
! Correcting IF 2.
!  A total of 21 telescope corrections were flagged in sub-array 1.
!  Telescope amplitude corrections in sub-array 1:
!   BR        1.03     FD        1.04     GC        1.53     HN        0.97     
!   KP        1.13     LA        1.04     MK        1.00*    NL        0.96     
!   NY        1.02     ON        1.06     PT        1.00*    SC        0.96     
!   WF        0.96     
! 
!  Telescope amplitude corrections in sub-array 2:
!   BR        0.98     FD        0.98     GC        1.00     GN        0.92     
!   HN        0.96     KK        1.06     KP        0.98     LA        1.04     
!   MC        1.13     MK        1.02     NL        0.94     ON        1.00     
!   OV        1.01     PT        1.05     SC        0.94     WF        0.97     
! 
!  A total of 6 telescope corrections were flagged in sub-array 3.
!  Telescope amplitude corrections in sub-array 3:
!   BR        0.99     FD        0.99     GC        1.03     GN        0.97     
!   HN        1.12     KK        0.97     KP        0.99     LA        0.99     
!   MC        1.00     MK        1.00     NL        1.01     ON        1.10     
!   OV        1.01     PT        1.06     SC        0.94     WF        0.99     
! 
!  Telescope amplitude corrections in sub-array 4:
!   BR        1.04     GC        0.84     GN        0.99     HN        1.08     
!   NL        0.98     ON        1.00*    SC        0.98     WF        0.95     
! 
! 
! Correcting IF 3.
!  A total of 21 telescope corrections were flagged in sub-array 1.
!  Telescope amplitude corrections in sub-array 1:
!   BR        1.02     FD        1.04     GC        1.53     HN        0.98     
!   KP        1.11     LA        1.03     MK        1.00*    NL        0.95     
!   NY        1.02     ON        1.07     PT        1.00*    SC        0.97     
!   WF        0.94     
! 
!  Telescope amplitude corrections in sub-array 2:
!   BR        0.97     FD        0.98     GC        1.01     GN        0.88     
!   HN        0.97     KK        1.07     KP        0.97     LA        1.02     
!   MC        1.13     MK        1.01     NL        0.93     ON        1.00     
!   OV        0.99     PT        1.05     SC        0.94     WF        0.98     
! 
!  A total of 6 telescope corrections were flagged in sub-array 3.
!  Telescope amplitude corrections in sub-array 3:
!   BR        0.98     FD        0.99     GC        1.02     GN        0.95     
!   HN        1.14     KK        0.97     KP        0.98     LA        0.98     
!   MC        1.02     MK        1.00     NL        0.99     ON        1.13     
!   OV        0.99     PT        1.05     SC        0.95     WF        0.99     
! 
!  Telescope amplitude corrections in sub-array 4:
!   BR        1.03     GC        0.86     GN        0.98     HN        1.11     
!   NL        0.96     ON        1.00*    SC        0.99     WF        0.94     
! 
! 
! Correcting IF 4.
!  A total of 21 telescope corrections were flagged in sub-array 1.
!  Telescope amplitude corrections in sub-array 1:
!   BR        1.02     FD        1.02     GC        1.56     HN        0.98     
!   KP        1.11     LA        1.03     MK        1.00*    NL        0.95     
!   NY        0.92     ON        1.01     PT        1.00*    SC        0.94     
!   WF        0.93     
! 
!  Telescope amplitude corrections in sub-array 2:
!   BR        0.97     FD        0.97     GC        1.02     GN        0.91     
!   HN        0.97     KK        1.05     KP        0.97     LA        1.02     
!   MC        1.13     MK        1.00     NL        0.92     ON        0.96     
!   OV        0.99     PT        1.06     SC        0.93     WF        0.97     
! 
!  A total of 6 telescope corrections were flagged in sub-array 3.
!  Telescope amplitude corrections in sub-array 3:
!   BR        0.98     FD        0.98     GC        1.03     GN        0.97     
!   HN        1.12     KK        0.96     KP        0.99     LA        0.97     
!   MC        0.98     MK        0.99     NL        1.00     ON        1.09     
!   OV        0.99     PT        1.05     SC        0.93     WF        0.97     
! 
!  Telescope amplitude corrections in sub-array 4:
!   BR        1.04     GC        0.89     GN        1.00     HN        1.12     
!   NL        0.96     ON        1.00*    SC        0.96     WF        0.93     
! 
! 
! Fit before self-cal, rms=0.953545Jy  sigma=3.758061
! Fit after  self-cal, rms=0.622438Jy  sigma=2.335951
dynam = dynam - 0.5
doamp = false
flux_cutoff = imstat(rms) * dynam
! Inverting map and beam 
! Estimated beam: bmin=0.892 mas, bmaj=1.054 mas, bpa=-46.59 degrees
! Estimated noise=1.17401 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)
! clean: niter=100  gain=0.03  cutoff=0
! Component: 050  -  total flux cleaned = 0.00824101 Jy
! Component: 100  -  total flux cleaned = 0.00836612 Jy
! Total flux subtracted in 100 components = 0.00836612 Jy
! Clean residual min=-0.092066 max=0.080193 Jy/beam
! Clean residual mean=0.000473 rms=0.019196 Jy/beam
! Combined flux in latest and established models = 11.0127 Jy
! Performing phase self-cal over 0.666667 minute time intervals
! Adding 6 model components to the UV plane model.
! The established model now contains 80 components and 11.0127 Jy
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Correcting IF 4.
! 
! Fit before self-cal, rms=0.608285Jy  sigma=2.281337
! Fit after  self-cal, rms=0.607568Jy  sigma=2.278446
! Inverting map 
dynam = dynam - 1.0
doamp = true
solint = solint * 1.5
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.00478557 Jy
! Component: 100  -  total flux cleaned = -0.00663296 Jy
! Total flux subtracted in 100 components = -0.00663296 Jy
! Clean residual min=-0.086240 max=0.078198 Jy/beam
! Clean residual mean=0.000464 rms=0.018970 Jy/beam
! Combined flux in latest and established models = 11.0061 Jy
! Performing amp+phase self-cal over 1 minute time intervals
! Adding 10 model components to the UV plane model.
! The established model now contains 83 components and 11.0061 Jy
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Correcting IF 4.
! 
! Fit before self-cal, rms=0.601153Jy  sigma=2.253151
! Fit after  self-cal, rms=0.291687Jy  sigma=1.105041
! Inverting map and beam 
! Estimated beam: bmin=0.8921 mas, bmaj=1.055 mas, bpa=-45.67 degrees
! Estimated noise=1.17623 mJy/beam.
doamp = false
solint = solint / 1.5
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)
! Added new window around map position (-2.6, 0.5).
! clean: niter=100  gain=0.03  cutoff=0
! Component: 050  -  total flux cleaned = 0.0260542 Jy
! Component: 100  -  total flux cleaned = 0.0407415 Jy
! Total flux subtracted in 100 components = 0.0407415 Jy
! Clean residual min=-0.033828 max=0.030609 Jy/beam
! Clean residual mean=-0.000035 rms=0.005524 Jy/beam
! Combined flux in latest and established models = 11.0469 Jy
! Performing phase self-cal over 0.666667 minute time intervals
! Adding 11 model components to the UV plane model.
! The established model now contains 93 components and 11.0469 Jy
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Correcting IF 4.
! 
! Fit before self-cal, rms=0.277488Jy  sigma=1.045131
! Fit after  self-cal, rms=0.276767Jy  sigma=1.041990
! Inverting map 
print "***********************************"
! *********************************** 
print "*** Finished Amplitude Self-Cal ***"
! *** Finished Amplitude Self-Cal *** 
print "***********************************"
! *********************************** 
save 4C39.25_X
! Writing UV FITS file: 4C39.25_X.uvf
! Writing 93 model components to file: 4C39.25_X.mod
! wwins: Wrote 5 windows to 4C39.25_X.win
! restore: Substituting estimate of restoring beam from last 'invert'.
! Restoring with beam: 0.8921 x 1.055 at -45.67 degrees (North through East)
! Clean map  min=-0.026164  max=8.1501 Jy/beam
! Writing clean map to FITS file: 4C39.25_X.fits
! Writing difmap environment to: 4C39.25_X.par
print "****************************"
! **************************** 
print "*** Now, make some plots ***"
! *** Now, make some plots *** 
print "****************************"
! **************************** 
device 4C39.25_Xuv.ps/vps,1,2
! Attempting to open device: '4C39.25_Xuv.ps/vps'
radplot
! Using default options string "m1"
uvplot
device 4C39.25_Xim.ps/vps
! Attempting to open device: '4C39.25_Xim.ps/vps'
cmul = 1.0
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 (imstat(rms)*3),20000,2
! Inverting map and beam 
! Estimated beam: bmin=0.8921 mas, bmaj=1.055 mas, bpa=-45.67 degrees
! Estimated noise=1.17623 mJy/beam.
! The new contour levels are:
!  -0.0164895 0.0164895 0.0329791 0.0659582 0.131916 0.263833 0.527665 1.05533 2.11066 4.22132 8.44265 16.8853 33.7706 67.5412 135.082 270.165 540.329 1080.66 2161.32 4322.64 8645.27 17290.5
mappl cln
! restore: Substituting estimate of restoring beam from last 'invert'.
! Restoring with beam: 0.8921 x 1.055 at -45.67 degrees (North through East)
! Clean map  min=-0.026164  max=8.1501 Jy/beam
quit
! Quitting program
! Log file 4C39.25_X.log closed on Wed Jun  9 20:07:54 1999