! Started logfile: .//J1902-2329_C_dfm.log on Mon Jan 20 18:51:07 2020
float field_size
field_size =  1024
float field_cell
field_cell =   0.3000
float taper_size
taper_size =   40.0
float freq
freq       =    4.12800
obs     .//J1902-2329_C_uva.fits
! Reading UV FITS file: .//J1902-2329_C_uva.fits
! AN table 1: 15 integrations on 6 of 6 possible baselines.
! Apparent sampling: 1 visibilities/baseline/integration-bin.
! Found source: J1902-2329
! 
! There are 8 IFs, and a total of 8 channels:
! 
!  IF  Channel    Frequency  Freq offset  Number of   Overall IF
!       origin    at origin  per channel   channels    bandwidth
!  ------------------------------------------------------------- (Hz)
!  01        1    4.128e+09      3.2e+07          1      3.2e+07
!  02        2     4.16e+09      3.2e+07          1      3.2e+07
!  03        3    4.192e+09      3.2e+07          1      3.2e+07
!  04        4    4.224e+09      3.2e+07          1      3.2e+07
!  05        5    4.416e+09      3.2e+07          1      3.2e+07
!  06        6    4.512e+09      3.2e+07          1      3.2e+07
!  07        7    4.544e+09      3.2e+07          1      3.2e+07
!  08        8    4.576e+09      3.2e+07          1      3.2e+07
! 
! Polarization(s): RR
! 
! Read 67 lines of history.
! 
! Reading 720 visibilities.
select rr, 1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16 
! Restricting channel ranges to the available 8 channels.
! Selecting polarization: RR,  channels: 1..8
! Reading IF 1 channels: 1..1
! Reading IF 2 channels: 2..2
! Reading IF 3 channels: 3..3
! Reading IF 4 channels: 4..4
! Reading IF 5 channels: 5..5
! Reading IF 6 channels: 6..6
! Reading IF 7 channels: 7..7
! Reading IF 8 channels: 8..8
print "field_size =", field_size
! field_size = 1024 
print "field_cell =", field_cell
! field_cell = 0.3 
print "taper_size =", taper_size
! taper_size = 40 
![@/opt64/bin/pima_mupet_01.dfm J1902-2329_C]
float lim_self
lim_self = 120.0
float lim_val
lim_va   = 1.2
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
print "==============================================================="
! =============================================================== 
! 
print "=== Difmap script: pima_mupet_01.dvm version of 2016.05.19 === "
! === Difmap script: pima_mupet_01.dvm version of 2016.05.19 ===  
! 
mapsize field_size, field_cell
! Map grid = 1024x1024 pixels with 0.300x0.300 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.
! 
! 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=1.000575Jy  sigma=20.570474
! Fit after  self-cal, rms=0.973139Jy  sigma=19.991296
! 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=6.242 mas, bmaj=38.93 mas, bpa=12.03 degrees
! Estimated noise=1.81482 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)
! clean: niter=100  gain=0.03  cutoff=0
! Component: 050  -  total flux cleaned = 0.0208322 Jy
! Component: 100  -  total flux cleaned = 0.0228424 Jy
! Total flux subtracted in 100 components = 0.0228424 Jy
! Clean residual min=-0.002658 max=0.002651 Jy/beam
! Clean residual mean=0.000013 rms=0.001274 Jy/beam
! Combined flux in latest and established models = 0.0228424 Jy
! Performing phase self-cal
! Adding 19 model components to the UV plane model.
! The established model now contains 19 components and 0.0228424 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.032526Jy  sigma=0.650316
! Fit after  self-cal, rms=0.031388Jy  sigma=0.625328
! Inverting map 
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 
! Estimated beam: bmin=7.021 mas, bmaj=35 mas, bpa=10.04 degrees
! Estimated noise=1.29467 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)
! clean: niter=200  gain=0.03  cutoff=0
! Component: 050  -  total flux cleaned = -0.00124521 Jy
! Component: 100  -  total flux cleaned = -0.00171909 Jy
! Component: 150  -  total flux cleaned = -0.00186047 Jy
! Component: 200  -  total flux cleaned = -0.00150472 Jy
! Total flux subtracted in 200 components = -0.00150472 Jy
! Clean residual min=-0.001943 max=0.001941 Jy/beam
! Clean residual mean=0.000000 rms=0.000758 Jy/beam
! Combined flux in latest and established models = 0.0213377 Jy
! Performing phase self-cal
! Adding 81 model components to the UV plane model.
! The established model now contains 99 components and 0.0213377 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.030265Jy  sigma=0.601115
! Fit after  self-cal, rms=0.029943Jy  sigma=0.593061
! Inverting map 
print "============== Finished natural weighting clean =============="
! ============== Finished natural weighting clean ============== 
! 
restore
! restore: Substituting estimate of restoring beam from last 'invert'.
! Restoring with beam: 7.021 x 35 at 10.04 degrees (North through East)
! Clean map  min=-0.0052476  max=0.023107 Jy/beam
gscale true
! Performing overall amplitude self-cal
! 
! Correcting IF 1.
!  Telescope amplitude corrections in sub-array 1:
!   FD        0.84     KP        1.06     OV        0.93     PT        0.88     
! 
! 
! Correcting IF 2.
!  Telescope amplitude corrections in sub-array 1:
!   FD        0.90     KP        1.04     OV        1.21     PT        0.87     
! 
! 
! Correcting IF 3.
!  Telescope amplitude corrections in sub-array 1:
!   FD        1.16     KP        1.02     OV        1.15     PT        0.86     
! 
! 
! Correcting IF 4.
!  Telescope amplitude corrections in sub-array 1:
!   FD        1.09     KP        1.29     OV        0.74     PT        0.96     
! 
! 
! Correcting IF 5.
!  Telescope amplitude corrections in sub-array 1:
!   FD        1.36     KP        1.20     OV        0.96     PT        0.81     
! 
! 
! Correcting IF 6.
!  Telescope amplitude corrections in sub-array 1:
!   FD        0.92     KP        1.13     OV        1.36     PT        1.04     
! 
! 
! Correcting IF 7.
!  Telescope amplitude corrections in sub-array 1:
!   FD        1.18     KP        0.95     OV        1.11     PT        0.90     
! 
! 
! Correcting IF 8.
!  Telescope amplitude corrections in sub-array 1:
!   FD        0.69     KP        1.14     OV        1.18     PT        1.05     
! 
! 
! Fit before self-cal, rms=0.029943Jy  sigma=0.593061
! Fit after  self-cal, rms=0.031330Jy  sigma=0.580895
dynam = dynam - 0.5
flux_cutoff = imstat(rms) * dynam
! Inverting map and beam 
! Estimated beam: bmin=7.071 mas, bmaj=35.02 mas, bpa=9.923 degrees
! Estimated noise=1.31384 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)
! clean: niter=200  gain=0.03  cutoff=0
! Component: 050  -  total flux cleaned = 0.000487019 Jy
! Component: 100  -  total flux cleaned = 0.00057687 Jy
! Component: 150  -  total flux cleaned = 0.000834994 Jy
! Component: 200  -  total flux cleaned = 0.00107373 Jy
! Total flux subtracted in 200 components = 0.00107373 Jy
! Clean residual min=-0.000554 max=0.000555 Jy/beam
! Clean residual mean=-0.000002 rms=0.000208 Jy/beam
! Combined flux in latest and established models = 0.0224115 Jy
! Performing phase self-cal
! Adding 66 model components to the UV plane model.
! The established model now contains 165 components and 0.0224115 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.031172Jy  sigma=0.578282
! Fit after  self-cal, rms=0.031480Jy  sigma=0.573636
! Inverting map 
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.
! 
! Correcting IF 5.
! 
! Correcting IF 6.
! 
! Correcting IF 7.
! 
! Correcting IF 8.
! 
! Fit before self-cal, rms=0.031480Jy  sigma=0.573636
! Fit after  self-cal, rms=0.033291Jy  sigma=0.572130
dynam = dynam - 0.75
clean clean_niter,clean_gain
! Inverting map and beam 
! Estimated beam: bmin=7.034 mas, bmaj=35.21 mas, bpa=9.888 degrees
! Estimated noise=1.31649 mJy/beam.
! clean: niter=200  gain=0.03  cutoff=0
! Component: 050  -  total flux cleaned = 0.000654421 Jy
! Component: 100  -  total flux cleaned = 0.000997997 Jy
! Component: 150  -  total flux cleaned = 0.00140572 Jy
! Component: 200  -  total flux cleaned = 0.00178994 Jy
! Total flux subtracted in 200 components = 0.00178994 Jy
! Clean residual min=-0.000558 max=0.000562 Jy/beam
! Clean residual mean=-0.000002 rms=0.000225 Jy/beam
! Combined flux in latest and established models = 0.0242014 Jy
selfcal
! Performing phase self-cal
! Adding 60 model components to the UV plane model.
! The established model now contains 222 components and 0.0242014 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.033166Jy  sigma=0.570546
! Fit after  self-cal, rms=0.033393Jy  sigma=0.568800
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
  new_peak = peak(flux)
  until(new_peak<=flux_cutoff)
