! Started logfile: J1540+1447_S_1997_01_11_pus_uve.log on Sun Feb  5 18:16:19 2006
obs J1540+1447_S_1997_01_11_pus_uva.fits
! Reading UV FITS file: J1540+1447_S_1997_01_11_pus_uva.fits
! AN table 1: 268 integrations on 45 of 45 possible baselines.
! Apparent sampling: 0.829519 visibilities/baseline/integration-bin.
! Found source: J1540+1447
! 
! 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.22049e+09        4e+06          1        4e+06
!  02        2  2.23236e+09        4e+06          1        4e+06
!  03        3  2.29236e+09        4e+06          1        4e+06
!  04        4  2.32236e+09        4e+06          1        4e+06
! 
! Polarization(s): RR
! 
! Read 606 lines of history.
! 
! Reading 40016 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
uvav time_av, true
! Averaging into 30 second bins.
! 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
integer clean_niter
clean_niter = 100
float clean_gain
clean_gain = 0.04
float dynam
dynam = 6.0
float amp_soltime1
amp_soltime1 = 5
float amp_soltime2
amp_soltime2 = 1
float phase_soltime1
phase_soltime1=7
float phase_soltime2
phase_soltime2=0.5
float phase_soltime
phase_soltime=phase_soltime1
float ampcor_selflim
ampcor_selflim=1.20
float thresh
thresh = 0.10
float win_mult
win_mult = 1.8
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.
dev /xwindow
! Attempting to open device: '/xwindow'
rflags="m3"
radplot
! Overriding default options with user defined rflags="m3"
! Move the cursor into the plot window and press 'H' for help
tplot
! Using default options string ""
! Move the cursor into the plot window and press 'H' for help
phase_soltime=phase_soltime1
print "uvstat(rms)=",uvstat(rms),"Jy"
! uvstat(rms)= 0.477088 Jy 
startmod ,phase_soltime
! Applying default point source starting model.
! Performing phase self-cal over 7 minute time intervals
! 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 37 telescope corrections were flagged in sub-array 1.
! 
! Correcting IF 2.
!  A total of 22 telescope corrections were flagged in sub-array 1.
! 
! Correcting IF 3.
!  A total of 23 telescope corrections were flagged in sub-array 1.
! 
! Correcting IF 4.
!  A total of 21 telescope corrections were flagged in sub-array 1.
! 
! Fit before self-cal, rms=0.569283Jy  sigma=8.182947
! Fit after  self-cal, rms=0.569197Jy  sigma=8.174354
! 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=3.049 mas, bmaj=6.152 mas, bpa=-6.371 degrees
! Estimated noise=1.40188 mJy/beam.
repeat
  if (peak(flux) > flux_cutoff) peakwin win_mult
  clean clean_niter,clean_gain
  flux_cutoff = imstat(rms) * dynam
  selfcal false,false,phase_soltime
  new_peak = peak(flux)
  until(new_peak<=flux_cutoff)
! Added new window around map position (0, 0).
! clean: niter=100  gain=0.04  cutoff=0
! Component: 050  -  total flux cleaned = 0.378898 Jy
! Component: 100  -  total flux cleaned = 0.416493 Jy
! Total flux subtracted in 100 components = 0.416493 Jy
! Clean residual min=-0.020802 max=0.031669 Jy/beam
! Clean residual mean=0.000260 rms=0.006176 Jy/beam
! Combined flux in latest and established models = 0.416493 Jy
! Performing phase self-cal over 7 minute time intervals
! Adding 5 model components to the UV plane model.
! The established model now contains 5 components and 0.416493 Jy
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Correcting IF 4.
! 
! Fit before self-cal, rms=0.155990Jy  sigma=1.891588
! Fit after  self-cal, rms=0.155986Jy  sigma=1.891278
! Inverting map 
print "************** FINISHED UNIFORM WEIGHTING CLEAN **************"
! ************** FINISHED UNIFORM WEIGHTING CLEAN ************** 
! 
uvw 0,-2
! Uniform weighting is not currently selected.
! Gridding weights will be scaled by errors raised to the power -2.
! 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=3.797 mas, bmaj=7.524 mas, bpa=-8.034 degrees
! Estimated noise=0.89308 mJy/beam.
repeat
  if (peak(flux) > flux_cutoff) peakwin win_mult
  clean clean_niter,clean_gain
  flux_cutoff = imstat(rms) * dynam
  selfcal false,false,phase_soltime
  new_peak = peak(flux)
  until(new_peak<=flux_cutoff)
