! Started logfile: 0014+813_U.log on Mon Nov 18 13:57:19 1996
observe 0014+813_U.edt
! Reading UV FITS file: 0014+813_U.edt
! AN table 1: 31 integrations on 45 of 45 possible baselines.
! Apparent sampling: 0.864516 visibilities/baseline/integration-bin.
! Found source: 0014+813
! 
! Number of spectral-line channels: 1
! 
! IF    Freq (Hz)  Chan BW (Hz)  Full BW (Hz)  Sideband
! 01  1.49105e+10         8e+06         8e+06       USB
! 02  1.49205e+10         8e+06         8e+06       USB
! 03  1.49505e+10         8e+06         8e+06       USB
! 04  1.50105e+10         8e+06         8e+06       USB
! 05  1.51205e+10         8e+06         8e+06       USB
! 06  1.52005e+10         8e+06         8e+06       USB
! 07  1.52505e+10         8e+06         8e+06       USB
! 08  1.52705e+10         8e+06         8e+06       USB
! 
! Polarization(s): RR
! 
! Read 565 lines of history.
! 
! Reading 9648 visibilities.
! Selecting polarization: RR,  channels: 1..1
print "***********************************"
! *********************************** 
print "*** Using gonzo instruction set ***"
! *** Using gonzo instruction set *** 
print "***********************************"
! *********************************** 
float field_size
field_size = 1024
float field_cell
field_cell = 0.1
integer clean_niter
clean_niter = -100
float clean_gain
clean_gain = 0.03
float dynam
dynam = 8.0
float win_mult
win_mult = 1.5
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 62 telescope corrections were flagged in sub-array 1.
! 
! Correcting IF 2.
!  A total of 62 telescope corrections were flagged in sub-array 1.
! 
! Correcting IF 3.
!  A total of 62 telescope corrections were flagged in sub-array 1.
! 
! Correcting IF 4.
!  A total of 62 telescope corrections were flagged in sub-array 1.
! 
! Correcting IF 5.
!  A total of 62 telescope corrections were flagged in sub-array 1.
! 
! Correcting IF 6.
!  A total of 62 telescope corrections were flagged in sub-array 1.
! 
! Correcting IF 7.
!  A total of 62 telescope corrections were flagged in sub-array 1.
! 
! Correcting IF 8.
!  A total of 62 telescope corrections were flagged in sub-array 1.
! 
! Fit before self-cal, rms=0.572405Jy  sigma=3.445612
! Fit after  self-cal, rms=0.572009Jy  sigma=3.443616
! 
! Reinstating the default IF.
! 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.3944 mas, bmaj=0.7696 mas, bpa=65.94 degrees
! Estimated noise=2.43404 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=-100  gain=0.03  cutoff=0
! Component: 050  -  total flux cleaned = 0.314116 Jy
! Component: 100  -  total flux cleaned = 0.438937 Jy
! Total flux subtracted in 100 components = 0.438937 Jy
! Clean residual min=-0.020600 max=0.062278 Jy/beam
! Clean residual mean=0.000025 rms=0.006631 Jy/beam
! Combined flux in latest and established models = 0.438937 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 9 components and 0.438937 Jy
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Correcting IF 4.
! 
! Correcting IF 5.
! 
! Correcting IF 6.
! 
! Correcting IF 7.
! 
! Correcting IF 8.
! 
! Fit before self-cal, rms=0.187443Jy  sigma=1.126339
! Fit after  self-cal, rms=0.186558Jy  sigma=1.121056
! 
! Reinstating the default IF.
! Inverting map 
! Added new window around map position (0, 0.4).
! clean: niter=-100  gain=0.03  cutoff=0
! Component: 050  -  total flux cleaned = 0.0722965 Jy
! Component: 100  -  total flux cleaned = 0.117468 Jy
! Total flux subtracted in 100 components = 0.117468 Jy
! Clean residual min=-0.012328 max=0.026027 Jy/beam
! Clean residual mean=0.000008 rms=0.003656 Jy/beam
! Combined flux in latest and established models = 0.556405 Jy
! Performing phase self-cal over 0.666667 minute time intervals
! Adding 19 model components to the UV plane model.
! The established model now contains 24 components and 0.556405 Jy
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Correcting IF 4.
! 
! Correcting IF 5.
! 
! Correcting IF 6.
! 
! Correcting IF 7.
! 
! Correcting IF 8.
! 
! Fit before self-cal, rms=0.136097Jy  sigma=0.816518
! Fit after  self-cal, rms=0.135781Jy  sigma=0.814669
! 
! Reinstating the default IF.
! 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.3
clean_niter = clean_niter * 2
dynam = dynam - 1.0
doamp = false
flux_cutoff = imstat(rms) * dynam
! Inverting map and beam 
! Estimated beam: bmin=0.522 mas, bmaj=0.9242 mas, bpa=71.36 degrees
! Estimated noise=1.33043 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=-200  gain=0.03  cutoff=0
! Component: 050  -  total flux cleaned = 0.0475608 Jy
! Component: 100  -  total flux cleaned = 0.0726424 Jy
! Component: 150  -  total flux cleaned = 0.0872122 Jy
! Component: 200  -  total flux cleaned = 0.0962024 Jy
! Total flux subtracted in 200 components = 0.0962024 Jy
! Clean residual min=-0.007927 max=0.013787 Jy/beam
! Clean residual mean=-0.000013 rms=0.001992 Jy/beam
! Combined flux in latest and established models = 0.652607 Jy
! Performing phase self-cal over 0.666667 minute time intervals
! Adding 40 model components to the UV plane model.
! The established model now contains 49 components and 0.652607 Jy
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Correcting IF 4.
! 
! Correcting IF 5.
! 
! Correcting IF 6.
! 
! Correcting IF 7.
! 
! Correcting IF 8.
! 
! Fit before self-cal, rms=0.118820Jy  sigma=0.711330
! Fit after  self-cal, rms=0.118682Jy  sigma=0.710532
! 
! Reinstating the default IF.
! Inverting map 
print "****************************************"
! **************************************** 
print "*** Finished Natural Weighting CLEAN ***"
! *** Finished Natural Weighting CLEAN *** 
print "****************************************"
! **************************************** 
gscale true
! Performing overall amplitude self-cal
! 
! Correcting IF 1.
!  Telescope amplitude corrections in sub-array 1:
!   BR        0.97     FD        1.00     HN        1.06     KP        0.97     
!   LA        1.01     MK        1.05     NL        1.00     OV        0.99     
!   PT        0.95     SC        1.06     
! 
! 
! Correcting IF 2.
!  Telescope amplitude corrections in sub-array 1:
!   BR        0.96     FD        1.00     HN        1.08     KP        0.98     
!   LA        1.00     MK        0.99     NL        0.99     OV        0.99     
!   PT        0.99     SC        0.99     
! 
! 
! Correcting IF 3.
!  Telescope amplitude corrections in sub-array 1:
!   BR        0.95     FD        0.98     HN        1.04     KP        0.99     
!   LA        1.02     MK        1.07     NL        1.00     OV        1.04     
!   PT        0.98     SC        1.01     
! 
! 
! Correcting IF 4.
!  Telescope amplitude corrections in sub-array 1:
!   BR        0.95     FD        1.01     HN        1.07     KP        0.99     
!   LA        1.03     MK        1.09     NL        0.98     OV        1.00     
!   PT        0.98     SC        1.01     
! 
! 
! Correcting IF 5.
!  Telescope amplitude corrections in sub-array 1:
!   BR        0.96     FD        0.96     HN        1.06     KP        0.96     
!   LA        1.03     MK        1.08     NL        0.98     OV        1.00     
!   PT        0.96     SC        0.96     
! 
! 
! Correcting IF 6.
!  Telescope amplitude corrections in sub-array 1:
!   BR        0.96     FD        0.96     HN        1.06     KP        0.99     
!   LA        1.01     MK        1.01     NL        1.01     OV        1.02     
!   PT        0.96     SC        1.00     
! 
! 
! Correcting IF 7.
!  Telescope amplitude corrections in sub-array 1:
!   BR        0.94     FD        0.99     HN        1.10     KP        1.00     
!   LA        1.03     MK        1.03     NL        1.02     OV        1.01     
!   PT        0.95     SC        1.01     
! 
! 
! Correcting IF 8.
!  Telescope amplitude corrections in sub-array 1:
!   BR        0.99     FD        0.99     HN        1.05     KP        0.99     
!   LA        1.03     MK        1.00     NL        1.00     OV        1.02     
!   PT        0.98     SC        1.00     
! 
! 
! Fit before self-cal, rms=0.118682Jy  sigma=0.710532
! Fit after  self-cal, rms=0.117777Jy  sigma=0.697349
! 
! Reinstating the default IF.
clean_niter = -clean_niter
dynam = dynam - 0.5
doamp = false
flux_cutoff = imstat(rms) * dynam
! Inverting map and beam 
! Estimated beam: bmin=0.5279 mas, bmaj=0.9283 mas, bpa=71.65 degrees
! Estimated noise=1.33035 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=200  gain=0.03  cutoff=0
! Component: 050  -  total flux cleaned = -0.000299008 Jy
! Component: 100  -  total flux cleaned = -0.000205064 Jy
! Component: 150  -  total flux cleaned = -0.000276324 Jy
! Component: 200  -  total flux cleaned = -0.000209062 Jy
! Total flux subtracted in 200 components = -0.000209062 Jy
! Clean residual min=-0.007675 max=0.007672 Jy/beam
! Clean residual mean=-0.000011 rms=0.001595 Jy/beam
! Combined flux in latest and established models = 0.652398 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 55 components and 0.652398 Jy
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Correcting IF 4.
! 
! Correcting IF 5.
! 
! Correcting IF 6.
! 
! Correcting IF 7.
! 
! Correcting IF 8.
! 
! Fit before self-cal, rms=0.117666Jy  sigma=0.696637
! Fit after  self-cal, rms=0.117650Jy  sigma=0.696534
! 
! Reinstating the default IF.
! 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=200  gain=0.03  cutoff=0
! Component: 050  -  total flux cleaned = 6.36004e-05 Jy
! Component: 100  -  total flux cleaned = 0.000180517 Jy
! Component: 150  -  total flux cleaned = 0.000231415 Jy
! Component: 200  -  total flux cleaned = 0.000278518 Jy
! Total flux subtracted in 200 components = 0.000278518 Jy
! Clean residual min=-0.007659 max=0.007395 Jy/beam
! Clean residual mean=-0.000011 rms=0.001587 Jy/beam
! Combined flux in latest and established models = 0.652677 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 57 components and 0.652677 Jy
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Correcting IF 4.
! 
! Correcting IF 5.
! 
! Correcting IF 6.
! 
! Correcting IF 7.
! 
! Correcting IF 8.
! 
! Fit before self-cal, rms=0.117606Jy  sigma=0.696257
! Fit after  self-cal, rms=0.116747Jy  sigma=0.678445
! 
! Reinstating the default IF.
! Inverting map and beam 
! Estimated beam: bmin=0.5294 mas, bmaj=0.9323 mas, bpa=71.74 degrees
! Estimated noise=1.33381 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 (0.1, -0.8).
! clean: niter=200  gain=0.03  cutoff=0
! Component: 050  -  total flux cleaned = 0.00555144 Jy
! Component: 100  -  total flux cleaned = 0.00558043 Jy
! Component: 150  -  total flux cleaned = 0.00503562 Jy
! Component: 200  -  total flux cleaned = 0.00466981 Jy
! Total flux subtracted in 200 components = 0.00466981 Jy
! Clean residual min=-0.005353 max=0.004675 Jy/beam
! Clean residual mean=0.000004 rms=0.001022 Jy/beam
! Combined flux in latest and established models = 0.657347 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 67 components and 0.657347 Jy
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Correcting IF 4.
! 
! Correcting IF 5.
! 
! Correcting IF 6.
! 
! Correcting IF 7.
! 
! Correcting IF 8.
! 
! Fit before self-cal, rms=0.116344Jy  sigma=0.676046
! Fit after  self-cal, rms=0.116290Jy  sigma=0.675717
! 
! Reinstating the default IF.
! Inverting map 
print "***********************************"
! *********************************** 
print "*** Finished Amplitude Self-Cal ***"
! *** Finished Amplitude Self-Cal *** 
print "***********************************"
! *********************************** 
save 0014+813_U
! Writing UV FITS file: 0014+813_U.uvf
! Writing 67 model components to file: 0014+813_U.mod
! wwins: Wrote 3 windows to 0014+813_U.win
! restore: Substituting estimate of restoring beam from last 'invert'.
! Restoring with beam: 0.5294 x 0.9323 at 71.74 degrees (North through East)
! Clean map  min=-0.0047208  max=0.44341 Jy/beam
! Writing clean map to FITS file: 0014+813_U.fits
! Writing difmap environment to: 0014+813_U.par
print "****************************"
! **************************** 
print "*** Now, make some plots ***"
! *** Now, make some plots *** 
print "****************************"
! **************************** 
device 0014+813_Uuv.ps/vps,1,2
! Attempting to open device: '0014+813_Uuv.ps/vps'
radplot
! Using default options string "m1"
uvplot
device 0014+813_Uim.ps/vps
! Attempting to open device: '0014+813_Uim.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.5294 mas, bmaj=0.9323 mas, bpa=71.74 degrees
! Estimated noise=1.33381 mJy/beam.
! The new contour levels are:
!  -0.00302445 0.00302445 0.0060489 0.0120978 0.0241956 0.0483912 0.0967823 0.193565 0.387129 0.774259 1.54852 3.09704 6.19407 12.3881 24.7763 49.5526 99.1051 198.21 396.421 792.841 1585.68 3171.36 6342.73 12685.5
mappl cln
! restore: Substituting estimate of restoring beam from last 'invert'.
! Restoring with beam: 0.5294 x 0.9323 at 71.74 degrees (North through East)
! Clean map  min=-0.0047208  max=0.44341 Jy/beam
quit
! Quitting program
! Log file 0014+813_U.log closed on Mon Nov 18 13:59:00 1996