! clean: niter=200  gain=0.03  cutoff=0
! Component: 050  -  total flux cleaned = 0.000255695 Jy
! Component: 100  -  total flux cleaned = 0.00100276 Jy
! Component: 150  -  total flux cleaned = 0.00144426 Jy
! Component: 200  -  total flux cleaned = 0.00187734 Jy
! Total flux subtracted in 200 components = 0.00187734 Jy
! Clean residual min=-0.000502 max=0.000501 Jy/beam
! Clean residual mean=0.000000 rms=0.000209 Jy/beam
! Combined flux in latest and established models = 0.0260787 Jy
! Performing phase self-cal
! Adding 64 model components to the UV plane model.
! The established model now contains 281 components and 0.0260787 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.033284Jy  sigma=0.567568
! Fit after  self-cal, rms=0.033288Jy  sigma=0.567089
! Inverting map 
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.
! 
! Correcting IF 5.
! 
! Correcting IF 6.
! 
! Correcting IF 7.
! 
! Correcting IF 8.
! 
! Fit before self-cal, rms=0.033288Jy  sigma=0.567089
! Fit after  self-cal, rms=0.034322Jy  sigma=0.566441
clean clean_niter,clean_gain
! Inverting map and beam 
! Estimated beam: bmin=6.989 mas, bmaj=35.41 mas, bpa=9.903 degrees
! Estimated noise=1.30747 mJy/beam.
! clean: niter=200  gain=0.03  cutoff=0
! Component: 050  -  total flux cleaned = 0.000504991 Jy
! Component: 100  -  total flux cleaned = 0.00088543 Jy
! Component: 150  -  total flux cleaned = 0.00122668 Jy
! Component: 200  -  total flux cleaned = 0.0014794 Jy
! Total flux subtracted in 200 components = 0.0014794 Jy
! Clean residual min=-0.000451 max=0.000451 Jy/beam
! Clean residual mean=-0.000000 rms=0.000189 Jy/beam
! Combined flux in latest and established models = 0.0275581 Jy
selfcal
! Performing phase self-cal
! Adding 60 model components to the UV plane model.
! The established model now contains 332 components and 0.0275581 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.034240Jy  sigma=0.565586
! Fit after  self-cal, rms=0.034411Jy  sigma=0.564946
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
  new_peak = peak(flux)
  until(new_peak<=flux_cutoff)