! clean: niter=200  gain=0.04  cutoff=0
! Component: 050  -  total flux cleaned = 0.0289404 Jy
! Component: 100  -  total flux cleaned = 0.0392609 Jy
! Component: 150  -  total flux cleaned = 0.0400538 Jy
! Component: 200  -  total flux cleaned = 0.0407713 Jy
! Total flux subtracted in 200 components = 0.0407713 Jy
! Clean residual min=-0.017496 max=0.027142 Jy/beam
! Clean residual mean=0.000563 rms=0.006162 Jy/beam
! Combined flux in latest and established models = 0.457264 Jy
! Performing phase self-cal over 7 minute time intervals
! Adding 14 model components to the UV plane model.
! The established model now contains 16 components and 0.457264 Jy
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Correcting IF 4.
! 
! Fit before self-cal, rms=0.151164Jy  sigma=1.823676
! Fit after  self-cal, rms=0.150915Jy  sigma=1.818624
! Inverting map 
print "************** FINISHED NATURAL WEIGHTING CLEAN **************"
! ************** FINISHED NATURAL WEIGHTING CLEAN ************** 
! 
restore
! restore: Substituting estimate of restoring beam from last 'invert'.
! Restoring with beam: 3.797 x 7.524 at -8.034 degrees (North through East)
! Clean map  min=-0.017301  max=0.43268 Jy/beam
if(peak(flux) < thresh*2)
  selflims ampcor_selflim
  end if
gscale
! Performing overall amplitude self-cal
! 
! Correcting IF 1.
!  Amplitude normalization factor in sub-array 1: 1.06029
!  Telescope amplitude corrections in sub-array 1:
!   BR        0.97     FD        1.03     HN        1.08     KP        0.84     
!   LA        0.94     MK        0.94     NL        0.74     OV        1.10     
!   PT        0.99     SC        0.81     
! 
! 
! Correcting IF 2.
!  Amplitude normalization factor in sub-array 1: 0.976672
!  Telescope amplitude corrections in sub-array 1:
!   BR        1.01     FD        1.10     HN        1.15     KP        0.94     
!   LA        1.05     MK        0.97     NL        1.13     OV        1.05     
!   PT        0.99     SC        0.86     
! 
! 
! Correcting IF 3.
!  Amplitude normalization factor in sub-array 1: 1.02417
!  Telescope amplitude corrections in sub-array 1:
!   BR        0.96     FD        1.03     HN        1.08     KP        0.87     
!   LA        0.77     MK        0.85     NL        1.17     OV        0.90     
!   PT        1.14     SC        0.99     
! 
! 
! Correcting IF 4.
!  Amplitude normalization factor in sub-array 1: 0.980326
!  Telescope amplitude corrections in sub-array 1:
!   BR        0.98     FD        1.06     HN        1.18     KP        0.91     
!   LA        0.80     MK        0.99     NL        1.22     OV        1.08     
!   PT        1.00     SC        0.97     
! 
! 
! Fit before self-cal, rms=0.150915Jy  sigma=1.818624
! Fit after  self-cal, rms=0.137601Jy  sigma=1.621848
selfcal false, false, phase_soltime
! Performing phase self-cal over 7 minute time intervals
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Correcting IF 4.
! 
! Fit before self-cal, rms=0.137601Jy  sigma=1.621848
! Fit after  self-cal, rms=0.137597Jy  sigma=1.621571
dynam = dynam - 0.5
flux_cutoff = imstat(rms) * dynam
! Inverting map and beam 
! Estimated beam: bmin=3.724 mas, bmaj=7.299 mas, bpa=-6.424 degrees
! Estimated noise=0.890737 mJy/beam.
repeat
  if (peak(flux) > flux_cutoff) peakwin win_mult
  clean clean_niter,clean_gain
  flux_cutoff = imstat(rms) * dynam
  selfcal false,false,phase_soltime
  new_peak = peak(flux)
  until(new_peak<=flux_cutoff)
