! Started logfile: J0121+0422_X_1997_01_10_pus_uvs.log on Sun Jan 29 10:25:09 2006
obs J0121+0422_X_1997_01_10_pus_uva.fits
! Reading UV FITS file: J0121+0422_X_1997_01_10_pus_uva.fits
! AN table 1: 273 integrations on 45 of 45 possible baselines.
! Apparent sampling: 0.65991 visibilities/baseline/integration-bin.
! Found source: J0121+0422
! 
! 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.15049e+09        8e+06          1        8e+06
!  02        2  8.23424e+09        8e+06          1        8e+06
!  03        3  8.41424e+09        8e+06          1        8e+06
!  04        4  8.55424e+09        8e+06          1        8e+06
! 
! Polarization(s): RR
! 
! Read 493 lines of history.
! 
! Reading 32428 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
integer clean_niter
clean_niter = 100
float clean_gain
clean_gain = 0.04
float dynam
dynam = 6.0
float amp_soltime1
amp_soltime1 = 10
float amp_soltime2
amp_soltime2 = 1
float phase_soltime1
phase_soltime1=10
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 time_av
time_av = 30
float old_peak
float new_peak
float flux_cutoff
mapsize field_size, field_cell
! Map grid = 256x256 pixels with 0.200x0.200 milli-arcsec cellsize.
phase_soltime=phase_soltime1
print "uvstat(rms)=",uvstat(rms),"Jy"
! uvstat(rms)= 0.736127 Jy 
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=0.7796 mas, bmaj=1.702 mas, bpa=-2.802 degrees
! Estimated noise=1126.24 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.527628 Jy
! Component: 100  -  total flux cleaned = 0.669743 Jy
! Total flux subtracted in 100 components = 0.669743 Jy
! Clean residual min=-0.049784 max=0.055060 Jy/beam
! Clean residual mean=-0.000315 rms=0.014780 Jy/beam
! Combined flux in latest and established models = 0.669743 Jy
! Performing phase self-cal over 10 minute time intervals
! Adding 10 model components to the UV plane model.
! The established model now contains 10 components and 0.669743 Jy
! 
! Correcting IF 1.
!  A total of 526 telescope corrections were flagged in sub-array 1.
! 
! Correcting IF 2.
!  A total of 526 telescope corrections were flagged in sub-array 1.
! 
! Correcting IF 3.
!  A total of 526 telescope corrections were flagged in sub-array 1.
! 
! Correcting IF 4.
!  A total of 594 telescope corrections were flagged in sub-array 1.
! 
! Fit before self-cal, rms=0.376871Jy  sigma=0.002464
! Fit after  self-cal, rms=0.348946Jy  sigma=0.002263
! Inverting map and beam 
! Estimated beam: bmin=0.7795 mas, bmaj=1.702 mas, bpa=-2.805 degrees
! Estimated noise=1126.2 mJy/beam.
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=0.9405 mas, bmaj=2.011 mas, bpa=-4.267 degrees
! Estimated noise=577.775 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.101888 Jy
! Component: 100  -  total flux cleaned = 0.141767 Jy
! Component: 150  -  total flux cleaned = 0.157376 Jy
! Component: 200  -  total flux cleaned = 0.160092 Jy
! Total flux subtracted in 200 components = 0.160092 Jy
! Clean residual min=-0.025772 max=0.037531 Jy/beam
! Clean residual mean=-0.001974 rms=0.008083 Jy/beam
! Combined flux in latest and established models = 0.829835 Jy
! Performing phase self-cal over 10 minute time intervals
! Adding 15 model components to the UV plane model.
! The established model now contains 20 components and 0.829835 Jy
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Correcting IF 4.
! 
! Fit before self-cal, rms=0.340308Jy  sigma=0.002119
! Fit after  self-cal, rms=0.339904Jy  sigma=0.002116
! Inverting map 
print "************** FINISHED NATURAL WEIGHTING CLEAN **************"
! ************** FINISHED NATURAL WEIGHTING CLEAN ************** 
! 
restore
! restore: Substituting estimate of restoring beam from last 'invert'.
! Restoring with beam: 0.9405 x 2.011 at -4.267 degrees (North through East)
! Clean map  min=-0.025347  max=0.63909 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: 0.979085
!  Telescope amplitude corrections in sub-array 1:
!   BR        0.92     FD        0.91     HN        1.40     KP        0.90     
!   LA        0.94     MK        0.91     NL        1.17     OV        0.88     
!   PT        1.23     SC        0.95     
! 
! 
! Correcting IF 2.
!  Amplitude normalization factor in sub-array 1: 0.978355
!  Telescope amplitude corrections in sub-array 1:
!   BR        0.92     FD        0.90     HN        1.38     KP        0.89     
!   LA        0.94     MK        0.89     NL        1.17     OV        0.90     
!   PT        1.22     SC        1.00     
! 
! 
! Correcting IF 3.
!  Amplitude normalization factor in sub-array 1: 0.961424
!  Telescope amplitude corrections in sub-array 1:
!   BR        0.93     FD        0.93     HN        1.44     KP        0.88     
!   LA        0.95     MK        0.91     NL        1.20     OV        0.86     
!   PT        1.24     SC        1.06     
! 
! 
! Correcting IF 4.
!  Amplitude normalization factor in sub-array 1: 0.946158
!  Telescope amplitude corrections in sub-array 1:
!   BR        0.95     FD        0.91     HN        1.55     KP        0.89     
!   LA        0.97     MK        0.91     NL        1.22     OV        0.87     
!   PT        1.25     SC        1.06     
! 
! 
! Fit before self-cal, rms=0.339904Jy  sigma=0.002116
! Fit after  self-cal, rms=0.320364Jy  sigma=0.001947
selfcal false, false, phase_soltime
! Performing phase self-cal over 10 minute time intervals
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Correcting IF 4.
! 
! Fit before self-cal, rms=0.320364Jy  sigma=0.001947
! Fit after  self-cal, rms=0.320118Jy  sigma=0.001945
dynam = dynam - 0.5
flux_cutoff = imstat(rms) * dynam
! Inverting map and beam 
! Estimated beam: bmin=0.9384 mas, bmaj=2.002 mas, bpa=-4.704 degrees
! Estimated noise=526.35 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.0405737 Jy
! Component: 100  -  total flux cleaned = -0.0533216 Jy
! Component: 150  -  total flux cleaned = -0.0580174 Jy
! Component: 200  -  total flux cleaned = -0.0595422 Jy
! Total flux subtracted in 200 components = -0.0595422 Jy
! Clean residual min=-0.009809 max=0.010852 Jy/beam
! Clean residual mean=0.000024 rms=0.002736 Jy/beam
! Combined flux in latest and established models = 0.770293 Jy
! Performing phase self-cal over 10 minute time intervals
! Adding 15 model components to the UV plane model.
! The established model now contains 28 components and 0.770293 Jy
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Correcting IF 4.
! 
! Fit before self-cal, rms=0.314430Jy  sigma=0.001912
! Fit after  self-cal, rms=0.314169Jy  sigma=0.001910
! 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.314169Jy  sigma=0.001910
! Fit after  self-cal, rms=0.256928Jy  sigma=0.001445
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.0190285 Jy
! Component: 100  -  total flux cleaned = 0.0205283 Jy
! Component: 150  -  total flux cleaned = 0.0199313 Jy
! Component: 200  -  total flux cleaned = 0.0192467 Jy
! Total flux subtracted in 200 components = 0.0192467 Jy
! Clean residual min=-0.005651 max=0.010042 Jy/beam
! Clean residual mean=-0.000053 rms=0.001956 Jy/beam
! Combined flux in latest and established models = 0.789539 Jy
! Performing phase self-cal over 0.5 minute time intervals
! Adding 10 model components to the UV plane model.
! The established model now contains 32 components and 0.789539 Jy
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Correcting IF 4.
! 
! Fit before self-cal, rms=0.256821Jy  sigma=0.001434
! Fit after  self-cal, rms=0.251520Jy  sigma=0.001385
! Inverting map 
! Added new window around map position (1.8, -1.6).
! clean: niter=200  gain=0.04  cutoff=0
! Component: 050  -  total flux cleaned = 0.00997273 Jy
! Component: 100  -  total flux cleaned = 0.0104918 Jy
! Component: 150  -  total flux cleaned = 0.0102783 Jy
! Component: 200  -  total flux cleaned = 0.0102689 Jy
! Total flux subtracted in 200 components = 0.0102689 Jy
! Clean residual min=-0.004401 max=0.006113 Jy/beam
! Clean residual mean=-0.000100 rms=0.001564 Jy/beam
! Combined flux in latest and established models = 0.799808 Jy
! Performing phase self-cal over 0.5 minute time intervals
! Adding 21 model components to the UV plane model.
! The established model now contains 48 components and 0.799808 Jy
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Correcting IF 4.
! 
! Fit before self-cal, rms=0.250913Jy  sigma=0.001380
! Fit after  self-cal, rms=0.249560Jy  sigma=0.001367
! 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: 0.9384 x 2.002 at -4.704 degrees (North through East)
! Clean map  min=-0.0039163  max=0.61893 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 10 minute time intervals
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Correcting IF 4.
! 
! Fit before self-cal, rms=0.249560Jy  sigma=0.001367
! Fit after  self-cal, rms=0.296447Jy  sigma=0.001342
! 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.296447Jy  sigma=0.001342
! Fit after  self-cal, rms=0.296050Jy  sigma=0.001337
! Inverting map and beam 
! Estimated beam: bmin=0.9326 mas, bmaj=1.988 mas, bpa=-4.4 degrees
! Estimated noise=522.788 mJy/beam.
! clean: niter=200  gain=0.04  cutoff=0
! Component: 050  -  total flux cleaned = 0.00219716 Jy
! Component: 100  -  total flux cleaned = 0.00242129 Jy
! Component: 150  -  total flux cleaned = 0.00233373 Jy
! Component: 200  -  total flux cleaned = 0.00217822 Jy
! Total flux subtracted in 200 components = 0.00217822 Jy
! Clean residual min=-0.002790 max=0.003210 Jy/beam
! Clean residual mean=-0.000087 rms=0.000824 Jy/beam
! Combined flux in latest and established models = 0.801986 Jy
! Performing phase self-cal over 0.5 minute time intervals
! Adding 18 model components to the UV plane model.
! The established model now contains 60 components and 0.801986 Jy
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Correcting IF 4.
! 
! Fit before self-cal, rms=0.295950Jy  sigma=0.001336
! Fit after  self-cal, rms=0.295774Jy  sigma=0.001334
! 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.295774Jy  sigma=0.001334
! Fit after  self-cal, rms=0.297113Jy  sigma=0.001332
! 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.297113Jy  sigma=0.001332
! Fit after  self-cal, rms=0.297041Jy  sigma=0.001331
! Inverting map and beam 
! Estimated beam: bmin=0.9295 mas, bmaj=1.983 mas, bpa=-4.265 degrees
! Estimated noise=522.186 mJy/beam.
! clean: niter=200  gain=0.04  cutoff=0
! Component: 050  -  total flux cleaned = 0.00134731 Jy
! Component: 100  -  total flux cleaned = 0.00157178 Jy
! Component: 150  -  total flux cleaned = 0.00162957 Jy
! Component: 200  -  total flux cleaned = 0.00178586 Jy
! Total flux subtracted in 200 components = 0.00178586 Jy
! Clean residual min=-0.002734 max=0.002939 Jy/beam
! Clean residual mean=-0.000073 rms=0.000757 Jy/beam
! Combined flux in latest and established models = 0.803772 Jy
! Performing phase self-cal over 0.5 minute time intervals
! Adding 19 model components to the UV plane model.
! The established model now contains 68 components and 0.803772 Jy
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Correcting IF 4.
! 
! Fit before self-cal, rms=0.297004Jy  sigma=0.001331
! Fit after  self-cal, rms=0.296961Jy  sigma=0.001330
! Inverting map 
! ************** FINISHED AMPLITUDE SELF-CAL ************** 
uvtaper 0.3,taper_size
! Gaussian taper: value 0.3 at UV radius = 70 mega-wavelengths.
win_mult = win_mult * 1.4
flux_cutoff = imstat(rms) * dynam
! Inverting map and beam 
! Estimated beam: bmin=2.264 mas, bmaj=3.061 mas, bpa=8.548 degrees
! Estimated noise=675.178 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.000800751 Jy
! Component: 100  -  total flux cleaned = 0.00105622 Jy
! Component: 150  -  total flux cleaned = 0.00116613 Jy
! Component: 200  -  total flux cleaned = 0.00119203 Jy
! Total flux subtracted in 200 components = 0.00119203 Jy
! Clean residual min=-0.002734 max=0.003160 Jy/beam
! Clean residual mean=-0.000162 rms=0.000945 Jy/beam
! Combined flux in latest and established models = 0.804964 Jy
! Performing phase self-cal over 0.5 minute time intervals
! Adding 15 model components to the UV plane model.
! The established model now contains 77 components and 0.804964 Jy
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Correcting IF 4.
! 
! Fit before self-cal, rms=0.296956Jy  sigma=0.001330
! Fit after  self-cal, rms=0.296928Jy  sigma=0.001329
! Inverting map 
uvtaper 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=0.771 mas, bmaj=1.695 mas, bpa=-2.783 degrees
! Estimated noise=1033.69 mJy/beam.
! clean: niter=200  gain=0.04  cutoff=0
! Component: 050  -  total flux cleaned = 0.528282 Jy
! Component: 100  -  total flux cleaned = 0.680352 Jy
! Component: 150  -  total flux cleaned = 0.741503 Jy
! Component: 200  -  total flux cleaned = 0.768879 Jy
! Total flux subtracted in 200 components = 0.768879 Jy
! Clean residual min=-0.005948 max=0.009228 Jy/beam
! Clean residual mean=0.000048 rms=0.001873 Jy/beam
! Combined flux in latest and established models = 0.768879 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 16 model components to the UV plane model.
! The established model now contains 16 components and 0.768879 Jy
! Inverting map and beam 
! Estimated beam: bmin=0.9295 mas, bmaj=1.983 mas, bpa=-4.265 degrees
! Estimated noise=522.186 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.0174427 Jy
! Component: 100  -  total flux cleaned = 0.0258121 Jy
! Component: 150  -  total flux cleaned = 0.0305439 Jy
! Component: 200  -  total flux cleaned = 0.0323951 Jy
! Total flux subtracted in 200 components = 0.0323951 Jy
! Clean residual min=-0.002665 max=0.002455 Jy/beam
! Clean residual mean=-0.000066 rms=0.000788 Jy/beam
! Combined flux in latest and established models = 0.801274 Jy
! Adding 33 model components to the UV plane model.
! The established model now contains 41 components and 0.801274 Jy
! Inverting map 
uvtaper 0.3,taper_size
! Gaussian taper: value 0.3 at UV radius = 70 mega-wavelengths.
flux_cutoff = imstat(rms) * dynam
! Inverting map and beam 
! Estimated beam: bmin=2.264 mas, bmaj=3.061 mas, bpa=8.548 degrees
! Estimated noise=675.178 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.00283423 Jy
! Component: 100  -  total flux cleaned = 0.00365198 Jy
! Component: 150  -  total flux cleaned = 0.00374433 Jy
! Component: 200  -  total flux cleaned = 0.00386492 Jy
! Total flux subtracted in 200 components = 0.00386492 Jy
! Clean residual min=-0.002709 max=0.002894 Jy/beam
! Clean residual mean=-0.000167 rms=0.000939 Jy/beam
! Combined flux in latest and established models = 0.805139 Jy
! Adding 29 model components to the UV plane model.
! The established model now contains 64 components and 0.805139 Jy
! Inverting map 
uvtaper 0
! No UV-taper is currently set.
clean
! Inverting map and beam 
! Estimated beam: bmin=0.9295 mas, bmaj=1.983 mas, bpa=-4.265 degrees
! Estimated noise=522.186 mJy/beam.
! clean: niter=200  gain=0.04  cutoff=0
! Component: 050  -  total flux cleaned = -0.000175923 Jy
! Component: 100  -  total flux cleaned = -0.000424936 Jy
! Component: 150  -  total flux cleaned = -0.000696412 Jy
! Component: 200  -  total flux cleaned = -0.000888198 Jy
! Total flux subtracted in 200 components = -0.000888198 Jy
! Clean residual min=-0.002444 max=0.002604 Jy/beam
! Clean residual mean=-0.000074 rms=0.000732 Jy/beam
! Combined flux in latest and established models = 0.804251 Jy
selfcal false, false, phase_soltime
! Performing phase self-cal over 0.5 minute time intervals
! Adding 17 model components to the UV plane model.
! The established model now contains 77 components and 0.804251 Jy
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Correcting IF 4.
! 
! Fit before self-cal, rms=0.296899Jy  sigma=0.001329
! Fit after  self-cal, rms=0.296881Jy  sigma=0.001329
wmodel J0121+0422_X_1997_01_10_pus\_map.mod
! Writing 77 model components to file: J0121+0422_X_1997_01_10_pus_map.mod
wobs J0121+0422_X_1997_01_10_pus\_uvs.fits
! Writing UV FITS file: J0121+0422_X_1997_01_10_pus_uvs.fits
wwins J0121+0422_X_1997_01_10_pus\_map.win
! wwins: Wrote 2 windows to J0121+0422_X_1997_01_10_pus_map.win
x = (field_size-8) * field_cell / 4
addwin -x,x,-x,x
clean (field_size*4),0.01
! Inverting map 
! clean: niter=1024  gain=0.01  cutoff=0
! Component: 050  -  total flux cleaned = -6.88913e-05 Jy
! Component: 100  -  total flux cleaned = -0.000594515 Jy
! Component: 150  -  total flux cleaned = -0.00116361 Jy
! Component: 200  -  total flux cleaned = -0.00145142 Jy
! Component: 250  -  total flux cleaned = -0.00176211 Jy
! Component: 300  -  total flux cleaned = -0.00206179 Jy
! Component: 350  -  total flux cleaned = -0.00231869 Jy
! Component: 400  -  total flux cleaned = -0.00250615 Jy
! Component: 450  -  total flux cleaned = -0.00265848 Jy
! Component: 500  -  total flux cleaned = -0.00286587 Jy
! Component: 550  -  total flux cleaned = -0.00301025 Jy
! Component: 600  -  total flux cleaned = -0.00315125 Jy
! Component: 650  -  total flux cleaned = -0.00340011 Jy
! Component: 700  -  total flux cleaned = -0.00361691 Jy
! Component: 750  -  total flux cleaned = -0.00390895 Jy
! Component: 800  -  total flux cleaned = -0.00406526 Jy
! Component: 850  -  total flux cleaned = -0.00429653 Jy
! Component: 900  -  total flux cleaned = -0.00449806 Jy
! Component: 950  -  total flux cleaned = -0.00464704 Jy
! Component: 1000  -  total flux cleaned = -0.00484251 Jy
! Total flux subtracted in 1024 components = -0.00498714 Jy
! Clean residual min=-0.001434 max=0.001792 Jy/beam
! Clean residual mean=-0.000057 rms=0.000517 Jy/beam
! Combined flux in latest and established models = 0.799264 Jy
keep
! Adding 65 model components to the UV plane model.
! The established model now contains 142 components and 0.799264 Jy
wmap "J0121+0422_X_1997_01_10_pus\_map.fits"
! Inverting map 
! restore: Substituting estimate of restoring beam from last 'invert'.
! Restoring with beam: 0.9295 x 1.983 at -4.265 degrees (North through East)
! Clean map  min=-0.0021271  max=0.61532 Jy/beam
! Writing clean map to FITS file: J0121+0422_X_1997_01_10_pus_map.fits
float peak_flux
peak_flux = peak(flux,max)
print "The peak flux is",peak_flux
! The peak flux is 0.615318 
invert
! Inverting map 
float image_rms
image_rms = imstat(rms)
print "The final image rms is",image_rms
! The final image rms is 0.000513124 
device "J0121+0422_X_1997_01_10_pus\_map.eps/VPS"
! Attempting to open device: 'J0121+0422_X_1997_01_10_pus_map.eps/VPS'
loglevs 100*3*image_rms/peak_flux
! The new contour levels are:
!  -0.250175 0.250175 0.50035 1.0007 2.0014 4.0028 8.0056 16.0112 32.0224 64.0448
print "clev=",int(3*image_rms*10000)/10000
! clev= 0.0015 
print "peak=",int(peak_flux*1000)/1000
! peak= 0.615 
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.9295 x 1.983 at -4.265 degrees (North through East)
! Clean map  min=-0.0021271  max=0.61532 Jy/beam
mapcolor color, 0.9
! Mapplot colormap: rainbow, contrast: 0.9 brightness: 0.5.
device "J0121+0422_X_1997_01_10_pus\_map.gif/vgif"
! Attempting to open device: 'J0121+0422_X_1997_01_10_pus_map.gif/vgif'
mapplot cln
quit
! Quitting program
! Log file J0121+0422_X_1997_01_10_pus_uvs.log closed on Sun Jan 29 10:25:38 2006