! clean: niter=200  gain=0.03  cutoff=0
! Component: 050  -  total flux cleaned = 0.000194178 Jy
! Component: 100  -  total flux cleaned = 0.000160959 Jy
! Component: 150  -  total flux cleaned = -6.66838e-06 Jy
! Component: 200  -  total flux cleaned = -0.000110749 Jy
! Total flux subtracted in 200 components = -0.000110749 Jy
! Clean residual min=-0.000411 max=0.000414 Jy/beam
! Clean residual mean=0.000000 rms=0.000186 Jy/beam
! Combined flux in latest and established models = 0.0274474 Jy
! Performing phase self-cal
! Adding 70 model components to the UV plane model.
! The established model now contains 398 components and 0.0274474 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.034331Jy  sigma=0.564160
! Fit after  self-cal, rms=0.034338Jy  sigma=0.563939
! Inverting map 
uvtaper 0.3,taper_size
! Gaussian taper: value 0.3 at UV radius = 40 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.
! 
! Correcting IF 5.
! 
! Correcting IF 6.
! 
! Correcting IF 7.
! 
! Correcting IF 8.
! 
! Fit before self-cal, rms=0.034338Jy  sigma=0.563939
! Fit after  self-cal, rms=0.034573Jy  sigma=0.563608
clean clean_niter,clean_gain
! Inverting map and beam 
! Estimated beam: bmin=7.17 mas, bmaj=34.95 mas, bpa=9.802 degrees
! Estimated noise=1.29232 mJy/beam.
! clean: niter=200  gain=0.03  cutoff=0
! Component: 050  -  total flux cleaned = 0.000234877 Jy
! Component: 100  -  total flux cleaned = 0.00071438 Jy
! Component: 150  -  total flux cleaned = 0.00118797 Jy
! Component: 200  -  total flux cleaned = 0.00153157 Jy
! Total flux subtracted in 200 components = 0.00153157 Jy
! Clean residual min=-0.000338 max=0.000341 Jy/beam
! Clean residual mean=-0.000000 rms=0.000141 Jy/beam
! Combined flux in latest and established models = 0.0289789 Jy
selfcal
! Performing phase self-cal
! Adding 50 model components to the UV plane model.
! The established model now contains 439 components and 0.0289789 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.034513Jy  sigma=0.563110
! Fit after  self-cal, rms=0.034610Jy  sigma=0.562830
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
  new_peak = peak(flux)
  until(new_peak<=flux_cutoff)