! clean: niter=200  gain=0.04  cutoff=0
! Component: 050  -  total flux cleaned = 0.0102345 Jy
! Component: 100  -  total flux cleaned = 0.0104808 Jy
! Component: 150  -  total flux cleaned = 0.0106531 Jy
! Component: 200  -  total flux cleaned = 0.0105004 Jy
! Total flux subtracted in 200 components = 0.0105004 Jy
! Clean residual min=-0.011864 max=0.021309 Jy/beam
! Clean residual mean=0.000593 rms=0.004981 Jy/beam
! Combined flux in latest and established models = 0.467764 Jy
! Performing phase self-cal over 7 minute time intervals
! Adding 18 model components to the UV plane model.
! The established model now contains 31 components and 0.467764 Jy
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Correcting IF 4.
! 
! Fit before self-cal, rms=0.136651Jy  sigma=1.607627
! Fit after  self-cal, rms=0.136552Jy  sigma=1.605900
! Inverting map 
print "************** FINISHED AMPLITUDE GSCALE SELF-CAL **************"
! ************** FINISHED AMPLITUDE GSCALE SELF-CAL ************** 
! 
phase_soltime=phase_soltime2
selfcal false, false, phase_soltime
! Performing phase self-cal over 0.5 minute time intervals
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Correcting IF 4.
! 
! Fit before self-cal, rms=0.136552Jy  sigma=1.605900
! Fit after  self-cal, rms=0.134066Jy  sigma=1.550127
dynam = dynam - 0.5
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 false,false,phase_soltime
  new_peak = peak(flux)
  until(new_peak<=flux_cutoff)
! clean: niter=200  gain=0.04  cutoff=0
! Component: 050  -  total flux cleaned = 0.000979958 Jy
! Component: 100  -  total flux cleaned = 0.000973769 Jy
! Component: 150  -  total flux cleaned = 0.000845942 Jy
! Component: 200  -  total flux cleaned = 0.000626108 Jy
! Total flux subtracted in 200 components = 0.000626108 Jy
! Clean residual min=-0.011426 max=0.020190 Jy/beam
! Clean residual mean=0.000567 rms=0.004826 Jy/beam
! Combined flux in latest and established models = 0.468391 Jy
! Performing phase self-cal over 0.5 minute time intervals
! Adding 16 model components to the UV plane model.
! The established model now contains 38 components and 0.468391 Jy
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Correcting IF 4.
! 
! Fit before self-cal, rms=0.133745Jy  sigma=1.545948
! Fit after  self-cal, rms=0.133858Jy  sigma=1.542461
! Inverting map 
print "*** FINISHED NATURAL WEIGHTING CLEAN with shorter phase_soltime ***"
! *** FINISHED NATURAL WEIGHTING CLEAN with shorter phase_soltime *** 
! 
dynam = dynam - 0.25
restore
! restore: Substituting estimate of restoring beam from last 'invert'.
! Restoring with beam: 3.724 x 7.299 at -6.424 degrees (North through East)
! Clean map  min=-0.011261  max=0.43435 Jy/beam
if(peak(flux) > thresh)
  selfcal true, true, amp_soltime1
  selfcal false, false, phase_soltime
  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 false,false,phase_soltime
    new_peak = peak(flux)
    until(new_peak<=flux_cutoff)
  selfcal true, true, amp_soltime2
  selfcal false, false, phase_soltime
  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 false,false,phase_soltime
    new_peak = peak(flux)
    until(new_peak<=flux_cutoff)
  print "************** FINISHED AMPLITUDE SELF-CAL **************"
  end if
