! Started logfile: /image_prod/ug002_uva//J2007+3722_S_dfm.log on Thu Mar  5 04:35:47 2020
float field_size
field_size =  1024
float field_cell
field_cell =   0.5000
float taper_size
taper_size =   20.0
float freq
freq       =    2.22000
obs     /image_prod/ug002_uva//J2007+3722_S_uva.fits
! Reading UV FITS file: /image_prod/ug002_uva//J2007+3722_S_uva.fits
! AN table 1: 180 integrations on 6 of 6 possible baselines.
! Apparent sampling: 0.990741 visibilities/baseline/integration-bin.
! Found source: J2007+3722
! 
! There are 3 IFs, and a total of 3 channels:
! 
!  IF  Channel    Frequency  Freq offset  Number of   Overall IF
!       origin    at origin  per channel   channels    bandwidth
!  ------------------------------------------------------------- (Hz)
!  01        1     2.22e+09      3.2e+07          1      3.2e+07
!  02        2    2.252e+09      3.2e+07          1      3.2e+07
!  03        3    2.284e+09      3.2e+07          1      3.2e+07
! 
! Polarization(s): RR
! 
! Read 44 lines of history.
! 
! Reading 3210 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 3 channels.
! Selecting polarization: RR,  channels: 1..3
! Reading IF 1 channels: 1..1
! Reading IF 2 channels: 2..2
! Reading IF 3 channels: 3..3
print "field_size =", field_size
! field_size = 1024 
print "field_cell =", field_cell
! field_cell = 0.5 
print "taper_size =", taper_size
! taper_size = 20 
![@/opt64/bin/pima_mupet_01.dfm J2007+3722_S]
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.500x0.500 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 6 telescope corrections were flagged in sub-array 1.
! 
! Correcting IF 2.
!  A total of 6 telescope corrections were flagged in sub-array 1.
! 
! Correcting IF 3.
!  A total of 6 telescope corrections were flagged in sub-array 1.
! 
! Fit before self-cal, rms=0.999890Jy  sigma=10.839828
! Fit after  self-cal, rms=0.904817Jy  sigma=9.904825
! 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=23.77 mas, bmaj=25.93 mas, bpa=30.7 degrees
! Estimated noise=1.34693 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.0814783 Jy
! Component: 100  -  total flux cleaned = 0.118268 Jy
! Total flux subtracted in 100 components = 0.118268 Jy
! Clean residual min=-0.017305 max=0.017530 Jy/beam
! Clean residual mean=0.000288 rms=0.006935 Jy/beam
! Combined flux in latest and established models = 0.118268 Jy
! Performing phase self-cal
! Adding 34 model components to the UV plane model.
! The established model now contains 34 components and 0.118268 Jy
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Fit before self-cal, rms=0.061252Jy  sigma=0.629489
! Fit after  self-cal, rms=0.060522Jy  sigma=0.621964
! 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=23.89 mas, bmaj=26.96 mas, bpa=15.74 degrees
! Estimated noise=1.16014 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.00242669 Jy
! Component: 100  -  total flux cleaned = -0.000675364 Jy
! Component: 150  -  total flux cleaned = -0.00183945 Jy
! Component: 200  -  total flux cleaned = 0.000845533 Jy
! Total flux subtracted in 200 components = 0.000845533 Jy
! Clean residual min=-0.006919 max=0.006901 Jy/beam
! Clean residual mean=0.000146 rms=0.003650 Jy/beam
! Combined flux in latest and established models = 0.119113 Jy
! Performing phase self-cal
! Adding 153 model components to the UV plane model.
! The established model now contains 187 components and 0.119113 Jy
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Fit before self-cal, rms=0.042563Jy  sigma=0.445950
! Fit after  self-cal, rms=0.042340Jy  sigma=0.444269
! Inverting map 
print "============== Finished natural weighting clean =============="
! ============== Finished natural weighting clean ============== 
! 
restore
! restore: Substituting estimate of restoring beam from last 'invert'.
! Restoring with beam: 23.89 x 26.96 at 15.74 degrees (North through East)
! Clean map  min=-0.016927  max=0.09593 Jy/beam
gscale true
! Performing overall amplitude self-cal
! 
! Correcting IF 1.
!  A total of 6 telescope corrections were flagged in sub-array 1.
!  Telescope amplitude corrections in sub-array 1:
!   FD        1.17     KP        1.23     LA        0.96     PT        0.81     
! 
! 
! Correcting IF 2.
!  A total of 6 telescope corrections were flagged in sub-array 1.
!  Telescope amplitude corrections in sub-array 1:
!   FD        1.13     KP        1.11     LA        0.95     PT        0.84     
! 
! 
! Correcting IF 3.
!  A total of 6 telescope corrections were flagged in sub-array 1.
!  Telescope amplitude corrections in sub-array 1:
!   FD        1.03     KP        1.15     LA        0.96     PT        0.81     
! 
! 
! Fit before self-cal, rms=0.042340Jy  sigma=0.444269
! Fit after  self-cal, rms=0.038965Jy  sigma=0.392829
dynam = dynam - 0.5
flux_cutoff = imstat(rms) * dynam
! Inverting map and beam 
! Estimated beam: bmin=24.95 mas, bmaj=27.63 mas, bpa=25.16 degrees
! Estimated noise=1.15976 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.00136442 Jy
! Component: 100  -  total flux cleaned = 0.00248032 Jy
! Component: 150  -  total flux cleaned = 0.00331698 Jy
! Component: 200  -  total flux cleaned = 0.00403282 Jy
! Total flux subtracted in 200 components = 0.00403282 Jy
! Clean residual min=-0.001015 max=0.001025 Jy/beam
! Clean residual mean=0.000010 rms=0.000469 Jy/beam
! Combined flux in latest and established models = 0.123146 Jy
! Performing phase self-cal
! Adding 96 model components to the UV plane model.
! The established model now contains 283 components and 0.123146 Jy
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Fit before self-cal, rms=0.038570Jy  sigma=0.388907
! Fit after  self-cal, rms=0.038744Jy  sigma=0.388257
! 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.
! 
! Fit before self-cal, rms=0.038744Jy  sigma=0.388257
! Fit after  self-cal, rms=0.038268Jy  sigma=0.386500
dynam = dynam - 0.75
clean clean_niter,clean_gain
! Inverting map and beam 
! Estimated beam: bmin=24.97 mas, bmaj=27.68 mas, bpa=23.16 degrees
! Estimated noise=1.15463 mJy/beam.
! clean: niter=200  gain=0.03  cutoff=0
! Component: 050  -  total flux cleaned = 0.000396993 Jy
! Component: 100  -  total flux cleaned = 0.000395039 Jy
! Component: 150  -  total flux cleaned = 0.000414283 Jy
! Component: 200  -  total flux cleaned = 0.000453444 Jy
! Total flux subtracted in 200 components = 0.000453444 Jy
! Clean residual min=-0.000298 max=0.000300 Jy/beam
! Clean residual mean=0.000001 rms=0.000126 Jy/beam
! Combined flux in latest and established models = 0.123599 Jy
selfcal
! Performing phase self-cal
! Adding 80 model components to the UV plane model.
! The established model now contains 363 components and 0.123599 Jy
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Fit before self-cal, rms=0.038225Jy  sigma=0.386073
! Fit after  self-cal, rms=0.038216Jy  sigma=0.386038
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.000306546 Jy
! Component: 100  -  total flux cleaned = 0.000504269 Jy
! Component: 150  -  total flux cleaned = 0.000654784 Jy
! Component: 200  -  total flux cleaned = 0.0008091 Jy
! Total flux subtracted in 200 components = 0.0008091 Jy
! Clean residual min=-0.000225 max=0.000225 Jy/beam
! Clean residual mean=-0.000001 rms=0.000094 Jy/beam
! Combined flux in latest and established models = 0.124408 Jy
! Performing phase self-cal
! Adding 77 model components to the UV plane model.
! The established model now contains 431 components and 0.124409 Jy
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Fit before self-cal, rms=0.038203Jy  sigma=0.385921
! Fit after  self-cal, rms=0.038197Jy  sigma=0.385915
! 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.
! 
! Fit before self-cal, rms=0.038197Jy  sigma=0.385915
! Fit after  self-cal, rms=0.038046Jy  sigma=0.385807
clean clean_niter,clean_gain
! Inverting map and beam 
! Estimated beam: bmin=24.94 mas, bmaj=27.69 mas, bpa=22.92 degrees
! Estimated noise=1.15111 mJy/beam.
! clean: niter=200  gain=0.03  cutoff=0
! Component: 050  -  total flux cleaned = -2.03858e-05 Jy
! Component: 100  -  total flux cleaned = -2.05109e-05 Jy
! Component: 150  -  total flux cleaned = -6.29945e-05 Jy
! Component: 200  -  total flux cleaned = -0.000102562 Jy
! Total flux subtracted in 200 components = -0.000102562 Jy
! Clean residual min=-0.000163 max=0.000162 Jy/beam
! Clean residual mean=0.000000 rms=0.000066 Jy/beam
! Combined flux in latest and established models = 0.124306 Jy
selfcal
! Performing phase self-cal
! Adding 92 model components to the UV plane model.
! The established model now contains 522 components and 0.124306 Jy
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Fit before self-cal, rms=0.038038Jy  sigma=0.385741
! Fit after  self-cal, rms=0.038033Jy  sigma=0.385737
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 = 8.36227e-05 Jy
! Component: 100  -  total flux cleaned = 8.45112e-05 Jy
! Component: 150  -  total flux cleaned = 3.19227e-05 Jy
! Component: 200  -  total flux cleaned = -2.71648e-05 Jy
! Total flux subtracted in 200 components = -2.71648e-05 Jy
! Clean residual min=-0.000138 max=0.000139 Jy/beam
! Clean residual mean=-0.000000 rms=0.000057 Jy/beam
! Combined flux in latest and established models = 0.124279 Jy
! Performing phase self-cal
! Adding 66 model components to the UV plane model.
! The established model now contains 579 components and 0.124279 Jy
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Fit before self-cal, rms=0.038028Jy  sigma=0.385701
! Fit after  self-cal, rms=0.038028Jy  sigma=0.385699
! Inverting map 
uvtaper 0.3,taper_size
! Gaussian taper: value 0.3 at UV radius = 20 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.
! 
! Fit before self-cal, rms=0.038028Jy  sigma=0.385699
! Fit after  self-cal, rms=0.037983Jy  sigma=0.385690
clean clean_niter,clean_gain
! Inverting map and beam 
! Estimated beam: bmin=25.16 mas, bmaj=27.8 mas, bpa=23.25 degrees
! Estimated noise=1.14794 mJy/beam.
! clean: niter=200  gain=0.03  cutoff=0
! Component: 050  -  total flux cleaned = 7.8452e-06 Jy
! Component: 100  -  total flux cleaned = 2.46308e-05 Jy
! Component: 150  -  total flux cleaned = -3.06609e-05 Jy
! Component: 200  -  total flux cleaned = -4.62018e-05 Jy
! Total flux subtracted in 200 components = -4.62018e-05 Jy
! Clean residual min=-0.000127 max=0.000127 Jy/beam
! Clean residual mean=-0.000000 rms=0.000051 Jy/beam
! Combined flux in latest and established models = 0.124233 Jy
selfcal
! Performing phase self-cal
! Adding 75 model components to the UV plane model.
! The established model now contains 635 components and 0.124233 Jy
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Fit before self-cal, rms=0.037980Jy  sigma=0.385658
! Fit after  self-cal, rms=0.037978Jy  sigma=0.385657
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 = 3.28348e-05 Jy
! Component: 100  -  total flux cleaned = 7.64455e-05 Jy
! Component: 150  -  total flux cleaned = 0.000104749 Jy
! Component: 200  -  total flux cleaned = 9.07294e-05 Jy
! Total flux subtracted in 200 components = 9.07294e-05 Jy
! Clean residual min=-0.000117 max=0.000117 Jy/beam
! Clean residual mean=-0.000000 rms=0.000047 Jy/beam
! Combined flux in latest and established models = 0.124323 Jy
! Performing phase self-cal
! Adding 84 model components to the UV plane model.
! The established model now contains 703 components and 0.124323 Jy
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Fit before self-cal, rms=0.037975Jy  sigma=0.385633
! Fit after  self-cal, rms=0.037975Jy  sigma=0.385632
! 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=24.94 mas, bmaj=27.68 mas, bpa=22.88 degrees
! Estimated noise=1.15034 mJy/beam.
! restore: Substituting estimate of restoring beam from last 'invert'.
! Restoring with beam: 24.94 x 27.68 at 22.88 degrees (North through East)
! Clean map  min=-0.010473  max=0.091946 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=24.81 mas, bmaj=26.62 mas, bpa=41.5 degrees
! Estimated noise=1.35543 mJy/beam.
! clean: niter=200  gain=0.03  cutoff=0
! Component: 050  -  total flux cleaned = 0.0806273 Jy
! Component: 100  -  total flux cleaned = 0.115441 Jy
! Component: 150  -  total flux cleaned = 0.12108 Jy
! Component: 200  -  total flux cleaned = 0.119185 Jy
! Total flux subtracted in 200 components = 0.119185 Jy
! Clean residual min=-0.007202 max=0.007126 Jy/beam
! Clean residual mean=0.000118 rms=0.002951 Jy/beam
! Combined flux in latest and established models = 0.119185 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 101 model components to the UV plane model.
! The established model now contains 101 components and 0.119185 Jy
! Inverting map and beam 
! Estimated beam: bmin=24.94 mas, bmaj=27.68 mas, bpa=22.88 degrees
! Estimated noise=1.15034 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.00288067 Jy
! Component: 100  -  total flux cleaned = -0.00412576 Jy
! Component: 150  -  total flux cleaned = -0.00507014 Jy
! Component: 200  -  total flux cleaned = -0.00540125 Jy
! Total flux subtracted in 200 components = -0.00540125 Jy
! Clean residual min=-0.002464 max=0.002491 Jy/beam
! Clean residual mean=0.000055 rms=0.001271 Jy/beam
! Combined flux in latest and established models = 0.113784 Jy
! Adding 126 model components to the UV plane model.
! The established model now contains 227 components and 0.113784 Jy
! Inverting map 
uvtaper 0.3,taper_size
! Gaussian taper: value 0.3 at UV radius = 20 mega-wavelengths.
clean clean_niter,clean_gain
! Inverting map and beam 
! Estimated beam: bmin=25.16 mas, bmaj=27.8 mas, bpa=23.25 degrees
! Estimated noise=1.14794 mJy/beam.
! clean: niter=200  gain=0.03  cutoff=0
! Component: 050  -  total flux cleaned = 0.00111584 Jy
! Component: 100  -  total flux cleaned = 0.00220303 Jy
! Component: 150  -  total flux cleaned = 0.00307051 Jy
! Component: 200  -  total flux cleaned = 0.00405689 Jy
! Total flux subtracted in 200 components = 0.00405689 Jy
! Clean residual min=-0.001073 max=0.001077 Jy/beam
! Clean residual mean=0.000026 rms=0.000582 Jy/beam
! Combined flux in latest and established models = 0.117841 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.000724628 Jy
! Component: 100  -  total flux cleaned = 0.00138547 Jy
! Component: 150  -  total flux cleaned = 0.00203595 Jy
! Component: 200  -  total flux cleaned = 0.00248992 Jy
! Total flux subtracted in 200 components = 0.00248992 Jy
! Clean residual min=-0.000576 max=0.000581 Jy/beam
! Clean residual mean=0.000016 rms=0.000311 Jy/beam
! Combined flux in latest and established models = 0.12033 Jy
! Adding 281 model components to the UV plane model.
! The established model now contains 507 components and 0.12033 Jy
! Inverting map 
uvtaper 0,0
! No UV-taper is currently set.
clean
! Inverting map and beam 
! Estimated beam: bmin=24.94 mas, bmaj=27.68 mas, bpa=22.88 degrees
! Estimated noise=1.15034 mJy/beam.
! clean: niter=200  gain=0.03  cutoff=0
! Component: 050  -  total flux cleaned = -0.000113045 Jy
! Component: 100  -  total flux cleaned = 0.000100547 Jy
! Component: 150  -  total flux cleaned = 0.000235477 Jy
! Component: 200  -  total flux cleaned = 0.000434847 Jy
! Total flux subtracted in 200 components = 0.000434847 Jy
! Clean residual min=-0.000316 max=0.000319 Jy/beam
! Clean residual mean=0.000007 rms=0.000169 Jy/beam
! Combined flux in latest and established models = 0.120765 Jy
selfcal
! Performing phase self-cal
! Adding 99 model components to the UV plane model.
! The established model now contains 597 components and 0.120765 Jy
! 
! Correcting IF 1.
! 
! Correcting IF 2.
! 
! Correcting IF 3.
! 
! Fit before self-cal, rms=0.037996Jy  sigma=0.385918
! Fit after  self-cal, rms=0.037988Jy  sigma=0.385899
wmodel J2007+3722_S_map.mod
! Writing 597 model components to file: J2007+3722_S_map.mod
wobs   J2007+3722_S_uvs.fits
! Writing UV FITS file: J2007+3722_S_uvs.fits
wwins  J2007+3722_S_map.win
! wwins: No CLEAN windows to write.
! Error occured in command: wwins
![Exited script file: /opt64/bin/pima_mupet_01.dfm]
! 
wmap   /image_prod/ug002_uva//J2007+3722_S_map.fits
! Inverting map 
! restore: Substituting estimate of restoring beam from last 'invert'.
! Restoring with beam: 24.94 x 27.68 at 22.88 degrees (North through East)
! Clean map  min=-0.010864  max=0.089287 Jy/beam
! Writing clean map to FITS file: /image_prod/ug002_uva//J2007+3722_S_map.fits
wmodel /image_prod/ug002_uva//J2007+3722_S_map.mod
! Writing 597 model components to file: /image_prod/ug002_uva//J2007+3722_S_map.mod
wobs   /image_prod/ug002_uva//J2007+3722_S_uvs.fits
! Writing UV FITS file: /image_prod/ug002_uva//J2007+3722_S_uvs.fits
wwins  /image_prod/ug002_uva//J2007+3722_S_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.0892866 
invert
! Inverting map 
float image_rms
image_rms = imstat(rms)
print "The final image rms is",image_rms
! The final image rms is 0.000163321 
loglevs 100*3*image_rms/peak_flux
! The new contour levels are:
!  -0.548752 0.548752 1.0975 2.19501 4.39002 8.78003 17.5601 35.1201 70.2402
print "clev=      ", int(3*image_rms*10000)/10000
! clev=       0.0004 
print "peak=      ", int(1000*peak_flux)/1000
! peak=       0.089 
print "dyn_range= ", int(1000*peak_flux/image_rms)/1000
! dyn_range=  546.695 
quit
! Quitting program
! Log file /image_prod/ug002_uva//J2007+3722_S_dfm.log closed on Thu Mar  5 04:35:50 2020