! clean: niter=200  gain=0.03  cutoff=0
! Component: 050  -  total flux cleaned = 9.66234e-05 Jy
! Component: 100  -  total flux cleaned = 0.000205435 Jy
! Component: 150  -  total flux cleaned = 0.00010049 Jy
! Component: 200  -  total flux cleaned = -1.60685e-05 Jy
! Total flux subtracted in 200 components = -1.60685e-05 Jy
! Clean residual min=-0.000264 max=0.000264 Jy/beam
! Clean residual mean=0.000000 rms=0.000122 Jy/beam
! Combined flux in latest and established models = 0.0289629 Jy
! Performing phase self-cal
! Adding 71 model components to the UV plane model.
! The established model now contains 500 components and 0.0289629 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.034570Jy  sigma=0.562494
! Fit after  self-cal, rms=0.034587Jy  sigma=0.562393
! Inverting map 
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 
! Estimated beam: bmin=6.942 mas, bmaj=35.63 mas, bpa=9.97 degrees
! Estimated noise=1.2927 mJy/beam.
! restore: Substituting estimate of restoring beam from last 'invert'.
! Restoring with beam: 6.942 x 35.63 at 9.97 degrees (North through East)
! Clean map  min=-0.0046344  max=0.023504 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
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 
! Estimated beam: bmin=6.023 mas, bmaj=40.14 mas, bpa=11.88 degrees
! Estimated noise=1.83339 mJy/beam.
! clean: niter=200  gain=0.03  cutoff=0
! Component: 050  -  total flux cleaned = 0.0170732 Jy
! Component: 100  -  total flux cleaned = 0.0139701 Jy
! Component: 150  -  total flux cleaned = 0.0119835 Jy
! Component: 200  -  total flux cleaned = 0.00988167 Jy
! Total flux subtracted in 200 components = 0.00988167 Jy
! Clean residual min=-0.004838 max=0.004792 Jy/beam
! Clean residual mean=0.000003 rms=0.001792 Jy/beam
! Combined flux in latest and established models = 0.00988167 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 40 model components to the UV plane model.
! The established model now contains 40 components and 0.00988167 Jy
! Inverting map and beam 
! Estimated beam: bmin=6.942 mas, bmaj=35.63 mas, bpa=9.97 degrees
! Estimated noise=1.2927 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.00169379 Jy
! Component: 100  -  total flux cleaned = -0.00301409 Jy
! Component: 150  -  total flux cleaned = -0.00449755 Jy
! Component: 200  -  total flux cleaned = -0.00617723 Jy
! Total flux subtracted in 200 components = -0.00617723 Jy
! Clean residual min=-0.002274 max=0.002282 Jy/beam
! Clean residual mean=0.000009 rms=0.000883 Jy/beam
! Combined flux in latest and established models = 0.00370444 Jy
! Adding 56 model components to the UV plane model.
! The established model now contains 96 components and 0.00370445 Jy
! Inverting map 
uvtaper 0.3,taper_size
! Gaussian taper: value 0.3 at UV radius = 40 mega-wavelengths.
clean clean_niter,clean_gain
! Inverting map and beam 
! Estimated beam: bmin=7.17 mas, bmaj=34.95 mas, bpa=9.802 degrees
! Estimated noise=1.29232 mJy/beam.
! clean: niter=200  gain=0.03  cutoff=0
! Component: 050  -  total flux cleaned = 2.11665e-05 Jy
! Component: 100  -  total flux cleaned = 0.000299152 Jy
! Component: 150  -  total flux cleaned = 0.000919309 Jy
! Component: 200  -  total flux cleaned = 0.00106938 Jy
! Total flux subtracted in 200 components = 0.00106938 Jy
! Clean residual min=-0.000794 max=0.000789 Jy/beam
! Clean residual mean=0.000002 rms=0.000335 Jy/beam
! Combined flux in latest and established models = 0.00477383 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.000234234 Jy
! Component: 100  -  total flux cleaned = 0.000189529 Jy
! Component: 150  -  total flux cleaned = 0.000280901 Jy
! Component: 200  -  total flux cleaned = 0.000462878 Jy
! Total flux subtracted in 200 components = 0.000462878 Jy
! Clean residual min=-0.000775 max=0.000765 Jy/beam
! Clean residual mean=-0.000002 rms=0.000313 Jy/beam
! Combined flux in latest and established models = 0.0052367 Jy
! Adding 96 model components to the UV plane model.
! The established model now contains 190 components and 0.0052367 Jy
! Inverting map 
uvtaper 0,0
! No UV-taper is currently set.
clean
! Inverting map and beam 
! Estimated beam: bmin=6.942 mas, bmaj=35.63 mas, bpa=9.97 degrees
! Estimated noise=1.2927 mJy/beam.
! clean: niter=200  gain=0.03  cutoff=0
! Component: 050  -  total flux cleaned = 0.00040955 Jy
! Component: 100  -  total flux cleaned = 0.000409653 Jy
! Component: 150  -  total flux cleaned = 0.000379513 Jy
! Component: 200  -  total flux cleaned = 0.000380592 Jy
! Total flux subtracted in 200 components = 0.000380592 Jy
! Clean residual min=-0.000482 max=0.000483 Jy/beam
! Clean residual mean=0.000000 rms=0.000196 Jy/beam
! Combined flux in latest and established models = 0.00561729 Jy
selfcal
! Performing phase self-cal
! Adding 74 model components to the UV plane model.
! The established model now contains 262 components and 0.0056173 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.034609Jy  sigma=0.563153
! Fit after  self-cal, rms=0.034579Jy  sigma=0.562881
wmodel J1902-2329_C_map.mod
! Writing 262 model components to file: J1902-2329_C_map.mod
wobs   J1902-2329_C_uvs.fits
! Writing UV FITS file: J1902-2329_C_uvs.fits
wwins  J1902-2329_C_map.win
! wwins: No CLEAN windows to write.
! Error occured in command: wwins
![Exited script file: /opt64/bin/pima_mupet_01.dfm]
! 
wmap   .//J1902-2329_C_map.fits
! Inverting map 
! restore: Substituting estimate of restoring beam from last 'invert'.
! Restoring with beam: 6.942 x 35.63 at 9.97 degrees (North through East)
! Clean map  min=-0.0088621  max=0.016437 Jy/beam
! Writing clean map to FITS file: .//J1902-2329_C_map.fits
wmodel .//J1902-2329_C_map.mod
! Writing 262 model components to file: .//J1902-2329_C_map.mod
wobs   .//J1902-2329_C_uvs.fits
! Writing UV FITS file: .//J1902-2329_C_uvs.fits
wwins  .//J1902-2329_C_map.win
! wwins: No CLEAN windows to write.
! Error occured in command: wwins
! 
float peak_flux
peak_flux = peak(flux,max)
print "The peak flux is", peak_flux
! The peak flux is 0.0164366 
invert
! Inverting map 
float image_rms
image_rms = imstat(rms)
print "The final image rms is",image_rms
! The final image rms is 0.000183556 
loglevs 100*3*image_rms/peak_flux
! The new contour levels are:
!  -3.35027 3.35027 6.70053 13.4011 26.8021 53.6043
print "clev=      ", int(3*image_rms*10000)/10000
! clev=       0.0005 
print "peak=      ", int(1000*peak_flux)/1000
! peak=       0.016 
print "dyn_range= ", int(1000*peak_flux/image_rms)/1000
! dyn_range=  89.545 
quit
! Quitting program
! Log file .//J1902-2329_C_dfm.log closed on Mon Jan 20 18:51:10 2020