! Performing amp+phase self-cal over 5 minute time intervals
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Correcting IF 4.
! 
! Fit before self-cal, rms=0.133858Jy  sigma=1.542461
! Fit after  self-cal, rms=0.118308Jy  sigma=1.229544
! Performing phase self-cal over 0.5 minute time intervals
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Correcting IF 4.
! 
! Fit before self-cal, rms=0.118308Jy  sigma=1.229544
! Fit after  self-cal, rms=0.118462Jy  sigma=1.229021
! Inverting map and beam 
! Estimated beam: bmin=3.723 mas, bmaj=7.252 mas, bpa=-6.019 degrees
! Estimated noise=0.880632 mJy/beam.
! Added new window around map position (-6.5, 9).
! clean: niter=200  gain=0.04  cutoff=0
! Component: 050  -  total flux cleaned = 0.0221362 Jy
! Component: 100  -  total flux cleaned = 0.0310818 Jy
! Component: 150  -  total flux cleaned = 0.0320112 Jy
! Component: 200  -  total flux cleaned = 0.0323559 Jy
! Total flux subtracted in 200 components = 0.0323559 Jy
! Clean residual min=-0.007039 max=0.013240 Jy/beam
! Clean residual mean=0.000332 rms=0.002929 Jy/beam
! Combined flux in latest and established models = 0.500746 Jy
! Performing phase self-cal over 0.5 minute time intervals
! Adding 40 model components to the UV plane model.
! The established model now contains 78 components and 0.500747 Jy
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Correcting IF 4.
! 
! Fit before self-cal, rms=0.116047Jy  sigma=1.170547
! Fit after  self-cal, rms=0.115642Jy  sigma=1.164598
! Inverting map 
! Added new window around map position (-41.5, 37.5).
! clean: niter=200  gain=0.04  cutoff=0
! Component: 050  -  total flux cleaned = 0.0169878 Jy
! Component: 100  -  total flux cleaned = 0.0241984 Jy
! Component: 150  -  total flux cleaned = 0.0275123 Jy
! Component: 200  -  total flux cleaned = 0.0305106 Jy
! Total flux subtracted in 200 components = 0.0305106 Jy
! Clean residual min=-0.006618 max=0.011494 Jy/beam
! Clean residual mean=0.000172 rms=0.002296 Jy/beam
! Combined flux in latest and established models = 0.531257 Jy
! Performing phase self-cal over 0.5 minute time intervals
! Adding 64 model components to the UV plane model.
! The established model now contains 138 components and 0.531257 Jy
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Correcting IF 4.
! 
! Fit before self-cal, rms=0.113208Jy  sigma=1.122494
! Fit after  self-cal, rms=0.113016Jy  sigma=1.117687
! Inverting map 
! Added new window around map position (-63, 36).
! clean: niter=200  gain=0.04  cutoff=0
! Component: 050  -  total flux cleaned = 0.013105 Jy
! Component: 100  -  total flux cleaned = 0.0200518 Jy
! Component: 150  -  total flux cleaned = 0.024518 Jy
! Component: 200  -  total flux cleaned = 0.0266707 Jy
! Total flux subtracted in 200 components = 0.0266708 Jy
! Clean residual min=-0.006193 max=0.005678 Jy/beam
! Clean residual mean=0.000034 rms=0.001799 Jy/beam
! Combined flux in latest and established models = 0.557928 Jy
! Performing phase self-cal over 0.5 minute time intervals
! Adding 67 model components to the UV plane model.
! The established model now contains 198 components and 0.557928 Jy
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Correcting IF 4.
! 
! Fit before self-cal, rms=0.111638Jy  sigma=1.092239
! Fit after  self-cal, rms=0.111649Jy  sigma=1.091104
! Inverting map 
! Performing amp+phase self-cal over 1 minute time intervals
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Correcting IF 4.
! 
! Fit before self-cal, rms=0.111649Jy  sigma=1.091104
! Fit after  self-cal, rms=0.107164Jy  sigma=1.021368
! Performing phase self-cal over 0.5 minute time intervals
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Correcting IF 4.
! 
! Fit before self-cal, rms=0.107164Jy  sigma=1.021368
! Fit after  self-cal, rms=0.107170Jy  sigma=1.021286
! Inverting map and beam 
! Estimated beam: bmin=3.717 mas, bmaj=7.204 mas, bpa=-5.999 degrees
! Estimated noise=0.877612 mJy/beam.
! clean: niter=200  gain=0.04  cutoff=0
! Component: 050  -  total flux cleaned = 0.00725885 Jy
! Component: 100  -  total flux cleaned = 0.0124208 Jy
! Component: 150  -  total flux cleaned = 0.0158946 Jy
! Component: 200  -  total flux cleaned = 0.0178611 Jy
! Total flux subtracted in 200 components = 0.0178611 Jy
! Clean residual min=-0.004973 max=0.005050 Jy/beam
! Clean residual mean=0.000066 rms=0.001536 Jy/beam
! Combined flux in latest and established models = 0.575789 Jy
! Performing phase self-cal over 0.5 minute time intervals
! Adding 55 model components to the UV plane model.
! The established model now contains 240 components and 0.575789 Jy
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Correcting IF 4.
! 
! Fit before self-cal, rms=0.106547Jy  sigma=1.010236
! Fit after  self-cal, rms=0.106518Jy  sigma=1.009512
! Inverting map 
! ************** FINISHED AMPLITUDE SELF-CAL ************** 
uvtaper 0.3,taper_size
! Gaussian taper: value 0.3 at UV radius = 20 mega-wavelengths.
win_mult = win_mult * 1.4
flux_cutoff = imstat(rms) * dynam
! Inverting map and beam 
! Estimated beam: bmin=8.536 mas, bmaj=10.89 mas, bpa=4.59 degrees
! Estimated noise=1.08731 mJy/beam.
repeat
  if (peak(flux) > flux_cutoff) peakwin win_mult
  clean clean_niter,clean_gain
  flux_cutoff = imstat(rms) * dynam
  selfcal false,false,phase_soltime
  new_peak = peak(flux)
  until(new_peak<=flux_cutoff)
! clean: niter=200  gain=0.04  cutoff=0
! Component: 050  -  total flux cleaned = 0.00565025 Jy
! Component: 100  -  total flux cleaned = 0.00766342 Jy
! Component: 150  -  total flux cleaned = 0.00929992 Jy
! Component: 200  -  total flux cleaned = 0.0105448 Jy
! Total flux subtracted in 200 components = 0.0105448 Jy
! Clean residual min=-0.006568 max=0.006319 Jy/beam
! Clean residual mean=0.000035 rms=0.002275 Jy/beam
! Combined flux in latest and established models = 0.586334 Jy
! Performing phase self-cal over 0.5 minute time intervals
! Adding 51 model components to the UV plane model.
! The established model now contains 275 components and 0.586334 Jy
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Correcting IF 4.
! 
! Fit before self-cal, rms=0.106289Jy  sigma=1.006177
! Fit after  self-cal, rms=0.106293Jy  sigma=1.005621
! Inverting map 
uvtaper 0,0
! No UV-taper is currently set.
win_mult = win_mult / 1.4
print "************** FINISHED TAPERING SELF-CAL CLEAN **************"
! ************** FINISHED TAPERING SELF-CAL CLEAN ************** 
! 
print "************** CLEARING MODEL AND STARTING OVER **********"
! ************** CLEARING MODEL AND STARTING OVER ********** 
clrmod true,true,true
! clrmod: Cleared the established, tentative and continuum 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=3.012 mas, bmaj=5.952 mas, bpa=-4.926 degrees
! Estimated noise=1.39933 mJy/beam.
! clean: niter=200  gain=0.04  cutoff=0
! Component: 050  -  total flux cleaned = 0.378833 Jy
! Component: 100  -  total flux cleaned = 0.43836 Jy
! Component: 150  -  total flux cleaned = 0.46272 Jy
! Component: 200  -  total flux cleaned = 0.478186 Jy
! Total flux subtracted in 200 components = 0.478186 Jy
! Clean residual min=-0.007674 max=0.008616 Jy/beam
! Clean residual mean=0.000172 rms=0.002269 Jy/beam
! Combined flux in latest and established models = 0.478186 Jy
uvw 0,-2
! Uniform weighting is not currently selected.
! Gridding weights will be scaled by errors raised to the power -2.
! Radial weighting is not currently selected.
flux_cutoff = imstat(rms) * dynam
! Adding 36 model components to the UV plane model.
! The established model now contains 36 components and 0.478185 Jy
! Inverting map and beam 
! Estimated beam: bmin=3.717 mas, bmaj=7.204 mas, bpa=-5.999 degrees
! Estimated noise=0.877612 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.04  cutoff=0
! Component: 050  -  total flux cleaned = 0.0240329 Jy
! Component: 100  -  total flux cleaned = 0.0409153 Jy
! Component: 150  -  total flux cleaned = 0.0532252 Jy
! Component: 200  -  total flux cleaned = 0.0619718 Jy
! Total flux subtracted in 200 components = 0.0619718 Jy
! Clean residual min=-0.006358 max=0.007680 Jy/beam
! Clean residual mean=0.000169 rms=0.002190 Jy/beam
! Combined flux in latest and established models = 0.540157 Jy
! Adding 96 model components to the UV plane model.
! The established model now contains 126 components and 0.540157 Jy
! Inverting map 
uvtaper 0.3,taper_size
! Gaussian taper: value 0.3 at UV radius = 20 mega-wavelengths.
flux_cutoff = imstat(rms) * dynam
! Inverting map and beam 
! Estimated beam: bmin=8.536 mas, bmaj=10.89 mas, bpa=4.59 degrees
! Estimated noise=1.08731 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.04  cutoff=0
! Component: 050  -  total flux cleaned = 0.0153233 Jy
! Component: 100  -  total flux cleaned = 0.0239952 Jy
! Component: 150  -  total flux cleaned = 0.0299646 Jy
! Component: 200  -  total flux cleaned = 0.034489 Jy
! Total flux subtracted in 200 components = 0.034489 Jy
! Clean residual min=-0.007070 max=0.007011 Jy/beam
! Clean residual mean=0.000080 rms=0.002474 Jy/beam
! Combined flux in latest and established models = 0.574646 Jy
! Adding 83 model components to the UV plane model.
! The established model now contains 193 components and 0.574646 Jy
! Inverting map 
uvtaper 0,0
! No UV-taper is currently set.
clean
! Inverting map and beam 
! Estimated beam: bmin=3.717 mas, bmaj=7.204 mas, bpa=-5.999 degrees
! Estimated noise=0.877612 mJy/beam.
! clean: niter=200  gain=0.04  cutoff=0
! Component: 050  -  total flux cleaned = 0.000868989 Jy
! Component: 100  -  total flux cleaned = 0.00215186 Jy
! Component: 150  -  total flux cleaned = 0.00343371 Jy
! Component: 200  -  total flux cleaned = 0.00434122 Jy
! Total flux subtracted in 200 components = 0.00434122 Jy
! Clean residual min=-0.004904 max=0.005491 Jy/beam
! Clean residual mean=0.000037 rms=0.001504 Jy/beam
! Combined flux in latest and established models = 0.578988 Jy
selfcal false, false, phase_soltime
! Performing phase self-cal over 0.5 minute time intervals
! Adding 34 model components to the UV plane model.
! The established model now contains 222 components and 0.578987 Jy
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Correcting IF 4.
! 
! Fit before self-cal, rms=0.106624Jy  sigma=1.011672
! Fit after  self-cal, rms=0.106495Jy  sigma=1.010207
dev /xwindow
! Attempting to open device: '/xwindow'
rflags="m3"
radplot
! Overriding default options with user defined rflags="m3"
! Move the cursor into the plot window and press 'H' for help
! Applying 17 buffered edits.
tplot
! Using default options string ""
! Move the cursor into the plot window and press 'H' for help
rflags="m1-"
radplot
! Overriding default options with user defined rflags="m1-"
! Move the cursor into the plot window and press 'H' for help
! Applying 6 buffered edits.
vplot 3
! Using default options string "efbm3"
! For help move the cursor into the plot window and press 'H'.
rflags="m3"
radplot
! Overriding default options with user defined rflags="m3"
! Move the cursor into the plot window and press 'H' for help
uncal true,true
! uncal: All telescope phase corrections have been un-done.
! uncal: All telescope amplitude corrections have been un-done.
wobs "J1540+1447_S_1997_01_11_pus\_uve.fits"
! Writing UV FITS file: J1540+1447_S_1997_01_11_pus_uve.fits
print "* Congratulations, you are done!"
! * Congratulations, you are done! 
quit
! Quitting program
! Log file J1540+1447_S_1997_01_11_pus_uve.log closed on Sun Feb  5 18:17:18 2006