AIPS version = /home/auto/aips/31DEC06/LINUX/SYSTEM/VLA_PIPE/aips Prep version = Aug 10 14:21 /home/auto/bin/AVLAPREP.001 Pipe version = Aug 10 14:21 /home/auto/bin/AVLAPIPE.001 Post version = Sep 7 11:26 /home/auto/bin/AVLAPOST.001 ------------- START_AIPS: Your initial AIPS printer is the GNU Ghostview X-windows previewer START_AIPS: - system name gv, AIPS type PREVIEW START_AIPS: User data area assignments: (Using private file /users/vlbacald/.dadevs for DADEVS.PL) Disk 1 (1) is /home/auto/aips/DATA/AUTO_1 Tape assignments: Tape 1 is REMOTE Tape 2 is REMOTE START_AIPS: Starting TPMON daemons on AUTO asynchronously... Starting up 31DEC06 AIPS with normal priority AIPS 1: You are NOT assigned a TV device or server AIPS 1: You are NOT assigned a graphics device or server AIPS 1: Enter user ID number ?AIPS 1: 31DEC06 AIPS: AIPS 1: Copyright (C) 1995-2006 Associated Universities, Inc. AIPS 1: AIPS comes with ABSOLUTELY NO WARRANTY; AIPS 1: for details, type HELP GNUGPL AIPS 1: This is free software, and you are welcome to redistribute it AIPS 1: under certain conditions; type EXPLAIN GNUGPL for details. AIPS 1: Previous session command-line history *not* recovered. AIPS 1: TAB-key completions enabled, type HELP READLINE for details. AIPS 1: Recovered POPS environment from last exit >>>AIPS 1: Found in Version=ABIN AIPS 1: $ Lorant Sjouwerman, versions 1.. 2005, for NRAO AIPS 1: AIPS 1: $$ General naming utilities - default to data disk 1 (safest of all) AIPS 1: procedure pipedef1 AIPS 1: string*12 pnam AIPS 1: string*6 pcls AIPS 1: scalar pseq,pdsk AIPS 1: pdsk=1 AIPS 1: finish AIPS 1: pipedef1 AIPS 1: procedure namepipe AIPS 1: pnam=inname;pcls=inclass;pseq=inseq;indisk=pdsk AIPS 1: finish AIPS 1: procedure pipename AIPS 1: inname=pnam;inclass=pcls;inseq=pseq;indisk=pdsk AIPS 1: finish AIPS 1: AIPS 1: procedure checkcat AIPS 1: $LOS - count and make sure catalog starts at one (and not more t han 10 files) AIPS 1: scalar numcat AIPS 1: clrname;indisk=pdsk;chkname;numcat=1-error AIPS 1: $ for later: find out how to deal with CH0/LINE data in MOVE AIPS 1: if(numcat>0)then;recat;end;clrtemp AIPS 1: return numcat AIPS 1: finish AIPS 1: AIPS 1: procedure gx AIPS 1: $ inputs AIPS 1: go;wait AIPS 1: finish AIPS 1: AIPS 1: procedure pre_fillm AIPS 1: $LOS - sets VLA archive defaults for fillm AIPS 1: default fillm;outdisk=pdsk;doall=1;douvcomp=-1;cparm(8)=0.05;b parm(10)=0.75 AIPS 1: finish AIPS 1: AIPS 1: procedure fname AIPS 1: return inname!!'.'!!inclass!!'.'!!char(inseq) AIPS 1: finish AIPS 1: AIPS 1: procedure del AIPS 1: error=1;zap AIPS 1: finish AIPS 1: AIPS 1: procedure skipdata AIPS 1: $LOS - delete unwanted data sets - currently all but continuum X and C bands AIPS 1: $ if(inclass='LINE')then;del;inclass'CH 0';del;type'ZAP LINE :' fname;end AIPS 1: if((inclass='CH 0')!(inclass='LINE'))then;del;type'ZAP LINE :' fname;end AIPS 1: if(inclass='4 BAND')then;del;type'ZAP 4-BAND :'fname;end AIPS 1: if(inclass='P BAND')then;del;type'ZAP P-BAND :'fname;end AIPS 1: if(inclass='L BAND')then;del;type'ZAP L-BAND :'fname;end AIPS 1: if(inclass='U BAND')then;del;type'ZAP U-BAND :'fname;end AIPS 1: if(inclass='K BAND')then;del;type'ZAP K-BAND :'fname;end AIPS 1: if(inclass='Q BAND')then;del;type'ZAP Q-BAND :'fname;end;clrte mp AIPS 1: if(error<1)then $ file not zapped, check for single dish vlbi; #vis=0 AIPS 1: task'TABGET';userid 0;inext'NX';invers=0;keyvalue=0;keystrng '' AIPS 1: keyword'NUM ROW';getthead;pixxy=keyvalue(1),6,0;tabget;clrte mp AIPS 1: if(keyvalue(1)=0)then;del;type'ZAP S-DISH :'fname;end AIPS 1: end AIPS 1: $also zap if solar/planetary/pulsar mode - su table proper motio n?? AIPS 1: $ and what about PT-link? antenna VPT is not OUT, later also EV LA names AIPS 1: finish AIPS 1: AIPS 1: procedure checkids AIPS 1: $LOS - account for fast switching source names - check on pos, q ual, calco AIPS 1: scalar ra1a,ra1b,ra2a,ra2b,dc1a,dc1b,dc2a,dc2b,n,m,l,idx AIPS 1: scalar q1,q2 AIPS 1: string*1 co1,co2 AIPS 1: string*16 n1,n2 AIPS 1: array alist(100),blist(100) AIPS 1: inext'SU';invers 0;keyword'NUM ROW';keyvalue 0;keystrng'';gett head AIPS 1: n=keyvalue(1);idx=1;aparm 0;bparm 0;alist 0;blist 0 AIPS 1: if (n > 1) then AIPS 1: for m=1:(n-1);clrtemp AIPS 1: pixxy m,11;tabget;ra1a keyvalue(1);ra1b keyvalue(2) AIPS 1: for l=(m+1):n;clrtemp AIPS 1: pixxy l,11;tabget;ra2a keyvalue(1);ra2b keyvalue(2) AIPS 1: if (abs(ra1a-ra2a)=0) then AIPS 1: if ( abs((ra1b-ra2b)*3600*1000) < 3 ) then $ RA within 3 mas! AIPS 1: pixxy m,12;tabget;dc1a keyvalue(1);dc1b keyvalue(2) AIPS 1: pixxy l,12;tabget;dc2a keyvalue(1);dc2b keyvalue(2) AIPS 1: if (abs(dc1a-dc2a)=0) then AIPS 1: if ( abs((dc1b-dc2b)*3600*1000) < 3 ) then $ DC wi thin 3 mas! AIPS 1: pixxy m,3;tabget;q1 keyvalue(1);pixxy l,3;tabget ;q2 keyvalue(1) AIPS 1: if (q1=q2) then $ same qualifier; same calcode? AIPS 1: pixxy m,4;tabget;co1 keystrng;pixxy l,4;tabget ;co2 keystrng AIPS 1: if (co1=co2) then AIPS 1: pixxy m,1;tabget;q1 keyvalue(1) AIPS 1: pixxy l,1;tabget;q2 keyvalue(1) AIPS 1: pixxy m,2;tabget;n1 keystrng;pixxy l,2;tabge t;n2 keystrng AIPS 1: if (idx>100) then; AIPS 1: type 'TOO MANY SOURCES TO DO DSORC - DO BY HAND!' AIPS 1: type 'NEXT =.'!!char(idx)!!' DO:'!!char(l)! !'.&.'!!char(m) AIPS 1: else AIPS 1: if (length(n1)1) then;task'DSORC';n=0 AIPS 1: outname inname;outclass inclass;outseq inseq;outdisk indis k AIPS 1: while (n100)then;type'TOO MANY SOURCES FOR DSORC';error 1;end ;clrtemp AIPS 1: end AIPS 1: finish AIPS 1: AIPS 1: procedure checkcal AIPS 1: $LOS Currently (Sep 22, 2005) can/will do 3C286 and 3C48 at X and C AIPS 1: $LOS (and for now skip 3C286/3C48/3C138/3C147 Q,K,U and 3C48 L ) AIPS 1: scalar idx,jdx AIPS 1: string*16 sname AIPS 1: task'TABGET';userid 0;inext'SU';invers=0;keyvalue=0;keystrng'' ;error=1 AIPS 1: keyword'NUM ROW';getthead;idx=keyvalue(1);clrtemp AIPS 1: for jdx=1:idx AIPS 1: pixxy=jdx,2,0;tabget;sname=substr(keystrng,1,length(keystrng )) AIPS 1: if(sname='3C286')then;error=-1;jdx=idx+1;end AIPS 1: if(sname='3C48')then;error=-1;jdx=idx+1;end AIPS 1: if(sname='3C138')then;error=-1;jdx=idx+1;end AIPS 1: if(sname='3C147')then;error=-1;jdx=idx+1;end AIPS 1: if(sname='3C295')then;error=-1;jdx=idx+1;end AIPS 1: if(error>0)then $ try B1950 name AIPS 1: if(sname='1328+307')then;error=-1;jdx=idx+1;end AIPS 1: if(sname='0134+329')then;error=-1;jdx=idx+1;end AIPS 1: if(sname='0518+165')then;error=-1;jdx=idx+1;end AIPS 1: if(sname='0538+498')then;error=-1;jdx=idx+1;end AIPS 1: if(sname='1409+524')then;error=-1;jdx=idx+1;end AIPS 1: if(error>0)then $ try J2000 AIPS 1: if(sname='1331+305')then;error=-1;jdx=idx+1;end AIPS 1: if(sname='0137+331')then;error=-1;jdx=idx+1;end AIPS 1: if(sname='0521+166')then;error=-1;jdx=idx+1;end AIPS 1: if(sname='0542+498')then;error=-1;jdx=idx+1;end AIPS 1: if(sname='1411+522')then;error=-1;jdx=idx+1;end AIPS 1: if(error>0)then $ try J2000 name AIPS 1: if(sname='J1331+3030')then;error=-1;jdx=idx+1;end AIPS 1: if(sname='J0137+3309')then;error=-1;jdx=idx+1;end AIPS 1: if(sname='J0521+1638')then;error=-1;jdx=idx+1;end AIPS 1: if(sname='J0542+4951')then;error=-1;jdx=idx+1;end AIPS 1: if(sname='J1411+5212')then;error=-1;jdx=idx+1;end AIPS 1: end;end;end;clrtemp AIPS 1: end AIPS 1: $ if error>0 check on coords (for different name than standard) AIPS 1: $ but keyval not reliable to do this.. ?? AIPS 1: $ end AIPS 1: if(error>0)then;del;type'ZAP - NO STD CAL SRC FOR :'fname;erro r=1 AIPS 1: else;checkids;error=-1;end;clrtemp AIPS 1: finish AIPS 1: AIPS 1: procedure j2000fix AIPS 1: $LOS - convert data to J2000 by default use of uvfix AIPS 1: task'UVFIX';outname=inname;outclass=inclass;outseq=inseq;outdi sk=indisk AIPS 1: shift=0;uvfixprm=0;tput uvfix;outclass'PREFIX';rename AIPS 1: tget uvfix;inclass'PREFIX';gx;zap;inclass=outclass;clrtemp AIPS 1: finish AIPS 1: AIPS 1: procedure datachks AIPS 1: $LOS - delete unwanted data sets, check for standard calibrators and make J2000 AIPS 1: if(error<1)then $ file exists AIPS 1: skipdata;if(error<1)then $ file was not zapped AIPS 1: checkcal;if(error<1)then $ file has standard calibrator i n it AIPS 1: j2000fix AIPS 1: $ addcalco AIPS 1: end;end;end;clrtemp AIPS 1: finish AIPS 1: AIPS 1: procedure freqchks AIPS 1: $LOS - split up in frequency IDs, run INDXR, and remove AIPS 1: scalar rows, nfrq AIPS 1: if(error<1)then $ file exists AIPS 1: inext'FQ';invers=1;keyword='NUM ROW';getthead;nfrq=keyvalue( 1) AIPS 1: if (nfrq > 1) then AIPS 1: if (nfrq > 9) then;type' WARNING! MORE THAN 9 FREQUENCY ID -S!';end AIPS 1: tput getthead;default'UVCOP';tget getthead;keyword='';task 'UVCOP';tput AIPS 1: for rows=1:nfrq AIPS 1: pixxy=rows,1,1;inver=1;inext='FQ';tabget;tget;freqid=key value(1) AIPS 1: outclass=substr(inclass,1,1)!!substr(inclass,3,6)!!char( freqid) AIPS 1: type'COPYING FREQUENCY ID #'!!char(freqid);gx AIPS 1: default'INDXR';tget uvcop;task'INDXR';inclass outclass;g x;task'DQUAL' AIPS 1: $out not in! ** outname=inname;outclass=inclass;outseq=inseq;out disk=indisk;gx AIPS 1: tget uvcop;freqid=1;clrtemp AIPS 1: end;end;end;if(nfrq>1)then;type fname!!' SPLIT IN :'!!char(nfr q);zap;end AIPS 1: finish AIPS 1: AIPS 1: procedure pre_move AIPS 1: $LOS - moves file to another AIPS user number AIPS 1: default move;indisk=pdsk;outseq=-1;opcode'MOVE';clrtemp AIPS 1: finish >AIPS 1: Found in Version=ABIN AIPS 1: $ AIPS 1: $ Ver 1.0 : Copy of private Ver 3.0 of VLARUN (public version is 2.5): AIPS 1: $ was 3.0 : Add PLVER (in goplt) for plot files and to include T ASAV (12MAY04) AIPS 1: $ Repositioned inseq=0 to safeguard to SU-tab confusio n (12NOV04) AIPS 1: $ Rearanged inputs and options, added integration time calculation, AIPS 1: $ QUACK, selective plotting, INNAME vs DOCAT, alternat ive flux cal, AIPS 1: $ selective imaging, SCIMG for targets, use model in C ALIB, find VLA AIPS 1: $ array, use model,.. AIPS 1: $ AIPS 1: $Next vers add polarization calibration, SCIMG->SCIMG? AIPS 1: $ find imsize, find cutoffflux, include infi le AIPS 1: $--------------------------------------------------------------- AIPS 1: $000000001111111111222222222233333333334444444444555555555566666 6666677777777778 AIPS 1: $234567890123456789012345678901234567890123456789012345678901234 5678901234567890 AIPS 1: $=============================================== AIPS 1: $! Calibrating amplitude and phase, and imaging VLA data AIPS 1: $# RUN POPS VLA UTILITY CALIBRATION IMAGING AIPS 1: $--------------------------------------------------------------- AIPS 1: $; Copyright (C) 2002-2006 AIPS 1: $; Associated Universities, Inc. Washington DC, USA. AIPS 1: $; AIPS 1: $; This program is free software; you can redistribute it and/o r AIPS 1: $; modify it under the terms of the GNU General Public License as AIPS 1: $; published by the Free Software Foundation; either version 2 of AIPS 1: $; the License, or (at your option) any later version. AIPS 1: $; AIPS 1: $; This program is distributed in the hope that it will be usef ul, AIPS 1: $; but WITHOUT ANY WARRANTY; without even the implied warranty of AIPS 1: $; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See th e AIPS 1: $; GNU General Public License for more details. AIPS 1: $; AIPS 1: $; You should have received a copy of the GNU General Public AIPS 1: $; License along with this program; if not, write to the Free AIPS 1: $; Software Foundation, Inc., 675 Massachusetts Ave, Cambridge, AIPS 1: $; MA 02139, USA. AIPS 1: $; AIPS 1: $; Correspondence concerning AIPS should be addressed as follow s: AIPS 1: $; Internet email: aipsmail@nrao.edu. AIPS 1: $; Postal address: AIPS Project Office AIPS 1: $; National Radio Astronomy Observatory AIPS 1: $; 520 Edgemont Road AIPS 1: $; Charlottesville, VA 22903-2475 USA AIPS 1: $--------------------------------------------------------------- AIPS 1: $=============================================================== AIPS 1: AIPS 1: procedure pipeinit AIPS 1: scalar lsdisk,lsname,lsrant,lscont,lserr,lsplot,lsflag,k,lsflu x,lstarg,lsmodl AIPS 1: scalar lsids,star,tint,fsw AIPS 1: string*2 lstyp AIPS 1: string*3 lsvla AIPS 1: string*6 lsidc,lsstrng AIPS 1: string*16 lsidn,lscal AIPS 1: string*16 lsampcal(20),lsbndcal(5),lsphacal(20),lspntcal(25),l sallcal(30), AIPS 1: array lsbadd(10),lsparm(16),lssid(1000) $ D=1,C=3.3,B=10.8,A=3 5.4,PT=73 AIPS 1: string*20 expnm AIPS 1: string*48 expmsg AIPS 1: finish AIPS 1: pipeinit AIPS 1: AIPS 1: procedure pipeinpt AIPS 1: lsampcal '3C48', '0134+329','0137+331','J0137+3309' AIPS 1: lsampcal(5)~ '3C138','0518+165','0521+166','J0521+1638' AIPS 1: lsampcal(9)~ '3C147','0538+498','0542+498','J0542+4951' AIPS 1: lsampcal(13)~'3C286','1328+307','1331+305','J1331+3030' AIPS 1: lsampcal(17)~'3C295','1409+524','1411+522','J1411+5212' AIPS 1: lserr=0;lsbadd=baddisk;lsdisk=indisk;lsname=docat AIPS 1: lsidn=inname;lsidc=inclass;lsids=inseq;lstyp'UV';fsw=doalign;l sflag=flagver AIPS 1: lsparm(2)=solint;lsparm(13)=factor;lsrant=refant;lsmodl=domode l AIPS 1: lscal=keystrng;lsflux=flux;lsparm(3)=uvrange(1);lsparm(4)=uvra nge(2) AIPS 1: for k=1:20;lsphacal(k)=sources(k);end;for k=1:5;lsbndcal(k)=ca lsour(k);end AIPS 1: lsparm(11)=dopol;lsparm(12)=bpa;lscont=docont;lsplot=plver;lsp arm(1)=doall AIPS 1: lsparm(5)=doarray;lsparm(6)=imsize(1);lsparm(7)=niter;lsparm(8 )=cutoff AIPS 1: lsparm(9)=docal;lsparm(10)=doresid AIPS 1: $ check input values AIPS 1: $->lsbadd AIPS 1: if (lsdisk<=0) then;lserr=1;type'SPECIFY THE INDISK';end AIPS 1: if(lsname<=0)then;inname=lsidn;inclass=lsidc;inseq=lsids;intyp e=lstyp;chkname AIPS 1: if (error<>0) then AIPS 1: lserr=2; type 'SPECIFY INNAME, ETC, OR THE CATALOG NUMBER = DOCAT' AIPS 1: else AIPS 1: userid=0;k=1;lsname=0 AIPS 1: while (lsname=0);egetname k AIPS 1: if (( (lsidn=inname)&(lsidc=inclass) )&(lsids=inseq)) th en AIPS 1: lsname=k;lsidn=inname;lsidc=inclass;lsids=inseq;lstyp= intype AIPS 1: else;k=k+1;end;end;end;else AIPS 1: if ( ((inname <> '')!(inclass <> '')) ! (inseq <> 0) ) then AIPS 1: lserr=2; type 'DO NOT SPECIFY BOTH INNAME, ETC, AND VARIAB LE DOCAT' AIPS 1: else AIPS 1: getname(lsname);lsidn=inname;lsidc=inclass;lsids=inseq;lst yp=intype AIPS 1: end AIPS 1: end AIPS 1: AIPS 1: $->inname AIPS 1: $->inclass AIPS 1: $->inseq AIPS 1: $->fsw AIPS 1: $->lsflag AIPS 1: if (lsparm(2)<=0) then; lserr=3; type 'SPECIFY THE SOLUTION IN TERVAL';end AIPS 1: if (lsparm(13)<1)then;lsparm(13)=1;type'FACTOR<1 QUESTIONABLE, SET TO 1';end AIPS 1: if (lsrant<=0)then;lsrant=0;type'AIPS WILL CHOOSE THE REFERENC E ANTENNA';end AIPS 1: if ( (lsmodl>0) & (length(lscal)>0) ) then AIPS 1: lserr=4;type 'CANNOT USE STANDARD SOURCE MODEL FOR ALTERNATI VE CALIBRATOR' AIPS 1: end AIPS 1: $->lscal AIPS 1: if (length(lscal)<>0) then AIPS 1: type 'USING NON-STANDARD AMPLITUDE CALIBRATOR, FLUX, UVRAN GE :' AIPS 1: type lscal, lsflux, lsparm(3), lsparm(4);lsampcal='';lsamp cal(1)=lscal AIPS 1: end AIPS 1: AIPS 1: $->lsflux AIPS 1: $-> #3+#4 uvrange AIPS 1: for i=1:20;for j=1:16;if(substr(lsphacal(i),j,j)='*')then;if ( lserr<>7) then AIPS 1: if((i=1)&(j=1))then;star=1;else; AIPS 1: star=-1;lserr=7;type'ONLY USE * IN THE 1ST CHARACTER OF TH E 1ST SOURCE' AIPS 1: end;end;end;end;clrtemp;end AIPS 1: if (lsname>0) then; indisk=lsdisk; getname(lsname); clrtemp AIPS 1: if ( (inclass='CH 0') & (substr(lsbndcal(1),1,1) = ' ') ) th en AIPS 1: lserr=8;type 'SPECIFY THE BANDPASS CALIBRATOR = CALSOUR' AIPS 1: end;end;clrtemp AIPS 1: $-> #11 dopol AIPS 1: $-> #12 bpa AIPS 1: $->lscont AIPS 1: $->lsplot AIPS 1: if (lsparm(1) > 0) then AIPS 1: if (lsparm(5)<0) then;type 'SETFC WILL DETERMINE THE CELL SI ZE' AIPS 1: else; AIPS 1: if (lsparm(5)=0) then; AIPS 1: keyword='TELESCOP';gethead; AIPS 1: if (substr(keystrng,1,3)<>'VLA') then; AIPS 1: lserr=5; type 'CANNOT DETERMINE ARRAY - THIS IS NOT TH E VLA' AIPS 1: else;keyword'NUM ROW';inext'AN';invers=0;getthead;k=keyv alue(1) AIPS 1: for j=1:k AIPS 1: pixxy=j,1,0;tabget;i=1;clrtemp AIPS 1: while((substr(keystrng,i,i)<>':')&(i<9));i=i+1;end AIPS 1: if (substr(keystrng,i+1,i+1)<>' ')then; AIPS 1: lsvla=substr(keystrng,i+1,i+3);else AIPS 1: lsvla=substr(keystrng,i+2,i+4);end AIPS 1: if ((lsvla<>'OUT')&(lsvla<>'MPD'))then; AIPS 1: if (lsvla='VPT')then;lsparm(5)=75;else AIPS 1: if (substr(keystrng,i+1,i+1)<>' ')then; AIPS 1: keyword=substr(keystrng,i+2,i+8);else AIPS 1: keyword=substr(keystrng,i+3,i+9);end AIPS 1: lsparm(5)=max(lsparm(5),value(keyword));clrtem p;end;end;end AIPS 1: if (lsparm(5)<75) then;if (lsparm(5)>36) then;lsparm(5 )=36;else AIPS 1: if (lsparm(5)>18) then;lsparm(5)=11;else AIPS 1: if(lsparm(5)>9)then;lsparm(5)=3.5;else;lsparm(5)=1;end ;end;end;end AIPS 1: end;if(lsparm(5)=0)then;lserr=5;type'WHAT ARRAY?! USE DO ARRAY';else AIPS 1: if(lsparm(5)>0)then AIPS 1: type char(lsparm(5))!!' KILOMETERS WILL BE USED AS MAX IMUM BASELINE' AIPS 1: end;end;end;end AIPS 1: if (lsparm(6)>=0)then;if((lsparm(6)<128)!(imsize(2)<128))the n AIPS 1: lserr=6; type 'SPECIFY THE IMSIZE CORRECTLY (>127 OR <0)'; end;end AIPS 1: AIPS 1: $-> #7 niter AIPS 1: if (lsparm(7) < 0) then; lsparm(7) = 1e6; end AIPS 1: $-> #8 cutoff AIPS 1: $-> #9 docal AIPS 1: $-> #10 doresid AIPS 1: AIPS 1: end AIPS 1: finish AIPS 1: AIPS 1: procedure getidn AIPS 1: indisk=lsdisk;inname=lsidn;inclass=lsidc;inseq=lsids;intype=ls typ AIPS 1: finish AIPS 1: AIPS 1: procedure getset AIPS 1: default;getidn;clrtemp AIPS 1: finish AIPS 1: AIPS 1: procedure lsclrcal AIPS 1: $ consolidate lists, deal with calcode='*' later AIPS 1: scalar lsidx,l,m,n AIPS 1: task'TABGET';getset;inext'NX';invers 0;keyvalue=0;keystrng'' AIPS 1: keyword'NUM ROW';getthead;lsidx=keyvalue(1);clrtemp;n=0;lssid= 0 AIPS 1: if (keyvalue(1)>1000)then;type'WARNING: MORE THAN 1000 SCANS ! ';end AIPS 1: for i=1:lsidx $ remember source number AIPS 1: pixxy=i,3,0;tabget;error=0 AIPS 1: for l=1:n;if(lssid(l)=keyvalue(1))then;error=1;end;end;clrte mp AIPS 1: if(error=0)then;n=n+1;lssid(n)=keyvalue(1);end AIPS 1: end;inext'SU';invers 0;keyvalue=0;keystrng'';keyword'NUM ROW' AIPS 1: getthead;lsidx=keyvalue(1);clrtemp;sources'';l=1;m=1;n=1 AIPS 1: for i=1:lsidx AIPS 1: pixxy=i,2,0;tabget;k=length(keystrng);j=0;clrtemp AIPS 1: while (j<20);j=j+1;if (substr(lsampcal(j),1,k)=substr(keystr ng,1,k)) then AIPS 1: lsampcal(l)=lsampcal(j);j=30;lsparm(14)=l;l=l+1;end;end; j=0;clrtemp AIPS 1: while (j<20);j=j+1;if (substr(lsphacal(j),1,k)=substr(keystr ng,1,k)) then AIPS 1: lsphacal(m)=lsphacal(j);j=30;lsparm(15)=m;m=m+1;end;end; j=0;clrtemp AIPS 1: while (j<5);j=j+1;if (substr(lsbndcal(j),1,k)=substr(keystrn g,1,k)) then AIPS 1: lsbndcal(n)=lsbndcal(j);j=30;lsparm(16)=n;n=n+1;end;end; clrtemp AIPS 1: end;lspntcal'';lsallcal'';for j=l:20;lsampcal(j)='';end AIPS 1: for j=m:20;lsphacal(j)='';end;for j=n:5;lsbndcal(j)='';end AIPS 1: for j=1:lsparm(15);lspntcal(j)=lsphacal(j);end;k=lsparm(15) AIPS 1: for j=1:lsparm(16);lspntcal(j+k)=lsbndcal(j);end;j=0;l=1;clrte mp AIPS 1: while (j<(lsparm(15)+lsparm(16)));j=j+1;if (length(lspntcal(j) )>0) then AIPS 1: lspntcal(l)=lspntcal(j);if(l<>j)then;lspntcal(j)='';end;l=l+ 1;end;end AIPS 1: $here - clean up pnt cal for doubles - subtract from total count below AIPS 1: k=lsparm(15)+lsparm(16);for j=1:k;lsallcal(j)=lspntcal(j);end; l=1 AIPS 1: for j=1:lsparm(14);i=length(lsampcal(j));lsidx=0;m=j AIPS 1: while ((lsidx0) then;lsallcal(l)=lsallcal(j) AIPS 1: if(l<>j)then;lsallcal(j)='';end;l=l+1;end;end AIPS 1: $typ 'LSAMPCAL, LSPHACAL, LSBNDCAL, LSPNTCAL, AND LSALLCAL :' AIPS 1: $typ lsampcal; typ lsphacal; typ lsbndcal; typ lspntcal; typ lsa llcal; AIPS 1: return;clrtemp AIPS 1: finish AIPS 1: AIPS 1: procedure numtab(lsstrng) AIPS 1: keystrng'';j=0;clrtemp AIPS 1: while ((j<15)&(keystrng<>lsstrng)) AIPS 1: j=j+1;keyword'EXTYPE'!!char(j);gethead;end;clrtemp AIPS 1: if (keystrng=lsstrng) then AIPS 1: keyword'EXTVER'!!char(j);gethead;else;keyvalue=0;end AIPS 1: keyword'';keystrng'';clrtemp AIPS 1: return keyvalue(1);finish AIPS 1: AIPS 1: procedure numbasel AIPS 1: scalar numarow,numbout,numbant,numbase,idx;string*16 nameant AIPS 1: numbout=0;keyword'NUM ROW';inext'AN';invers=0;getthead;numarow =keyvalue(1) AIPS 1: for numbant=1:numarow AIPS 1: pixxy=numbant,1,0;tabget;nameant=keystrng;idx=1;clrtemp AIPS 1: while(substr(nameant,idx,idx)<>':');idx=idx+1;end AIPS 1: if(substr(nameant,idx+1,idx+3)='OUT')then;numbout=numbout+1; end AIPS 1: if(substr(nameant,idx+2,idx+4)='OUT')then;numbout=numbout+1; end AIPS 1: end;numbase=(numarow-numbout)*(numarow-numbout-1)/2;clrtemp AIPS 1: $ type char(numarow-numbout)!!' ANTENNAS',char(numbase)!!' BASE LINES' AIPS 1: return numbase AIPS 1: finish AIPS 1: AIPS 1: procedure calcintt AIPS 1: scalar numxrow,numscan,numbbeg,numbend,numcnst,sum,avr,rms,rma x;rmax=300 AIPS 1: array interval(1000),numbvis(1000);avr=0;if(rmax>1000)then;rma x=1000;end AIPS 1: if (numtab('NX')<1) then;type'NOT MULTISOURCE - NO INTTIME CAL CULATED' AIPS 1: else AIPS 1: keyword'NUM ROW';inext'NX';invers 0;getthead;numxrow=keyvalu e(1) AIPS 1: if(numxrow>rmax)then;numxrow rmax;end AIPS 1: for numscan=1:numxrow;clrtemp AIPS 1: pixxy=numscan,2,0;tabget;interval(numscan)=86400*keyvalue( 1) AIPS 1: pixxy=numscan,5,0;tabget;numbbeg=keyvalue(1) AIPS 1: pixxy=numscan,6,0;tabget;numbend=keyvalue(1) AIPS 1: numbvis(numscan)=numbend-numbbeg+1;avr=max(avr,numbvis(num scan)) AIPS 1: end;numcnst=numbasel;sum=0 AIPS 1: if (avr > 0) then AIPS 1: for numscan=1:numxrow;if (numbvis(numscan)>0) then AIPS 1: sum=sum+( (numcnst*interval(numscan)) / numbvis(numsca n) ) AIPS 1: end;end;clrtemp;avr=sum/numxrow;sum=0 AIPS 1: for numscan=1:numxrow;if (numbvis(numscan)>0) then AIPS 1: sum=sum+((numcnst*interval(numscan))/numbvis(numscan)- avr)**2 AIPS 1: end;end;clrtemp;rms=sum/numxrow;clrtemp;end AIPS 1: $ type char(numxrow)!!' SCANS/SAMPLES WITH RMS(SEC) +/-'!!char( rms) AIPS 1: $ type char(avr)!!' SECOND INTEGRATIONS (APPROXIMATELY)' AIPS 1: end AIPS 1: return avr AIPS 1: finish AIPS 1: AIPS 1: procedure guesintt AIPS 1: scalar intcst,intavr,intmod,intime AIPS 1: intavr=calcintt;intcst=intavr;keyword'TELESCOP';gethead AIPS 1: if (keystrng='VLA') then;intcst=1+(2/3);end AIPS 1: if (keystrng='VLBA') then;intcst=0.131072;end AIPS 1: if (intcst=intavr) then;type'UNKNOWN TELESCOPE :'!!keystrng;en d AIPS 1: if (intavr>10) then AIPS 1: $ intime=10*floor(0.5+(intavr/10)) AIPS 1: intime=10*floor(intavr/10) AIPS 1: else;if (intavr>0) then AIPS 1: intmod=mod(intavr,intcst) AIPS 1: $ intime=intcst*((intavr-intmod)/intcst+floor(0.5+(intmod/i ntcst))) AIPS 1: intime=intcst*((intavr-intmod)/intcst+floor(intmod/intcst) ) AIPS 1: else;intime=intavr;end;end;clrtemp AIPS 1: if(numtab('NX')>0)then;type char(intime)!!' SECOND INTEGRATION S (GUESS)';end AIPS 1: return intime AIPS 1: finish AIPS 1: AIPS 1: procedure checkids AIPS 1: $LOS - account for fast switching source names - check on pos, q ual, calco AIPS 1: scalar ra1a,ra1b,ra2a,ra2b,dc1a,dc1b,dc2a,dc2b,n,m,l,idx AIPS 1: scalar q1,q2 AIPS 1: string*1 co1,co2 AIPS 1: string*16 n1,n2 AIPS 1: array alist(100),blist(100) AIPS 1: inext'SU';invers 0;keyword'NUM ROW';keyvalue 0;keystrng'';gett head AIPS 1: n=keyvalue(1);idx=1;aparm 0;bparm 0;alist 0;blist 0 AIPS 1: if (n > 1) then AIPS 1: for m=1:(n-1);clrtemp AIPS 1: pixxy m,11;tabget;ra1a keyvalue(1);ra1b keyvalue(2) AIPS 1: for l=(m+1):n;clrtemp AIPS 1: pixxy l,11;tabget;ra2a keyvalue(1);ra2b keyvalue(2) AIPS 1: if (abs(ra1a-ra2a)=0) then AIPS 1: if ( abs((ra1b-ra2b)*3600*1000) < 3 ) then $ RA within 3 mas! AIPS 1: pixxy m,12;tabget;dc1a keyvalue(1);dc1b keyvalue(2) AIPS 1: pixxy l,12;tabget;dc2a keyvalue(1);dc2b keyvalue(2) AIPS 1: if (abs(dc1a-dc2a)=0) then AIPS 1: if ( abs((dc1b-dc2b)*3600*1000) < 3 ) then $ DC wi thin 3 mas! AIPS 1: pixxy m,3;tabget;q1 keyvalue(1);pixxy l,3;tabget ;q2 keyvalue(1) AIPS 1: if (q1=q2) then $ same qualifier; same calcode? AIPS 1: pixxy m,4;tabget;co1 keystrng;pixxy l,4;tabget ;co2 keystrng AIPS 1: if (co1=co2) then AIPS 1: pixxy m,1;tabget;q1 keyvalue(1) AIPS 1: pixxy l,1;tabget;q2 keyvalue(1) AIPS 1: pixxy m,2;tabget;n1 keystrng;pixxy l,2;tabge t;n2 keystrng AIPS 1: if (idx>100) then; AIPS 1: type 'TOO MANY SOURCES TO DO DSORC - DO BY HAND!' AIPS 1: type 'NEXT =.'!!char(idx)!!' DO:'!!char(l)! !'.&.'!!char(m) AIPS 1: else AIPS 1: if (length(n1)1) then;task'DSORC';n=0 AIPS 1: outname inname;outclass inclass;outseq inseq;outdisk indis k AIPS 1: while (n100)then;type'TOO MANY SOURCES FOR DSORC';error 1;end ;clrtemp AIPS 1: end AIPS 1: finish AIPS 1: AIPS 1: procedure chkobjct AIPS 1: if (( (object='1331+305') ! (object='1328+307') ) ! (object='J 1331+3030') ) AIPS 1: then; object='3C286';end AIPS 1: if (( (object='0137+331') ! (object='0134+329') ) ! (object='J 0137+3309') ) AIPS 1: then; object='3C48';end AIPS 1: if (( (object='0521+166') ! (object='0518+165') ) ! (object='J 0521+1638') ) AIPS 1: then; object='3C138';end AIPS 1: if (( (object='0542+498') ! (object='0538+498') ) ! (object='J 0542+4951') ) AIPS 1: then; object='3C147';end AIPS 1: if (( (object='1411+522') ! (object='1409+524') ) ! (object='J 1411+5212') ) AIPS 1: then; object='3C295';end;clrtemp;return AIPS 1: finish AIPS 1: AIPS 1: procedure checkbnd AIPS 1: band='';j=1 AIPS 1: while (j<9) AIPS 1: keyword='CTYPE'!!char(j);gethead;keyword='CRVAL'!!char(j);cl rtemp AIPS 1: if (keystrng='FREQ') then;gethead;j=9;else;j=j+1;end;end AIPS 1: keyvalue(1)=keyvalue(1)/1e9; AIPS 1: if ( (keyvalue(1)>38) & (keyvalue(1)<51) ) then; band='Q ';end AIPS 1: if ( (keyvalue(1)>20.4) & (keyvalue(1)<25.5) ) then; band='K ';end AIPS 1: if ( (keyvalue(1)>13.5) & (keyvalue(1)<16.3) ) then; band='U ';end AIPS 1: if ( (keyvalue(1)> 6.8) & (keyvalue(1)< 9.6) ) then; band='X ';end AIPS 1: if ( (keyvalue(1)> 4.2) & (keyvalue(1)< 5.1) ) then; band='C ';end AIPS 1: if ( (keyvalue(1)> 1.15) & (keyvalue(1)< 1.75) ) then; band='L ';end AIPS 1: if ( (keyvalue(1)>0.298) & (keyvalue(1)<0.345) ) then; band='P ';end AIPS 1: if ( (keyvalue(1)>0.072) & (keyvalue(1)<0.076) ) then; band='4 ';end;clrtemp AIPS 1: return AIPS 1: finish AIPS 1: AIPS 1: procedure chkmodel AIPS 1: error=0;sysout='';sys2com'' AIPS 1: syscom'ls -1 $AIPSTARS/ AIPS 1: sys2com(1) inname!!'.MODEL' AIPS 1: sys2com(2) ' >& /dev/null AIPS 1: system AIPS 1: finish AIPS 1: AIPS 1: procedure loadmodl AIPS 1: scalar lsidx,l AIPS 1: array lsload(5) AIPS 1: task'TABGET';getset;inext'SU';invers 0;keyvalue=0;keystrng'' AIPS 1: keyword'NUM ROW';getthead;lsidx=keyvalue(1);l=1;clrtemp AIPS 1: for i=1:lsidx AIPS 1: pixxy=i,2,0;tabget;k=length(keystrng);j=1;clrtemp AIPS 1: while (j<21) AIPS 1: if (substr(lsampcal(j),1,k)=substr(keystrng,1,k)) then AIPS 1: lsload(l)=i;j=30;l=l+1;else;j=j+1;clrtemp AIPS 1: end;end;end;lsidx=0;checkbnd;keyword'EPOCH';keyvalue=0;keystrn g='';gethead AIPS 1: if (keyvalue(1)<1999) then;lsidx=1;end AIPS 1: for j=1:(l-1) AIPS 1: object=lsampcal(j);chkobjct;clrtemp;intype'MA';outdisk=lsdis k AIPS 1: inname=object!!'_'!!band;inclass'MODEL';inseq=1;indisk=lsdis k;chkname AIPS 1: $$ if (error>0) then;type lsampcal(lsload(j))!!' MODEL ='inname ;chkmodel AIPS 1: if (error>0) then;type lsampcal(j)!!' MODEL ='inname;chkmode l AIPS 1: if(error<1)then;go calrd;if (lsidx>0) then;eposwtch;end;en d;end $ J2000 AIPS 1: end;return AIPS 1: finish AIPS 1: AIPS 1: procedure vlanew AIPS 1: clrstat;j=numtab('BP');if (j>0) then;inext'BP';invers=-1;extde st;end AIPS 1: j=numtab('CL');if (j>1) then;inext'CL';for k=2:j;invers=k;extd est;end;end AIPS 1: j=numtab('SN');if (j>0) then;inext'SN';invers=-1;extdest;end AIPS 1: j=numtab('XX');if (j>0) then;inext'XX';invers=-1;extdest;end AIPS 1: if (inclass='LINE') then AIPS 1: j=numtab('FG');if (j>1) then;inext'FG';for k=2:j;invers=k;ex tdest;end;end AIPS 1: j=numtab('CL');if (j>1) then;inext'CL';for k=2:j;invers=k;ex tdest;end;end AIPS 1: j=numtab('BP');if (j>0) then;inext'BP';invers=-1;extdest;end AIPS 1: j=numtab('PL');if (j>0) then;inext'PL';invers=-1;extdest;end AIPS 1: end;j=numtab('PL');if (j>0) then;inext'PL';invers=-1;extdest;e nd;clrtemp AIPS 1: type'DONE CLEANUP OF OLD TABLE EXTENTION FILES (CL,SN,FG,BP,PL ,XX)' AIPS 1: finish AIPS 1: AIPS 1: procedure allzap AIPS 1: chkname;if(error<1)then;for j=1:(1-error);zap;end;end;clrtemp AIPS 1: finish AIPS 1: AIPS 1: procedure allplot AIPS 1: tvinit;j=numtab('PL');type 'NUMBER OF PLOT FILES TO SHOW ON TV :'!!char(j) AIPS 1: if (j>0) then AIPS 1: for k=1:j;plver=k;type 'PLOT'char(k)!!'/'!!char(j);go tvpl;r ead;end AIPS 1: else;type 'NOTHING TO PLOT - DONE';end AIPS 1: finish AIPS 1: AIPS 1: procedure goplt0 AIPS 1: if (lsplot>0) then;go;end AIPS 1: finish $SN only AIPS 1: procedure goplt1 AIPS 1: if (lsplot>1) then;go;end AIPS 1: finish $SN+CL AIPS 1: procedure goplt2 AIPS 1: if (lsplot>2) then;go;end AIPS 1: finish $SN+CL+BP AIPS 1: procedure goplt3 AIPS 1: if (lsplot>3) then;go;end AIPS 1: finish $CL,BP applied AIPS 1: AIPS 1: procedure calpipe(lsdisk,lsname,lsrant) AIPS 1: vnum=33;dowait=true;getidn;vlanew;j=0;clrtemp AIPS 1: if (inclass='CH 0') then;inclass'LINE';vlanew;end;clrtemp AIPS 1: if(fsw>0)then;checkids;if(inclass='CH 0')then;inclass'LINE';ch eckids;end;end AIPS 1: if ((numtab('FG')<1)&(lsflag>=0)) then AIPS 1: if (lsflag>=1) then AIPS 1: task'QUACK';getset;flagver=1;opcode'BEG';i=min(3*tint,20) AIPS 1: reason char(i)!!' SEC AUTO-QUACK';aparm=0,i/60,-1;go AIPS 1: end;task'FLAGR';getset AIPS 1: docal 2;solint=max(3*tint-2,2.7*tint);vector=-1;docrt 0;go AIPS 1: end AIPS 1: task'SNPLT';getset;inext'CL';nplots 8;optype'AMP';vput;pixrang e=0.7,1.8 AIPS 1: goplt1;task'SETJY';getset;optype'REJY';aparm=0;freqid=1;go;opt ype'CALC' AIPS 1: if (length(lscal)<>0) then AIPS 1: optype'';zerosp=lsflux,0;lsallcal=lscal,lspntcal AIPS 1: end;sources=lsampcal;go AIPS 1: task'CALIB';getset;docalib=2;refant=lsrant;aparm=3,0,0,0,0,0,4 ,0,0;calcode'' AIPS 1: solint=lsparm(2);calsour=lspntcal;snver=numtab('SN')+1;solmo de'P' AIPS 1: soltype'L1R';baddisk=lsbadd;vput;if(star>0)then;calsour'';ca lcode'*';end;go AIPS 1: if (lsmodl>0) then $ use models for ones that exist AIPS 1: loadmodl;vget calib;calsour='';in2seq=0;in2disk=lsdisk;in2cl ass'MODEL' AIPS 1: for j=1:(l-1) AIPS 1: inext'SU';pixxy=lsload(j),2,0;tabget;calsour(1)=keystrng;c lrtemp AIPS 1: pixxy=lsload(j),4,0;tabget;calcode=substr(keystrng,1,4);cl rtemp AIPS 1: object=lsampcal(j);chkobjct;in2name=object!!'_'!!band AIPS 1: vput calib;inname=in2name;inclass=in2class;inseq=in2seq;in disk=in2disk AIPS 1: $ if no model, use point with full uvrange AIPS 1: chkname;vget calib;if (error>0)then;clr2name;end;go AIPS 1: end;clrtemp AIPS 1: else;uvrange=lsparm(3),lsparm(4);calsour=lsampcal;go;end AIPS 1: vget snplt;inext'SN';optype'PHAS';goplt0;clrtemp AIPS 1: task'CLCAL';getset;freqid=1;refant=lsrant;gainuse=numtab('CL') +1 AIPS 1: snver=numtab('SN');gainver=numtab('CL');sources'';soucode''; AIPS 1: calsour=lsphacal;calcode'';vput;if(star>0)then;calsour'';cal code'*';end;go AIPS 1: calsour=lsallcal;sources=calsour;interpol'SELF' AIPS 1: if(star>0)then;calsour'';calcode'*';soucode'*';end;go AIPS 1: vget snplt;inext'CL';optype'PHAS';goplt1;clrtemp AIPS 1: vget calib;solmode'A&P';calsour=lspntcal;calcode''; AIPS 1: solint=lsparm(13)*lsparm(2);snver=numtab('SN')+1;clr2name;vput AIPS 1: if(star>0)then;calsour'';calcode'*';end;go AIPS 1: if (lsmodl>0) then AIPS 1: loadmodl;vget calib;calsour='';in2seq=0;in2disk=lsdisk;in2cl ass'MODEL' AIPS 1: for j=1:(l-1) AIPS 1: inext'SU';pixxy=lsload(j),2,0;tabget;calsour(1)=keystrng;c lrtemp AIPS 1: pixxy=lsload(j),4,0;tabget;calcode=substr(keystrng,1,4);cl rtemp AIPS 1: object=lsampcal(j);chkobjct;in2name=object!!'_'!!band;calc ode'' AIPS 1: vput calib;inname=in2name;inclass=in2class;inseq=in2seq;in disk=in2disk AIPS 1: $ if no model, use point with full uvrange AIPS 1: chkname;vget calib;if (error>0)then;clr2name;end;go AIPS 1: end;inseq=0;indisk=lsdisk;inclass'MODEL';intype'MA' AIPS 1: for j=1:(l-1) AIPS 1: object=lsampcal(j);chkobjct;inname=object!!'_'!!band;chkna me AIPS 1: if (error<1) then;zap;end;end AIPS 1: else;uvrange=lsparm(3),lsparm(4);calsour=lsampcal;go;end AIPS 1: vget snplt;inext'SN';optype'AMP';goplt0;optype'PHAS';pixrange= -20,20;goplt0 AIPS 1: task'GETJY';getset;calsour=lsampcal;snver=numtab('SN'); AIPS 1: if (star>0) then; AIPS 1: $ for j=1:lsparm(14);sources(j)='-'!!lsampcal(j);end;k=lsparm (14)+1 AIPS 1: $ if (length(lscal)>0) then;sources(k)='-'!!lscal;k=k+1;end AIPS 1: $ for j=k:(25-k+2);sources(j)=lspntcal(j-k+2);end; AIPS 1: soucode='*' AIPS 1: else AIPS 1: sources=lspntcal;if (length(lscal)>0) then;sources(11)='-'!! lscal;end AIPS 1: end;go AIPS 1: if (lscont<1) then AIPS 1: type '****************************************************** **' AIPS 1: type '** WRITE DOWN THE FLUX DENSITIES FOR YOUR CALIBRATORS **' AIPS 1: type '** (AND DO NOT FORGET THE ERRORS EITHER!) **' AIPS 1: type '****************************************************** **';read AIPS 1: end AIPS 1: vget clcal;gainver=numtab('CL');gainuse=numtab('CL')+1;snver=n umtab('SN') AIPS 1: if(star>0)then;calsour'';calcode'*';end;go;calsour=lsallcal;so urces=calsour AIPS 1: interpol'SELF';if(star>0)then;calsour'';calcode'*';soucode'*'; end;go AIPS 1: vget snplt;inext'CL';optype'AMP';goplt1;optype'PHAS';goplt1;cl rtemp AIPS 1: if (inclass='CH 0') then AIPS 1: task'TACOP';getset AIPS 1: outdisk=indisk;outname=inname;outclass'LINE';outseq=inseq; ncount=1 AIPS 1: keystrng'';inext'FG';invers=numtab('FG');if (invers>0) the n;go;end AIPS 1: inext'CL';invers=numtab('CL');keyvalue 0;outseq=inseq;vput ;go;clrtemp AIPS 1: task'BPASS';getset;inclass'LINE';calsour=lsbndcal,lsampcal;d ocal=2 AIPS 1: solint=-1;bpassprm(5)=-1;bpassprm(9)=1;baddisk=lsbadd;go;c lrtemp AIPS 1: task'POSSM';getset;inclass'LINE';bpver 0;aparm=0,1,.4,1.2,-3 0,30,0,2,3,0 AIPS 1: nplots=6;goplt2;sources=lsbndcal;docalib 2;doband 1;aparm= 1 0;aparm(9)=3 AIPS 1: antennas=lsrant,0;goplt2;nplots=0;vput;goplt2;stokes'I';an tennas=0;goplt2 AIPS 1: sources=lsampcal;goplt3 AIPS 1: vget tacop;inclass'LINE';outclass'CH 0';invers=numtab('BP'); inext'BP';go AIPS 1: end;task'TASAV';getset;outdisk=indisk;go;dowait=false;vnum=0;c lrtemp AIPS 1: finish AIPS 1: AIPS 1: procedure calcrms AIPS 1: scalar nbas,nvis,tbw,rms,minhrs AIPS 1: keyword'GCOUNT';gethead;nvis=keyvalue(1);nbas=numbasel;j=1 AIPS 1: minhrs=nvis*tint/(nbas*3600) $ underesimate of obs hours (over estimate rms) AIPS 1: while (j<9) $ bandwidth in a channel, continuum or spectral li ne AIPS 1: keyword='CTYPE'!!char(j);gethead;keyword='CDELT'!!char(j);cl rtemp AIPS 1: if (keystrng='FREQ') then;gethead;j=9;else;j=j+1;end;end;tbw =keyvalue(1) AIPS 1: if (lsidc <> 'CH 0') then;j=1 $ continuum, multiple IFs averag ed AIPS 1: while (j<9) AIPS 1: keyword='CTYPE'!!char(j);gethead;keyword='NAXIS'!!char(j); clrtemp AIPS 1: if(keystrng='IF')then;gethead;j=9;else;j=j+1;end;end;tbw=t bw*keyvalue(1) AIPS 1: end;checkbnd;if((band='P')!(band='4'))then;tbw=tbw/3.2;else;tb w=tbw/50;end AIPS 1: tbw=sqrt(tbw*minhrs/24e6);rms=-1 AIPS 1: if (band='Q')then;rms=3.0e-5/tbw;end;if (band='K')then;rms=2.5 e-5/tbw;end AIPS 1: if (band='U')then;rms=2.0e-5/tbw;end;if (band='X')then;rms=5.3 e-6/tbw;end AIPS 1: if (band='C')then;rms=6.4e-6/tbw;end;if (band='L')then;rms=6.6 e-6/tbw;end AIPS 1: if (band='P')then;rms=1.7e-4/tbw;end;if (band='4')then;rms=1.5 e-2/tbw;end AIPS 1: if (rms<0) then;type 'CANNOT CALCULATE RMS FROM OBSERVING BAND ..';end AIPS 1: typ 'ESTIMATED RMS:' char(rms*1000)!!' MILLI JANSKY' AIPS 1: return rms AIPS 1: finish AIPS 1: AIPS 1: procedure setboxfle AIPS 1: scalar ci,bi AIPS 1: string*48 fbox AIPS 1: fbox'/tmp/SETFC@ AIPS 1: fbox=fbox!!inname!!'_'!!inclass!!'.'!!char(inseq)!!'-'!!char(i ndisk) AIPS 1: ci=0;bi=length(fbox) AIPS 1: while(ci& /dev/null AIPS 1: if(substr(boxfile,1,1)<>' ')then;system;end;clrtemp AIPS 1: finish AIPS 1: AIPS 1: procedure catboxfile AIPS 1: sys2com'';syscom 'cat AIPS 1: sys2com(1) 'X'!!boxfile;substr(sys2com(1),1,1)='' AIPS 1: if(substr(expmsg,1,1)<>'')then;sysout=expmsg;else;sysout'';end ;clrtemp AIPS 1: system AIPS 1: finish AIPS 1: AIPS 1: procedure setimsize AIPS 1: scalar szf, kk AIPS 1: string*48 bxf AIPS 1: array szc(2), szi(2), orgc(2), orgi(2) AIPS 1: vput imagr;task'SETFC';sources'';bcount=1;bxf=setboxfle;boxfil e=bxf AIPS 1: bparm=0;infile='';shift=0;flux=0;pbparm=0.25,0;delboxfle AIPS 1: orgc=cellsize;cellsize=0;orgi=lsparm(6);imsize=0;kk=1 AIPS 1: while (kk<9) AIPS 1: keyword='CTYPE'!!char(kk);gethead;keyword='CRVAL'!!char(kk); clrtemp AIPS 1: if (keystrng='FREQ') then;gethead;kk=9;else;kk=kk+1;end;end AIPS 1: keyvalue(1)=keyvalue(1)/1e9;bparm(1)=0.375/keyvalue(1);bparm(4 )=3*bparm(1) AIPS 1: bparm(2)=30;bparm(3)=1;bparm(5)=0.031;bparm(6)=256;bparm(7)=25 6;bparm(8)=100 AIPS 1: go;szf=nfield;szc=cellsize;szi=imsize AIPS 1: vget imagr;if(lsparm(5)<0)then;cellsize=szc;else;cellsize=orgc ;end AIPS 1: if(lsparm(6)<0)then;imsize=256;nfield=szf;boxfile=bxf;else;ims ize=orgi;end AIPS 1: vput imagr AIPS 1: finish AIPS 1: AIPS 1: procedure imapipe(k,lsdisk,lsname) AIPS 1: vnum=33;dowait=true AIPS 1: if (k=1) then AIPS 1: task'SPLIT';getset;outdisk=indisk;outclass=inclass;docalib=2 AIPS 1: baddisk=lsbadd;douvcomp=-1;go AIPS 1: if (inclass='CH 0') then;inclass'LINE';outclass=inclass;doba nd=1;bpver=0 AIPS 1: go;end;end;clrtemp AIPS 1: task'TABGET';getset;inext'SU';invers=0;keyvalue=0;keystrng'';v put;clrtemp AIPS 1: task'IMAGR';getset;outdisk=indisk;flux=lsparm(8);baddisk=lsbad d;j=1 AIPS 1: while (j<9) AIPS 1: keyword='CTYPE'!!char(j);gethead;keyword='CRVAL'!!char(j);cl rtemp AIPS 1: if (keystrng='FREQ') then;gethead;j=9;else;j=j+1;end;end AIPS 1: cellsize=1.75e10/(keyvalue(1)*abs(lsparm(5)));do3dimag=1;overl ap=2;vput AIPS 1: keyword'NUM ROW';inext'SU';invers=0;keystrng'';getthead;clrtem p AIPS 1: for i=1:keyvalue(1) $ check if source is in index and uvfile e xists AIPS 1: vget tabget;pixxy=i,2,0;tabget;vget imagr;inname=keystrng;j= 1;intype'UV' AIPS 1: inseq=0;chkname;type ' ';niter=lsparm(7);lstarg=1;clrtemp;vp ut AIPS 1: if (error < 1) then $ source file exists, but same source nu mber ? AIPS 1: vget tabget;pixxy=i,1,0;tabget;error=1;k=1 AIPS 1: while ((lssid(k)>0) & (k<1001)) AIPS 1: if (lssid(k)=keyvalue(1))then error=0;end AIPS 1: k=k+1;end;end;vget imagr AIPS 1: if (error < 1) then AIPS 1: if ((lsparm(7)=1e6)&(lsparm(8)<0))then;flux=6*calcrms;end AIPS 1: if ((lsparm(6)<0)!(lsparm(5)<0))then;setimsize;else;imsize =lsparm(6);end AIPS 1: while (j<30) AIPS 1: k=length(inname) AIPS 1: if (substr(lsallcal(j),1,k)=substr(inname,1,k)) then $ c alibrator AIPS 1: lstarg=0;j=30 AIPS 1: if(lsparm(6)>=-0.99)then;niter=min(500,lsparm(7)) AIPS 1: nfield=1;boxfile'';imsize=min(256,lsparm(6)) AIPS 1: if(imsize(1)<0)then;imsize=256;end;end AIPS 1: else;j=j+1;end $ check next source, if not found -> targ et AIPS 1: end;if(substr(boxfile,1,1)<>' ')then;catboxfile;end AIPS 1: AIPS 1: j=1 AIPS 1: $calibrator lstarg=0 AIPS 1: $target if lstarg=1 AIPS 1: AIPS 1: AIPS 1: while (j<9) AIPS 1: keyword='CTYPE'!!char(j);gethead;keyword='NAXIS'!!char(j );clrtemp AIPS 1: if (keystrng='IF') then;gethead;j=9;else;j=j+1;end;end AIPS 1: type ' NOW STARTING WITH SOURCE :'!!char(i)!!' ='!! inname;type ' ' AIPS 1: if (inclass='CH 0') then AIPS 1: for k=1:keyvalue(1);bif=k;eif=k AIPS 1: if ((lstarg>0)!(lsparm(9)>0)) then;go;end AIPS 1: end;clrtemp;k=keyvalue(1) AIPS 1: inclass'LINE';keyvalue=0;keystrng'';j=1;chkname AIPS 1: if (error < 1) then AIPS 1: while (j<9) AIPS 1: keyword='CTYPE'!!char(j);gethead;clrtemp AIPS 1: if (keystrng='FREQ') then AIPS 1: keyword='NAXIS'!!char(j);gethead;echan=keyvalue(1) ;j=9 AIPS 1: else;j=j+1;end AIPS 1: end;bchan=floor(echan/10);echan=ceil(echan*9/10) AIPS 1: if (bchan=1) then;bchan=2;end;j=k AIPS 1: for k=1:j;bif=k;eif=k;if ((lstarg>0)!(lsparm(9)>1)) then;go;end AIPS 1: end;end;clrtemp AIPS 1: else AIPS 1: bif=1;eif=keyvalue(1);vput;out2disk=indisk AIPS 1: if ( (lsparm(10)=0) ! ((lsparm(9)<1)&(lstarg<1)) )then;g o;clrtemp AIPS 1: else AIPS 1: solint=lsparm(2);dotv=1;nmaps=lsparm(10);refant=lsrant ;aparm=4,0 AIPS 1: if (lsparm(10)<0) then;dotv=-1;nmaps=-1*nmaps;end;go s cimg;clrtemp AIPS 1: end;end;boxfile=setboxfle;delboxfle AIPS 1: inclass'IMAGR';inseq=0;intype'UV';indisk=lsdisk;allzap AIPS 1: $ inclass'SCIMG';allzap AIPS 1: inclass'IBM*';intype'MA';allzap AIPS 1: inclass'RBM*';allzap;inclass'LBM*';allzap;recat;clrtemp AIPS 1: else;type ' NO UV-FILE, SKIPPING SOURCE :'!!inname!!' =#' !!char(i) AIPS 1: end;end;dowait=false;vnum=0 AIPS 1: finish AIPS 1: AIPS 1: procedure avlapipe AIPS 1: tput avlapipe;vnum=33;vput avlapipe;pipeinpt;clrtemp AIPS 1: if (lserr <> 0) then; type '*** ERROR - ARE ALL INPUTS SET PRO PERLY ? ***' AIPS 1: else;lsclrcal;tint=guesintt;clrtemp AIPS 1: if (tint > 0) then;calpipe(lsdisk,lsname,lsrant);clrtemp AIPS 1: if (lsparm(1)>0) then;imapipe(1,lsdisk,lsname) AIPS 1: else;type'CALIBRATION DONE - SKIPPING SPLIT AND IMAGING' AIPS 1: type'--------------------------------------------------- --------' AIPS 1: end;type ' ' AIPS 1: if (lsplot>0) then;type 'VIEW CAL-PLOTS WITH GETSET;ALLPLO T';end;type ' ' AIPS 1: else;type '* * *';type 'SINGLE DISH VLBI EXPERIMENT?';type ' * * *';end AIPS 1: end;tget avlapipe;vnum=0;type'* APPEARS TO HAVE ENDED SUCCESSF ULLY *';clrtemp AIPS 1: finish >AIPS 1: Found in Version=ABIN AIPS 1: default'AVLAPIPE' AIPS 1: Found in Version=ABIN AIPS 1: indisk 1; doalign -1; flagver 2; domodel 1 AIPS 1: docal 1; sources '*''' AIPS 1: $ to be set by itself later AIPS 1: solint 1; factor 5; doarray -1; imsize -1 AIPS 1: $imsize 512;$niter -1;cutoff -1;plver 0 AIPS 1: niter -1; cutoff -1 AIPS 1: $ for now debugging AIPS 1: docont 1; plver -1; doall 1; doresid 0 AIPS 1: AIPS 1: $ defaults AIPS 1: $ BADDISK 0$ INDISK 0$ DOCAT 1$ INNAME ' '$ INCLASS ' '$ INSEQ 0 AIPS 1: $ DOALIGN 1$ FLAgver 0$ SOLINT 0$ FACTOR 0$ REFANT 0$ DOMODEL -1 AIPS 1: $ KEYSTRNG ' '$ FLUX 0$ UVRANGE 0, 0$ SOURCES ' '$ CALSOUR ' ' AIPS 1: $ dopol 0$ bpa 0$ DOCONT 1$ PLVER 0$ DOALL -1$ DOARRAY -1 AIPS 1: $ IMSIZE 0, 0$ NITER 0$ CUTOFF 0$ DOCAL 0$ DORESID -1 >>::::>AIPS 1: 'BB116_1999DEC04_1' >>AIPS 1: 'BB116_1999DEC04_1' >AIPS 1: Found in Version=ABIN AIPS 1: $ Lorant Sjouwerman, versions 1.. 2005, for NRAO AIPS 1: AIPS 1: $$ General catalog looks like AIPS 1: $$ Multi-source UV data file AIPS 1: $$ Multi-source TASAV file AIPS 1: $$ Single-source calibrated data - auvf AIPS 1: $$ Single-source calibrated images- aimg AIPS 1: AIPS 1: $May need to redefine after a restore 0: AIPS 1: $allzap AIPS 1: $calcintt AIPS 1: $guesintt AIPS 1: $lsparm(5);tint;lsdisk AIPS 1: AIPS 1: procedure flatfov AIPS 1: $LOS - compile flatn-ed radius blank-ed images out to where pbco rr=2.5 (=xpb) AIPS 1: scalar uvi,mai,fov,frq,kk,tbw,tint,xpb,xcst,,fbw,fta;xpb=2.5 AIPS 1: clrname;indisk=lsdisk;intype'UV';chkname;uvi=1-error AIPS 1: if(uvi<3)then;type'ERROR: NO FILES PROCESSED !';else AIPS 1: if(uvi<4)then;type'WARNING: ONLY ONE UV-FILE - MAYBE CHECK?' ;end AIPS 1: getname 1;tint=guesintt;xcst=sqrt((3/ln(2))*(xpb-1)/xpb);kk= 1 AIPS 1: while (kk<5) AIPS 1: keyvalue=0;keystrng'';keyword='CTYPE'!!char(kk);gethead AIPS 1: if(substr(keystrng,1,4)='FREQ')then;keyword='CRVAL'!!char( kk) AIPS 1: keystrng'';gethead;frq=keyvalue(1);kk=5;else;kk=kk+1;end AIPS 1: end AIPS 1: for i=3:uvi;getname i AIPS 1: task'TABGET';inext'FQ';invers 1;keyword'NUM ROW';keystrng' ';getthead AIPS 1: for j=1:keyvalue(1) AIPS 1: pixxy=j,4,1;tabget;tbw=keyvalue(1) AIPS 1: pixxy=j,4,2;tabget;tbw=max(tbw,keyvalue(1)) AIPS 1: $ Actually imagr takes care of some of this bandwidth issue alre ady AIPS 1: $ so instead of maximum frequency span, use max individual bandw idth AIPS 1: end;inty'MA';inseq=0;inclass'*001';chkname;mai=1-error AIPS 1: if(mai>1)then;type'WARNING: MULTIPLE IMAGES - MAYBE CHECK? ';end AIPS 1: for j=1:mai $ assume inseq starts at 1.. AIPS 1: inseq=j;kk=1;cellsize=0;userid=0 AIPS 1: while (kk<5) AIPS 1: keyvalue=0;keystrng'';keyword='CTYPE'!!char(kk);gethea d AIPS 1: keyword='CDELT'!!char(kk);clrtemp AIPS 1: if(substr(keystrng,1,3)='RA-')then;gethead;cellsize(1)=k eyvalue(1);end AIPS 1: if(substr(keystrng,1,4)='DEC-')then;gethead;cellsize(2)= keyvalue(1);end AIPS 1: if(substr(keystrng,1,4)='FREQ')then;keyword='CRVAL'!!cha r(kk) AIPS 1: keystrng'';gethead;fov=keyvalue(1)/1e9;fov=1350/fov; end;kk=kk+1 AIPS 1: end;cellsize(1)=-1*cellsize(1)*3600;cellsize(2)=cellsize (2)*3600 AIPS 1: fta=min(1.75e10/(frq*abs(lsparm(5))),(min(cellsize(1),ce llsize(2)))) AIPS 1: fbw=xcst*3*fta*frq/tbw $ radius field/view due bandwidth AIPS 1: fta=xcst*3*fta/(tint*7.2722e-5) $ radius field/view due averaging AIPS 1: fov=min(fov,fbw);fov=min(fov,fta) $ min field/view ra dius, arcsec AIPS 1: imsize(1)=ceil(2*fov/cellsize(1));imsize(2)=ceil(2*fov/c ellsize(2)) AIPS 1: task'FLATN';inclass'?CL*';chkname;nfield=1-error;nmaps=1 ;clroname AIPS 1: outname=inname;coordina=0;reweight=0;doweight=0;edgskp=1 5;aparm=0 AIPS 1: pbparm=1/xpb,0;type'MINIMUM FOV :'!!char(fov)!!' ARCSEC RADIUS' AIPS 1: inclass'?CL001';go;wait;inclass'?CL*';allzap;recat;incla ss'FLATN' AIPS 1: tput;default blank;tget flatn;task'BLANK';opcode'RADI';d parm fov,0 AIPS 1: go;wait;allzap;recat AIPS 1: end;end;end AIPS 1: finish AIPS 1: AIPS 1: procedure nvasimage AIPS 1: $LOS - Determine noise, do primary beam correction, include copy right AIPS 1: scalar numfle,ll,mm AIPS 1: clrname;indisk=lsdisk;recat;chkname;numfle=1-error;mai=0 AIPS 1: while (intype<>'MA');mai=mai+1;getname mai;end AIPS 1: for j=mai:numfle;default imean;docat=1;getn j;keyvalue=0;keyst rng'' AIPS 1: keyword='CRPIX1';gethead;ll=keyvalue(1);keyword='CRPIX2';get head AIPS 1: mm=keyvalue(1);doinvers=1;blc(1)=ll-29;blc(2)=mm-30;trc(1)=l l+30 AIPS 1: trc(2)=mm+29;imstat;doinv=-1;blc=0;trc=0;rms=pixstd;go;wa AIPS 1: if(pixstd=rms)then;keyword'ACTNOISE';keytype'R';keyvalue=rms ,0;puthead;end AIPS 1: end AIPS 1: default'PBCOR';indisk=lsdisk;inclass'BLANK';chkname;pbparm=1/x pb,0 AIPS 1: for j=mai:numfle AIPS 1: getname mai;getoname mai;outclass'RADCOR';outseq=0;inclass'B LANK';chkname AIPS 1: if(error<1)then;outdisk=indisk;go;wait;zap;recat;end $ icl.. .->blanked file AIPS 1: end;default'CPYRT';indisk=lsdisk;recat;infile='AVLA:Arch_Cprt AIPS 1: for j=mai:numfle $ can only do on MA files AIPS 1: getname mai;getoname mai;outclass'NVAS06';go;wait;zap;recat AIPS 1: end AIPS 1: finish AIPS 1: AIPS 1: procedure nvasname AIPS 1: $LOS - makes the RA/Dec directory and returns the archive file n ame AIPS 1: scalar ki,ra1,ra2,dc1,dc2,st1,st2,nu1,nu2,bw,rh,rm,rs,dd,dm,ds ,rmsv,sbmv AIPS 1: string*1 pm,rmsc AIPS 1: string*2 zz AIPS 1: string*3 mmm AIPS 1: string*4 rmss,sbms,fras AIPS 1: string*5 radi AIPS 1: string*30 dir AIPS 1: string*20 expn AIPS 1: ki=1;userid=0 AIPS 1: while (ki<9) AIPS 1: keyvalue=0;keystrng'';keyword='CTYPE'!!char(ki);gethead AIPS 1: typ ki, keys AIPS 1: if(substr(keystrng,1,2)='RA')then AIPS 1: keyword='CRVAL'!!char(ki);gethead;ra1=keyvalue(1)/15;ra2=k eyvalue(2)/15 AIPS 1: keyword='CDELT'!!char(ki);gethead;cellsize(1)=-1*keyvalue( 1)*3600 AIPS 1: rh=floor(ra1);ra1=(ra1-rh)*60;rm=floor(ra1);ra1=(ra1-rm)*6 0 AIPS 1: rs=((floor((ra1+(3600*ra2))*1000)+5)/1000);clrtemp AIPS 1: $ if ((ra1+(3600*ra2))<10) then;rs=substr(char(ra1+(3600*ra 2)+0.005),1,3) AIPS 1: $ else;rs=substr(char(ra1+(3600*ra2)+0.005),1,4);end AIPS 1: if(abs(rs-floor(rs))<0.1)then;zz='.0';else;zz='';end;clrte mp AIPS 1: keyword='NAXIS'!!char(ki);gethead;ra1=0.5*keyvalue(1)*cell size(1);end AIPS 1: typ 'HERE' AIPS 1: if(substr(keystrng,1,3)='DEC')then AIPS 1: keyword='CRVAL'!!char(ki);gethead;dc1=keyvalue(1);dc2=keyv alue(2) AIPS 1: keyword='CDELT'!!char(ki);gethead;cellsize(2)=keyvalue(1)* 3600 AIPS 1: if(dc1<0)then;pm='-';dc1=-1*dc1;dc2=-1*dc2;else;pm='+';end AIPS 1: dd=floor(dc1);dc1=(dc1-dd)*60;dm=floor(dc1);dc1=(dc1-dm)*6 0 AIPS 1: ds=floor(dc1+(3600*dc2));clrtemp AIPS 1: keyword='NAXIS'!!char(ki);gethead;dc1=0.5*keyvalue(1)*cell size(2);end AIPS 1: if(substr(keystrng,1,4)='FREQ')then AIPS 1: keyword='CRVAL'!!char(ki);gethead;nu1=keyvalue(1)/1e6;nu2= keyvalue(2)/1e6 AIPS 1: keyword='CDELT'!!char(ki);gethead;bw=keyvalue(1)/1e6;end;c lrtemp AIPS 1: if(substr(keystrng,1,6)='STOKES')then AIPS 1: keyword='CRVAL'!!char(ki);gethead;st1=keyvalue(1) AIPS 1: keyword='CRPIX'!!char(ki);gethead;st2=keyvalue(1);clrtemp AIPS 1: end; AIPS 1: typ ki 'TOO' AIPS 1: if(substr(keystrng,1,1)='')then;ki=10;else;ki=ki+1;end AIPS 1: end;clrtemp $ build the output file name here AIPS 1: typ 'BUILD NOW' AIPS 1: if (intype='MA')then; $read conv size, rms from header, use im si*cell/2 for R AIPS 1: radi='S';ra2=0.5*(ra1+dc1-9);if(ra2>60)then;radi='M';ra2=ra2 /60;end $ R-fov AIPS 1: if(ra2>60)then;radi='D';ra2=ra2/60;end;radi=substr(char(ra2) ,1,4)!!radi AIPS 1: keyword='BMAJ';gethead;sbmv=keyvalue(1);keyword='BMIN';gethe ad AIPS 1: sbmv=1800*(sbmv+keyvalue(1));sbms=substr(char(sbmv),1,4) AIPS 1: AIPS 1: AIPS 1: AIPS 1: keyvalue=0;keystrng'';keyword='ACTNOISE';gethead;rmsv=keyval ue(1) $ RMS<1e4 AIPS 1: if(rmsv>1)then;rmsc='J';rmss=substr(char(rmsv),1,4);else;rms v=rmsv*1000 AIPS 1: if(rmsv>1)then;rmsc='M';rmss=substr(char(rmsv),1,4);else;r msv=rmsv*1000 AIPS 1: if(rmsv>1)then;rmsc='U';rmss=substr(char(rmsv),1,4);else AIPS 1: rmsv=rmsv*1000;rmsc='N';rmss=substr(char(rmsv),1,4) AIPS 1: end;end;end;clrtemp;fras='';sys2com(1)=' $aimg/ AIPS 1: else AIPS 1: ;clrtemp;sbms='';rmss='';rmsc='';sys2com(1)=' $auvf/ AIPS 1: end AIPS 1: AIPS 1: if (expnm='') then AIPS 1: keyword'OBSERVER';gethead;expnm=keystrng;keyword'DATE-OBS';get head AIPS 1: mmm=substr(keystrng,5,6) AIPS 1: if(mmm='01')then;mmm='JAN';end;if(mmm='02')then;mmm='FEB';end AIPS 1: if(mmm='03')then;mmm='MAR';end;if(mmm='04')then;mmm='APR';end AIPS 1: if(mmm='05')then;mmm='MAY';end;if(mmm='06')then;mmm='JUN';end AIPS 1: if(mmm='07')then;mmm='JUL';end;if(mmm='08')then;mmm='AUG';end AIPS 1: if(mmm='09')then;mmm='SEP';end;if(mmm='10')then;mmm='OCT';end AIPS 1: if(mmm='11')then;mmm='NOV';end;if(mmm='12')then;mmm='DEC';end AIPS 1: expnm=expnm!!'_'!!substr(keystrng,1,4)!!mmm!!substr(keystrng,7 ,8)!!'_X' AIPS 1: end AIPS 1: outfile=sbms!!','!!expnm!!','!!rmss!!rmsc!!fras!!radi AIPS 1: print outf AIPS 1: AIPS 1: $ make the source dir here AIPS 1: dir='';sysout'';syscom'mkdir AIPS 1: if(rh<10)then;sys2com(2)='J0'!!char(rh);else;sys2com(2)='J'!! char(rh);end AIPS 1: if(rm<10)then;sys2com(3)='0'!!char(rm);else;sys2com(3)=char(rm );end AIPS 1: if(rs<10)then;sys2com(4)='0'!!char(rs)!!zz;else;sys2com(4)=cha r(rs)!!zz;end AIPS 1: $ sys2com(4)=substr(sys2com(4),1,4) AIPS 1: if(dd<10)then;sys2com(5)=pm!!'0'!!char(dd);else;sys2com(5)=pm! !char(dd);end AIPS 1: if(dm<10)then;sys2com(6)='0'!!char(dm);else;sys2com(6)=char(dm );end AIPS 1: if(ds<10)then;sys2com(7)='0'!!char(ds);else;sys2com(7)=char(ds );end AIPS 1: sys2com(8) ' >& /dev/null AIPS 1: system;clrtemp;for i=1:7;dir=dir!!sys2com(i);end;ki=length(dir ) $ must be 27 AIPS 1: dir=substr(dir,2,ki);if(ki<>27)then;type'WARNING: WRONG DIRECT ORY NAME ?';end AIPS 1: AIPS 1: sysout=dir!!'/'!!sbms!!','!!expnm!!','!!rmss!!rmsc!!fras!!radi AIPS 1: print sysout AIPS 1: $keep sysout - not if we use dir instead AIPS 1: syscom'';sys2com'';clrtemp AIPS 1: return AIPS 1: finish AIPS 1: AIPS 1: procedure nvasarch AIPS 1: scalar nn AIPS 1: $LOS - archives the files to disk - define $EXP (and $AVLA/$ADAT /$AIMG/$AUVF) AIPS 1: default fitab;indisk=lsdisk;recat AIPS 1: $ figure out array for uv name AIPS 1: $ getname 1; AIPS 1: for nn=mai:numfle $ archive MA files AIPS 1: getname nn AIPS 1: nvasname AIPS 1: typ length(outfile),length(sysout) AIPS 1: syscom'mv -f AIPS 1: sys2com(1)'X$FITS/'!!outfile;substr(sys2com(1),1,1)='' AIPS 1: $ sys2com(2)'X'!!sysout;substr(sys2com(2),1,1)='' AIPS 1: sys2com(2)'X'!!dir;substr(sys2com(2),1,1)='' AIPS 1: sysout'';sys2com(3) ' >& /dev/null AIPS 1: outfile='FITS:'!!outfile AIPS 1: ;go;wait; $zap AIPS 1: ;system AIPS 1: end AIPS 1: clrname;indisk=lsdisk;chkname;numfle=1-error AIPS 1: numfle=mai -1 AIPS 1: for nn=3:numfle $ archive calibrated UV files AIPS 1: getname nn AIPS 1: nvasname AIPS 1: outfile='/tmp/tempuvfits AIPS 1: go;wait; $zap AIPS 1: syscom'mv -f AIPS 1: sys2com(1)'X'!!outfile;substr(sys2com(1),1,1)='' AIPS 1: sys2com(2)'X'!!sysout;substr(sys2com(2),1,1)='' AIPS 1: sysout'';sys2com(3) ' >& /dev/null AIPS 1: system AIPS 1: end AIPS 1: getname 2 $ archive calibration tables AIPS 1: $ do not use nvasname as the dir is ADAT and dirname is expid AIPS 1: AIPS 1: sys2com'';sysout'';syscom 'mkdir AIPS 1: sys2com(1)=' $adat/ AIPS 1: AIPS 1: $ if(rh<10)then;sys2com(2)='J0'!!char(rh);else;sys2com(2)='J'!! char(rh);end AIPS 1: $ if(rm<10)then;sys2com(3)='0'!!char(rm);else;sys2com(3)=char(r m);end AIPS 1: $ if(rs<10)then;sys2com(4)='0'!!char(rs)!!zz;else;sys2com(4)=ch ar(rs)!!zz;end AIPS 1: $ if(dd<10)then;sys2com(5)=pm!!'0'!!char(dd);else;sys2com(5)=pm !!char(dd);end AIPS 1: $ if(dm<10)then;sys2com(6)='0'!!char(dm);else;sys2com(6)=char(d m);end AIPS 1: $ if(ds<10)then;sys2com(7)='0'!!char(ds);else;sys2com(7)=char(d s);end AIPS 1: AIPS 1: sys2com(1)=sys2com(1)!!expnm;sys2com(8) ' >& /dev/null AIPS 1: system;clrtemp AIPS 1: AIPS 1: finish AIPS 1: AIPS 1: procedure nvas AIPS 1: typ expid;flatfov;nvasimage AIPS 1: $nvasarch AIPS 1: finish >AIPS 1: Found in Version=ABIN AIPS 1: Found in Version=ABIN AIPS 1: Got(1) disk= 1 user=**** type=UV 19991204.X BAND.1 AIPS 1: 'AIPS WILL CHOOSE THE REFERENCE ANTENNA' AIPS 1: Got(1) disk= 1 user=**** type=UV 19991204.X BAND.1 AIPS 1: 'SETFC WILL DETERMINE THE CELL SIZE' AIPS 1: '8.3333 SECOND INTEGRATIONS (GUESS)' AIPS 1: 'DONE CLEANUP OF OLD TABLE EXTENTION FILES (CL,SN,FG,BP,PL,XX)' QUACK1: Task QUACK (release of 31DEC06) begins QUACK1: Flagged 104.33 min. of data in 313 scans QUACK1: Appears to have ended successfully QUACK1: auto 31DEC06 TST: Cpu= 0.0 Real= 0 sys2com(7)=char(ds );end AIPS 1: sys2com(8) ' >& /dev/null AIPS 1: system;clrtemp;for i=1:7;dir=dir!!sys2com(i);end;ki=length(dir ) $ must be 27 AIPS 1: dir=substr(dir,2,ki);if(ki<>27)then;type'WARNING: WRONG DIRECT ORY NAME ?';end AIPS 1: AIPS 1: sysout=dir!!'/'!!sbms!!','!!expnm!!','!!rmss!!rmsc!!fras!!radi AIPS 1: print sysout AIPS 1: $keep sysout - not if we use dir instead AIPS 1: syscom'';sys2com'';clrtemp AIPS 1: return AIPS 1: finish AIPS 1: AIPS 1: procedure nvasarch AIPS 1: scalar nn AIPS 1: $LOS - archives the files to disk - define $EXP (and $AVLA/$ADAT /$AIMG/$AUVF) AIPS 1: default fitab;indisk=lsdisk;recat AIPS 1: $ figure out array for uv name AIPS 1: $ getname 1; AIPS 1: for nn=mai:numfle $ archive MA files AIPS 1: getname nn AIPS 1: nvasname AIPS 1: typ length(outfile),length(sysout) AIPS 1: syscom'mv -f AIPS 1: sys2com(1)'X$FITS/'!!outfile;substr(sys2com(1),1,1)='' AIPS 1: $ sys2com(2)'X'!!sysout;substr(sys2com(2),1,1)='' AIPS 1: sys2com(2)'X'!!dir;substr(sys2com(2),1,1)='' AIPS 1: sysout'';sys2com(3) ' >& /dev/null AIPS 1: outfile='FITS:'!!outfile AIPS 1: ;go;wait; $zap AIPS 1: ;system AIPS 1: end AIPS 1: clrname;indisk=lsdisk;chkname;numfle=1-error AIPS 1: numfle=mai -1 AIPS 1: for nn=3:numfle $ archive calibrated UV files AIPS 1: getname nn AIPS 1: nvasname AIPS 1: outfile='/tmp/tempuvfits AIPS 1: go;wait; $zap AIPS 1: syscom'mv -f AIPS 1: sys2com(1)'X'!!outfile;substr(sys2com(1),1,1)='' AIPS 1: sys2com(2)'X'!!sysout;substr(sys2com(2),1,1)='' AIPS 1: sysout'';sys2com(3) ' >& /dev/null AIPS 1: system AIPS 1: end AIPS 1: getname 2 $ archive calibration tables AIPS 1: $ do not use nvasname as the dir is ADAT and dirname is expid AIPS 1: AIPS 1: sys2com'';sysout'';syscom 'mkdir AIPS 1: sys2com(1)=' $adat/ AIPS 1: AIPS 1: $ if(rh<10)then;sys2com(2)='J0'!!char(rh);else;sys2com(2)='J'!! char(rh);end AIPS 1: $ if(rm<10)then;sys2com(3)='0'!!char(rm);else;sys2com(3)=char(r m);end AIPS 1: $ if(rs<10)then;sys2com(4)='0'!!char(rs)!!zz;else;sys2com(4)=ch ar(rs)!!zz;end AIPS 1: $ if(dd<10)then;sys2com(5)=pm!!'0'!!char(dd);else;sys2com(5)=pm !!char(dd);end AIPS 1: $ if(dm<10)then;sys2com(6)='0'!!char(dm);else;sys2com(6)=char(d m);end AIPS 1: $ if(ds<10)then;sys2com(7)='0'!!char(ds);else;sys2com(7)=char(d s);end AIPS 1: AIPS 1: sys2com(1)=sys2com(1)!!expnm;sys2com(8) ' >& /dev/null AIPS 1: system;clrtemp AIPS 1: AIPS 1: finish AIPS 1: AIPS 1: procedure nvas AIPS 1: typ expid;flatfov;nvasimage AIPS 1: $nvasarch AIPS 1: finish >AIPS 1: Found in Version=ABIN AIPS 1: Found in Version=ABIN AIPS 1: Got(1) disk= 1 user=**** type=UV 19991204.X BAND.1 AIPS 1: 'AIPS WILL CHOOSE THE REFERENCE ANTENNA' AIPS 1: Got(1) disk= 1 user=**** type=UV 19991204.X BAND.1 AIPS 1: 'SETFC WILL DETERMINE THE CELL SIZE' AIPS 1: '8.3333 SECOND INTEGRATIONS (GUESS)' AIPS 1: 'DONE CLEANUP OF OLD TABLE EXTENTION FILES (CL,SN,FG,BP,PL,XX)' AIPS 1: Resumes FLAGR1: Task FLAGR (release of 31DEC06) begins FLAGR1: Copied FG file from vol/cno/vers 1 1 1 to 1 1 2 FLAGR1: Overall average amp= 5.207E-01 +- 2.648E-02 source= 3C286 FLAGR1: Overall average rms= 1.381E-03 +- 2.180E-04 source= 3C286 FLAGR1: Overall average amp= 1.313E-01 +- 1.151E-02 source= 1819-096 FLAGR1: Overall average rms= 1.195E-03 +- 1.022E-04 source= 1819-096 FLAGR1: Overall average amp= 1.900E-03 +- 1.469E-04 source= HD167971 FLAGR1: Overall average rms= 9.042E-04 +- 6.891E-05 source= HD167971 FLAGR1: Overall average amp= 2.217E-01 +- 1.032E-02 source= 2005+403 FLAGR1: Overall average rms= 1.135E-03 +- 1.034E-04 source= 2005+403 FLAGR1: Overall average amp= 1.564E-03 +- 1.952E-04 source= CYGOB2N9 FLAGR1: Overall average rms= 7.636E-04 +- 8.826E-05 source= CYGOB2N9 FLAGR1: Found 8 bad times, 276 total flags FLAGR1: Wrote 2 antenna & IF independent flags FLAGR1: Wrote 9 antenna independent, IF dependent flags FLAGR1: Wrote 265 antenna & IF dependent flags FLAGR1: Wrote 0 antenna & IF dependent, all-times flags FLAGR1: Appears to have ended successfully FLAGR1: auto 31DEC06 TST: Cpu= 14.7 Real= 19 sys2com(7)=char(ds );end AIPS 1: sys2com(8) ' >& /dev/null AIPS 1: system;clrtemp;for i=1:7;dir=dir!!sys2com(i);end;ki=length(dir ) $ must be 27 AIPS 1: dir=substr(dir,2,ki);if(ki<>27)then;type'WARNING: WRONG DIRECT ORY NAME ?';end AIPS 1: AIPS 1: sysout=dir!!'/'!!sbms!!','!!expnm!!','!!rmss!!rmsc!!fras!!radi AIPS 1: print sysout AIPS 1: $keep sysout - not if we use dir instead AIPS 1: syscom'';sys2com'';clrtemp AIPS 1: return AIPS 1: finish AIPS 1: AIPS 1: procedure nvasarch AIPS 1: scalar nn AIPS 1: $LOS - archives the files to disk - define $EXP (and $AVLA/$ADAT /$AIMG/$AUVF) AIPS 1: default fitab;indisk=lsdisk;recat AIPS 1: $ figure out array for uv name AIPS 1: $ getname 1; AIPS 1: for nn=mai:numfle $ archive MA files AIPS 1: getname nn AIPS 1: nvasname AIPS 1: typ length(outfile),length(sysout) AIPS 1: syscom'mv -f AIPS 1: sys2com(1)'X$FITS/'!!outfile;substr(sys2com(1),1,1)='' AIPS 1: $ sys2com(2)'X'!!sysout;substr(sys2com(2),1,1)='' AIPS 1: sys2com(2)'X'!!dir;substr(sys2com(2),1,1)='' AIPS 1: sysout'';sys2com(3) ' >& /dev/null AIPS 1: outfile='FITS:'!!outfile AIPS 1: ;go;wait; $zap AIPS 1: ;system AIPS 1: end AIPS 1: clrname;indisk=lsdisk;chkname;numfle=1-error AIPS 1: numfle=mai -1 AIPS 1: for nn=3:numfle $ archive calibrated UV files AIPS 1: getname nn AIPS 1: nvasname AIPS 1: outfile='/tmp/tempuvfits AIPS 1: go;wait; $zap AIPS 1: syscom'mv -f AIPS 1: sys2com(1)'X'!!outfile;substr(sys2com(1),1,1)='' AIPS 1: sys2com(2)'X'!!sysout;substr(sys2com(2),1,1)='' AIPS 1: sysout'';sys2com(3) ' >& /dev/null AIPS 1: system AIPS 1: end AIPS 1: getname 2 $ archive calibration tables AIPS 1: $ do not use nvasname as the dir is ADAT and dirname is expid AIPS 1: AIPS 1: sys2com'';sysout'';syscom 'mkdir AIPS 1: sys2com(1)=' $adat/ AIPS 1: AIPS 1: $ if(rh<10)then;sys2com(2)='J0'!!char(rh);else;sys2com(2)='J'!! char(rh);end AIPS 1: $ if(rm<10)then;sys2com(3)='0'!!char(rm);else;sys2com(3)=char(r m);end AIPS 1: $ if(rs<10)then;sys2com(4)='0'!!char(rs)!!zz;else;sys2com(4)=ch ar(rs)!!zz;end AIPS 1: $ if(dd<10)then;sys2com(5)=pm!!'0'!!char(dd);else;sys2com(5)=pm !!char(dd);end AIPS 1: $ if(dm<10)then;sys2com(6)='0'!!char(dm);else;sys2com(6)=char(d m);end AIPS 1: $ if(ds<10)then;sys2com(7)='0'!!char(ds);else;sys2com(7)=char(d s);end AIPS 1: AIPS 1: sys2com(1)=sys2com(1)!!expnm;sys2com(8) ' >& /dev/null AIPS 1: system;clrtemp AIPS 1: AIPS 1: finish AIPS 1: AIPS 1: procedure nvas AIPS 1: typ expid;flatfov;nvasimage AIPS 1: $nvasarch AIPS 1: finish >AIPS 1: Found in Version=ABIN AIPS 1: Found in Version=ABIN AIPS 1: Got(1) disk= 1 user=**** type=UV 19991204.X BAND.1 AIPS 1: 'AIPS WILL CHOOSE THE REFERENCE ANTENNA' AIPS 1: Got(1) disk= 1 user=**** type=UV 19991204.X BAND.1 AIPS 1: 'SETFC WILL DETERMINE THE CELL SIZE' AIPS 1: '8.3333 SECOND INTEGRATIONS (GUESS)' AIPS 1: 'DONE CLEANUP OF OLD TABLE EXTENTION FILES (CL,SN,FG,BP,PL,XX)' AIPS 1: Resumes AIPS 1: Resumes SETJY1: Task SETJY (release of 31DEC06) begins SETJY1: / Resetting flux information to zero SETJY1: BIF = 1 EIF = 2 /Range of IFs SETJY1: SOURCES = '' /All sources selected SETJY1: Appears to have ended successfully SETJY1: auto 31DEC06 TST: Cpu= 0.0 Real= 0 SETJY1: Task SETJY (release of 31DEC06) begins SETJY1: A source model for this calibrator may be available SETJY1: Use the verb CALDIR to see if there is one SETJY1: A source model for this calibrator may be available SETJY1: Use the verb CALDIR to see if there is one SETJY1: / Flux calculated using known spectrum SETJY1: BIF = 1 EIF = 2 /Range of IFs SETJY1: '3C286 ' IF = 1 FLUX = 5.2244 (Jy calcd) SETJY1: '3C286 ' IF = 2 FLUX = 5.2244 (Jy calcd) SETJY1: / Using (1999.2) VLA or Reynolds (1934-638) coefficients SETJY1: Appears to have ended successfully SETJY1: auto 31DEC06 TST: Cpu= 0.0 Real= 0 sys2com(7)=char(ds );end AIPS 1: sys2com(8) ' >& /dev/null AIPS 1: system;clrtemp;for i=1:7;dir=dir!!sys2com(i);end;ki=length(dir ) $ must be 27 AIPS 1: dir=substr(dir,2,ki);if(ki<>27)then;type'WARNING: WRONG DIRECT ORY NAME ?';end AIPS 1: AIPS 1: sysout=dir!!'/'!!sbms!!','!!expnm!!','!!rmss!!rmsc!!fras!!radi AIPS 1: print sysout AIPS 1: $keep sysout - not if we use dir instead AIPS 1: syscom'';sys2com'';clrtemp AIPS 1: return AIPS 1: finish AIPS 1: AIPS 1: procedure nvasarch AIPS 1: scalar nn AIPS 1: $LOS - archives the files to disk - define $EXP (and $AVLA/$ADAT /$AIMG/$AUVF) AIPS 1: default fitab;indisk=lsdisk;recat AIPS 1: $ figure out array for uv name AIPS 1: $ getname 1; AIPS 1: for nn=mai:numfle $ archive MA files AIPS 1: getname nn AIPS 1: nvasname AIPS 1: typ length(outfile),length(sysout) AIPS 1: syscom'mv -f AIPS 1: sys2com(1)'X$FITS/'!!outfile;substr(sys2com(1),1,1)='' AIPS 1: $ sys2com(2)'X'!!sysout;substr(sys2com(2),1,1)='' AIPS 1: sys2com(2)'X'!!dir;substr(sys2com(2),1,1)='' AIPS 1: sysout'';sys2com(3) ' >& /dev/null AIPS 1: outfile='FITS:'!!outfile AIPS 1: ;go;wait; $zap AIPS 1: ;system AIPS 1: end AIPS 1: clrname;indisk=lsdisk;chkname;numfle=1-error AIPS 1: numfle=mai -1 AIPS 1: for nn=3:numfle $ archive calibrated UV files AIPS 1: getname nn AIPS 1: nvasname AIPS 1: outfile='/tmp/tempuvfits AIPS 1: go;wait; $zap AIPS 1: syscom'mv -f AIPS 1: sys2com(1)'X'!!outfile;substr(sys2com(1),1,1)='' AIPS 1: sys2com(2)'X'!!sysout;substr(sys2com(2),1,1)='' AIPS 1: sysout'';sys2com(3) ' >& /dev/null AIPS 1: system AIPS 1: end AIPS 1: getname 2 $ archive calibration tables AIPS 1: $ do not use nvasname as the dir is ADAT and dirname is expid AIPS 1: AIPS 1: sys2com'';sysout'';syscom 'mkdir AIPS 1: sys2com(1)=' $adat/ AIPS 1: AIPS 1: $ if(rh<10)then;sys2com(2)='J0'!!char(rh);else;sys2com(2)='J'!! char(rh);end AIPS 1: $ if(rm<10)then;sys2com(3)='0'!!char(rm);else;sys2com(3)=char(r m);end AIPS 1: $ if(rs<10)then;sys2com(4)='0'!!char(rs)!!zz;else;sys2com(4)=ch ar(rs)!!zz;end AIPS 1: $ if(dd<10)then;sys2com(5)=pm!!'0'!!char(dd);else;sys2com(5)=pm !!char(dd);end AIPS 1: $ if(dm<10)then;sys2com(6)='0'!!char(dm);else;sys2com(6)=char(d m);end AIPS 1: $ if(ds<10)then;sys2com(7)='0'!!char(ds);else;sys2com(7)=char(d s);end AIPS 1: AIPS 1: sys2com(1)=sys2com(1)!!expnm;sys2com(8) ' >& /dev/null AIPS 1: system;clrtemp AIPS 1: AIPS 1: finish AIPS 1: AIPS 1: procedure nvas AIPS 1: typ expid;flatfov;nvasimage AIPS 1: $nvasarch AIPS 1: finish >AIPS 1: Found in Version=ABIN AIPS 1: Found in Version=ABIN AIPS 1: Got(1) disk= 1 user=**** type=UV 19991204.X BAND.1 AIPS 1: 'AIPS WILL CHOOSE THE REFERENCE ANTENNA' AIPS 1: Got(1) disk= 1 user=**** type=UV 19991204.X BAND.1 AIPS 1: 'SETFC WILL DETERMINE THE CELL SIZE' AIPS 1: '8.3333 SECOND INTEGRATIONS (GUESS)' AIPS 1: 'DONE CLEANUP OF OLD TABLE EXTENTION FILES (CL,SN,FG,BP,PL,XX)' AIPS 1: Resumes AIPS 1: Resumes AIPS 1: Resumes sys2com(7)=char(ds );end AIPS 1: sys2com(8) ' >& /dev/null AIPS 1: system;clrtemp;for i=1:7;dir=dir!!sys2com(i);end;ki=length(dir ) $ must be 27 AIPS 1: dir=substr(dir,2,ki);if(ki<>27)then;type'WARNING: WRONG DIRECT ORY NAME ?';end AIPS 1: AIPS 1: sysout=dir!!'/'!!sbms!!','!!expnm!!','!!rmss!!rmsc!!fras!!radi AIPS 1: print sysout AIPS 1: $keep sysout - not if we use dir instead AIPS 1: syscom'';sys2com'';clrtemp AIPS 1: return AIPS 1: finish AIPS 1: AIPS 1: procedure nvasarch AIPS 1: scalar nn AIPS 1: $LOS - archives the files to disk - define $EXP (and $AVLA/$ADAT /$AIMG/$AUVF) AIPS 1: default fitab;indisk=lsdisk;recat AIPS 1: $ figure out array for uv name AIPS 1: $ getname 1; AIPS 1: for nn=mai:numfle $ archive MA files AIPS 1: getname nn AIPS 1: nvasname AIPS 1: typ length(outfile),length(sysout) AIPS 1: syscom'mv -f AIPS 1: sys2com(1)'X$FITS/'!!outfile;substr(sys2com(1),1,1)='' AIPS 1: $ sys2com(2)'X'!!sysout;substr(sys2com(2),1,1)='' AIPS 1: sys2com(2)'X'!!dir;substr(sys2com(2),1,1)='' AIPS 1: sysout'';sys2com(3) ' >& /dev/null AIPS 1: outfile='FITS:'!!outfile AIPS 1: ;go;wait; $zap AIPS 1: ;system AIPS 1: end AIPS 1: clrname;indisk=lsdisk;chkname;numfle=1-error AIPS 1: numfle=mai -1 AIPS 1: for nn=3:numfle $ archive calibrated UV files AIPS 1: getname nn AIPS 1: nvasname AIPS 1: outfile='/tmp/tempuvfits AIPS 1: go;wait; $zap AIPS 1: syscom'mv -f AIPS 1: sys2com(1)'X'!!outfile;substr(sys2com(1),1,1)='' AIPS 1: sys2com(2)'X'!!sysout;substr(sys2com(2),1,1)='' AIPS 1: sysout'';sys2com(3) ' >& /dev/null AIPS 1: system AIPS 1: end AIPS 1: getname 2 $ archive calibration tables AIPS 1: $ do not use nvasname as the dir is ADAT and dirname is expid AIPS 1: AIPS 1: sys2com'';sysout'';syscom 'mkdir AIPS 1: sys2com(1)=' $adat/ AIPS 1: AIPS 1: $ if(rh<10)then;sys2com(2)='J0'!!char(rh);else;sys2com(2)='J'!! char(rh);end AIPS 1: $ if(rm<10)then;sys2com(3)='0'!!char(rm);else;sys2com(3)=char(r m);end AIPS 1: $ if(rs<10)then;sys2com(4)='0'!!char(rs)!!zz;else;sys2com(4)=ch ar(rs)!!zz;end AIPS 1: $ if(dd<10)then;sys2com(5)=pm!!'0'!!char(dd);else;sys2com(5)=pm !!char(dd);end AIPS 1: $ if(dm<10)then;sys2com(6)='0'!!char(dm);else;sys2com(6)=char(d m);end AIPS 1: $ if(ds<10)then;sys2com(7)='0'!!char(ds);else;sys2com(7)=char(d s);end AIPS 1: AIPS 1: sys2com(1)=sys2com(1)!!expnm;sys2com(8) ' >& /dev/null AIPS 1: system;clrtemp AIPS 1: AIPS 1: finish AIPS 1: AIPS 1: procedure nvas AIPS 1: typ expid;flatfov;nvasimage AIPS 1: $nvasarch AIPS 1: finish >AIPS 1: Found in Version=ABIN AIPS 1: Found in Version=ABIN AIPS 1: Got(1) disk= 1 user=**** type=UV 19991204.X BAND.1 AIPS 1: 'AIPS WILL CHOOSE THE REFERENCE ANTENNA' AIPS 1: Got(1) disk= 1 user=**** type=UV 19991204.X BAND.1 AIPS 1: 'SETFC WILL DETERMINE THE CELL SIZE' AIPS 1: '8.3333 SECOND INTEGRATIONS (GUESS)' AIPS 1: 'DONE CLEANUP OF OLD TABLE EXTENTION FILES (CL,SN,FG,BP,PL,XX)' AIPS 1: Resumes AIPS 1: Resumes AIPS 1: Resumes AIPS 1: Resumes CALIB1: Task CALIB (release of 31DEC06) begins CALIB1: CALIB USING 19991204 . X BAND . 1 DISK= 1 USID=**** CALIB1: L1 Solution type CALIB1: Selecting, editing and calibrating the data CALIB1: Doing cal transfer mode with point model for each source CALIB1: This is not self-calibration CALIB1: Dividing data by source flux densities CALIB1: Determining solutions CALIB1: Writing SN table 1 CALIB1: Found 17479 good solutions CALIB1: Failed on 137 solutions CALIB1: Average closure rms = 0.0043 +- 0.0008 CALIB1: Fraction of times having data > 2.5 rms from solution CALIB1: 0.08000 of the times had 2 - 4 percent outside 2.5 times rms CALIB1: 0.30615 of the times had 4 - 6 percent outside 2.5 times rms CALIB1: 0.30154 of the times had 6 - 8 percent outside 2.5 times rms CALIB1: 0.16769 of the times had 8 - 10 percent outside 2.5 times rms CALIB1: 0.08308 of the times had 10 - 12 percent outside 2.5 times rms CALIB1: 0.02615 of the times had 12 - 14 percent outside 2.5 times rms CALIB1: 0.02615 of the times had 14 - 16 percent outside 2.5 times rms CALIB1: 0.00615 of the times had 16 - 18 percent outside 2.5 times rms CALIB1: 0.00308 of the times had 18 - 20 percent outside 2.5 times rms CALIB1: Adjusting solutions to a common reference antenna CALIB1: Appears to have ended successfully CALIB1: auto 31DEC06 TST: Cpu= 4.2 Real= 5 sys2com(7)=char(ds );end AIPS 1: sys2com(8) ' >& /dev/null AIPS 1: system;clrtemp;for i=1:7;dir=dir!!sys2com(i);end;ki=length(dir ) $ must be 27 AIPS 1: dir=substr(dir,2,ki);if(ki<>27)then;type'WARNING: WRONG DIRECT ORY NAME ?';end AIPS 1: AIPS 1: sysout=dir!!'/'!!sbms!!','!!expnm!!','!!rmss!!rmsc!!fras!!radi AIPS 1: print sysout AIPS 1: $keep sysout - not if we use dir instead AIPS 1: syscom'';sys2com'';clrtemp AIPS 1: return AIPS 1: finish AIPS 1: AIPS 1: procedure nvasarch AIPS 1: scalar nn AIPS 1: $LOS - archives the files to disk - define $EXP (and $AVLA/$ADAT /$AIMG/$AUVF) AIPS 1: default fitab;indisk=lsdisk;recat AIPS 1: $ figure out array for uv name AIPS 1: $ getname 1; AIPS 1: for nn=mai:numfle $ archive MA files AIPS 1: getname nn AIPS 1: nvasname AIPS 1: typ length(outfile),length(sysout) AIPS 1: syscom'mv -f AIPS 1: sys2com(1)'X$FITS/'!!outfile;substr(sys2com(1),1,1)='' AIPS 1: $ sys2com(2)'X'!!sysout;substr(sys2com(2),1,1)='' AIPS 1: sys2com(2)'X'!!dir;substr(sys2com(2),1,1)='' AIPS 1: sysout'';sys2com(3) ' >& /dev/null AIPS 1: outfile='FITS:'!!outfile AIPS 1: ;go;wait; $zap AIPS 1: ;system AIPS 1: end AIPS 1: clrname;indisk=lsdisk;chkname;numfle=1-error AIPS 1: numfle=mai -1 AIPS 1: for nn=3:numfle $ archive calibrated UV files AIPS 1: getname nn AIPS 1: nvasname AIPS 1: outfile='/tmp/tempuvfits AIPS 1: go;wait; $zap AIPS 1: syscom'mv -f AIPS 1: sys2com(1)'X'!!outfile;substr(sys2com(1),1,1)='' AIPS 1: sys2com(2)'X'!!sysout;substr(sys2com(2),1,1)='' AIPS 1: sysout'';sys2com(3) ' >& /dev/null AIPS 1: system AIPS 1: end AIPS 1: getname 2 $ archive calibration tables AIPS 1: $ do not use nvasname as the dir is ADAT and dirname is expid AIPS 1: AIPS 1: sys2com'';sysout'';syscom 'mkdir AIPS 1: sys2com(1)=' $adat/ AIPS 1: AIPS 1: $ if(rh<10)then;sys2com(2)='J0'!!char(rh);else;sys2com(2)='J'!! char(rh);end AIPS 1: $ if(rm<10)then;sys2com(3)='0'!!char(rm);else;sys2com(3)=char(r m);end AIPS 1: $ if(rs<10)then;sys2com(4)='0'!!char(rs)!!zz;else;sys2com(4)=ch ar(rs)!!zz;end AIPS 1: $ if(dd<10)then;sys2com(5)=pm!!'0'!!char(dd);else;sys2com(5)=pm !!char(dd);end AIPS 1: $ if(dm<10)then;sys2com(6)='0'!!char(dm);else;sys2com(6)=char(d m);end AIPS 1: $ if(ds<10)then;sys2com(7)='0'!!char(ds);else;sys2com(7)=char(d s);end AIPS 1: AIPS 1: sys2com(1)=sys2com(1)!!expnm;sys2com(8) ' >& /dev/null AIPS 1: system;clrtemp AIPS 1: AIPS 1: finish AIPS 1: AIPS 1: procedure nvas AIPS 1: typ expid;flatfov;nvasimage AIPS 1: $nvasarch AIPS 1: finish >AIPS 1: Found in Version=ABIN AIPS 1: Found in Version=ABIN AIPS 1: Got(1) disk= 1 user=**** type=UV 19991204.X BAND.1 AIPS 1: 'AIPS WILL CHOOSE THE REFERENCE ANTENNA' AIPS 1: Got(1) disk= 1 user=**** type=UV 19991204.X BAND.1 AIPS 1: 'SETFC WILL DETERMINE THE CELL SIZE' AIPS 1: '8.3333 SECOND INTEGRATIONS (GUESS)' AIPS 1: 'DONE CLEANUP OF OLD TABLE EXTENTION FILES (CL,SN,FG,BP,PL,XX)' AIPS 1: Resumes AIPS 1: Resumes AIPS 1: Resumes AIPS 1: Resumes AIPS 1: Resumes AIPS 1: '3C286 MODEL =' '3C286_X' AIPS 1: SYSTEM command to be executed is: AIPS 1: ls -1 $AIPSTARS/3C286_X.MODEL >& /dev/null CALRD1: Task CALRD (release of 31DEC06) begins CALRD1: Reading disk file AIPSTARS:3C286_X.MODEL CALRD1: Create 3C286_X .MODEL . 1 (MA) on disk 1 cno 2 CALRD1: Appears to have ended successfully CALRD1: auto 31DEC06 TST: Cpu= 0.0 Real= 0 sys2com(7)=char(ds );end AIPS 1: sys2com(8) ' >& /dev/null AIPS 1: system;clrtemp;for i=1:7;dir=dir!!sys2com(i);end;ki=length(dir ) $ must be 27 AIPS 1: dir=substr(dir,2,ki);if(ki<>27)then;type'WARNING: WRONG DIRECT ORY NAME ?';end AIPS 1: AIPS 1: sysout=dir!!'/'!!sbms!!','!!expnm!!','!!rmss!!rmsc!!fras!!radi AIPS 1: print sysout AIPS 1: $keep sysout - not if we use dir instead AIPS 1: syscom'';sys2com'';clrtemp AIPS 1: return AIPS 1: finish AIPS 1: AIPS 1: procedure nvasarch AIPS 1: scalar nn AIPS 1: $LOS - archives the files to disk - define $EXP (and $AVLA/$ADAT /$AIMG/$AUVF) AIPS 1: default fitab;indisk=lsdisk;recat AIPS 1: $ figure out array for uv name AIPS 1: $ getname 1; AIPS 1: for nn=mai:numfle $ archive MA files AIPS 1: getname nn AIPS 1: nvasname AIPS 1: typ length(outfile),length(sysout) AIPS 1: syscom'mv -f AIPS 1: sys2com(1)'X$FITS/'!!outfile;substr(sys2com(1),1,1)='' AIPS 1: $ sys2com(2)'X'!!sysout;substr(sys2com(2),1,1)='' AIPS 1: sys2com(2)'X'!!dir;substr(sys2com(2),1,1)='' AIPS 1: sysout'';sys2com(3) ' >& /dev/null AIPS 1: outfile='FITS:'!!outfile AIPS 1: ;go;wait; $zap AIPS 1: ;system AIPS 1: end AIPS 1: clrname;indisk=lsdisk;chkname;numfle=1-error AIPS 1: numfle=mai -1 AIPS 1: for nn=3:numfle $ archive calibrated UV files AIPS 1: getname nn AIPS 1: nvasname AIPS 1: outfile='/tmp/tempuvfits AIPS 1: go;wait; $zap AIPS 1: syscom'mv -f AIPS 1: sys2com(1)'X'!!outfile;substr(sys2com(1),1,1)='' AIPS 1: sys2com(2)'X'!!sysout;substr(sys2com(2),1,1)='' AIPS 1: sysout'';sys2com(3) ' >& /dev/null AIPS 1: system AIPS 1: end AIPS 1: getname 2 $ archive calibration tables AIPS 1: $ do not use nvasname as the dir is ADAT and dirname is expid AIPS 1: AIPS 1: sys2com'';sysout'';syscom 'mkdir AIPS 1: sys2com(1)=' $adat/ AIPS 1: AIPS 1: $ if(rh<10)then;sys2com(2)='J0'!!char(rh);else;sys2com(2)='J'!! char(rh);end AIPS 1: $ if(rm<10)then;sys2com(3)='0'!!char(rm);else;sys2com(3)=char(r m);end AIPS 1: $ if(rs<10)then;sys2com(4)='0'!!char(rs)!!zz;else;sys2com(4)=ch ar(rs)!!zz;end AIPS 1: $ if(dd<10)then;sys2com(5)=pm!!'0'!!char(dd);else;sys2com(5)=pm !!char(dd);end AIPS 1: $ if(dm<10)then;sys2com(6)='0'!!char(dm);else;sys2com(6)=char(d m);end AIPS 1: $ if(ds<10)then;sys2com(7)='0'!!char(ds);else;sys2com(7)=char(d s);end AIPS 1: AIPS 1: sys2com(1)=sys2com(1)!!expnm;sys2com(8) ' >& /dev/null AIPS 1: system;clrtemp AIPS 1: AIPS 1: finish AIPS 1: AIPS 1: procedure nvas AIPS 1: typ expid;flatfov;nvasimage AIPS 1: $nvasarch AIPS 1: finish >AIPS 1: Found in Version=ABIN AIPS 1: Found in Version=ABIN AIPS 1: Got(1) disk= 1 user=**** type=UV 19991204.X BAND.1 AIPS 1: 'AIPS WILL CHOOSE THE REFERENCE ANTENNA' AIPS 1: Got(1) disk= 1 user=**** type=UV 19991204.X BAND.1 AIPS 1: 'SETFC WILL DETERMINE THE CELL SIZE' AIPS 1: '8.3333 SECOND INTEGRATIONS (GUESS)' AIPS 1: 'DONE CLEANUP OF OLD TABLE EXTENTION FILES (CL,SN,FG,BP,PL,XX)' AIPS 1: Resumes AIPS 1: Resumes AIPS 1: Resumes AIPS 1: Resumes AIPS 1: Resumes AIPS 1: '3C286 MODEL =' '3C286_X' AIPS 1: SYSTEM command to be executed is: AIPS 1: ls -1 $AIPSTARS/3C286_X.MODEL >& /dev/null AIPS 1: Resumes CALIB1: Task CALIB (release of 31DEC06) begins CALIB1: CALIB USING 19991204 . X BAND . 1 DISK= 1 USID=**** CALIB1: L1 Solution type CALIB1: Selecting, editing and calibrating the data CALIB1: Doing self-cal mode with CC model CALIB1: SETGDS: imaging done with reprojected tangent point(s) CALIB1: FACSET: source model will be scaled to 5.224 Jy CALIB1: FACSET: 5.347106 Jy found from 194 components CALIB1: FACSET: scaling factor set to 9.77056E-01 CALIB1: VISDFT: Begin DFT component division CALIB1: VISDFT: Model components of type Point CALIB1: I Polarization model processed CALIB1: Model computation is 10 percent complete CALIB1: Model computation is 30 percent complete CALIB1: Model computation is 40 percent complete CALIB1: Model computation is 60 percent complete CALIB1: Model computation is 80 percent complete CALIB1: Model computation is 90 percent complete CALIB1: FACSET: source model will be scaled to 5.224 Jy CALIB1: FACSET: 5.347106 Jy found from 194 components CALIB1: FACSET: scaling factor set to 9.77056E-01 CALIB1: VISDFT: Begin DFT component division CALIB1: I Polarization model processed CALIB1: Field 1 used 194 CCs CALIB1: Determining solutions CALIB1: Deleted 268 records from SN table no. 1 CALIB1: Writing SN table 1 CALIB1: Found 1065 good solutions CALIB1: Failed on 7 solutions CALIB1: Average closure rms = 0.0030 +- 0.0006 CALIB1: Fraction of times having data > 2.5 rms from solution CALIB1: 0.05000 of the times had 6 - 8 percent outside 2.5 times rms CALIB1: 0.07500 of the times had 8 - 10 percent outside 2.5 times rms CALIB1: 0.12500 of the times had 10 - 12 percent outside 2.5 times rms CALIB1: 0.20000 of the times had 12 - 14 percent outside 2.5 times rms CALIB1: 0.10000 of the times had 14 - 16 percent outside 2.5 times rms CALIB1: 0.20000 of the times had 16 - 18 percent outside 2.5 times rms CALIB1: 0.12500 of the times had 18 - 20 percent outside 2.5 times rms CALIB1: 0.10000 of the times had 20 - 22 percent outside 2.5 times rms CALIB1: 0.02500 of the times had 22 - 24 percent outside 2.5 times rms CALIB1: Adjusting solutions to a common reference antenna CALIB1: Appears to have ended successfully CALIB1: auto 31DEC06 TST: Cpu= 1.9 Real= 2 sys2com(7)=char(ds );end AIPS 1: sys2com(8) ' >& /dev/null AIPS 1: system;clrtemp;for i=1:7;dir=dir!!sys2com(i);end;ki=length(dir ) $ must be 27 AIPS 1: dir=substr(dir,2,ki);if(ki<>27)then;type'WARNING: WRONG DIRECT ORY NAME ?';end AIPS 1: AIPS 1: sysout=dir!!'/'!!sbms!!','!!expnm!!','!!rmss!!rmsc!!fras!!radi AIPS 1: print sysout AIPS 1: $keep sysout - not if we use dir instead AIPS 1: syscom'';sys2com'';clrtemp AIPS 1: return AIPS 1: finish AIPS 1: AIPS 1: procedure nvasarch AIPS 1: scalar nn AIPS 1: $LOS - archives the files to disk - define $EXP (and $AVLA/$ADAT /$AIMG/$AUVF) AIPS 1: default fitab;indisk=lsdisk;recat AIPS 1: $ figure out array for uv name AIPS 1: $ getname 1; AIPS 1: for nn=mai:numfle $ archive MA files AIPS 1: getname nn AIPS 1: nvasname AIPS 1: typ length(outfile),length(sysout) AIPS 1: syscom'mv -f AIPS 1: sys2com(1)'X$FITS/'!!outfile;substr(sys2com(1),1,1)='' AIPS 1: $ sys2com(2)'X'!!sysout;substr(sys2com(2),1,1)='' AIPS 1: sys2com(2)'X'!!dir;substr(sys2com(2),1,1)='' AIPS 1: sysout'';sys2com(3) ' >& /dev/null AIPS 1: outfile='FITS:'!!outfile AIPS 1: ;go;wait; $zap AIPS 1: ;system AIPS 1: end AIPS 1: clrname;indisk=lsdisk;chkname;numfle=1-error AIPS 1: numfle=mai -1 AIPS 1: for nn=3:numfle $ archive calibrated UV files AIPS 1: getname nn AIPS 1: nvasname AIPS 1: outfile='/tmp/tempuvfits AIPS 1: go;wait; $zap AIPS 1: syscom'mv -f AIPS 1: sys2com(1)'X'!!outfile;substr(sys2com(1),1,1)='' AIPS 1: sys2com(2)'X'!!sysout;substr(sys2com(2),1,1)='' AIPS 1: sysout'';sys2com(3) ' >& /dev/null AIPS 1: system AIPS 1: end AIPS 1: getname 2 $ archive calibration tables AIPS 1: $ do not use nvasname as the dir is ADAT and dirname is expid AIPS 1: AIPS 1: sys2com'';sysout'';syscom 'mkdir AIPS 1: sys2com(1)=' $adat/ AIPS 1: AIPS 1: $ if(rh<10)then;sys2com(2)='J0'!!char(rh);else;sys2com(2)='J'!! char(rh);end AIPS 1: $ if(rm<10)then;sys2com(3)='0'!!char(rm);else;sys2com(3)=char(r m);end AIPS 1: $ if(rs<10)then;sys2com(4)='0'!!char(rs)!!zz;else;sys2com(4)=ch ar(rs)!!zz;end AIPS 1: $ if(dd<10)then;sys2com(5)=pm!!'0'!!char(dd);else;sys2com(5)=pm !!char(dd);end AIPS 1: $ if(dm<10)then;sys2com(6)='0'!!char(dm);else;sys2com(6)=char(d m);end AIPS 1: $ if(ds<10)then;sys2com(7)='0'!!char(ds);else;sys2com(7)=char(d s);end AIPS 1: AIPS 1: sys2com(1)=sys2com(1)!!expnm;sys2com(8) ' >& /dev/null AIPS 1: system;clrtemp AIPS 1: AIPS 1: finish AIPS 1: AIPS 1: procedure nvas AIPS 1: typ expid;flatfov;nvasimage AIPS 1: $nvasarch AIPS 1: finish >AIPS 1: Found in Version=ABIN AIPS 1: Found in Version=ABIN AIPS 1: Got(1) disk= 1 user=**** type=UV 19991204.X BAND.1 AIPS 1: 'AIPS WILL CHOOSE THE REFERENCE ANTENNA' AIPS 1: Got(1) disk= 1 user=**** type=UV 19991204.X BAND.1 AIPS 1: 'SETFC WILL DETERMINE THE CELL SIZE' AIPS 1: '8.3333 SECOND INTEGRATIONS (GUESS)' AIPS 1: 'DONE CLEANUP OF OLD TABLE EXTENTION FILES (CL,SN,FG,BP,PL,XX)' AIPS 1: Resumes AIPS 1: Resumes AIPS 1: Resumes AIPS 1: Resumes AIPS 1: Resumes AIPS 1: '3C286 MODEL =' '3C286_X' AIPS 1: SYSTEM command to be executed is: AIPS 1: ls -1 $AIPSTARS/3C286_X.MODEL >& /dev/null AIPS 1: Resumes AIPS 1: Resumes CLCAL1: Task CLCAL (release of 31DEC06) begins CLCAL1: Using interpolation mode 2PT CLCAL1: Processing SN table 1 CLCAL1: SNMRG: Merging SN table CLCAL1: SNMRG: Write 4418 merged records from 4418 input records CLCAL1: SN2CL: Applying SN tables to CL table 1, writing CL table 2 CLCAL1: Appears to have ended successfully CLCAL1: auto 31DEC06 TST: Cpu= 1.8 Real= 3 sys2com(7)=char(ds );end AIPS 1: sys2com(8) ' >& /dev/null AIPS 1: system;clrtemp;for i=1:7;dir=dir!!sys2com(i);end;ki=length(dir ) $ must be 27 AIPS 1: dir=substr(dir,2,ki);if(ki<>27)then;type'WARNING: WRONG DIRECT ORY NAME ?';end AIPS 1: AIPS 1: sysout=dir!!'/'!!sbms!!','!!expnm!!','!!rmss!!rmsc!!fras!!radi AIPS 1: print sysout AIPS 1: $keep sysout - not if we use dir instead AIPS 1: syscom'';sys2com'';clrtemp AIPS 1: return AIPS 1: finish AIPS 1: AIPS 1: procedure nvasarch AIPS 1: scalar nn AIPS 1: $LOS - archives the files to disk - define $EXP (and $AVLA/$ADAT /$AIMG/$AUVF) AIPS 1: default fitab;indisk=lsdisk;recat AIPS 1: $ figure out array for uv name AIPS 1: $ getname 1; AIPS 1: for nn=mai:numfle $ archive MA files AIPS 1: getname nn AIPS 1: nvasname AIPS 1: typ length(outfile),length(sysout) AIPS 1: syscom'mv -f AIPS 1: sys2com(1)'X$FITS/'!!outfile;substr(sys2com(1),1,1)='' AIPS 1: $ sys2com(2)'X'!!sysout;substr(sys2com(2),1,1)='' AIPS 1: sys2com(2)'X'!!dir;substr(sys2com(2),1,1)='' AIPS 1: sysout'';sys2com(3) ' >& /dev/null AIPS 1: outfile='FITS:'!!outfile AIPS 1: ;go;wait; $zap AIPS 1: ;system AIPS 1: end AIPS 1: clrname;indisk=lsdisk;chkname;numfle=1-error AIPS 1: numfle=mai -1 AIPS 1: for nn=3:numfle $ archive calibrated UV files AIPS 1: getname nn AIPS 1: nvasname AIPS 1: outfile='/tmp/tempuvfits AIPS 1: go;wait; $zap AIPS 1: syscom'mv -f AIPS 1: sys2com(1)'X'!!outfile;substr(sys2com(1),1,1)='' AIPS 1: sys2com(2)'X'!!sysout;substr(sys2com(2),1,1)='' AIPS 1: sysout'';sys2com(3) ' >& /dev/null AIPS 1: system AIPS 1: end AIPS 1: getname 2 $ archive calibration tables AIPS 1: $ do not use nvasname as the dir is ADAT and dirname is expid AIPS 1: AIPS 1: sys2com'';sysout'';syscom 'mkdir AIPS 1: sys2com(1)=' $adat/ AIPS 1: AIPS 1: $ if(rh<10)then;sys2com(2)='J0'!!char(rh);else;sys2com(2)='J'!! char(rh);end AIPS 1: $ if(rm<10)then;sys2com(3)='0'!!char(rm);else;sys2com(3)=char(r m);end AIPS 1: $ if(rs<10)then;sys2com(4)='0'!!char(rs)!!zz;else;sys2com(4)=ch ar(rs)!!zz;end AIPS 1: $ if(dd<10)then;sys2com(5)=pm!!'0'!!char(dd);else;sys2com(5)=pm !!char(dd);end AIPS 1: $ if(dm<10)then;sys2com(6)='0'!!char(dm);else;sys2com(6)=char(d m);end AIPS 1: $ if(ds<10)then;sys2com(7)='0'!!char(ds);else;sys2com(7)=char(d s);end AIPS 1: AIPS 1: sys2com(1)=sys2com(1)!!expnm;sys2com(8) ' >& /dev/null AIPS 1: system;clrtemp AIPS 1: AIPS 1: finish AIPS 1: AIPS 1: procedure nvas AIPS 1: typ expid;flatfov;nvasimage AIPS 1: $nvasarch AIPS 1: finish >AIPS 1: Found in Version=ABIN AIPS 1: Found in Version=ABIN AIPS 1: Got(1) disk= 1 user=**** type=UV 19991204.X BAND.1 AIPS 1: 'AIPS WILL CHOOSE THE REFERENCE ANTENNA' AIPS 1: Got(1) disk= 1 user=**** type=UV 19991204.X BAND.1 AIPS 1: 'SETFC WILL DETERMINE THE CELL SIZE' AIPS 1: '8.3333 SECOND INTEGRATIONS (GUESS)' AIPS 1: 'DONE CLEANUP OF OLD TABLE EXTENTION FILES (CL,SN,FG,BP,PL,XX)' AIPS 1: Resumes AIPS 1: Resumes AIPS 1: Resumes AIPS 1: Resumes AIPS 1: Resumes AIPS 1: '3C286 MODEL =' '3C286_X' AIPS 1: SYSTEM command to be executed is: AIPS 1: ls -1 $AIPSTARS/3C286_X.MODEL >& /dev/null AIPS 1: Resumes AIPS 1: Resumes AIPS 1: Resumes CLCAL1: Task CLCAL (release of 31DEC06) begins CLCAL1: Using interpolation mode SELF CLCAL1: Deleted 1755 records from CL table no. 2 CLCAL1: Processing SN table 1 CLCAL1: WARNING: SN table 1 has already been applied CLCAL1: SNMRG: Merging SN table CLCAL1: SNMRG: Write 4418 merged records from 4418 input records CLCAL1: SN2CL: Applying SN tables to CL table 1, writing CL table 2 CLCAL1: Appears to have ended successfully CLCAL1: auto 31DEC06 TST: Cpu= 2.8 Real= 3 sys2com(7)=char(ds );end AIPS 1: sys2com(8) ' >& /dev/null AIPS 1: system;clrtemp;for i=1:7;dir=dir!!sys2com(i);end;ki=length(dir ) $ must be 27 AIPS 1: dir=substr(dir,2,ki);if(ki<>27)then;type'WARNING: WRONG DIRECT ORY NAME ?';end AIPS 1: AIPS 1: sysout=dir!!'/'!!sbms!!','!!expnm!!','!!rmss!!rmsc!!fras!!radi AIPS 1: print sysout AIPS 1: $keep sysout - not if we use dir instead AIPS 1: syscom'';sys2com'';clrtemp AIPS 1: return AIPS 1: finish AIPS 1: AIPS 1: procedure nvasarch AIPS 1: scalar nn AIPS 1: $LOS - archives the files to disk - define $EXP (and $AVLA/$ADAT /$AIMG/$AUVF) AIPS 1: default fitab;indisk=lsdisk;recat AIPS 1: $ figure out array for uv name AIPS 1: $ getname 1; AIPS 1: for nn=mai:numfle $ archive MA files AIPS 1: getname nn AIPS 1: nvasname AIPS 1: typ length(outfile),length(sysout) AIPS 1: syscom'mv -f AIPS 1: sys2com(1)'X$FITS/'!!outfile;substr(sys2com(1),1,1)='' AIPS 1: $ sys2com(2)'X'!!sysout;substr(sys2com(2),1,1)='' AIPS 1: sys2com(2)'X'!!dir;substr(sys2com(2),1,1)='' AIPS 1: sysout'';sys2com(3) ' >& /dev/null AIPS 1: outfile='FITS:'!!outfile AIPS 1: ;go;wait; $zap AIPS 1: ;system AIPS 1: end AIPS 1: clrname;indisk=lsdisk;chkname;numfle=1-error AIPS 1: numfle=mai -1 AIPS 1: for nn=3:numfle $ archive calibrated UV files AIPS 1: getname nn AIPS 1: nvasname AIPS 1: outfile='/tmp/tempuvfits AIPS 1: go;wait; $zap AIPS 1: syscom'mv -f AIPS 1: sys2com(1)'X'!!outfile;substr(sys2com(1),1,1)='' AIPS 1: sys2com(2)'X'!!sysout;substr(sys2com(2),1,1)='' AIPS 1: sysout'';sys2com(3) ' >& /dev/null AIPS 1: system AIPS 1: end AIPS 1: getname 2 $ archive calibration tables AIPS 1: $ do not use nvasname as the dir is ADAT and dirname is expid AIPS 1: AIPS 1: sys2com'';sysout'';syscom 'mkdir AIPS 1: sys2com(1)=' $adat/ AIPS 1: AIPS 1: $ if(rh<10)then;sys2com(2)='J0'!!char(rh);else;sys2com(2)='J'!! char(rh);end AIPS 1: $ if(rm<10)then;sys2com(3)='0'!!char(rm);else;sys2com(3)=char(r m);end AIPS 1: $ if(rs<10)then;sys2com(4)='0'!!char(rs)!!zz;else;sys2com(4)=ch ar(rs)!!zz;end AIPS 1: $ if(dd<10)then;sys2com(5)=pm!!'0'!!char(dd);else;sys2com(5)=pm !!char(dd);end AIPS 1: $ if(dm<10)then;sys2com(6)='0'!!char(dm);else;sys2com(6)=char(d m);end AIPS 1: $ if(ds<10)then;sys2com(7)='0'!!char(ds);else;sys2com(7)=char(d s);end AIPS 1: AIPS 1: sys2com(1)=sys2com(1)!!expnm;sys2com(8) ' >& /dev/null AIPS 1: system;clrtemp AIPS 1: AIPS 1: finish AIPS 1: AIPS 1: procedure nvas AIPS 1: typ expid;flatfov;nvasimage AIPS 1: $nvasarch AIPS 1: finish >AIPS 1: Found in Version=ABIN AIPS 1: Found in Version=ABIN AIPS 1: Got(1) disk= 1 user=**** type=UV 19991204.X BAND.1 AIPS 1: 'AIPS WILL CHOOSE THE REFERENCE ANTENNA' AIPS 1: Got(1) disk= 1 user=**** type=UV 19991204.X BAND.1 AIPS 1: 'SETFC WILL DETERMINE THE CELL SIZE' AIPS 1: '8.3333 SECOND INTEGRATIONS (GUESS)' AIPS 1: 'DONE CLEANUP OF OLD TABLE EXTENTION FILES (CL,SN,FG,BP,PL,XX)' AIPS 1: Resumes AIPS 1: Resumes AIPS 1: Resumes AIPS 1: Resumes AIPS 1: Resumes AIPS 1: '3C286 MODEL =' '3C286_X' AIPS 1: SYSTEM command to be executed is: AIPS 1: ls -1 $AIPSTARS/3C286_X.MODEL >& /dev/null AIPS 1: Resumes AIPS 1: Resumes AIPS 1: Resumes AIPS 1: Resumes CALIB1: Task CALIB (release of 31DEC06) begins CALIB1: CALIB USING 19991204 . X BAND . 1 DISK= 1 USID=**** CALIB1: L1 Solution type CALIB1: Selecting, editing and calibrating the data CALIB1: Doing cal transfer mode with point model for each source CALIB1: This is not self-calibration CALIB1: Dividing data by source flux densities CALIB1: Determining solutions CALIB1: Writing SN table 2 CALIB1: RPOL, IF= 1 The average gain over these antennas is 2.506E+00 CALIB1: RPOL, IF= 2 The average gain over these antennas is 2.495E+00 CALIB1: LPOL, IF= 1 The average gain over these antennas is 2.488E+00 CALIB1: LPOL, IF= 2 The average gain over these antennas is 2.518E+00 CALIB1: Found 16631 good solutions CALIB1: Failed on 130 solutions CALIB1: Average closure rms = 0.0017 +- 0.0004 CALIB1: Fraction of times having data > 2.5 rms from solution CALIB1: 0.16828 of the times had 0 - 2 percent outside 2.5 times rms CALIB1: 0.24110 of the times had 2 - 4 percent outside 2.5 times rms CALIB1: 0.01942 of the times had 4 - 6 percent outside 2.5 times rms CALIB1: 0.02913 of the times had 6 - 8 percent outside 2.5 times rms CALIB1: 0.01456 of the times had 8 - 10 percent outside 2.5 times rms CALIB1: 0.00809 of the times had 10 - 12 percent outside 2.5 times rms CALIB1: 0.00809 of the times had 12 - 14 percent outside 2.5 times rms CALIB1: 0.05987 of the times had 14 - 16 percent outside 2.5 times rms CALIB1: 0.09061 of the times had 16 - 18 percent outside 2.5 times rms CALIB1: 0.11812 of the times had 18 - 20 percent outside 2.5 times rms CALIB1: 0.11650 of the times had 20 - 22 percent outside 2.5 times rms CALIB1: 0.11489 of the times had 22 - 24 percent outside 2.5 times rms CALIB1: 0.00971 of the times had 24 - 26 percent outside 2.5 times rms CALIB1: 0.00162 of the times had 28 - 30 percent outside 2.5 times rms CALIB1: Adjusting solutions to a common reference antenna CALIB1: Appears to have ended successfully CALIB1: auto 31DEC06 TST: Cpu= 16.1 Real= 19 sys2com(7)=char(ds );end AIPS 1: sys2com(8) ' >& /dev/null AIPS 1: system;clrtemp;for i=1:7;dir=dir!!sys2com(i);end;ki=length(dir ) $ must be 27 AIPS 1: dir=substr(dir,2,ki);if(ki<>27)then;type'WARNING: WRONG DIRECT ORY NAME ?';end AIPS 1: AIPS 1: sysout=dir!!'/'!!sbms!!','!!expnm!!','!!rmss!!rmsc!!fras!!radi AIPS 1: print sysout AIPS 1: $keep sysout - not if we use dir instead AIPS 1: syscom'';sys2com'';clrtemp AIPS 1: return AIPS 1: finish AIPS 1: AIPS 1: procedure nvasarch AIPS 1: scalar nn AIPS 1: $LOS - archives the files to disk - define $EXP (and $AVLA/$ADAT /$AIMG/$AUVF) AIPS 1: default fitab;indisk=lsdisk;recat AIPS 1: $ figure out array for uv name AIPS 1: $ getname 1; AIPS 1: for nn=mai:numfle $ archive MA files AIPS 1: getname nn AIPS 1: nvasname AIPS 1: typ length(outfile),length(sysout) AIPS 1: syscom'mv -f AIPS 1: sys2com(1)'X$FITS/'!!outfile;substr(sys2com(1),1,1)='' AIPS 1: $ sys2com(2)'X'!!sysout;substr(sys2com(2),1,1)='' AIPS 1: sys2com(2)'X'!!dir;substr(sys2com(2),1,1)='' AIPS 1: sysout'';sys2com(3) ' >& /dev/null AIPS 1: outfile='FITS:'!!outfile AIPS 1: ;go;wait; $zap AIPS 1: ;system AIPS 1: end AIPS 1: clrname;indisk=lsdisk;chkname;numfle=1-error AIPS 1: numfle=mai -1 AIPS 1: for nn=3:numfle $ archive calibrated UV files AIPS 1: getname nn AIPS 1: nvasname AIPS 1: outfile='/tmp/tempuvfits AIPS 1: go;wait; $zap AIPS 1: syscom'mv -f AIPS 1: sys2com(1)'X'!!outfile;substr(sys2com(1),1,1)='' AIPS 1: sys2com(2)'X'!!sysout;substr(sys2com(2),1,1)='' AIPS 1: sysout'';sys2com(3) ' >& /dev/null AIPS 1: system AIPS 1: end AIPS 1: getname 2 $ archive calibration tables AIPS 1: $ do not use nvasname as the dir is ADAT and dirname is expid AIPS 1: AIPS 1: sys2com'';sysout'';syscom 'mkdir AIPS 1: sys2com(1)=' $adat/ AIPS 1: AIPS 1: $ if(rh<10)then;sys2com(2)='J0'!!char(rh);else;sys2com(2)='J'!! char(rh);end AIPS 1: $ if(rm<10)then;sys2com(3)='0'!!char(rm);else;sys2com(3)=char(r m);end AIPS 1: $ if(rs<10)then;sys2com(4)='0'!!char(rs)!!zz;else;sys2com(4)=ch ar(rs)!!zz;end AIPS 1: $ if(dd<10)then;sys2com(5)=pm!!'0'!!char(dd);else;sys2com(5)=pm !!char(dd);end AIPS 1: $ if(dm<10)then;sys2com(6)='0'!!char(dm);else;sys2com(6)=char(d m);end AIPS 1: $ if(ds<10)then;sys2com(7)='0'!!char(ds);else;sys2com(7)=char(d s);end AIPS 1: AIPS 1: sys2com(1)=sys2com(1)!!expnm;sys2com(8) ' >& /dev/null AIPS 1: system;clrtemp AIPS 1: AIPS 1: finish AIPS 1: AIPS 1: procedure nvas AIPS 1: typ expid;flatfov;nvasimage AIPS 1: $nvasarch AIPS 1: finish >AIPS 1: Found in Version=ABIN AIPS 1: Found in Version=ABIN AIPS 1: Got(1) disk= 1 user=**** type=UV 19991204.X BAND.1 AIPS 1: 'AIPS WILL CHOOSE THE REFERENCE ANTENNA' AIPS 1: Got(1) disk= 1 user=**** type=UV 19991204.X BAND.1 AIPS 1: 'SETFC WILL DETERMINE THE CELL SIZE' AIPS 1: '8.3333 SECOND INTEGRATIONS (GUESS)' AIPS 1: 'DONE CLEANUP OF OLD TABLE EXTENTION FILES (CL,SN,FG,BP,PL,XX)' AIPS 1: Resumes AIPS 1: Resumes AIPS 1: Resumes AIPS 1: Resumes AIPS 1: Resumes AIPS 1: '3C286 MODEL =' '3C286_X' AIPS 1: SYSTEM command to be executed is: AIPS 1: ls -1 $AIPSTARS/3C286_X.MODEL >& /dev/null AIPS 1: Resumes AIPS 1: Resumes AIPS 1: Resumes AIPS 1: Resumes AIPS 1: Resumes CALIB1: Task CALIB (release of 31DEC06) begins CALIB1: CALIB USING 19991204 . X BAND . 1 DISK= 1 USID=**** CALIB1: L1 Solution type CALIB1: Selecting, editing and calibrating the data CALIB1: Doing self-cal mode with CC model CALIB1: SETGDS: imaging done with reprojected tangent point(s) CALIB1: FACSET: source model will be scaled to 5.224 Jy CALIB1: FACSET: 5.347106 Jy found from 194 components CALIB1: FACSET: scaling factor set to 9.77056E-01 CALIB1: VISDFT: Begin DFT component division CALIB1: VISDFT: Model components of type Point CALIB1: I Polarization model processed CALIB1: Model computation is 10 percent complete CALIB1: Model computation is 30 percent complete CALIB1: Model computation is 40 percent complete CALIB1: Model computation is 60 percent complete CALIB1: Model computation is 80 percent complete CALIB1: Model computation is 90 percent complete CALIB1: FACSET: source model will be scaled to 5.224 Jy CALIB1: FACSET: 5.347106 Jy found from 194 components CALIB1: FACSET: scaling factor set to 9.77056E-01 CALIB1: VISDFT: Begin DFT component division CALIB1: I Polarization model processed CALIB1: Field 1 used 194 CCs CALIB1: Determining solutions CALIB1: Deleted 54 records from SN table no. 2 CALIB1: Writing SN table 2 CALIB1: RPOL, IF= 1 The average gain over these antennas is 3.136E+00 CALIB1: RPOL, IF= 2 The average gain over these antennas is 3.164E+00 CALIB1: LPOL, IF= 1 The average gain over these antennas is 3.142E+00 CALIB1: LPOL, IF= 2 The average gain over these antennas is 3.175E+00 CALIB1: Found 216 good solutions CALIB1: Average closure rms = 0.0006 +- 0.0002 CALIB1: Fraction of times having data > 2.5 rms from solution CALIB1: 0.12500 of the times had 0 - 2 percent outside 2.5 times rms CALIB1: 0.25000 of the times had 2 - 4 percent outside 2.5 times rms CALIB1: 0.50000 of the times had 4 - 6 percent outside 2.5 times rms CALIB1: 0.12500 of the times had 6 - 8 percent outside 2.5 times rms CALIB1: Adjusting solutions to a common reference antenna CALIB1: Appears to have ended successfully CALIB1: auto 31DEC06 TST: Cpu= 1.9 Real= 2 GETJY1: Task GETJY (release of 31DEC06) begins GETJY1: Source:Qual CALCODE IF Flux (Jy) GETJY1: 1819-096 : 0 V 1 1.27964 +/- 0.01802 GETJY1: 2 1.28284 +/- 0.01917 GETJY1: 2005+403 : 0 V 1 2.17309 +/- 0.00848 GETJY1: 2 2.17973 +/- 0.01117 GETJY1: Appears to have ended successfully GETJY1: auto 31DEC06 TST: Cpu= 0.0 Real= 0 sys2com(7)=char(ds );end AIPS 1: sys2com(8) ' >& /dev/null AIPS 1: system;clrtemp;for i=1:7;dir=dir!!sys2com(i);end;ki=length(dir ) $ must be 27 AIPS 1: dir=substr(dir,2,ki);if(ki<>27)then;type'WARNING: WRONG DIRECT ORY NAME ?';end AIPS 1: AIPS 1: sysout=dir!!'/'!!sbms!!','!!expnm!!','!!rmss!!rmsc!!fras!!radi AIPS 1: print sysout AIPS 1: $keep sysout - not if we use dir instead AIPS 1: syscom'';sys2com'';clrtemp AIPS 1: return AIPS 1: finish AIPS 1: AIPS 1: procedure nvasarch AIPS 1: scalar nn AIPS 1: $LOS - archives the files to disk - define $EXP (and $AVLA/$ADAT /$AIMG/$AUVF) AIPS 1: default fitab;indisk=lsdisk;recat AIPS 1: $ figure out array for uv name AIPS 1: $ getname 1; AIPS 1: for nn=mai:numfle $ archive MA files AIPS 1: getname nn AIPS 1: nvasname AIPS 1: typ length(outfile),length(sysout) AIPS 1: syscom'mv -f AIPS 1: sys2com(1)'X$FITS/'!!outfile;substr(sys2com(1),1,1)='' AIPS 1: $ sys2com(2)'X'!!sysout;substr(sys2com(2),1,1)='' AIPS 1: sys2com(2)'X'!!dir;substr(sys2com(2),1,1)='' AIPS 1: sysout'';sys2com(3) ' >& /dev/null AIPS 1: outfile='FITS:'!!outfile AIPS 1: ;go;wait; $zap AIPS 1: ;system AIPS 1: end AIPS 1: clrname;indisk=lsdisk;chkname;numfle=1-error AIPS 1: numfle=mai -1 AIPS 1: for nn=3:numfle $ archive calibrated UV files AIPS 1: getname nn AIPS 1: nvasname AIPS 1: outfile='/tmp/tempuvfits AIPS 1: go;wait; $zap AIPS 1: syscom'mv -f AIPS 1: sys2com(1)'X'!!outfile;substr(sys2com(1),1,1)='' AIPS 1: sys2com(2)'X'!!sysout;substr(sys2com(2),1,1)='' AIPS 1: sysout'';sys2com(3) ' >& /dev/null AIPS 1: system AIPS 1: end AIPS 1: getname 2 $ archive calibration tables AIPS 1: $ do not use nvasname as the dir is ADAT and dirname is expid AIPS 1: AIPS 1: sys2com'';sysout'';syscom 'mkdir AIPS 1: sys2com(1)=' $adat/ AIPS 1: AIPS 1: $ if(rh<10)then;sys2com(2)='J0'!!char(rh);else;sys2com(2)='J'!! char(rh);end AIPS 1: $ if(rm<10)then;sys2com(3)='0'!!char(rm);else;sys2com(3)=char(r m);end AIPS 1: $ if(rs<10)then;sys2com(4)='0'!!char(rs)!!zz;else;sys2com(4)=ch ar(rs)!!zz;end AIPS 1: $ if(dd<10)then;sys2com(5)=pm!!'0'!!char(dd);else;sys2com(5)=pm !!char(dd);end AIPS 1: $ if(dm<10)then;sys2com(6)='0'!!char(dm);else;sys2com(6)=char(d m);end AIPS 1: $ if(ds<10)then;sys2com(7)='0'!!char(ds);else;sys2com(7)=char(d s);end AIPS 1: AIPS 1: sys2com(1)=sys2com(1)!!expnm;sys2com(8) ' >& /dev/null AIPS 1: system;clrtemp AIPS 1: AIPS 1: finish AIPS 1: AIPS 1: procedure nvas AIPS 1: typ expid;flatfov;nvasimage AIPS 1: $nvasarch AIPS 1: finish >AIPS 1: Found in Version=ABIN AIPS 1: Found in Version=ABIN AIPS 1: Got(1) disk= 1 user=**** type=UV 19991204.X BAND.1 AIPS 1: 'AIPS WILL CHOOSE THE REFERENCE ANTENNA' AIPS 1: Got(1) disk= 1 user=**** type=UV 19991204.X BAND.1 AIPS 1: 'SETFC WILL DETERMINE THE CELL SIZE' AIPS 1: '8.3333 SECOND INTEGRATIONS (GUESS)' AIPS 1: 'DONE CLEANUP OF OLD TABLE EXTENTION FILES (CL,SN,FG,BP,PL,XX)' AIPS 1: Resumes AIPS 1: Resumes AIPS 1: Resumes AIPS 1: Resumes AIPS 1: Resumes AIPS 1: '3C286 MODEL =' '3C286_X' AIPS 1: SYSTEM command to be executed is: AIPS 1: ls -1 $AIPSTARS/3C286_X.MODEL >& /dev/null AIPS 1: Resumes AIPS 1: Resumes AIPS 1: Resumes AIPS 1: Resumes AIPS 1: Resumes AIPS 1: Resumes AIPS 1: Destroyed 1 extension files of type CC AIPS 1: Destroyed 1 extension files of type HI AIPS 1: Destroyed MA image file: catno= 2 disk= 1 sys2com(7)=char(ds );end AIPS 1: sys2com(8) ' >& /dev/null AIPS 1: system;clrtemp;for i=1:7;dir=dir!!sys2com(i);end;ki=length(dir ) $ must be 27 AIPS 1: dir=substr(dir,2,ki);if(ki<>27)then;type'WARNING: WRONG DIRECT ORY NAME ?';end AIPS 1: AIPS 1: sysout=dir!!'/'!!sbms!!','!!expnm!!','!!rmss!!rmsc!!fras!!radi AIPS 1: print sysout AIPS 1: $keep sysout - not if we use dir instead AIPS 1: syscom'';sys2com'';clrtemp AIPS 1: return AIPS 1: finish AIPS 1: AIPS 1: procedure nvasarch AIPS 1: scalar nn AIPS 1: $LOS - archives the files to disk - define $EXP (and $AVLA/$ADAT /$AIMG/$AUVF) AIPS 1: default fitab;indisk=lsdisk;recat AIPS 1: $ figure out array for uv name AIPS 1: $ getname 1; AIPS 1: for nn=mai:numfle $ archive MA files AIPS 1: getname nn AIPS 1: nvasname AIPS 1: typ length(outfile),length(sysout) AIPS 1: syscom'mv -f AIPS 1: sys2com(1)'X$FITS/'!!outfile;substr(sys2com(1),1,1)='' AIPS 1: $ sys2com(2)'X'!!sysout;substr(sys2com(2),1,1)='' AIPS 1: sys2com(2)'X'!!dir;substr(sys2com(2),1,1)='' AIPS 1: sysout'';sys2com(3) ' >& /dev/null AIPS 1: outfile='FITS:'!!outfile AIPS 1: ;go;wait; $zap AIPS 1: ;system AIPS 1: end AIPS 1: clrname;indisk=lsdisk;chkname;numfle=1-error AIPS 1: numfle=mai -1 AIPS 1: for nn=3:numfle $ archive calibrated UV files AIPS 1: getname nn AIPS 1: nvasname AIPS 1: outfile='/tmp/tempuvfits AIPS 1: go;wait; $zap AIPS 1: syscom'mv -f AIPS 1: sys2com(1)'X'!!outfile;substr(sys2com(1),1,1)='' AIPS 1: sys2com(2)'X'!!sysout;substr(sys2com(2),1,1)='' AIPS 1: sysout'';sys2com(3) ' >& /dev/null AIPS 1: system AIPS 1: end AIPS 1: getname 2 $ archive calibration tables AIPS 1: $ do not use nvasname as the dir is ADAT and dirname is expid AIPS 1: AIPS 1: sys2com'';sysout'';syscom 'mkdir AIPS 1: sys2com(1)=' $adat/ AIPS 1: AIPS 1: $ if(rh<10)then;sys2com(2)='J0'!!char(rh);else;sys2com(2)='J'!! char(rh);end AIPS 1: $ if(rm<10)then;sys2com(3)='0'!!char(rm);else;sys2com(3)=char(r m);end AIPS 1: $ if(rs<10)then;sys2com(4)='0'!!char(rs)!!zz;else;sys2com(4)=ch ar(rs)!!zz;end AIPS 1: $ if(dd<10)then;sys2com(5)=pm!!'0'!!char(dd);else;sys2com(5)=pm !!char(dd);end AIPS 1: $ if(dm<10)then;sys2com(6)='0'!!char(dm);else;sys2com(6)=char(d m);end AIPS 1: $ if(ds<10)then;sys2com(7)='0'!!char(ds);else;sys2com(7)=char(d s);end AIPS 1: AIPS 1: sys2com(1)=sys2com(1)!!expnm;sys2com(8) ' >& /dev/null AIPS 1: system;clrtemp AIPS 1: AIPS 1: finish AIPS 1: AIPS 1: procedure nvas AIPS 1: typ expid;flatfov;nvasimage AIPS 1: $nvasarch AIPS 1: finish >AIPS 1: Found in Version=ABIN AIPS 1: Found in Version=ABIN AIPS 1: Got(1) disk= 1 user=**** type=UV 19991204.X BAND.1 AIPS 1: 'AIPS WILL CHOOSE THE REFERENCE ANTENNA' AIPS 1: Got(1) disk= 1 user=**** type=UV 19991204.X BAND.1 AIPS 1: 'SETFC WILL DETERMINE THE CELL SIZE' AIPS 1: '8.3333 SECOND INTEGRATIONS (GUESS)' AIPS 1: 'DONE CLEANUP OF OLD TABLE EXTENTION FILES (CL,SN,FG,BP,PL,XX)' AIPS 1: Resumes AIPS 1: Resumes AIPS 1: Resumes AIPS 1: Resumes AIPS 1: Resumes AIPS 1: '3C286 MODEL =' '3C286_X' AIPS 1: SYSTEM command to be executed is: AIPS 1: ls -1 $AIPSTARS/3C286_X.MODEL >& /dev/null AIPS 1: Resumes AIPS 1: Resumes AIPS 1: Resumes AIPS 1: Resumes AIPS 1: Resumes AIPS 1: Resumes AIPS 1: Destroyed 1 extension files of type CC AIPS 1: Destroyed 1 extension files of type HI AIPS 1: Destroyed MA image file: catno= 2 disk= 1 AIPS 1: Resumes CLCAL1: Task CLCAL (release of 31DEC06) begins CLCAL1: Using interpolation mode 2PT CLCAL1: Processing SN table 2 CLCAL1: SNMRG: Merging SN table CLCAL1: SNMRG: Write 4204 merged records from 4204 input records CLCAL1: SN2CL: Applying SN tables to CL table 2, writing CL table 3 CLCAL1: Appears to have ended successfully CLCAL1: auto 31DEC06 TST: Cpu= 1.8 Real= 1 sys2com(7)=char(ds );end AIPS 1: sys2com(8) ' >& /dev/null AIPS 1: system;clrtemp;for i=1:7;dir=dir!!sys2com(i);end;ki=length(dir ) $ must be 27 AIPS 1: dir=substr(dir,2,ki);if(ki<>27)then;type'WARNING: WRONG DIRECT ORY NAME ?';end AIPS 1: AIPS 1: sysout=dir!!'/'!!sbms!!','!!expnm!!','!!rmss!!rmsc!!fras!!radi AIPS 1: print sysout AIPS 1: $keep sysout - not if we use dir instead AIPS 1: syscom'';sys2com'';clrtemp AIPS 1: return AIPS 1: finish AIPS 1: AIPS 1: procedure nvasarch AIPS 1: scalar nn AIPS 1: $LOS - archives the files to disk - define $EXP (and $AVLA/$ADAT /$AIMG/$AUVF) AIPS 1: default fitab;indisk=lsdisk;recat AIPS 1: $ figure out array for uv name AIPS 1: $ getname 1; AIPS 1: for nn=mai:numfle $ archive MA files AIPS 1: getname nn AIPS 1: nvasname AIPS 1: typ length(outfile),length(sysout) AIPS 1: syscom'mv -f AIPS 1: sys2com(1)'X$FITS/'!!outfile;substr(sys2com(1),1,1)='' AIPS 1: $ sys2com(2)'X'!!sysout;substr(sys2com(2),1,1)='' AIPS 1: sys2com(2)'X'!!dir;substr(sys2com(2),1,1)='' AIPS 1: sysout'';sys2com(3) ' >& /dev/null AIPS 1: outfile='FITS:'!!outfile AIPS 1: ;go;wait; $zap AIPS 1: ;system AIPS 1: end AIPS 1: clrname;indisk=lsdisk;chkname;numfle=1-error AIPS 1: numfle=mai -1 AIPS 1: for nn=3:numfle $ archive calibrated UV files AIPS 1: getname nn AIPS 1: nvasname AIPS 1: outfile='/tmp/tempuvfits AIPS 1: go;wait; $zap AIPS 1: syscom'mv -f AIPS 1: sys2com(1)'X'!!outfile;substr(sys2com(1),1,1)='' AIPS 1: sys2com(2)'X'!!sysout;substr(sys2com(2),1,1)='' AIPS 1: sysout'';sys2com(3) ' >& /dev/null AIPS 1: system AIPS 1: end AIPS 1: getname 2 $ archive calibration tables AIPS 1: $ do not use nvasname as the dir is ADAT and dirname is expid AIPS 1: AIPS 1: sys2com'';sysout'';syscom 'mkdir AIPS 1: sys2com(1)=' $adat/ AIPS 1: AIPS 1: $ if(rh<10)then;sys2com(2)='J0'!!char(rh);else;sys2com(2)='J'!! char(rh);end AIPS 1: $ if(rm<10)then;sys2com(3)='0'!!char(rm);else;sys2com(3)=char(r m);end AIPS 1: $ if(rs<10)then;sys2com(4)='0'!!char(rs)!!zz;else;sys2com(4)=ch ar(rs)!!zz;end AIPS 1: $ if(dd<10)then;sys2com(5)=pm!!'0'!!char(dd);else;sys2com(5)=pm !!char(dd);end AIPS 1: $ if(dm<10)then;sys2com(6)='0'!!char(dm);else;sys2com(6)=char(d m);end AIPS 1: $ if(ds<10)then;sys2com(7)='0'!!char(ds);else;sys2com(7)=char(d s);end AIPS 1: AIPS 1: sys2com(1)=sys2com(1)!!expnm;sys2com(8) ' >& /dev/null AIPS 1: system;clrtemp AIPS 1: AIPS 1: finish AIPS 1: AIPS 1: procedure nvas AIPS 1: typ expid;flatfov;nvasimage AIPS 1: $nvasarch AIPS 1: finish >AIPS 1: Found in Version=ABIN AIPS 1: Found in Version=ABIN AIPS 1: Got(1) disk= 1 user=**** type=UV 19991204.X BAND.1 AIPS 1: 'AIPS WILL CHOOSE THE REFERENCE ANTENNA' AIPS 1: Got(1) disk= 1 user=**** type=UV 19991204.X BAND.1 AIPS 1: 'SETFC WILL DETERMINE THE CELL SIZE' AIPS 1: '8.3333 SECOND INTEGRATIONS (GUESS)' AIPS 1: 'DONE CLEANUP OF OLD TABLE EXTENTION FILES (CL,SN,FG,BP,PL,XX)' AIPS 1: Resumes AIPS 1: Resumes AIPS 1: Resumes AIPS 1: Resumes AIPS 1: Resumes AIPS 1: '3C286 MODEL =' '3C286_X' AIPS 1: SYSTEM command to be executed is: AIPS 1: ls -1 $AIPSTARS/3C286_X.MODEL >& /dev/null AIPS 1: Resumes AIPS 1: Resumes AIPS 1: Resumes AIPS 1: Resumes AIPS 1: Resumes AIPS 1: Resumes AIPS 1: Destroyed 1 extension files of type CC AIPS 1: Destroyed 1 extension files of type HI AIPS 1: Destroyed MA image file: catno= 2 disk= 1 AIPS 1: Resumes AIPS 1: Resumes CLCAL1: Task CLCAL (release of 31DEC06) begins CLCAL1: Using interpolation mode SELF CLCAL1: Deleted 1755 records from CL table no. 3 CLCAL1: Processing SN table 2 CLCAL1: WARNING: SN table 2 has already been applied CLCAL1: SNMRG: Merging SN table CLCAL1: SNMRG: Write 4204 merged records from 4204 input records CLCAL1: SN2CL: Applying SN tables to CL table 2, writing CL table 3 CLCAL1: Appears to have ended successfully CLCAL1: auto 31DEC06 TST: Cpu= 2.8 Real= 3 sys2com(7)=char(ds );end AIPS 1: sys2com(8) ' >& /dev/null AIPS 1: system;clrtemp;for i=1:7;dir=dir!!sys2com(i);end;ki=length(dir ) $ must be 27 AIPS 1: dir=substr(dir,2,ki);if(ki<>27)then;type'WARNING: WRONG DIRECT ORY NAME ?';end AIPS 1: AIPS 1: sysout=dir!!'/'!!sbms!!','!!expnm!!','!!rmss!!rmsc!!fras!!radi AIPS 1: print sysout AIPS 1: $keep sysout - not if we use dir instead AIPS 1: syscom'';sys2com'';clrtemp AIPS 1: return AIPS 1: finish AIPS 1: AIPS 1: procedure nvasarch AIPS 1: scalar nn AIPS 1: $LOS - archives the files to disk - define $EXP (and $AVLA/$ADAT /$AIMG/$AUVF) AIPS 1: default fitab;indisk=lsdisk;recat AIPS 1: $ figure out array for uv name AIPS 1: $ getname 1; AIPS 1: for nn=mai:numfle $ archive MA files AIPS 1: getname nn AIPS 1: nvasname AIPS 1: typ length(outfile),length(sysout) AIPS 1: syscom'mv -f AIPS 1: sys2com(1)'X$FITS/'!!outfile;substr(sys2com(1),1,1)='' AIPS 1: $ sys2com(2)'X'!!sysout;substr(sys2com(2),1,1)='' AIPS 1: sys2com(2)'X'!!dir;substr(sys2com(2),1,1)='' AIPS 1: sysout'';sys2com(3) ' >& /dev/null AIPS 1: outfile='FITS:'!!outfile AIPS 1: ;go;wait; $zap AIPS 1: ;system AIPS 1: end AIPS 1: clrname;indisk=lsdisk;chkname;numfle=1-error AIPS 1: numfle=mai -1 AIPS 1: for nn=3:numfle $ archive calibrated UV files AIPS 1: getname nn AIPS 1: nvasname AIPS 1: outfile='/tmp/tempuvfits AIPS 1: go;wait; $zap AIPS 1: syscom'mv -f AIPS 1: sys2com(1)'X'!!outfile;substr(sys2com(1),1,1)='' AIPS 1: sys2com(2)'X'!!sysout;substr(sys2com(2),1,1)='' AIPS 1: sysout'';sys2com(3) ' >& /dev/null AIPS 1: system AIPS 1: end AIPS 1: getname 2 $ archive calibration tables AIPS 1: $ do not use nvasname as the dir is ADAT and dirname is expid AIPS 1: AIPS 1: sys2com'';sysout'';syscom 'mkdir AIPS 1: sys2com(1)=' $adat/ AIPS 1: AIPS 1: $ if(rh<10)then;sys2com(2)='J0'!!char(rh);else;sys2com(2)='J'!! char(rh);end AIPS 1: $ if(rm<10)then;sys2com(3)='0'!!char(rm);else;sys2com(3)=char(r m);end AIPS 1: $ if(rs<10)then;sys2com(4)='0'!!char(rs)!!zz;else;sys2com(4)=ch ar(rs)!!zz;end AIPS 1: $ if(dd<10)then;sys2com(5)=pm!!'0'!!char(dd);else;sys2com(5)=pm !!char(dd);end AIPS 1: $ if(dm<10)then;sys2com(6)='0'!!char(dm);else;sys2com(6)=char(d m);end AIPS 1: $ if(ds<10)then;sys2com(7)='0'!!char(ds);else;sys2com(7)=char(d s);end AIPS 1: AIPS 1: sys2com(1)=sys2com(1)!!expnm;sys2com(8) ' >& /dev/null AIPS 1: system;clrtemp AIPS 1: AIPS 1: finish AIPS 1: AIPS 1: procedure nvas AIPS 1: typ expid;flatfov;nvasimage AIPS 1: $nvasarch AIPS 1: finish >AIPS 1: Found in Version=ABIN AIPS 1: Found in Version=ABIN AIPS 1: Got(1) disk= 1 user=**** type=UV 19991204.X BAND.1 AIPS 1: 'AIPS WILL CHOOSE THE REFERENCE ANTENNA' AIPS 1: Got(1) disk= 1 user=**** type=UV 19991204.X BAND.1 AIPS 1: 'SETFC WILL DETERMINE THE CELL SIZE' AIPS 1: '8.3333 SECOND INTEGRATIONS (GUESS)' AIPS 1: 'DONE CLEANUP OF OLD TABLE EXTENTION FILES (CL,SN,FG,BP,PL,XX)' AIPS 1: Resumes AIPS 1: Resumes AIPS 1: Resumes AIPS 1: Resumes AIPS 1: Resumes AIPS 1: '3C286 MODEL =' '3C286_X' AIPS 1: SYSTEM command to be executed is: AIPS 1: ls -1 $AIPSTARS/3C286_X.MODEL >& /dev/null AIPS 1: Resumes AIPS 1: Resumes AIPS 1: Resumes AIPS 1: Resumes AIPS 1: Resumes AIPS 1: Resumes AIPS 1: Destroyed 1 extension files of type CC AIPS 1: Destroyed 1 extension files of type HI AIPS 1: Destroyed MA image file: catno= 2 disk= 1 AIPS 1: Resumes AIPS 1: Resumes AIPS 1: Resumes TASAV1: Task TASAV (release of 31DEC06) begins TASAV1: Create 19991204 .TASAV . 1 (UV) on disk 1 cno 2 TASAV1: Copied AN file from vol/cno/vers 1 1 1 to 1 2 1 TASAV1: Copied NX file from vol/cno/vers 1 1 1 to 1 2 1 TASAV1: Copied SU file from vol/cno/vers 1 1 1 to 1 2 1 TASAV1: Copied FQ file from vol/cno/vers 1 1 1 to 1 2 1 TASAV1: Copied CL file from vol/cno/vers 1 1 1 to 1 2 1 TASAV1: Copied CL file from vol/cno/vers 1 1 2 to 1 2 2 TASAV1: Copied CL file from vol/cno/vers 1 1 3 to 1 2 3 TASAV1: Copied TY file from vol/cno/vers 1 1 1 to 1 2 1 TASAV1: Copied WX file from vol/cno/vers 1 1 1 to 1 2 1 TASAV1: Copied OF file from vol/cno/vers 1 1 1 to 1 2 1 TASAV1: Copied FG file from vol/cno/vers 1 1 1 to 1 2 1 TASAV1: Copied FG file from vol/cno/vers 1 1 2 to 1 2 2 TASAV1: Copied XX file from vol/cno/vers 1 1 1 to 1 2 1 TASAV1: Copied SN file from vol/cno/vers 1 1 1 to 1 2 1 TASAV1: Copied SN file from vol/cno/vers 1 1 2 to 1 2 2 TASAV1: Appears to have ended successfully TASAV1: auto 31DEC06 TST: Cpu= 0.7 Real= 1 sys2com(7)=char(ds );end AIPS 1: sys2com(8) ' >& /dev/null AIPS 1: system;clrtemp;for i=1:7;dir=dir!!sys2com(i);end;ki=length(dir ) $ must be 27 AIPS 1: dir=substr(dir,2,ki);if(ki<>27)then;type'WARNING: WRONG DIRECT ORY NAME ?';end AIPS 1: AIPS 1: sysout=dir!!'/'!!sbms!!','!!expnm!!','!!rmss!!rmsc!!fras!!radi AIPS 1: print sysout AIPS 1: $keep sysout - not if we use dir instead AIPS 1: syscom'';sys2com'';clrtemp AIPS 1: return AIPS 1: finish AIPS 1: AIPS 1: procedure nvasarch AIPS 1: scalar nn AIPS 1: $LOS - archives the files to disk - define $EXP (and $AVLA/$ADAT /$AIMG/$AUVF) AIPS 1: default fitab;indisk=lsdisk;recat AIPS 1: $ figure out array for uv name AIPS 1: $ getname 1; AIPS 1: for nn=mai:numfle $ archive MA files AIPS 1: getname nn AIPS 1: nvasname AIPS 1: typ length(outfile),length(sysout) AIPS 1: syscom'mv -f AIPS 1: sys2com(1)'X$FITS/'!!outfile;substr(sys2com(1),1,1)='' AIPS 1: $ sys2com(2)'X'!!sysout;substr(sys2com(2),1,1)='' AIPS 1: sys2com(2)'X'!!dir;substr(sys2com(2),1,1)='' AIPS 1: sysout'';sys2com(3) ' >& /dev/null AIPS 1: outfile='FITS:'!!outfile AIPS 1: ;go;wait; $zap AIPS 1: ;system AIPS 1: end AIPS 1: clrname;indisk=lsdisk;chkname;numfle=1-error AIPS 1: numfle=mai -1 AIPS 1: for nn=3:numfle $ archive calibrated UV files AIPS 1: getname nn AIPS 1: nvasname AIPS 1: outfile='/tmp/tempuvfits AIPS 1: go;wait; $zap AIPS 1: syscom'mv -f AIPS 1: sys2com(1)'X'!!outfile;substr(sys2com(1),1,1)='' AIPS 1: sys2com(2)'X'!!sysout;substr(sys2com(2),1,1)='' AIPS 1: sysout'';sys2com(3) ' >& /dev/null AIPS 1: system AIPS 1: end AIPS 1: getname 2 $ archive calibration tables AIPS 1: $ do not use nvasname as the dir is ADAT and dirname is expid AIPS 1: AIPS 1: sys2com'';sysout'';syscom 'mkdir AIPS 1: sys2com(1)=' $adat/ AIPS 1: AIPS 1: $ if(rh<10)then;sys2com(2)='J0'!!char(rh);else;sys2com(2)='J'!! char(rh);end AIPS 1: $ if(rm<10)then;sys2com(3)='0'!!char(rm);else;sys2com(3)=char(r m);end AIPS 1: $ if(rs<10)then;sys2com(4)='0'!!char(rs)!!zz;else;sys2com(4)=ch ar(rs)!!zz;end AIPS 1: $ if(dd<10)then;sys2com(5)=pm!!'0'!!char(dd);else;sys2com(5)=pm !!char(dd);end AIPS 1: $ if(dm<10)then;sys2com(6)='0'!!char(dm);else;sys2com(6)=char(d m);end AIPS 1: $ if(ds<10)then;sys2com(7)='0'!!char(ds);else;sys2com(7)=char(d s);end AIPS 1: AIPS 1: sys2com(1)=sys2com(1)!!expnm;sys2com(8) ' >& /dev/null AIPS 1: system;clrtemp AIPS 1: AIPS 1: finish AIPS 1: AIPS 1: procedure nvas AIPS 1: typ expid;flatfov;nvasimage AIPS 1: $nvasarch AIPS 1: finish >AIPS 1: Found in Version=ABIN AIPS 1: Found in Version=ABIN AIPS 1: Got(1) disk= 1 user=**** type=UV 19991204.X BAND.1 AIPS 1: 'AIPS WILL CHOOSE THE REFERENCE ANTENNA' AIPS 1: Got(1) disk= 1 user=**** type=UV 19991204.X BAND.1 AIPS 1: 'SETFC WILL DETERMINE THE CELL SIZE' AIPS 1: '8.3333 SECOND INTEGRATIONS (GUESS)' AIPS 1: 'DONE CLEANUP OF OLD TABLE EXTENTION FILES (CL,SN,FG,BP,PL,XX)' AIPS 1: Resumes AIPS 1: Resumes AIPS 1: Resumes AIPS 1: Resumes AIPS 1: Resumes AIPS 1: '3C286 MODEL =' '3C286_X' AIPS 1: SYSTEM command to be executed is: AIPS 1: ls -1 $AIPSTARS/3C286_X.MODEL >& /dev/null AIPS 1: Resumes AIPS 1: Resumes AIPS 1: Resumes AIPS 1: Resumes AIPS 1: Resumes AIPS 1: Resumes AIPS 1: Destroyed 1 extension files of type CC AIPS 1: Destroyed 1 extension files of type HI AIPS 1: Destroyed MA image file: catno= 2 disk= 1 AIPS 1: Resumes AIPS 1: Resumes AIPS 1: Resumes AIPS 1: Resumes SPLIT1: Task SPLIT (release of 31DEC06) begins SPLIT1: You are using a non-standard program SPLIT1: Doing subarray 1 SPLIT1: Create 3C286 .X BAND. 1 (UV) on disk 1 cno 3 SPLIT1: Applying CL Table version 3 SPLIT1: Previously flagged flagged by gain kept SPLIT1: Partially 1526 120 1526 SPLIT1: Fully 0 0 16237 SPLIT1: Copied AN file from vol/cno/vers 1 1 1 to 1 3 1 SPLIT1: Copied WX file from vol/cno/vers 1 1 1 to 1 3 1 SPLIT1: Copied OF file from vol/cno/vers 1 1 1 to 1 3 1 SPLIT1: Copied XX file from vol/cno/vers 1 1 1 to 1 3 1 SPLIT1: Create HD167971 .X BAND. 1 (UV) on disk 1 cno 4 SPLIT1: Previously flagged flagged by gain kept SPLIT1: Partially 986 0 986 SPLIT1: Fully 0 0 205376 SPLIT1: Copied AN file from vol/cno/vers 1 1 1 to 1 4 1 SPLIT1: Copied WX file from vol/cno/vers 1 1 1 to 1 4 1 SPLIT1: Copied OF file from vol/cno/vers 1 1 1 to 1 4 1 SPLIT1: Copied XX file from vol/cno/vers 1 1 1 to 1 4 1 SPLIT1: Create 1819-096 .X BAND. 1 (UV) on disk 1 cno 5 SPLIT1: Previously flagged flagged by gain kept SPLIT1: Partially 3095 0 3095 SPLIT1: Fully 0 0 162629 SPLIT1: Copied AN file from vol/cno/vers 1 1 1 to 1 5 1 SPLIT1: Copied WX file from vol/cno/vers 1 1 1 to 1 5 1 SPLIT1: Copied OF file from vol/cno/vers 1 1 1 to 1 5 1 SPLIT1: Copied XX file from vol/cno/vers 1 1 1 to 1 5 1 SPLIT1: Create CYGOB2N9 .X BAND. 1 (UV) on disk 1 cno 6 SPLIT1: Previously flagged flagged by gain kept SPLIT1: Partially 1082 308 1390 SPLIT1: Fully 0 0 166749 SPLIT1: Copied AN file from vol/cno/vers 1 1 1 to 1 6 1 SPLIT1: Copied WX file from vol/cno/vers 1 1 1 to 1 6 1 SPLIT1: Copied OF file from vol/cno/vers 1 1 1 to 1 6 1 SPLIT1: Copied XX file from vol/cno/vers 1 1 1 to 1 6 1 SPLIT1: Create 2005+403 .X BAND. 1 (UV) on disk 1 cno 7 SPLIT1: Previously flagged flagged by gain kept SPLIT1: Partially 5136 148 5136 SPLIT1: Fully 0 0 122344 SPLIT1: Copied AN file from vol/cno/vers 1 1 1 to 1 7 1 SPLIT1: Copied WX file from vol/cno/vers 1 1 1 to 1 7 1 SPLIT1: Copied OF file from vol/cno/vers 1 1 1 to 1 7 1 SPLIT1: Copied XX file from vol/cno/vers 1 1 1 to 1 7 1 SPLIT1: Appears to have ended successfully SPLIT1: auto 31DEC06 TST: Cpu= 2.4 Real= 9 sys2com(7)=char(ds );end AIPS 1: sys2com(8) ' >& /dev/null AIPS 1: system;clrtemp;for i=1:7;dir=dir!!sys2com(i);end;ki=length(dir ) $ must be 27 AIPS 1: dir=substr(dir,2,ki);if(ki<>27)then;type'WARNING: WRONG DIRECT ORY NAME ?';end AIPS 1: AIPS 1: sysout=dir!!'/'!!sbms!!','!!expnm!!','!!rmss!!rmsc!!fras!!radi AIPS 1: print sysout AIPS 1: $keep sysout - not if we use dir instead AIPS 1: syscom'';sys2com'';clrtemp AIPS 1: return AIPS 1: finish AIPS 1: AIPS 1: procedure nvasarch AIPS 1: scalar nn AIPS 1: $LOS - archives the files to disk - define $EXP (and $AVLA/$ADAT /$AIMG/$AUVF) AIPS 1: default fitab;indisk=lsdisk;recat AIPS 1: $ figure out array for uv name AIPS 1: $ getname 1; AIPS 1: for nn=mai:numfle $ archive MA files AIPS 1: getname nn AIPS 1: nvasname AIPS 1: typ length(outfile),length(sysout) AIPS 1: syscom'mv -f AIPS 1: sys2com(1)'X$FITS/'!!outfile;substr(sys2com(1),1,1)='' AIPS 1: $ sys2com(2)'X'!!sysout;substr(sys2com(2),1,1)='' AIPS 1: sys2com(2)'X'!!dir;substr(sys2com(2),1,1)='' AIPS 1: sysout'';sys2com(3) ' >& /dev/null AIPS 1: outfile='FITS:'!!outfile AIPS 1: ;go;wait; $zap AIPS 1: ;system AIPS 1: end AIPS 1: clrname;indisk=lsdisk;chkname;numfle=1-error AIPS 1: numfle=mai -1 AIPS 1: for nn=3:numfle $ archive calibrated UV files AIPS 1: getname nn AIPS 1: nvasname AIPS 1: outfile='/tmp/tempuvfits AIPS 1: go;wait; $zap AIPS 1: syscom'mv -f AIPS 1: sys2com(1)'X'!!outfile;substr(sys2com(1),1,1)='' AIPS 1: sys2com(2)'X'!!sysout;substr(sys2com(2),1,1)='' AIPS 1: sysout'';sys2com(3) ' >& /dev/null AIPS 1: system AIPS 1: end AIPS 1: getname 2 $ archive calibration tables AIPS 1: $ do not use nvasname as the dir is ADAT and dirname is expid AIPS 1: AIPS 1: sys2com'';sysout'';syscom 'mkdir AIPS 1: sys2com(1)=' $adat/ AIPS 1: AIPS 1: $ if(rh<10)then;sys2com(2)='J0'!!char(rh);else;sys2com(2)='J'!! char(rh);end AIPS 1: $ if(rm<10)then;sys2com(3)='0'!!char(rm);else;sys2com(3)=char(r m);end AIPS 1: $ if(rs<10)then;sys2com(4)='0'!!char(rs)!!zz;else;sys2com(4)=ch ar(rs)!!zz;end AIPS 1: $ if(dd<10)then;sys2com(5)=pm!!'0'!!char(dd);else;sys2com(5)=pm !!char(dd);end AIPS 1: $ if(dm<10)then;sys2com(6)='0'!!char(dm);else;sys2com(6)=char(d m);end AIPS 1: $ if(ds<10)then;sys2com(7)='0'!!char(ds);else;sys2com(7)=char(d s);end AIPS 1: AIPS 1: sys2com(1)=sys2com(1)!!expnm;sys2com(8) ' >& /dev/null AIPS 1: system;clrtemp AIPS 1: AIPS 1: finish AIPS 1: AIPS 1: procedure nvas AIPS 1: typ expid;flatfov;nvasimage AIPS 1: $nvasarch AIPS 1: finish >AIPS 1: Found in Version=ABIN AIPS 1: Found in Version=ABIN AIPS 1: Got(1) disk= 1 user=**** type=UV 19991204.X BAND.1 AIPS 1: 'AIPS WILL CHOOSE THE REFERENCE ANTENNA' AIPS 1: Got(1) disk= 1 user=**** type=UV 19991204.X BAND.1 AIPS 1: 'SETFC WILL DETERMINE THE CELL SIZE' AIPS 1: '8.3333 SECOND INTEGRATIONS (GUESS)' AIPS 1: 'DONE CLEANUP OF OLD TABLE EXTENTION FILES (CL,SN,FG,BP,PL,XX)' AIPS 1: Resumes AIPS 1: Resumes AIPS 1: Resumes AIPS 1: Resumes AIPS 1: Resumes AIPS 1: '3C286 MODEL =' '3C286_X' AIPS 1: SYSTEM command to be executed is: AIPS 1: ls -1 $AIPSTARS/3C286_X.MODEL >& /dev/null AIPS 1: Resumes AIPS 1: Resumes AIPS 1: Resumes AIPS 1: Resumes AIPS 1: Resumes AIPS 1: Resumes AIPS 1: Destroyed 1 extension files of type CC AIPS 1: Destroyed 1 extension files of type HI AIPS 1: Destroyed MA image file: catno= 2 disk= 1 AIPS 1: Resumes AIPS 1: Resumes AIPS 1: Resumes AIPS 1: Resumes AIPS 1: Resumes AIPS 1: ' ' AIPS 1: 'ESTIMATED RMS:' '0.05364 MILLI JANSKY' AIPS 1: SYSTEM command to be executed is: AIPS 1: rm -f /tmp/SETFC@3C286_X,BAND.0-1 >& /dev/null SETFC1: Task SETFC (release of 31DEC06) begins SETFC1: Found 3C286 X BAND Seq 1 Disk: 1 in slot 3 SETFC1: SETCEL: recommends IMSIZE 1447 CELLSIZE 0.22168 SETFC1: SETCEL: returns IMSIZE 2048 CELLSIZE 0.22168 SETFC1: ZTXOP2: using translated file name = SETFC1: ZTXOP2: /tmp/SETFC@3C286_X,BAND.0-1 SETFC1: FLYEYE added 1 fields to BOXFILE to 0.000 deg SETFC1: WARNING: THIS MAY NOT COVER THE DESIRED AREA SETFC1: Searching catalog between 0.00 and 0.13 degrees radius SETFC1: ZTXOP2: using translated file name = SETFC1: ZTXOP2: /home/auto/aips/TEXT/STARS/NV00.0030 SETFC1: Field RA Dec Flux Beam Sep SETFC1: 2 13:31:08.31 30:30:32.4 14.903 1.000 0.000 SETFC1: Add NVSS: wrote 1 fields to BOXFILE SETFC1: The Sun is 69.9 deg away - ignoring SETFC1: First field number written was 1 SETFC1: Highest field number written was 2 SETFC1: returns adverbs to AIPS SETFC1: Appears to have ended successfully SETFC1: auto 31DEC06 TST: Cpu= 1.0 Real= 1 C 1 2036 2036 13 31 08.29 30 30 33.0 00001 -1 1019 1024 1025 C 2 246 246 13 31 08.31 30 30 32.4 00002 -1 100 128 129 sys2com(7)=char(ds );end AIPS 1: sys2com(8) ' >& /dev/null AIPS 1: system;clrtemp;for i=1:7;dir=dir!!sys2com(i);end;ki=length(dir ) $ must be 27 AIPS 1: dir=substr(dir,2,ki);if(ki<>27)then;type'WARNING: WRONG DIRECT ORY NAME ?';end AIPS 1: AIPS 1: sysout=dir!!'/'!!sbms!!','!!expnm!!','!!rmss!!rmsc!!fras!!radi AIPS 1: print sysout AIPS 1: $keep sysout - not if we use dir instead AIPS 1: syscom'';sys2com'';clrtemp AIPS 1: return AIPS 1: finish AIPS 1: AIPS 1: procedure nvasarch AIPS 1: scalar nn AIPS 1: $LOS - archives the files to disk - define $EXP (and $AVLA/$ADAT /$AIMG/$AUVF) AIPS 1: default fitab;indisk=lsdisk;recat AIPS 1: $ figure out array for uv name AIPS 1: $ getname 1; AIPS 1: for nn=mai:numfle $ archive MA files AIPS 1: getname nn AIPS 1: nvasname AIPS 1: typ length(outfile),length(sysout) AIPS 1: syscom'mv -f AIPS 1: sys2com(1)'X$FITS/'!!outfile;substr(sys2com(1),1,1)='' AIPS 1: $ sys2com(2)'X'!!sysout;substr(sys2com(2),1,1)='' AIPS 1: sys2com(2)'X'!!dir;substr(sys2com(2),1,1)='' AIPS 1: sysout'';sys2com(3) ' >& /dev/null AIPS 1: outfile='FITS:'!!outfile AIPS 1: ;go;wait; $zap AIPS 1: ;system AIPS 1: end AIPS 1: clrname;indisk=lsdisk;chkname;numfle=1-error AIPS 1: numfle=mai -1 AIPS 1: for nn=3:numfle $ archive calibrated UV files AIPS 1: getname nn AIPS 1: nvasname AIPS 1: outfile='/tmp/tempuvfits AIPS 1: go;wait; $zap AIPS 1: syscom'mv -f AIPS 1: sys2com(1)'X'!!outfile;substr(sys2com(1),1,1)='' AIPS 1: sys2com(2)'X'!!sysout;substr(sys2com(2),1,1)='' AIPS 1: sysout'';sys2com(3) ' >& /dev/null AIPS 1: system AIPS 1: end AIPS 1: getname 2 $ archive calibration tables AIPS 1: $ do not use nvasname as the dir is ADAT and dirname is expid AIPS 1: AIPS 1: sys2com'';sysout'';syscom 'mkdir AIPS 1: sys2com(1)=' $adat/ AIPS 1: AIPS 1: $ if(rh<10)then;sys2com(2)='J0'!!char(rh);else;sys2com(2)='J'!! char(rh);end AIPS 1: $ if(rm<10)then;sys2com(3)='0'!!char(rm);else;sys2com(3)=char(r m);end AIPS 1: $ if(rs<10)then;sys2com(4)='0'!!char(rs)!!zz;else;sys2com(4)=ch ar(rs)!!zz;end AIPS 1: $ if(dd<10)then;sys2com(5)=pm!!'0'!!char(dd);else;sys2com(5)=pm !!char(dd);end AIPS 1: $ if(dm<10)then;sys2com(6)='0'!!char(dm);else;sys2com(6)=char(d m);end AIPS 1: $ if(ds<10)then;sys2com(7)='0'!!char(ds);else;sys2com(7)=char(d s);end AIPS 1: AIPS 1: sys2com(1)=sys2com(1)!!expnm;sys2com(8) ' >& /dev/null AIPS 1: system;clrtemp AIPS 1: AIPS 1: finish AIPS 1: AIPS 1: procedure nvas AIPS 1: typ expid;flatfov;nvasimage AIPS 1: $nvasarch AIPS 1: finish >AIPS 1: Found in Version=ABIN AIPS 1: Found in Version=ABIN AIPS 1: Got(1) disk= 1 user=**** type=UV 19991204.X BAND.1 AIPS 1: 'AIPS WILL CHOOSE THE REFERENCE ANTENNA' AIPS 1: Got(1) disk= 1 user=**** type=UV 19991204.X BAND.1 AIPS 1: 'SETFC WILL DETERMINE THE CELL SIZE' AIPS 1: '8.3333 SECOND INTEGRATIONS (GUESS)' AIPS 1: 'DONE CLEANUP OF OLD TABLE EXTENTION FILES (CL,SN,FG,BP,PL,XX)' AIPS 1: Resumes AIPS 1: Resumes AIPS 1: Resumes AIPS 1: Resumes AIPS 1: Resumes AIPS 1: '3C286 MODEL =' '3C286_X' AIPS 1: SYSTEM command to be executed is: AIPS 1: ls -1 $AIPSTARS/3C286_X.MODEL >& /dev/null AIPS 1: Resumes AIPS 1: Resumes AIPS 1: Resumes AIPS 1: Resumes AIPS 1: Resumes AIPS 1: Resumes AIPS 1: Destroyed 1 extension files of type CC AIPS 1: Destroyed 1 extension files of type HI AIPS 1: Destroyed MA image file: catno= 2 disk= 1 AIPS 1: Resumes AIPS 1: Resumes AIPS 1: Resumes AIPS 1: Resumes AIPS 1: Resumes AIPS 1: ' ' AIPS 1: 'ESTIMATED RMS:' '0.05364 MILLI JANSKY' AIPS 1: SYSTEM command to be executed is: AIPS 1: rm -f /tmp/SETFC@3C286_X,BAND.0-1 >& /dev/null AIPS 1: Waiting for returned adverbs AIPS 1: Resumes AIPS 1: SYSTEM command to be executed is: AIPS 1: cat /tmp/SETFC@3C286_X,BAND.0-1 >> /home/auto/run/BB116_1999DEC0 AIPS 1: 4_1.log.0 AIPS 1: ' NOW STARTING WITH SOURCE :1 =3C286' AIPS 1: ' ' IMAGR1: Task IMAGR (release of 31DEC06) begins IMAGR1: ZTXOP2: using translated file name = IMAGR1: ZTXOP2: /tmp/SETFC@3C286_X,BAND.0-1 IMAGR1: FIELDF: Final field parameters and # read are: IMAGR1: Field 1 2036 2036 2.4554E-02 4.1000E-02 0 IMAGR1: Field 2 246 246 2.8302E-01 -5.5900E-01 0 IMAGR1: ZTXOP2: using translated file name = IMAGR1: ZTXOP2: /tmp/SETFC@3C286_X,BAND.0-1 IMAGR1: WINDF: Number of clean boxes/field read as follows: IMAGR1: Field 01: 1 Field 02: 1 IMAGR1: Create 3C286 .IMAGR . 1 (UV) on disk 1 cno 8 IMAGR1: Beginning channel 1 through 1 with 2 IFs IMAGR1: IMACPY: Copied 17763 visibilities to be imaged IMAGR1: **** WARNING data included out of inner portion of UV plane **** IMAGR1: **** Watch for high-frequency & other poor cleaning effects **** IMAGR1: UVWAIT: begin finding uniform weights IMAGR1: UVWAIT: Average grid weight 1.247E+05 IMAGR1: UVWAIT: Adding temperance S 2.495E+04 IMAGR1: UVWAIT: begin applying uniform or other weights IMAGR1: UVWAIT: Sum of weights in 1.868E+08 and out 2.620E+08 IMAGR1: UVWAIT: Noise is increased by a factor 1.154 due to weighting IMAGR1: UVWAIT: Average summed weight 1.247E+05 over 34771 vis IMAGR1: Create 3C286 .IBM001. 1 (MA) on disk 1 cno 9 IMAGR1: Create 3C286 .IBM002. 1 (MA) on disk 1 cno 10 IMAGR1: Create 3C286 .ICL001. 1 (MA) on disk 1 cno 11 IMAGR1: Create 3C286 .ICL002. 1 (MA) on disk 1 cno 12 IMAGR1: GRDFLT: X and Y convolution type = SPHEROIDAL IMAGR1: GRDFLT: X and Y parms = 3.0000 1.0000 IMAGR1: GRDFLT: convolution function sampled every 1/100 of a cell IMAGR1: GRDMEM: Ave 2 Channels; 8.414900E+09 to 8.414900E+09 Hz IMAGR1: Field 1 Sum of gridding weights = 2.78148E+09 IMAGR1: Field 1 Beam min = -89.2 MilliJy, max = 1.0 Jy IMAGR1: Field 1 fit FWHM = 709.324 x 649.605 Milliarcsec, PA= -21.1 IMAGR1: Field 2 Sum of gridding weights = 2.78152E+09 IMAGR1: Field 2 Beam min = -89.2 MilliJy, max = 1.0 Jy IMAGR1: Field 2 fit FWHM = 709.325 x 649.608 Milliarcsec, PA= -21.1 IMAGR1: CLBHIS: minimum component 0.500 of current peak IMAGR1: Field 1 min = -483.5 MilliJy,max = 5.0 Jy IMAGR1: Field 2 min = -476.7 MilliJy,max = 4.8 Jy IMAGR1: BGC Clean: using 2043 cell beam + residuals > 356.68 MilliJy IMAGR1: 14702 Residual map points loaded IMAGR1: Field 1 min allowed flux = 2.408 Jy iter= 8 IMAGR1: Field 1 Clean flux density= 2.868 Jy 8 comps IMAGR1: Total Cleaned flux density = 2.868 Jy 8 comps IMAGR1: SETDO3: imaging done with multiple tangent planes IMAGR1: VISDFT: Begin DFT component subtraction IMAGR1: VISDFT: Model components of type Point IMAGR1: I Polarization model processed IMAGR1: Field 2 min = -227.3 MilliJy,max = 2.2 Jy IMAGR1: TRY ANOTHER FIELD: this is 2.133E+00 < Second best 2.290E+00 IMAGR1: Field 1 min = -236.0 MilliJy,max = 2.2 Jy IMAGR1: BGC Clean: using 2043 cell beam + residuals > 170.60 MilliJy IMAGR1: 11575 Residual map points loaded IMAGR1: Field 1 min allowed flux = 1.006 Jy iter= 17 IMAGR1: Field 1 Clean flux density= 4.226 Jy 17 comps IMAGR1: Total Cleaned flux density = 4.226 Jy 17 comps IMAGR1: VISDFT: Begin DFT component subtraction IMAGR1: I Polarization model processed IMAGR1: Field 2 min = -124.8 MilliJy,max = 1.0 Jy IMAGR1: BGC Clean: using 509 cell beam + residuals > 158.78 MilliJy IMAGR1: 331 Residual map points loaded IMAGR1: Field 2 min allowed flux = 464.157 MilliJy iter= 9 IMAGR1: Field 2 Clean flux density= 632.821 MilliJy 9 comps IMAGR1: Total Cleaned flux density = 4.859 Jy 26 comps IMAGR1: VISDFT: Begin DFT component subtraction IMAGR1: I Polarization model processed IMAGR1: Field 1 min = -99.9 MilliJy,max = 470.1 MilliJy IMAGR1: BGC Clean: using 2043 cell beam + residuals > 71.25 MilliJy IMAGR1: 684 Residual map points loaded IMAGR1: Field 1 min allowed flux = 224.852 MilliJy iter= 25 IMAGR1: Field 1 Clean flux density= 4.494 Jy 25 comps IMAGR1: Total Cleaned flux density = 5.126 Jy 34 comps IMAGR1: VISDFT: Begin DFT component subtraction IMAGR1: I Polarization model processed IMAGR1: Field 2 min = -102.3 MilliJy,max = 233.4 MilliJy IMAGR1: BGC Clean: using 509 cell beam + residuals > 44.44 MilliJy IMAGR1: 369 Residual map points loaded IMAGR1: Field 2 min allowed flux = 114.349 MilliJy iter= 18 IMAGR1: Field 2 Clean flux density= 754.182 MilliJy 18 comps IMAGR1: Total Cleaned flux density = 5.248 Jy 43 comps IMAGR1: VISDFT: Begin DFT component subtraction IMAGR1: I Polarization model processed IMAGR1: Field 1 min = -115.2 MilliJy,max = 113.2 MilliJy IMAGR1: BGC Clean: using 2037 cell beam + residuals > 21.53 MilliJy IMAGR1: 4267 Residual map points loaded IMAGR1: Field 1 min allowed flux = -57.417 MilliJy iter= 47 IMAGR1: Field 1 Clean flux density= 4.478 Jy 47 comps IMAGR1: Total Cleaned flux density = 5.232 Jy 65 comps IMAGR1: VISDFT: Begin DFT component subtraction IMAGR1: I Polarization model processed IMAGR1: Field 2 min = -56.2 MilliJy,max = 68.9 MilliJy IMAGR1: BGC Clean: using 509 cell beam + residuals > 16.22 MilliJy IMAGR1: 1720 Residual map points loaded IMAGR1: Field 2 min allowed flux = 34.233 MilliJy iter= 57 IMAGR1: Field 2 Clean flux density= 733.001 MilliJy 57 comps IMAGR1: Total Cleaned flux density = 5.211 Jy 104 comps IMAGR1: ALGSTB: All 180 Rows In AP (Max 267) IMAGR1: ALGSTB field 2 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 169- 0 Cells, with 17763 Pts IMAGR1: Field 1 min = -35.3 MilliJy,max = 34.8 MilliJy IMAGR1: BGC Clean: using 749 cell beam + residuals > 10.74 MilliJy IMAGR1: 8609 Residual map points loaded IMAGR1: Field 1 min algorithm flux= -18.362 MilliJy iter= 136 IMAGR1: Field 1 Clean flux density= 4.501 Jy 136 comps IMAGR1: Total Cleaned flux density = 5.234 Jy 193 comps IMAGR1: VISDFT: Begin DFT component subtraction IMAGR1: I Polarization model processed IMAGR1: Field 2 min = -20.3 MilliJy,max = 20.5 MilliJy IMAGR1: BGC Clean: using 165 cell beam + residuals > 9.73 MilliJy IMAGR1: 948 Residual map points loaded IMAGR1: Field 2 min algorithm flux= -12.984 MilliJy iter= 132 IMAGR1: Field 2 Clean flux density= 746.745 MilliJy 132 comps IMAGR1: Total Cleaned flux density = 5.248 Jy 268 comps IMAGR1: ALGSTB: All 180 Rows In AP (Max 267) IMAGR1: ALGSTB field 2 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 169- 0 Cells, with 17763 Pts IMAGR1: Field 1 min = -13.3 MilliJy,max = 13.4 MilliJy IMAGR1: BGC Clean: using 145 cell beam + residuals > 6.88 MilliJy IMAGR1: 3332 Residual map points loaded IMAGR1: Field 1 min algorithm flux= 9.318 MilliJy iter= 246 IMAGR1: Field 1 Clean flux density= 4.520 Jy 246 comps IMAGR1: Total Cleaned flux density = 5.267 Jy 378 comps IMAGR1: VISDFT: Begin DFT component subtraction IMAGR1: I Polarization model processed IMAGR1: Field 2 min = -9.7 MilliJy,max = 10.2 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 5.39 MilliJy IMAGR1: 1287 Residual map points loaded IMAGR1: Field 2 min algorithm flux= 7.024 MilliJy iter= 261 IMAGR1: Field 2 Clean flux density= 754.521 MilliJy 261 comps IMAGR1: Total Cleaned flux density = 5.274 Jy 507 comps IMAGR1: ALGSTB: All 180 Rows In AP (Max 267) IMAGR1: ALGSTB field 2 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 169- 0 Cells, with 17763 Pts IMAGR1: Field 1 min = -10.7 MilliJy,max = 9.9 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 4.29 MilliJy IMAGR1: 16880 Residual map points loaded IMAGR1: Field 1 min algorithm flux= -6.380 MilliJy iter= 550 IMAGR1: Field 1 Clean flux density= 4.466 Jy 550 comps IMAGR1: Total Cleaned flux density = 5.221 Jy 811 comps IMAGR1: VISDFT: Begin DFT component subtraction IMAGR1: I Polarization model processed IMAGR1: Field 2 min = -6.0 MilliJy,max = 7.0 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 4.20 MilliJy IMAGR1: 477 Residual map points loaded IMAGR1: Field 2 min algorithm flux= -4.677 MilliJy iter= 358 IMAGR1: Field 2 Clean flux density= 766.652 MilliJy 358 comps IMAGR1: Total Cleaned flux density = 5.233 Jy 908 comps IMAGR1: ALGSTB: All 180 Rows In AP (Max 267) IMAGR1: ALGSTB field 2 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 169- 0 Cells, with 17763 Pts IMAGR1: Field 1 min = -9.1 MilliJy,max = 8.8 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 3.57 MilliJy IMAGR1: 18666 Residual map points loaded IMAGR1: Field 1 min algorithm flux= 4.986 MilliJy iter= 975 IMAGR1: Field 1 Clean flux density= 4.521 Jy 975 comps IMAGR1: Total Cleaned flux density = 5.287 Jy 1333 comps IMAGR1: VISDFT: Begin DFT component subtraction IMAGR1: I Polarization model processed IMAGR1: Field 1 min = -8.8 MilliJy,max = 8.1 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 3.18 MilliJy IMAGR1: 17724 Residual map points loaded IMAGR1: Field 1 min algorithm flux= 4.208 MilliJy iter= 1467 IMAGR1: Field 1 Clean flux density= 4.482 Jy 1467 comps IMAGR1: Total Cleaned flux density = 5.249 Jy 1825 comps IMAGR1: VISDFT: Begin DFT component subtraction IMAGR1: I Polarization model processed IMAGR1: Field 2 min = -4.0 MilliJy,max = 4.4 MilliJy IMAGR1: TRY ANOTHER FIELD: this is 3.793E-03 < Second best 4.034E-03 IMAGR1: Field 1 min = -8.2 MilliJy,max = 7.8 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 2.78 MilliJy IMAGR1: 19530 Residual map points loaded IMAGR1: Field 1 min algorithm flux= -3.626 MilliJy iter= 2091 IMAGR1: Field 1 Clean flux density= 4.538 Jy 2091 comps IMAGR1: Total Cleaned flux density = 5.305 Jy 2449 comps IMAGR1: VISDFT: Begin DFT component subtraction IMAGR1: I Polarization model processed IMAGR1: Field 2 min = -3.9 MilliJy,max = 3.9 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 2.77 MilliJy IMAGR1: 134 Residual map points loaded IMAGR1: Field 2 min algorithm flux= 2.849 MilliJy iter= 417 IMAGR1: Field 2 Clean flux density= 760.439 MilliJy 417 comps IMAGR1: Total Cleaned flux density = 5.299 Jy 2508 comps IMAGR1: ALGSTB: All 180 Rows In AP (Max 267) IMAGR1: ALGSTB field 2 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 169- 0 Cells, with 17763 Pts IMAGR1: Field 1 min = -7.6 MilliJy,max = 7.0 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 2.41 MilliJy IMAGR1: 19487 Residual map points loaded IMAGR1: Field 1 min algorithm flux= -3.090 MilliJy iter= 2871 IMAGR1: Field 1 Clean flux density= 4.469 Jy 2871 comps IMAGR1: Total Cleaned flux density = 5.229 Jy 3288 comps IMAGR1: VISDFT: Begin DFT component subtraction IMAGR1: I Polarization model processed IMAGR1: Field 1 min = -7.1 MilliJy,max = 6.6 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 2.11 MilliJy IMAGR1: 18784 Residual map points loaded IMAGR1: Field 1 min algorithm flux= -2.658 MilliJy iter= 3794 IMAGR1: Field 1 Clean flux density= 4.530 Jy 3794 comps IMAGR1: Total Cleaned flux density = 5.291 Jy 4211 comps IMAGR1: VISDFT: Begin DFT component subtraction IMAGR1: I Polarization model processed IMAGR1: Field 2 min = -3.0 MilliJy,max = 2.9 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 2.10 MilliJy IMAGR1: 27 Residual map points loaded IMAGR1: Field 2 min algorithm flux= -2.100 MilliJy iter= 434 IMAGR1: Field 2 Clean flux density= 756.929 MilliJy 434 comps IMAGR1: Total Cleaned flux density = 5.287 Jy 4228 comps IMAGR1: VISDFT: Begin DFT component subtraction IMAGR1: I Polarization model processed IMAGR1: Field 1 min = -6.5 MilliJy,max = 6.4 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 1.81 MilliJy IMAGR1: 19785 Residual map points loaded IMAGR1: Field 1 min algorithm flux= 2.261 MilliJy iter= 4925 IMAGR1: Field 1 Clean flux density= 4.456 Jy 4925 comps IMAGR1: Total Cleaned flux density = 5.213 Jy 5359 comps IMAGR1: VISDFT: Begin DFT component subtraction IMAGR1: I Polarization model processed IMAGR1: Field 1 min = -6.0 MilliJy,max = 5.8 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 1.57 MilliJy IMAGR1: 19358 Residual map points loaded IMAGR1: Field 1 min algorithm flux= 1.947 MilliJy iter= 6291 IMAGR1: Field 1 Clean flux density= 4.555 Jy 6291 comps IMAGR1: Total Cleaned flux density = 5.312 Jy 6725 comps IMAGR1: ALGSTB: All 1362 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1351- 0 Cells, with 17763 Pts IMAGR1: Field 2 min = -2.8 MilliJy,max = 1.9 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 1.56 MilliJy IMAGR1: 44 Residual map points loaded IMAGR1: Field 2 min algorithm flux= -1.595 MilliJy iter= 462 IMAGR1: Field 2 Clean flux density= 752.442 MilliJy 462 comps IMAGR1: Total Cleaned flux density = 5.308 Jy 6753 comps IMAGR1: VISDFT: Begin DFT component subtraction IMAGR1: I Polarization model processed IMAGR1: Field 1 min = -5.8 MilliJy,max = 5.8 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 1.34 MilliJy IMAGR1: 19838 Residual map points loaded IMAGR1: Field 1 min algorithm flux= 1.656 MilliJy iter= 7925 IMAGR1: Field 1 Clean flux density= 4.440 Jy 7925 comps IMAGR1: Total Cleaned flux density = 5.192 Jy 8387 comps IMAGR1: ALGSTB: All 1362 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1351- 0 Cells, with 17763 Pts IMAGR1: Field 1 min = -5.8 MilliJy,max = 5.7 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 1.18 MilliJy IMAGR1: 19605 Residual map points loaded IMAGR1: Field 1 min algorithm flux= 1.451 MilliJy iter= 9941 IMAGR1: Field 1 Clean flux density= 4.617 Jy 9941 comps IMAGR1: Total Cleaned flux density = 5.370 Jy 10403 comps IMAGR1: ALGSTB: All 1362 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1351- 0 Cells, with 17763 Pts IMAGR1: Field 2 min = -3.8 MilliJy,max = 1.4 MilliJy IMAGR1: BGC Clean: using 145 cell beam + residuals > 1.41 MilliJy IMAGR1: 91 Residual map points loaded IMAGR1: Field 2 min allowed flux = -1.826 MilliJy iter= 477 IMAGR1: Field 2 Clean flux density= 748.728 MilliJy 477 comps IMAGR1: Total Cleaned flux density = 5.366 Jy 10418 comps IMAGR1: VISDFT: Begin DFT component subtraction IMAGR1: I Polarization model processed IMAGR1: Field 2 min = -1.8 MilliJy,max = 1.4 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 1.18 MilliJy IMAGR1: 79 Residual map points loaded IMAGR1: Field 2 min algorithm flux= -1.187 MilliJy iter= 517 IMAGR1: Field 2 Clean flux density= 743.154 MilliJy 517 comps IMAGR1: Total Cleaned flux density = 5.361 Jy 10458 comps IMAGR1: ALGSTB: All 180 Rows In AP (Max 267) IMAGR1: ALGSTB field 2 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 169- 0 Cells, with 17763 Pts IMAGR1: Field 1 min = -5.9 MilliJy,max = 5.7 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 1.06 MilliJy IMAGR1: 19809 Residual map points loaded IMAGR1: Field 1 min algorithm flux= -1.300 MilliJy iter= 12294 IMAGR1: Field 1 Clean flux density= 4.390 Jy 12294 comps IMAGR1: Total Cleaned flux density = 5.133 Jy 12811 comps IMAGR1: ALGSTB: All 1362 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1351- 0 Cells, with 17763 Pts IMAGR1: Field 1 min = -5.7 MilliJy,max = 6.2 MilliJy IMAGR1: BGC Clean: using 145 cell beam + residuals > 1.45 MilliJy IMAGR1: 3510 Residual map points loaded IMAGR1: Field 1 min allowed flux = 1.935 MilliJy iter= 12503 IMAGR1: Field 1 Clean flux density= 4.436 Jy 12503 comps IMAGR1: Total Cleaned flux density = 5.179 Jy 13020 comps IMAGR1: VISDFT: Begin DFT component subtraction IMAGR1: I Polarization model processed IMAGR1: Field 1 min = -5.7 MilliJy,max = 6.1 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 932.14 MicroJy IMAGR1: 19688 Residual map points loaded IMAGR1: Field 1 min algorithm flux= 1.125 MilliJy iter= 15213 IMAGR1: Field 1 Clean flux density= 4.598 Jy 15213 comps IMAGR1: Total Cleaned flux density = 5.341 Jy 15730 comps IMAGR1: ALGSTB: All 1362 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1351- 0 Cells, with 17763 Pts IMAGR1: Field 2 min = -1.9 MilliJy,max = 1.1 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 931.00 MicroJy IMAGR1: 98 Residual map points loaded IMAGR1: Field 2 min allowed flux = -971.638 MicroJy iter= 550 IMAGR1: Field 2 Clean flux density= 739.325 MilliJy 550 comps IMAGR1: Total Cleaned flux density = 5.337 Jy 15763 comps IMAGR1: VISDFT: Begin DFT component subtraction IMAGR1: I Polarization model processed IMAGR1: Field 1 min = -5.7 MilliJy,max = 5.6 MilliJy IMAGR1: BGC Clean: using 145 cell beam + residuals > 979.36 MicroJy IMAGR1: 8899 Residual map points loaded IMAGR1: Field 1 min allowed flux = 1.305 MilliJy iter= 15603 IMAGR1: Field 1 Clean flux density= 4.547 Jy 15603 comps IMAGR1: Total Cleaned flux density = 5.286 Jy 16153 comps IMAGR1: VISDFT: Begin DFT component subtraction IMAGR1: I Polarization model processed IMAGR1: Field 1 min = -5.6 MilliJy,max = 5.7 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 757.07 MicroJy IMAGR1: 19659 Residual map points loaded IMAGR1: Field 1 min algorithm flux= -898.007 MicroJy iter= 18630 IMAGR1: Field 1 Clean flux density= 4.520 Jy 18630 comps IMAGR1: Total Cleaned flux density = 5.259 Jy 19180 comps IMAGR1: ALGSTB: All 1362 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1351- 0 Cells, with 17763 Pts IMAGR1: Field 2 min = -1.1 MilliJy,max = 1.1 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 755.51 MicroJy IMAGR1: 33 Residual map points loaded IMAGR1: Field 2 min algorithm flux= -758.378 MicroJy iter= 574 IMAGR1: Field 2 Clean flux density= 740.074 MilliJy 574 comps IMAGR1: Total Cleaned flux density = 5.260 Jy 19204 comps IMAGR1: VISDFT: Begin DFT component subtraction IMAGR1: I Polarization model processed IMAGR1: Field 1 min = -5.8 MilliJy,max = 5.9 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 679.66 MicroJy IMAGR1: 19904 Residual map points loaded IMAGR1: Field 1 min algorithm flux= -802.135 MicroJy iter= 21939 IMAGR1: Field 1 Clean flux density= 4.557 Jy 21939 comps IMAGR1: Total Cleaned flux density = 5.297 Jy 22513 comps IMAGR1: ALGSTB: All 1362 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1351- 0 Cells, with 17763 Pts IMAGR1: Field 1 min = -5.8 MilliJy,max = 5.7 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 689.69 MicroJy IMAGR1: 19915 Residual map points loaded IMAGR1: Field 1 min allowed flux = 825.260 MicroJy iter= 24812 IMAGR1: Field 1 Clean flux density= 4.436 Jy 24812 comps IMAGR1: Total Cleaned flux density = 5.176 Jy 25386 comps IMAGR1: ALGSTB: All 1362 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1351- 0 Cells, with 17763 Pts IMAGR1: Field 1 min = -5.8 MilliJy,max = 5.6 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 776.86 MicroJy IMAGR1: 19961 Residual map points loaded IMAGR1: Field 1 min allowed flux = 1.018 MilliJy iter= 26410 IMAGR1: Field 1 Clean flux density= 4.614 Jy 26410 comps IMAGR1: Total Cleaned flux density = 5.354 Jy 26984 comps IMAGR1: ALGSTB: All 1362 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1351- 0 Cells, with 17763 Pts IMAGR1: Field 1 min = -5.7 MilliJy,max = 5.5 MilliJy IMAGR1: BGC Clean: using 477 cell beam + residuals > 1.02 MilliJy IMAGR1: 13731 Residual map points loaded IMAGR1: Field 1 min allowed flux = -2.097 MilliJy iter= 26476 IMAGR1: Field 1 Clean flux density= 4.598 Jy 26476 comps IMAGR1: Total Cleaned flux density = 5.338 Jy 27050 comps IMAGR1: VISDFT: Begin DFT component subtraction IMAGR1: I Polarization model processed IMAGR1: Field 1 min = -5.7 MilliJy,max = 5.6 MilliJy IMAGR1: BGC Clean: using 145 cell beam + residuals > 786.39 MicroJy IMAGR1: 14201 Residual map points loaded IMAGR1: Field 1 min allowed flux = -902.284 MicroJy iter= 28804 IMAGR1: Field 1 Clean flux density= 4.372 Jy 28804 comps IMAGR1: Total Cleaned flux density = 5.112 Jy 29378 comps IMAGR1: ALGSTB: All 1362 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1351- 0 Cells, with 17763 Pts IMAGR1: Field 1 min = -5.8 MilliJy,max = 5.6 MilliJy IMAGR1: BGC Clean: using 165 cell beam + residuals > 1.33 MilliJy IMAGR1: 17652 Residual map points loaded IMAGR1: Field 1 min allowed flux = 2.338 MilliJy iter= 29175 IMAGR1: Field 1 Clean flux density= 4.475 Jy 29175 comps IMAGR1: Total Cleaned flux density = 5.215 Jy 29749 comps IMAGR1: VISDFT: Begin DFT component subtraction IMAGR1: I Polarization model processed IMAGR1: Field 1 min = -5.7 MilliJy,max = 5.5 MilliJy IMAGR1: BGC Clean: using 165 cell beam + residuals > 664.41 MicroJy IMAGR1: 17760 Residual map points loaded IMAGR1: Field 1 min allowed flux = -1.095 MilliJy iter= 29339 IMAGR1: Field 1 Clean flux density= 4.456 Jy 29339 comps IMAGR1: Total Cleaned flux density = 5.196 Jy 29913 comps IMAGR1: VISDFT: Begin DFT component subtraction IMAGR1: I Polarization model processed IMAGR1: Field 1 min = -5.8 MilliJy,max = 5.5 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 591.05 MicroJy IMAGR1: 19775 Residual map points loaded IMAGR1: Field 1 min algorithm flux= -679.260 MicroJy iter= 33550 IMAGR1: Field 1 Clean flux density= 4.523 Jy 33550 comps IMAGR1: Total Cleaned flux density = 5.263 Jy 34124 comps IMAGR1: ALGSTB: All 1362 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1351- 0 Cells, with 17763 Pts IMAGR1: Field 2 min = -1.8 MilliJy,max = 727.3 MicroJy IMAGR1: BGC Clean: using 145 cell beam + residuals > 673.27 MicroJy IMAGR1: 189 Residual map points loaded IMAGR1: Field 2 min allowed flux = -887.873 MicroJy iter= 589 IMAGR1: Field 2 Clean flux density= 738.295 MilliJy 589 comps IMAGR1: Total Cleaned flux density = 5.262 Jy 34139 comps IMAGR1: VISDFT: Begin DFT component subtraction IMAGR1: I Polarization model processed IMAGR1: Field 2 min = -890.9 MicroJy,max = 768.0 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 591.15 MicroJy IMAGR1: 231 Residual map points loaded IMAGR1: Field 2 min algorithm flux= -595.022 MicroJy iter= 683 IMAGR1: Field 2 Clean flux density= 733.381 MilliJy 683 comps IMAGR1: Total Cleaned flux density = 5.257 Jy 34233 comps IMAGR1: ALGSTB: All 180 Rows In AP (Max 267) IMAGR1: ALGSTB field 2 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 169- 0 Cells, with 17763 Pts IMAGR1: Field 1 min = -5.6 MilliJy,max = 5.5 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 563.89 MicroJy IMAGR1: 19683 Residual map points loaded IMAGR1: Field 1 min allowed flux = 692.878 MicroJy iter= 35987 IMAGR1: Field 1 Clean flux density= 4.419 Jy 35987 comps IMAGR1: Total Cleaned flux density = 5.153 Jy 36670 comps IMAGR1: ALGSTB: All 1362 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1351- 0 Cells, with 17763 Pts IMAGR1: Field 1 min = -5.6 MilliJy,max = 5.7 MilliJy IMAGR1: BGC Clean: using 145 cell beam + residuals > 656.00 MicroJy IMAGR1: 19292 Residual map points loaded IMAGR1: Field 1 min allowed flux = 874.790 MicroJy iter= 37277 IMAGR1: Field 1 Clean flux density= 4.548 Jy 37277 comps IMAGR1: Total Cleaned flux density = 5.281 Jy 37960 comps IMAGR1: ALGSTB: All 1362 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1351- 0 Cells, with 17763 Pts IMAGR1: Field 1 min = -5.6 MilliJy,max = 5.5 MilliJy IMAGR1: BGC Clean: using 333 cell beam + residuals > 738.55 MicroJy IMAGR1: 19229 Residual map points loaded IMAGR1: Field 1 min allowed flux = -1.469 MilliJy iter= 37427 IMAGR1: Field 1 Clean flux density= 4.521 Jy 37427 comps IMAGR1: Total Cleaned flux density = 5.254 Jy 38110 comps IMAGR1: VISDFT: Begin DFT component subtraction IMAGR1: I Polarization model processed IMAGR1: Field 1 min = -5.6 MilliJy,max = 5.5 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 505.77 MicroJy IMAGR1: 19514 Residual map points loaded IMAGR1: Field 1 min algorithm flux= -572.243 MicroJy iter= 41850 IMAGR1: Field 1 Clean flux density= 4.416 Jy 41850 comps IMAGR1: Total Cleaned flux density = 5.149 Jy 42533 comps IMAGR1: ALGSTB: All 1362 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1351- 0 Cells, with 17763 Pts IMAGR1: Field 2 min = -815.9 MicroJy,max = 1.9 MilliJy IMAGR1: BGC Clean: using 165 cell beam + residuals > 545.69 MicroJy IMAGR1: 814 Residual map points loaded IMAGR1: Field 2 min allowed flux = 937.380 MicroJy iter= 725 IMAGR1: Field 2 Clean flux density= 738.731 MilliJy 725 comps IMAGR1: Total Cleaned flux density = 5.155 Jy 42575 comps IMAGR1: ALGSTB: All 180 Rows In AP (Max 267) IMAGR1: ALGSTB field 2 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 169- 0 Cells, with 17763 Pts IMAGR1: Field 2 min = -763.6 MicroJy,max = 1.0 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 506.17 MicroJy IMAGR1: 575 Residual map points loaded IMAGR1: Field 2 min algorithm flux= 516.810 MicroJy iter= 935 IMAGR1: Field 2 Clean flux density= 749.883 MilliJy 935 comps IMAGR1: Total Cleaned flux density = 5.166 Jy 42785 comps IMAGR1: ALGSTB: All 180 Rows In AP (Max 267) IMAGR1: ALGSTB field 2 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 169- 0 Cells, with 17763 Pts IMAGR1: Field 1 min = -5.5 MilliJy,max = 5.5 MilliJy IMAGR1: BGC Clean: using 145 cell beam + residuals > 673.65 MicroJy IMAGR1: 9499 Residual map points loaded IMAGR1: Field 1 min allowed flux = 898.362 MicroJy iter= 42504 IMAGR1: Field 1 Clean flux density= 4.483 Jy 42504 comps IMAGR1: Total Cleaned flux density = 5.233 Jy 43439 comps IMAGR1: VISDFT: Begin DFT component subtraction IMAGR1: I Polarization model processed IMAGR1: Field 1 min = -5.4 MilliJy,max = 5.5 MilliJy IMAGR1: BGC Clean: using 145 cell beam + residuals > 473.09 MicroJy IMAGR1: 15849 Residual map points loaded IMAGR1: Field 1 min allowed flux = -630.897 MicroJy iter= 43245 IMAGR1: Field 1 Clean flux density= 4.453 Jy 43245 comps IMAGR1: Total Cleaned flux density = 5.203 Jy 44180 comps IMAGR1: VISDFT: Begin DFT component subtraction IMAGR1: I Polarization model processed IMAGR1: Field 1 min = -5.4 MilliJy,max = 5.4 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 416.02 MicroJy IMAGR1: 18812 Residual map points loaded IMAGR1: Field 1 min algorithm flux= -465.586 MicroJy iter= 48076 IMAGR1: Field 1 Clean flux density= 4.471 Jy 48076 comps IMAGR1: Total Cleaned flux density = 5.221 Jy 49011 comps IMAGR1: ALGSTB: All 1362 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1351- 0 Cells, with 17763 Pts IMAGR1: Field 2 min = -1.0 MilliJy,max = 500.6 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 413.22 MicroJy IMAGR1: 195 Residual map points loaded IMAGR1: Field 2 min allowed flux = -516.825 MicroJy iter= 974 IMAGR1: Field 2 Clean flux density= 747.527 MilliJy 974 comps IMAGR1: Total Cleaned flux density = 5.219 Jy 49050 comps IMAGR1: ALGSTB: All 180 Rows In AP (Max 267) IMAGR1: ALGSTB field 2 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 169- 0 Cells, with 17763 Pts IMAGR1: Field 2 min = -517.8 MicroJy,max = 532.1 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 412.85 MicroJy IMAGR1: 56 Residual map points loaded IMAGR1: Field 2 min algorithm flux= -410.950 MicroJy iter= 1008 IMAGR1: Field 2 Clean flux density= 746.835 MilliJy 1008 comps IMAGR1: Total Cleaned flux density = 5.218 Jy 49084 comps IMAGR1: ALGSTB: All 180 Rows In AP (Max 267) IMAGR1: ALGSTB field 2 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 169- 0 Cells, with 17763 Pts IMAGR1: Field 1 min = -5.2 MilliJy,max = 5.6 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 401.22 MicroJy IMAGR1: 19903 Residual map points loaded IMAGR1: Field 1 min allowed flux = -517.194 MicroJy iter= 49622 IMAGR1: Field 1 Clean flux density= 4.438 Jy 49622 comps IMAGR1: Total Cleaned flux density = 5.184 Jy 50630 comps IMAGR1: ALGSTB: All 1362 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1351- 0 Cells, with 17763 Pts IMAGR1: Field 1 min = -5.2 MilliJy,max = 5.5 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 379.78 MicroJy IMAGR1: 19855 Residual map points loaded IMAGR1: Field 1 min allowed flux = 440.148 MicroJy iter= 53287 IMAGR1: Field 1 Clean flux density= 4.516 Jy 53287 comps IMAGR1: Total Cleaned flux density = 5.263 Jy 54295 comps IMAGR1: ALGSTB: All 1362 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1351- 0 Cells, with 17763 Pts IMAGR1: Field 1 min = -5.2 MilliJy,max = 5.5 MilliJy IMAGR1: BGC Clean: using 333 cell beam + residuals > 509.86 MicroJy IMAGR1: 18290 Residual map points loaded IMAGR1: Field 1 min allowed flux = -1.011 MilliJy iter= 53390 IMAGR1: Field 1 Clean flux density= 4.504 Jy 53390 comps IMAGR1: Total Cleaned flux density = 5.251 Jy 54398 comps IMAGR1: VISDFT: Begin DFT component subtraction IMAGR1: I Polarization model processed IMAGR1: Field 1 min = -5.2 MilliJy,max = 5.5 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 400.07 MicroJy IMAGR1: 19918 Residual map points loaded IMAGR1: Field 1 min algorithm flux= -444.414 MicroJy iter= 58525 IMAGR1: Field 1 Clean flux density= 4.369 Jy 58525 comps IMAGR1: Total Cleaned flux density = 5.116 Jy 59533 comps IMAGR1: ALGSTB: All 1362 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1351- 0 Cells, with 17763 Pts IMAGR1: Field 1 min = -5.2 MilliJy,max = 5.3 MilliJy IMAGR1: BGC Clean: using 165 cell beam + residuals > 776.43 MicroJy IMAGR1: 17998 Residual map points loaded IMAGR1: Field 1 min allowed flux = 1.366 MilliJy iter= 58749 IMAGR1: Field 1 Clean flux density= 4.404 Jy 58749 comps IMAGR1: Total Cleaned flux density = 5.151 Jy 59757 comps IMAGR1: VISDFT: Begin DFT component subtraction IMAGR1: I Polarization model processed IMAGR1: Field 1 min = -5.2 MilliJy,max = 5.4 MilliJy IMAGR1: BGC Clean: using 145 cell beam + residuals > 512.20 MicroJy IMAGR1: 10167 Residual map points loaded IMAGR1: Field 1 min allowed flux = -611.632 MicroJy iter= 59938 IMAGR1: Field 1 Clean flux density= 4.463 Jy 59938 comps IMAGR1: Total Cleaned flux density = 5.210 Jy 60946 comps IMAGR1: ALGSTB: All 1362 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1351- 0 Cells, with 17763 Pts IMAGR1: Field 1 min = -5.2 MilliJy,max = 5.4 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 363.31 MicroJy IMAGR1: 19803 Residual map points loaded IMAGR1: Field 1 min allowed flux = -408.233 MicroJy iter= 64773 IMAGR1: Field 1 Clean flux density= 4.415 Jy 64773 comps IMAGR1: Total Cleaned flux density = 5.162 Jy 65781 comps IMAGR1: ALGSTB: All 1362 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1351- 0 Cells, with 17763 Pts IMAGR1: Field 2 min = -474.1 MicroJy,max = 875.2 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 363.43 MicroJy IMAGR1: 221 Residual map points loaded IMAGR1: Field 2 min allowed flux = 434.114 MicroJy iter= 1044 IMAGR1: Field 2 Clean flux density= 748.781 MilliJy 1044 comps IMAGR1: Total Cleaned flux density = 5.164 Jy 65817 comps IMAGR1: ALGSTB: All 180 Rows In AP (Max 267) IMAGR1: ALGSTB field 2 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 169- 0 Cells, with 17763 Pts IMAGR1: Field 2 min = -491.8 MicroJy,max = 614.6 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 362.97 MicroJy IMAGR1: 36 Residual map points loaded IMAGR1: Field 2 min algorithm flux= 363.598 MicroJy iter= 1059 IMAGR1: Field 2 Clean flux density= 749.054 MilliJy 1059 comps IMAGR1: Total Cleaned flux density = 5.164 Jy 65832 comps IMAGR1: VISDFT: Begin DFT component subtraction IMAGR1: I Polarization model processed IMAGR1: Field 1 min = -5.2 MilliJy,max = 5.2 MilliJy IMAGR1: BGC Clean: using 145 cell beam + residuals > 401.02 MicroJy IMAGR1: 12230 Residual map points loaded IMAGR1: Field 1 min allowed flux = 534.784 MicroJy iter= 65404 IMAGR1: Field 1 Clean flux density= 4.442 Jy 65404 comps IMAGR1: Total Cleaned flux density = 5.191 Jy 66463 comps IMAGR1: VISDFT: Begin DFT component subtraction IMAGR1: I Polarization model processed IMAGR1: Field 1 min = -5.1 MilliJy,max = 5.3 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 327.16 MicroJy IMAGR1: 19882 Residual map points loaded IMAGR1: Field 1 min algorithm flux= -360.584 MicroJy iter= 71247 IMAGR1: Field 1 Clean flux density= 4.417 Jy 71247 comps IMAGR1: Total Cleaned flux density = 5.166 Jy 72306 comps IMAGR1: ALGSTB: All 1362 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1351- 0 Cells, with 17763 Pts IMAGR1: Field 2 min = -510.5 MicroJy,max = 551.1 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 327.44 MicroJy IMAGR1: 227 Residual map points loaded IMAGR1: Field 2 min algorithm flux= 332.333 MicroJy iter= 1160 IMAGR1: Field 2 Clean flux density= 750.873 MilliJy 1160 comps IMAGR1: Total Cleaned flux density = 5.168 Jy 72407 comps IMAGR1: ALGSTB: All 180 Rows In AP (Max 267) IMAGR1: ALGSTB field 2 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 169- 0 Cells, with 17763 Pts IMAGR1: Field 1 min = -5.0 MilliJy,max = 5.3 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 354.23 MicroJy IMAGR1: 19864 Residual map points loaded IMAGR1: Field 1 min allowed flux = 415.382 MicroJy iter= 74903 IMAGR1: Field 1 Clean flux density= 4.441 Jy 74903 comps IMAGR1: Total Cleaned flux density = 5.191 Jy 76063 comps IMAGR1: ALGSTB: All 1362 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1351- 0 Cells, with 17763 Pts IMAGR1: Field 1 min = -4.9 MilliJy,max = 5.4 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 352.26 MicroJy IMAGR1: 19841 Residual map points loaded IMAGR1: Field 1 min allowed flux = -469.256 MicroJy iter= 76030 IMAGR1: Field 1 Clean flux density= 4.411 Jy 76030 comps IMAGR1: Total Cleaned flux density = 5.162 Jy 77190 comps IMAGR1: VISDFT: Begin DFT component subtraction IMAGR1: I Polarization model processed IMAGR1: Field 1 min = -5.0 MilliJy,max = 5.3 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 304.58 MicroJy IMAGR1: 19638 Residual map points loaded IMAGR1: Field 1 min algorithm flux= -332.714 MicroJy iter= 82020 IMAGR1: Field 1 Clean flux density= 4.477 Jy 82020 comps IMAGR1: Total Cleaned flux density = 5.228 Jy 83180 comps IMAGR1: ALGSTB: All 1362 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1351- 0 Cells, with 17763 Pts IMAGR1: Field 1 min = -5.0 MilliJy,max = 5.3 MilliJy IMAGR1: BGC Clean: using 749 cell beam + residuals > 469.55 MicroJy IMAGR1: 12644 Residual map points loaded IMAGR1: Field 1 min allowed flux = -1.255 MilliJy iter= 82033 IMAGR1: Field 1 Clean flux density= 4.475 Jy 82033 comps IMAGR1: Total Cleaned flux density = 5.226 Jy 83193 comps IMAGR1: VISDFT: Begin DFT component subtraction IMAGR1: I Polarization model processed IMAGR1: Field 1 min = -5.0 MilliJy,max = 5.3 MilliJy IMAGR1: BGC Clean: using 145 cell beam + residuals > 470.41 MicroJy IMAGR1: 6918 Residual map points loaded IMAGR1: Field 1 min allowed flux = -608.867 MicroJy iter= 82540 IMAGR1: Field 1 Clean flux density= 4.440 Jy 82540 comps IMAGR1: Total Cleaned flux density = 5.191 Jy 83700 comps IMAGR1: VISDFT: Begin DFT component subtraction IMAGR1: I Polarization model processed IMAGR1: Field 1 min = -5.0 MilliJy,max = 5.3 MilliJy IMAGR1: BGC Clean: using 145 cell beam + residuals > 323.44 MicroJy IMAGR1: 17625 Residual map points loaded IMAGR1: Field 1 min allowed flux = 431.254 MicroJy iter= 83455 IMAGR1: Field 1 Clean flux density= 4.455 Jy 83455 comps IMAGR1: Total Cleaned flux density = 5.206 Jy 84615 comps IMAGR1: VISDFT: Begin DFT component subtraction IMAGR1: I Polarization model processed IMAGR1: Field 1 min = -5.0 MilliJy,max = 5.3 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 285.60 MicroJy IMAGR1: 19483 Residual map points loaded IMAGR1: Field 1 min Clean flux = -321.848 MicroJy iter= 88104 IMAGR1: Field 1 Clean flux density= 4.425 Jy 88104 comps IMAGR1: Total Cleaned flux density = 5.176 Jy 89264 comps IMAGR1: ALGSTB: All 1362 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1351- 0 Cells, with 17763 Pts IMAGR1: Field 2 min = -400.6 MicroJy,max = 852.5 MicroJy IMAGR1: BGC Clean: using 509 cell beam + residuals > 60.39 MicroJy IMAGR1: 15548 Residual map points loaded IMAGR1: Field 2 min allowed flux = 416.482 MicroJy iter= 1176 IMAGR1: Field 2 Clean flux density= 751.742 MilliJy 1176 comps IMAGR1: Total Cleaned flux density = 5.176 Jy 89280 comps IMAGR1: VISDFT: Begin DFT component subtraction IMAGR1: I Polarization model processed IMAGR1: Field 2 min = -379.8 MicroJy,max = 523.7 MicroJy IMAGR1: BGC Clean: using 509 cell beam + residuals > 39.87 MicroJy IMAGR1: 19909 Residual map points loaded IMAGR1: Field 2 min Clean flux = -321.134 MicroJy iter= 1198 IMAGR1: Field 2 Clean flux density= 752.330 MilliJy 1198 comps IMAGR1: Total Cleaned flux density = 5.177 Jy 89302 comps IMAGR1: VISDFT: Begin DFT component subtraction IMAGR1: I Polarization model processed IMAGR1: Peak residual in window 321.848 less than limit 321.851 MicroJy IMAGR1: Merging the Clean components files IMAGR1: Field 1 compressed from 88104 to 37072 components IMAGR1: Field 2 compressed from 1198 to 506 components IMAGR1: Field 1 min = -4.9 MilliJy,max = 5.1 MilliJy IMAGR1: Field 2 min = -372.9 MicroJy,max = 491.5 MicroJy IMAGR1: Restoring Clean components IMAGR1: Restoring overlapped Clean components IMAGR1: Restore 4.516 Jy ( 355 CCs) from field 1 to field 2 IMAGR1: Restore 752.330 MilliJy ( 506 CCs) from field 2 to field 1 IMAGR1: Checking image max/min IMAGR1: Field 1 final Clean flux 5.177 Jy IMAGR1: Field 2 final Clean flux 5.268 Jy IMAGR1: Deleting UV work file: IMAGR1: Destroyed 1 extension files of type AN IMAGR1: Destroyed 1 extension files of type FQ IMAGR1: Destroyed UV image file: catno= 8 disk= 1 IMAGR1: Appears to have ended successfully IMAGR1: auto 31DEC06 TST: Cpu= 226.2 Real= 240 sys2com(7)=char(ds );end AIPS 1: sys2com(8) ' >& /dev/null AIPS 1: system;clrtemp;for i=1:7;dir=dir!!sys2com(i);end;ki=length(dir ) $ must be 27 AIPS 1: dir=substr(dir,2,ki);if(ki<>27)then;type'WARNING: WRONG DIRECT ORY NAME ?';end AIPS 1: AIPS 1: sysout=dir!!'/'!!sbms!!','!!expnm!!','!!rmss!!rmsc!!fras!!radi AIPS 1: print sysout AIPS 1: $keep sysout - not if we use dir instead AIPS 1: syscom'';sys2com'';clrtemp AIPS 1: return AIPS 1: finish AIPS 1: AIPS 1: procedure nvasarch AIPS 1: scalar nn AIPS 1: $LOS - archives the files to disk - define $EXP (and $AVLA/$ADAT /$AIMG/$AUVF) AIPS 1: default fitab;indisk=lsdisk;recat AIPS 1: $ figure out array for uv name AIPS 1: $ getname 1; AIPS 1: for nn=mai:numfle $ archive MA files AIPS 1: getname nn AIPS 1: nvasname AIPS 1: typ length(outfile),length(sysout) AIPS 1: syscom'mv -f AIPS 1: sys2com(1)'X$FITS/'!!outfile;substr(sys2com(1),1,1)='' AIPS 1: $ sys2com(2)'X'!!sysout;substr(sys2com(2),1,1)='' AIPS 1: sys2com(2)'X'!!dir;substr(sys2com(2),1,1)='' AIPS 1: sysout'';sys2com(3) ' >& /dev/null AIPS 1: outfile='FITS:'!!outfile AIPS 1: ;go;wait; $zap AIPS 1: ;system AIPS 1: end AIPS 1: clrname;indisk=lsdisk;chkname;numfle=1-error AIPS 1: numfle=mai -1 AIPS 1: for nn=3:numfle $ archive calibrated UV files AIPS 1: getname nn AIPS 1: nvasname AIPS 1: outfile='/tmp/tempuvfits AIPS 1: go;wait; $zap AIPS 1: syscom'mv -f AIPS 1: sys2com(1)'X'!!outfile;substr(sys2com(1),1,1)='' AIPS 1: sys2com(2)'X'!!sysout;substr(sys2com(2),1,1)='' AIPS 1: sysout'';sys2com(3) ' >& /dev/null AIPS 1: system AIPS 1: end AIPS 1: getname 2 $ archive calibration tables AIPS 1: $ do not use nvasname as the dir is ADAT and dirname is expid AIPS 1: AIPS 1: sys2com'';sysout'';syscom 'mkdir AIPS 1: sys2com(1)=' $adat/ AIPS 1: AIPS 1: $ if(rh<10)then;sys2com(2)='J0'!!char(rh);else;sys2com(2)='J'!! char(rh);end AIPS 1: $ if(rm<10)then;sys2com(3)='0'!!char(rm);else;sys2com(3)=char(r m);end AIPS 1: $ if(rs<10)then;sys2com(4)='0'!!char(rs)!!zz;else;sys2com(4)=ch ar(rs)!!zz;end AIPS 1: $ if(dd<10)then;sys2com(5)=pm!!'0'!!char(dd);else;sys2com(5)=pm !!char(dd);end AIPS 1: $ if(dm<10)then;sys2com(6)='0'!!char(dm);else;sys2com(6)=char(d m);end AIPS 1: $ if(ds<10)then;sys2com(7)='0'!!char(ds);else;sys2com(7)=char(d s);end AIPS 1: AIPS 1: sys2com(1)=sys2com(1)!!expnm;sys2com(8) ' >& /dev/null AIPS 1: system;clrtemp AIPS 1: AIPS 1: finish AIPS 1: AIPS 1: procedure nvas AIPS 1: typ expid;flatfov;nvasimage AIPS 1: $nvasarch AIPS 1: finish >AIPS 1: Found in Version=ABIN AIPS 1: Found in Version=ABIN AIPS 1: Got(1) disk= 1 user=**** type=UV 19991204.X BAND.1 AIPS 1: 'AIPS WILL CHOOSE THE REFERENCE ANTENNA' AIPS 1: Got(1) disk= 1 user=**** type=UV 19991204.X BAND.1 AIPS 1: 'SETFC WILL DETERMINE THE CELL SIZE' AIPS 1: '8.3333 SECOND INTEGRATIONS (GUESS)' AIPS 1: 'DONE CLEANUP OF OLD TABLE EXTENTION FILES (CL,SN,FG,BP,PL,XX)' AIPS 1: Resumes AIPS 1: Resumes AIPS 1: Resumes AIPS 1: Resumes AIPS 1: Resumes AIPS 1: '3C286 MODEL =' '3C286_X' AIPS 1: SYSTEM command to be executed is: AIPS 1: ls -1 $AIPSTARS/3C286_X.MODEL >& /dev/null AIPS 1: Resumes AIPS 1: Resumes AIPS 1: Resumes AIPS 1: Resumes AIPS 1: Resumes AIPS 1: Resumes AIPS 1: Destroyed 1 extension files of type CC AIPS 1: Destroyed 1 extension files of type HI AIPS 1: Destroyed MA image file: catno= 2 disk= 1 AIPS 1: Resumes AIPS 1: Resumes AIPS 1: Resumes AIPS 1: Resumes AIPS 1: Resumes AIPS 1: ' ' AIPS 1: 'ESTIMATED RMS:' '0.05364 MILLI JANSKY' AIPS 1: SYSTEM command to be executed is: AIPS 1: rm -f /tmp/SETFC@3C286_X,BAND.0-1 >& /dev/null AIPS 1: Waiting for returned adverbs AIPS 1: Resumes AIPS 1: SYSTEM command to be executed is: AIPS 1: cat /tmp/SETFC@3C286_X,BAND.0-1 >> /home/auto/run/BB116_1999DEC0 AIPS 1: 4_1.log.0 AIPS 1: ' NOW STARTING WITH SOURCE :1 =3C286' AIPS 1: ' ' AIPS 1: Resumes AIPS 1: SYSTEM command to be executed is: AIPS 1: rm -f /tmp/SETFC@3C286_X,BAND.0-1 >& /dev/null AIPS 1: Destroyed 1 extension files of type HI AIPS 1: Destroyed MA image file: catno= 9 disk= 1 AIPS 1: Destroyed 1 extension files of type HI AIPS 1: Destroyed MA image file: catno= 10 disk= 1 AIPS 1: Disk 1 in-CNO 11 renumbered as CNO 8 AIPS 1: Disk 1 in-CNO 12 renumbered as CNO 9 AIPS 1: ' ' AIPS 1: 'ESTIMATED RMS:' '0.01574 MILLI JANSKY' AIPS 1: SYSTEM command to be executed is: AIPS 1: rm -f /tmp/SETFC@HD167971_X,BAND.0-1 >& /dev/null SETFC1: Task SETFC (release of 31DEC06) begins SETFC1: Found HD167971 X BAND Seq 1 Disk: 1 in slot 4 SETFC1: SETCEL: recommends IMSIZE 1458 CELLSIZE 0.22013 SETFC1: SETCEL: returns IMSIZE 2048 CELLSIZE 0.22013 SETFC1: ZTXOP2: using translated file name = SETFC1: ZTXOP2: /tmp/SETFC@HD167971_X,BAND.0-1 SETFC1: FLYEYE added 1 fields to BOXFILE to 0.000 deg SETFC1: WARNING: THIS MAY NOT COVER THE DESIRED AREA SETFC1: Searching catalog between 0.00 and 0.13 degrees radius SETFC1: ZTXOP2: using translated file name = SETFC1: ZTXOP2: /home/auto/aips/TEXT/STARS/NV00.0030 SETFC1: Field RA Dec Flux Beam Sep SETFC1: 2 18:18:12.67 -12:15:22.8 0.052 0.719 0.031 SETFC1: Add NVSS: wrote 1 fields to BOXFILE SETFC1: The Sun is 24.8 deg away - ignoring SETFC1: First field number written was 1 SETFC1: Highest field number written was 2 SETFC1: returns adverbs to AIPS SETFC1: Appears to have ended successfully SETFC1: auto 31DEC06 TST: Cpu= 1.4 Real= 2 C 1 2036 2036 18 18 05.90 -12 14 33.3 00001 -1 1019 1024 1025 C 2 246 246 18 18 12.67 -12 15 22.8 00002 -1 100 128 129 FC@3C286_X,BAND.0-1 >& /dev/null AIPS 1: Destroyed 1 extension files of type HI AIPS 1: Destroyed MA image file: catno= 9 disk= 1 AIPS 1: Destroyed 1 extension files of type HI AIPS 1: Destroyed MA image file: catno= 10 disk= 1 AIPS 1: Disk 1 in-CNO 11 renumbered as CNO 8 AIPS 1: Disk 1 in-CNO 12 renumbered as CNO 9 AIPS 1: ' ' AIPS 1: 'ESTIMATED RMS:' '0.01574 MILLI JANSKY' AIPS 1: SYSTEM command to be executed is: AIPS 1: rm -f /tmp/SETFC@HD167971_X,BAND.0-1 >& /dev/null AIPS 1: Waiting for returned adverbs AIPS 1: Resumes AIPS 1: SYSTEM command to be executed is: AIPS 1: cat /tmp/SETFC@HD167971_X,BAND.0-1 >> /home/auto/run/BB116_1999D AIPS 1: EC04_1.log.0 AIPS 1: ' NOW STARTING WITH SOURCE :2 =HD167971' AIPS 1: ' ' IMAGR1: Task IMAGR (release of 31DEC06) begins IMAGR1: ZTXOP2: using translated file name = IMAGR1: ZTXOP2: /tmp/SETFC@HD167971_X,BAND.0-1 IMAGR1: FIELDF: Final field parameters and # read are: IMAGR1: Field 1 2036 2036 6.8897E-02 7.0000E-03 0 IMAGR1: Field 2 246 246 9.9310E+01 -4.9493E+01 0 IMAGR1: ZTXOP2: using translated file name = IMAGR1: ZTXOP2: /tmp/SETFC@HD167971_X,BAND.0-1 IMAGR1: WINDF: Number of clean boxes/field read as follows: IMAGR1: Field 01: 1 Field 02: 1 IMAGR1: Create HD167971 .IMAGR . 1 (UV) on disk 1 cno 10 IMAGR1: Beginning channel 1 through 1 with 2 IFs IMAGR1: IMACPY: Copied 206362 visibilities to be imaged IMAGR1: **** WARNING data included out of inner portion of UV plane **** IMAGR1: **** Watch for high-frequency & other poor cleaning effects **** IMAGR1: UVWAIT: begin finding uniform weights IMAGR1: UVWAIT: Average grid weight 1.117E+05 IMAGR1: UVWAIT: Adding temperance S 2.235E+04 IMAGR1: UVWAIT: begin applying uniform or other weights IMAGR1: UVWAIT: Sum of weights in 1.891E+09 and out 2.940E+09 IMAGR1: UVWAIT: Noise is increased by a factor 1.156 due to weighting IMAGR1: UVWAIT: Average summed weight 1.118E+05 over 412568 vis IMAGR1: Create HD167971 .IBM001. 1 (MA) on disk 1 cno 11 IMAGR1: Create HD167971 .IBM002. 1 (MA) on disk 1 cno 12 IMAGR1: Create HD167971 .ICL001. 1 (MA) on disk 1 cno 13 IMAGR1: Create HD167971 .ICL002. 1 (MA) on disk 1 cno 14 IMAGR1: GRDFLT: X and Y convolution type = SPHEROIDAL IMAGR1: GRDFLT: X and Y parms = 3.0000 1.0000 IMAGR1: GRDFLT: convolution function sampled every 1/100 of a cell IMAGR1: GRDMEM: Ave 2 Channels; 8.414900E+09 to 8.414900E+09 Hz IMAGR1: Field 1 Sum of gridding weights = 3.12171E+10 IMAGR1: Field 1 Beam min = -71.4 MilliJy, max = 1.0 Jy IMAGR1: Field 1 fit FWHM = 1.143 x 0.749 arcsec, PA= -21.0 IMAGR1: Field 2 Sum of gridding weights = 3.12174E+10 IMAGR1: Field 2 Beam min = -71.4 MilliJy, max = 1.0 Jy IMAGR1: Field 2 fit FWHM = 1.143 x 0.749 arcsec, PA= -21.0 IMAGR1: CLBHIS: minimum component 0.228 of current peak IMAGR1: Field 1 min = -726.9 MicroJy,max = 9.8 MilliJy IMAGR1: Field 2 min = -236.3 MicroJy,max = 202.1 MicroJy IMAGR1: BGC Clean: using 2043 cell beam + residuals > 177.99 MicroJy IMAGR1: 10079 Residual map points loaded IMAGR1: Field 1 min allowed flux = 2.222 MilliJy iter= 16 IMAGR1: Field 1 Clean flux density= 8.116 MilliJy 16 comps IMAGR1: Total Cleaned flux density = 8.116 MilliJy 16 comps IMAGR1: SETDO3: imaging done with multiple tangent planes IMAGR1: VISDFT: Begin DFT component subtraction IMAGR1: VISDFT: Model components of type Point IMAGR1: I Polarization model processed IMAGR1: Field 1 min = -337.7 MicroJy,max = 2.0 MilliJy IMAGR1: BGC Clean: using 1311 cell beam + residuals > 74.54 MicroJy IMAGR1: 16828 Residual map points loaded IMAGR1: Field 1 min allowed flux = 460.412 MicroJy iter= 42 IMAGR1: Field 1 Clean flux density= 10.421 MilliJy 42 comps IMAGR1: Total Cleaned flux density = 10.421 MilliJy 42 comps IMAGR1: VISDFT: Begin DFT component subtraction IMAGR1: I Polarization model processed IMAGR1: Field 1 min = -443.1 MicroJy,max = 428.9 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 68.73 MicroJy IMAGR1: 16865 Residual map points loaded IMAGR1: Field 1 min algorithm flux= 155.528 MicroJy iter= 115 IMAGR1: Field 1 Clean flux density= 10.531 MilliJy 115 comps IMAGR1: Total Cleaned flux density = 10.531 MilliJy 115 comps IMAGR1: VISDFT: Begin DFT component subtraction IMAGR1: I Polarization model processed IMAGR1: Field 2 min = -103.3 MicroJy,max = 108.1 MicroJy IMAGR1: TRY ANOTHER FIELD: this is 9.168E-05 < Second best 1.481E-04 IMAGR1: Field 1 min = -153.1 MicroJy,max = 155.2 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 66.26 MicroJy IMAGR1: 19802 Residual map points loaded IMAGR1: Field 1 min algorithm flux= 105.680 MicroJy iter= 207 IMAGR1: Field 1 Clean flux density= 10.631 MilliJy 207 comps IMAGR1: Total Cleaned flux density = 10.631 MilliJy 207 comps IMAGR1: VISDFT: Begin DFT component subtraction IMAGR1: I Polarization model processed IMAGR1: Field 1 min = -124.9 MicroJy,max = 135.0 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 65.90 MicroJy IMAGR1: 19798 Residual map points loaded IMAGR1: Field 1 min algorithm flux= -97.304 MicroJy iter= 331 IMAGR1: Field 1 Clean flux density= 10.753 MilliJy 331 comps IMAGR1: Total Cleaned flux density = 10.753 MilliJy 331 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 206362 Pts IMAGR1: Field 1 min = -124.9 MicroJy,max = 135.7 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 65.58 MicroJy IMAGR1: 19781 Residual map points loaded IMAGR1: Field 1 min Clean flux = -94.397 MicroJy iter= 412 IMAGR1: Field 1 Clean flux density= 10.858 MilliJy 412 comps IMAGR1: Total Cleaned flux density = 10.858 MilliJy 412 comps IMAGR1: VISDFT: Begin DFT component subtraction IMAGR1: I Polarization model processed IMAGR1: Field 2 min = -102.0 MicroJy,max = 109.6 MicroJy IMAGR1: CLRHIS: NO FIELDS THIS PASS ABOVE MINIMUM FLUX IMAGR1: CLEAN NO IMAGE PIXELS - TRY AGAIN IMAGR1: Merging the Clean components files IMAGR1: Field 1 compressed from 412 to 222 components IMAGR1: Field 2 compressed from 0 to 0 components IMAGR1: Field 1 min = -124.8 MicroJy,max = 135.8 MicroJy IMAGR1: Field 2 min = -102.0 MicroJy,max = 109.6 MicroJy IMAGR1: Restoring Clean components IMAGR1: Restoring overlapped Clean components IMAGR1: Restore -9.496 MicroJy ( 3 CCs) from field 1 to field 2 IMAGR1: Checking image max/min IMAGR1: Field 1 final Clean flux 10.858 MilliJy IMAGR1: Field 2 final Clean flux -9.496 MicroJy IMAGR1: Deleting UV work file: IMAGR1: Destroyed 1 extension files of type AN IMAGR1: Destroyed 1 extension files of type FQ IMAGR1: Destroyed UV image file: catno= 10 disk= 1 IMAGR1: Appears to have ended successfully IMAGR1: auto 31DEC06 TST: Cpu= 44.7 Real= 47 FC@3C286_X,BAND.0-1 >& /dev/null AIPS 1: Destroyed 1 extension files of type HI AIPS 1: Destroyed MA image file: catno= 9 disk= 1 AIPS 1: Destroyed 1 extension files of type HI AIPS 1: Destroyed MA image file: catno= 10 disk= 1 AIPS 1: Disk 1 in-CNO 11 renumbered as CNO 8 AIPS 1: Disk 1 in-CNO 12 renumbered as CNO 9 AIPS 1: ' ' AIPS 1: 'ESTIMATED RMS:' '0.01574 MILLI JANSKY' AIPS 1: SYSTEM command to be executed is: AIPS 1: rm -f /tmp/SETFC@HD167971_X,BAND.0-1 >& /dev/null AIPS 1: Waiting for returned adverbs AIPS 1: Resumes AIPS 1: SYSTEM command to be executed is: AIPS 1: cat /tmp/SETFC@HD167971_X,BAND.0-1 >> /home/auto/run/BB116_1999D AIPS 1: EC04_1.log.0 AIPS 1: ' NOW STARTING WITH SOURCE :2 =HD167971' AIPS 1: ' ' AIPS 1: Resumes AIPS 1: SYSTEM command to be executed is: AIPS 1: rm -f /tmp/SETFC@HD167971_X,BAND.0-1 >& /dev/null AIPS 1: Destroyed 1 extension files of type HI AIPS 1: Destroyed MA image file: catno= 11 disk= 1 AIPS 1: Destroyed 1 extension files of type HI AIPS 1: Destroyed MA image file: catno= 12 disk= 1 AIPS 1: Disk 1 in-CNO 13 renumbered as CNO 10 AIPS 1: Disk 1 in-CNO 14 renumbered as CNO 11 AIPS 1: ' ' AIPS 1: 'ESTIMATED RMS:' '0.01756 MILLI JANSKY' AIPS 1: SYSTEM command to be executed is: AIPS 1: rm -f /tmp/SETFC@1819-096_X,BAND.0-1 >& /dev/null SETFC1: Task SETFC (release of 31DEC06) begins SETFC1: Found 1819-096 X BAND Seq 1 Disk: 1 in slot 5 SETFC1: SETCEL: recommends IMSIZE 1458 CELLSIZE 0.22013 SETFC1: SETCEL: returns IMSIZE 2048 CELLSIZE 0.22013 SETFC1: ZTXOP2: using translated file name = SETFC1: ZTXOP2: /tmp/SETFC@1819-096_X,BAND.0-1 SETFC1: FLYEYE added 1 fields to BOXFILE to 0.000 deg SETFC1: WARNING: THIS MAY NOT COVER THE DESIRED AREA SETFC1: Searching catalog between 0.00 and 0.13 degrees radius SETFC1: ZTXOP2: using translated file name = SETFC1: ZTXOP2: /home/auto/aips/TEXT/STARS/NV00.0030 SETFC1: Field RA Dec Flux Beam Sep SETFC1: 2 18:22:28.69 -09:38:57.2 5.832 1.000 0.000 SETFC1: Add NVSS: wrote 1 fields to BOXFILE SETFC1: The Sun is 27.0 deg away - ignoring SETFC1: First field number written was 1 SETFC1: Highest field number written was 2 SETFC1: returns adverbs to AIPS SETFC1: Appears to have ended successfully SETFC1: auto 31DEC06 TST: Cpu= 1.4 Real= 2 C 1 2036 2036 18 22 28.70 -09 38 56.8 00001 -1 1019 1024 1025 C 2 246 246 18 22 28.69 -09 38 57.2 00002 -1 100 128 129 FC@3C286_X,BAND.0-1 >& /dev/null AIPS 1: Destroyed 1 extension files of type HI AIPS 1: Destroyed MA image file: catno= 9 disk= 1 AIPS 1: Destroyed 1 extension files of type HI AIPS 1: Destroyed MA image file: catno= 10 disk= 1 AIPS 1: Disk 1 in-CNO 11 renumbered as CNO 8 AIPS 1: Disk 1 in-CNO 12 renumbered as CNO 9 AIPS 1: ' ' AIPS 1: 'ESTIMATED RMS:' '0.01574 MILLI JANSKY' AIPS 1: SYSTEM command to be executed is: AIPS 1: rm -f /tmp/SETFC@HD167971_X,BAND.0-1 >& /dev/null AIPS 1: Waiting for returned adverbs AIPS 1: Resumes AIPS 1: SYSTEM command to be executed is: AIPS 1: cat /tmp/SETFC@HD167971_X,BAND.0-1 >> /home/auto/run/BB116_1999D AIPS 1: EC04_1.log.0 AIPS 1: ' NOW STARTING WITH SOURCE :2 =HD167971' AIPS 1: ' ' AIPS 1: Resumes AIPS 1: SYSTEM command to be executed is: AIPS 1: rm -f /tmp/SETFC@HD167971_X,BAND.0-1 >& /dev/null AIPS 1: Destroyed 1 extension files of type HI AIPS 1: Destroyed MA image file: catno= 11 disk= 1 AIPS 1: Destroyed 1 extension files of type HI AIPS 1: Destroyed MA image file: catno= 12 disk= 1 AIPS 1: Disk 1 in-CNO 13 renumbered as CNO 10 AIPS 1: Disk 1 in-CNO 14 renumbered as CNO 11 AIPS 1: ' ' AIPS 1: 'ESTIMATED RMS:' '0.01756 MILLI JANSKY' AIPS 1: SYSTEM command to be executed is: AIPS 1: rm -f /tmp/SETFC@1819-096_X,BAND.0-1 >& /dev/null AIPS 1: Waiting for returned adverbs AIPS 1: Resumes AIPS 1: SYSTEM command to be executed is: AIPS 1: cat /tmp/SETFC@1819-096_X,BAND.0-1 >> /home/auto/run/BB116_1999D AIPS 1: EC04_1.log.0 AIPS 1: ' NOW STARTING WITH SOURCE :3 =1819-096' AIPS 1: ' ' IMAGR1: Task IMAGR (release of 31DEC06) begins IMAGR1: ZTXOP2: using translated file name = IMAGR1: ZTXOP2: /tmp/SETFC@1819-096_X,BAND.0-1 IMAGR1: FIELDF: Final field parameters and # read are: IMAGR1: Field 1 2036 2036 -6.2109E-02 3.5000E-02 0 IMAGR1: Field 2 246 246 -2.0999E-01 -3.6500E-01 0 IMAGR1: ZTXOP2: using translated file name = IMAGR1: ZTXOP2: /tmp/SETFC@1819-096_X,BAND.0-1 IMAGR1: WINDF: Number of clean boxes/field read as follows: IMAGR1: Field 01: 1 Field 02: 1 IMAGR1: Create 1819-096 .IMAGR . 1 (UV) on disk 1 cno 12 IMAGR1: Beginning channel 1 through 1 with 2 IFs IMAGR1: IMACPY: Copied 165724 visibilities to be imaged IMAGR1: **** WARNING data included out of inner portion of UV plane **** IMAGR1: **** Watch for high-frequency & other poor cleaning effects **** IMAGR1: UVWAIT: begin finding uniform weights IMAGR1: UVWAIT: Average grid weight 9.425E+04 IMAGR1: UVWAIT: Adding temperance S 1.885E+04 IMAGR1: UVWAIT: begin applying uniform or other weights IMAGR1: UVWAIT: Sum of weights in 1.532E+09 and out 2.324E+09 IMAGR1: UVWAIT: Noise is increased by a factor 1.147 due to weighting IMAGR1: UVWAIT: Average summed weight 9.425E+04 over 331162 vis IMAGR1: Create 1819-096 .IBM001. 1 (MA) on disk 1 cno 13 IMAGR1: Create 1819-096 .IBM002. 1 (MA) on disk 1 cno 14 IMAGR1: Create 1819-096 .ICL001. 1 (MA) on disk 1 cno 15 IMAGR1: Create 1819-096 .ICL002. 1 (MA) on disk 1 cno 16 IMAGR1: GRDFLT: X and Y convolution type = SPHEROIDAL IMAGR1: GRDFLT: X and Y parms = 3.0000 1.0000 IMAGR1: GRDFLT: convolution function sampled every 1/100 of a cell IMAGR1: GRDMEM: Ave 2 Channels; 8.414900E+09 to 8.414900E+09 Hz IMAGR1: Field 1 Sum of gridding weights = 2.46704E+10 IMAGR1: Field 1 Beam min = -75.9 MilliJy, max = 1.0 Jy IMAGR1: Field 1 fit FWHM = 1.115 x 0.762 arcsec, PA= -24.0 IMAGR1: Field 2 Sum of gridding weights = 2.46706E+10 IMAGR1: Field 2 Beam min = -75.9 MilliJy, max = 1.0 Jy IMAGR1: Field 2 fit FWHM = 1.115 x 0.762 arcsec, PA= -24.0 IMAGR1: CLBHIS: minimum component 0.220 of current peak IMAGR1: Field 1 min = -103.5 MilliJy,max = 1.3 Jy IMAGR1: Field 2 min = -101.6 MilliJy,max = 1.3 Jy IMAGR1: BGC Clean: using 509 cell beam + residuals > 24.62 MilliJy IMAGR1: 2648 Residual map points loaded IMAGR1: Field 2 min allowed flux = 253.419 MilliJy iter= 17 IMAGR1: Field 2 Clean flux density= 1.069 Jy 17 comps IMAGR1: Total Cleaned flux density = 1.069 Jy 17 comps IMAGR1: SETDO3: imaging done with multiple tangent planes IMAGR1: VISDFT: Begin DFT component subtraction IMAGR1: VISDFT: Model components of type Point IMAGR1: I Polarization model processed IMAGR1: Field 1 min = -22.1 MilliJy,max = 236.6 MilliJy IMAGR1: TRY ANOTHER FIELD: this is 2.248E-01 < Second best 2.409E-01 IMAGR1: Field 2 min = -22.6 MilliJy,max = 228.1 MilliJy IMAGR1: BGC Clean: using 509 cell beam + residuals > 4.97 MilliJy IMAGR1: 2714 Residual map points loaded IMAGR1: Field 2 min allowed flux = 47.887 MilliJy iter= 35 IMAGR1: Field 2 Clean flux density= 1.275 Jy 35 comps IMAGR1: Total Cleaned flux density = 1.275 Jy 35 comps IMAGR1: ALGSTB: All 182 Rows In AP (Max 267) IMAGR1: ALGSTB field 2 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 171- 0 Cells, with 165724 Pts IMAGR1: Field 1 min = -17.6 MilliJy,max = 45.6 MilliJy IMAGR1: TRY ANOTHER FIELD: this is 4.331E-02 < Second best 4.552E-02 IMAGR1: Field 2 min = -17.8 MilliJy,max = 43.1 MilliJy IMAGR1: TRY ANOTHER FIELD: this is 4.098E-02 < Second best 4.331E-02 IMAGR1: BGC Clean: using 1307 cell beam + residuals > 1.32 MilliJy IMAGR1: 15446 Residual map points loaded IMAGR1: Field 1 min allowed flux = 9.790 MilliJy iter= 39 IMAGR1: Field 1 Clean flux density= 34.690 MilliJy 39 comps IMAGR1: Total Cleaned flux density = 1.309 Jy 74 comps IMAGR1: VISDFT: Begin DFT component subtraction IMAGR1: I Polarization model processed IMAGR1: Field 2 min = -10.4 MilliJy,max = 9.7 MilliJy IMAGR1: BGC Clean: using 509 cell beam + residuals > 1.39 MilliJy IMAGR1: 2353 Residual map points loaded IMAGR1: Field 2 min algorithm flux= -3.395 MilliJy iter= 194 IMAGR1: Field 2 Clean flux density= 1.288 Jy 194 comps IMAGR1: Total Cleaned flux density = 1.323 Jy 233 comps IMAGR1: ALGSTB: All 182 Rows In AP (Max 267) IMAGR1: ALGSTB field 2 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 171- 0 Cells, with 165724 Pts IMAGR1: Field 1 min = -3.6 MilliJy,max = 4.0 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 948.06 MicroJy IMAGR1: 14952 Residual map points loaded IMAGR1: Field 1 min algorithm flux= 1.913 MilliJy iter= 358 IMAGR1: Field 1 Clean flux density= 55.636 MilliJy 358 comps IMAGR1: Total Cleaned flux density = 1.344 Jy 552 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 165724 Pts IMAGR1: Field 2 min = -2.0 MilliJy,max = 2.6 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 926.57 MicroJy IMAGR1: 3481 Residual map points loaded IMAGR1: Field 2 min algorithm flux= 1.367 MilliJy iter= 505 IMAGR1: Field 2 Clean flux density= 1.300 Jy 505 comps IMAGR1: Total Cleaned flux density = 1.356 Jy 863 comps IMAGR1: ALGSTB: All 182 Rows In AP (Max 267) IMAGR1: ALGSTB field 2 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 171- 0 Cells, with 165724 Pts IMAGR1: Field 1 min = -1.8 MilliJy,max = 1.9 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 860.70 MicroJy IMAGR1: 15767 Residual map points loaded IMAGR1: Field 1 min algorithm flux= 1.252 MilliJy iter= 826 IMAGR1: Field 1 Clean flux density= 96.865 MilliJy 826 comps IMAGR1: Total Cleaned flux density = 1.397 Jy 1331 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 165724 Pts IMAGR1: Field 2 min = -1.4 MilliJy,max = 2.2 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 844.68 MicroJy IMAGR1: 2806 Residual map points loaded IMAGR1: Field 2 min algorithm flux= -1.029 MilliJy iter= 812 IMAGR1: Field 2 Clean flux density= 1.307 Jy 812 comps IMAGR1: Total Cleaned flux density = 1.404 Jy 1638 comps IMAGR1: ALGSTB: All 182 Rows In AP (Max 267) IMAGR1: ALGSTB field 2 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 171- 0 Cells, with 165724 Pts IMAGR1: Field 1 min = -1.5 MilliJy,max = 1.7 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 794.49 MicroJy IMAGR1: 16528 Residual map points loaded IMAGR1: Field 1 min algorithm flux= -1.026 MilliJy iter= 1356 IMAGR1: Field 1 Clean flux density= 134.204 MilliJy 1356 comps IMAGR1: Total Cleaned flux density = 1.441 Jy 2168 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 165724 Pts IMAGR1: Field 2 min = -1.1 MilliJy,max = 1.9 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 784.14 MicroJy IMAGR1: 2152 Residual map points loaded IMAGR1: Field 2 min algorithm flux= 878.581 MicroJy iter= 1081 IMAGR1: Field 2 Clean flux density= 1.312 Jy 1081 comps IMAGR1: Total Cleaned flux density = 1.446 Jy 2437 comps IMAGR1: ALGSTB: All 182 Rows In AP (Max 267) IMAGR1: ALGSTB field 2 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 171- 0 Cells, with 165724 Pts IMAGR1: Field 1 min = -1.5 MilliJy,max = 1.7 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 745.59 MicroJy IMAGR1: 17222 Residual map points loaded IMAGR1: Field 1 min algorithm flux= -919.147 MicroJy iter= 1985 IMAGR1: Field 1 Clean flux density= 164.570 MilliJy 1985 comps IMAGR1: Total Cleaned flux density = 1.477 Jy 3066 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 165724 Pts IMAGR1: Field 1 min = -1.5 MilliJy,max = 1.6 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 722.99 MicroJy IMAGR1: 16801 Residual map points loaded IMAGR1: Field 1 min algorithm flux= 863.432 MicroJy iter= 2633 IMAGR1: Field 1 Clean flux density= 185.163 MilliJy 2633 comps IMAGR1: Total Cleaned flux density = 1.497 Jy 3714 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 165724 Pts IMAGR1: Field 2 min = -997.3 MicroJy,max = 1.5 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 715.15 MicroJy IMAGR1: 1608 Residual map points loaded IMAGR1: Field 2 min algorithm flux= -759.495 MicroJy iter= 1313 IMAGR1: Field 2 Clean flux density= 1.315 Jy 1313 comps IMAGR1: Total Cleaned flux density = 1.500 Jy 3946 comps IMAGR1: ALGSTB: All 182 Rows In AP (Max 267) IMAGR1: ALGSTB field 2 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 171- 0 Cells, with 165724 Pts IMAGR1: Field 1 min = -1.5 MilliJy,max = 1.6 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 690.96 MicroJy IMAGR1: 17899 Residual map points loaded IMAGR1: Field 1 min algorithm flux= 814.058 MicroJy iter= 3390 IMAGR1: Field 1 Clean flux density= 202.631 MilliJy 3390 comps IMAGR1: Total Cleaned flux density = 1.518 Jy 4703 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 165724 Pts IMAGR1: Field 1 min = -1.5 MilliJy,max = 1.6 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 675.25 MicroJy IMAGR1: 17524 Residual map points loaded IMAGR1: Field 1 min algorithm flux= 780.397 MicroJy iter= 4172 IMAGR1: Field 1 Clean flux density= 217.891 MilliJy 4172 comps IMAGR1: Total Cleaned flux density = 1.533 Jy 5485 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 165724 Pts IMAGR1: Field 1 min = -1.5 MilliJy,max = 1.6 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 660.67 MicroJy IMAGR1: 17228 Residual map points loaded IMAGR1: Field 1 min algorithm flux= -752.460 MicroJy iter= 4979 IMAGR1: Field 1 Clean flux density= 229.115 MilliJy 4979 comps IMAGR1: Total Cleaned flux density = 1.544 Jy 6292 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 165724 Pts IMAGR1: Field 2 min = -938.3 MicroJy,max = 1.3 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 654.52 MicroJy IMAGR1: 1091 Residual map points loaded IMAGR1: Field 2 min algorithm flux= 676.371 MicroJy iter= 1519 IMAGR1: Field 2 Clean flux density= 1.317 Jy 1519 comps IMAGR1: Total Cleaned flux density = 1.546 Jy 6498 comps IMAGR1: ALGSTB: All 182 Rows In AP (Max 267) IMAGR1: ALGSTB field 2 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 171- 0 Cells, with 165724 Pts IMAGR1: Field 1 min = -1.5 MilliJy,max = 1.6 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 637.25 MicroJy IMAGR1: 18450 Residual map points loaded IMAGR1: Field 1 min algorithm flux= 723.771 MicroJy iter= 5910 IMAGR1: Field 1 Clean flux density= 245.796 MilliJy 5910 comps IMAGR1: Total Cleaned flux density = 1.563 Jy 7429 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 165724 Pts IMAGR1: Field 1 min = -1.5 MilliJy,max = 1.5 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 624.52 MicroJy IMAGR1: 18096 Residual map points loaded IMAGR1: Field 1 min algorithm flux= 700.952 MicroJy iter= 6864 IMAGR1: Field 1 Clean flux density= 258.482 MilliJy 6864 comps IMAGR1: Total Cleaned flux density = 1.576 Jy 8383 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 165724 Pts IMAGR1: Field 1 min = -1.5 MilliJy,max = 1.5 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 612.75 MicroJy IMAGR1: 17799 Residual map points loaded IMAGR1: Field 1 min algorithm flux= -680.400 MicroJy iter= 7828 IMAGR1: Field 1 Clean flux density= 265.495 MilliJy 7828 comps IMAGR1: Total Cleaned flux density = 1.583 Jy 9347 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 165724 Pts IMAGR1: Field 2 min = -874.1 MicroJy,max = 1.2 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 608.44 MicroJy IMAGR1: 654 Residual map points loaded IMAGR1: Field 2 min algorithm flux= 618.712 MicroJy iter= 1672 IMAGR1: Field 2 Clean flux density= 1.319 Jy 1672 comps IMAGR1: Total Cleaned flux density = 1.585 Jy 9500 comps IMAGR1: ALGSTB: All 182 Rows In AP (Max 267) IMAGR1: ALGSTB field 2 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 171- 0 Cells, with 165724 Pts IMAGR1: Field 1 min = -1.5 MilliJy,max = 1.5 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 594.83 MicroJy IMAGR1: 18963 Residual map points loaded IMAGR1: Field 1 min algorithm flux= 660.857 MicroJy iter= 8926 IMAGR1: Field 1 Clean flux density= 274.108 MilliJy 8926 comps IMAGR1: Total Cleaned flux density = 1.594 Jy 10598 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 165724 Pts IMAGR1: Field 1 min = -1.5 MilliJy,max = 1.5 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 583.63 MicroJy IMAGR1: 18607 Residual map points loaded IMAGR1: Field 1 min algorithm flux= -642.614 MicroJy iter= 10036 IMAGR1: Field 1 Clean flux density= 283.234 MilliJy 10036 comps IMAGR1: Total Cleaned flux density = 1.603 Jy 11708 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 165724 Pts IMAGR1: Field 1 min = -1.4 MilliJy,max = 1.5 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 572.77 MicroJy IMAGR1: 18256 Residual map points loaded IMAGR1: Field 1 min algorithm flux= 626.359 MicroJy iter= 11166 IMAGR1: Field 1 Clean flux density= 292.136 MilliJy 11166 comps IMAGR1: Total Cleaned flux density = 1.612 Jy 12838 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 165724 Pts IMAGR1: Field 1 min = -1.4 MilliJy,max = 1.5 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 562.38 MicroJy IMAGR1: 17940 Residual map points loaded IMAGR1: Field 1 min algorithm flux= 611.703 MicroJy iter= 12323 IMAGR1: Field 1 Clean flux density= 296.161 MilliJy 12323 comps IMAGR1: Total Cleaned flux density = 1.616 Jy 13995 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 165724 Pts IMAGR1: Field 2 min = -839.8 MicroJy,max = 1.1 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 559.17 MicroJy IMAGR1: 470 Residual map points loaded IMAGR1: Field 2 min algorithm flux= 564.574 MicroJy iter= 1803 IMAGR1: Field 2 Clean flux density= 1.321 Jy 1803 comps IMAGR1: Total Cleaned flux density = 1.617 Jy 14126 comps IMAGR1: ALGSTB: All 182 Rows In AP (Max 267) IMAGR1: ALGSTB field 2 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 171- 0 Cells, with 165724 Pts IMAGR1: Field 1 min = -1.4 MilliJy,max = 1.5 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 548.02 MicroJy IMAGR1: 19164 Residual map points loaded IMAGR1: Field 1 min algorithm flux= -596.667 MicroJy iter= 13613 IMAGR1: Field 1 Clean flux density= 303.404 MilliJy 13613 comps IMAGR1: Total Cleaned flux density = 1.624 Jy 15416 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 165724 Pts IMAGR1: Field 1 min = -1.4 MilliJy,max = 1.4 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 537.54 MicroJy IMAGR1: 18844 Residual map points loaded IMAGR1: Field 1 min algorithm flux= -582.198 MicroJy iter= 14926 IMAGR1: Field 1 Clean flux density= 308.549 MilliJy 14926 comps IMAGR1: Total Cleaned flux density = 1.629 Jy 16729 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 165724 Pts IMAGR1: Field 1 min = -1.4 MilliJy,max = 1.4 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 527.81 MicroJy IMAGR1: 18536 Residual map points loaded IMAGR1: Field 1 min algorithm flux= -569.065 MicroJy iter= 16263 IMAGR1: Field 1 Clean flux density= 313.558 MilliJy 16263 comps IMAGR1: Total Cleaned flux density = 1.634 Jy 18066 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 165724 Pts IMAGR1: Field 1 min = -1.4 MilliJy,max = 1.4 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 518.47 MicroJy IMAGR1: 18203 Residual map points loaded IMAGR1: Field 1 min algorithm flux= -556.907 MicroJy iter= 17624 IMAGR1: Field 1 Clean flux density= 321.166 MilliJy 17624 comps IMAGR1: Total Cleaned flux density = 1.642 Jy 19427 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 165724 Pts IMAGR1: Field 2 min = -774.9 MicroJy,max = 947.7 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 516.24 MicroJy IMAGR1: 364 Residual map points loaded IMAGR1: Field 2 min algorithm flux= 519.328 MicroJy iter= 1914 IMAGR1: Field 2 Clean flux density= 1.322 Jy 1914 comps IMAGR1: Total Cleaned flux density = 1.643 Jy 19538 comps IMAGR1: ALGSTB: All 182 Rows In AP (Max 267) IMAGR1: ALGSTB field 2 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 171- 0 Cells, with 165724 Pts IMAGR1: Field 1 min = -1.4 MilliJy,max = 1.4 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 506.21 MicroJy IMAGR1: 19364 Residual map points loaded IMAGR1: Field 1 min algorithm flux= 544.381 MicroJy iter= 19128 IMAGR1: Field 1 Clean flux density= 327.918 MilliJy 19128 comps IMAGR1: Total Cleaned flux density = 1.650 Jy 21042 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 165724 Pts IMAGR1: Field 1 min = -1.4 MilliJy,max = 1.4 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 497.05 MicroJy IMAGR1: 19064 Residual map points loaded IMAGR1: Field 1 min algorithm flux= 532.617 MicroJy iter= 20660 IMAGR1: Field 1 Clean flux density= 333.010 MilliJy 20660 comps IMAGR1: Total Cleaned flux density = 1.655 Jy 22574 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 165724 Pts IMAGR1: Field 1 min = -1.4 MilliJy,max = 1.4 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 487.87 MicroJy IMAGR1: 18746 Residual map points loaded IMAGR1: Field 1 min algorithm flux= 521.253 MicroJy iter= 22228 IMAGR1: Field 1 Clean flux density= 339.051 MilliJy 22228 comps IMAGR1: Total Cleaned flux density = 1.661 Jy 24142 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 165724 Pts IMAGR1: Field 2 min = -766.9 MicroJy,max = 894.9 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 486.50 MicroJy IMAGR1: 197 Residual map points loaded IMAGR1: Field 2 min algorithm flux= 488.373 MicroJy iter= 1999 IMAGR1: Field 2 Clean flux density= 1.323 Jy 1999 comps IMAGR1: Total Cleaned flux density = 1.662 Jy 24227 comps IMAGR1: ALGSTB: All 182 Rows In AP (Max 267) IMAGR1: ALGSTB field 2 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 171- 0 Cells, with 165724 Pts IMAGR1: Field 1 min = -1.4 MilliJy,max = 1.3 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 477.43 MicroJy IMAGR1: 19567 Residual map points loaded IMAGR1: Field 1 min algorithm flux= -510.035 MicroJy iter= 23907 IMAGR1: Field 1 Clean flux density= 343.974 MilliJy 23907 comps IMAGR1: Total Cleaned flux density = 1.667 Jy 25906 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 165724 Pts IMAGR1: Field 1 min = -1.3 MilliJy,max = 1.3 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 468.46 MicroJy IMAGR1: 19245 Residual map points loaded IMAGR1: Field 1 min algorithm flux= -499.427 MicroJy iter= 25642 IMAGR1: Field 1 Clean flux density= 348.272 MilliJy 25642 comps IMAGR1: Total Cleaned flux density = 1.671 Jy 27641 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 165724 Pts IMAGR1: Field 1 min = -1.3 MilliJy,max = 1.3 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 460.36 MicroJy IMAGR1: 18912 Residual map points loaded IMAGR1: Field 1 min algorithm flux= -489.199 MicroJy iter= 27394 IMAGR1: Field 1 Clean flux density= 351.538 MilliJy 27394 comps IMAGR1: Total Cleaned flux density = 1.675 Jy 29393 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 165724 Pts IMAGR1: Field 2 min = -727.8 MicroJy,max = 850.6 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 459.35 MicroJy IMAGR1: 171 Residual map points loaded IMAGR1: Field 2 min algorithm flux= -460.542 MicroJy iter= 2072 IMAGR1: Field 2 Clean flux density= 1.323 Jy 2072 comps IMAGR1: Total Cleaned flux density = 1.675 Jy 29466 comps IMAGR1: ALGSTB: All 182 Rows In AP (Max 267) IMAGR1: ALGSTB field 2 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 171- 0 Cells, with 165724 Pts IMAGR1: Field 1 min = -1.3 MilliJy,max = 1.3 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 450.37 MicroJy IMAGR1: 19567 Residual map points loaded IMAGR1: Field 1 min algorithm flux= 478.688 MicroJy iter= 29267 IMAGR1: Field 1 Clean flux density= 352.156 MilliJy 29267 comps IMAGR1: Total Cleaned flux density = 1.675 Jy 31339 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 165724 Pts IMAGR1: Field 1 min = -1.3 MilliJy,max = 1.3 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 442.56 MicroJy IMAGR1: 19342 Residual map points loaded IMAGR1: Field 1 min algorithm flux= -469.204 MicroJy iter= 31171 IMAGR1: Field 1 Clean flux density= 358.607 MilliJy 31171 comps IMAGR1: Total Cleaned flux density = 1.682 Jy 33243 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 165724 Pts IMAGR1: Field 1 min = -1.3 MilliJy,max = 1.3 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 434.68 MicroJy IMAGR1: 19040 Residual map points loaded IMAGR1: Field 1 min algorithm flux= -459.746 MicroJy iter= 33103 IMAGR1: Field 1 Clean flux density= 365.912 MilliJy 33103 comps IMAGR1: Total Cleaned flux density = 1.689 Jy 35175 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 165724 Pts IMAGR1: Field 2 min = -680.2 MicroJy,max = 800.8 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 433.91 MicroJy IMAGR1: 158 Residual map points loaded IMAGR1: Field 2 min algorithm flux= 434.770 MicroJy iter= 2142 IMAGR1: Field 2 Clean flux density= 1.324 Jy 2142 comps IMAGR1: Total Cleaned flux density = 1.690 Jy 35245 comps IMAGR1: ALGSTB: All 182 Rows In AP (Max 267) IMAGR1: ALGSTB field 2 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 171- 0 Cells, with 165724 Pts IMAGR1: Field 1 min = -1.3 MilliJy,max = 1.3 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 425.64 MicroJy IMAGR1: 19638 Residual map points loaded IMAGR1: Field 1 min algorithm flux= 450.286 MicroJy iter= 35162 IMAGR1: Field 1 Clean flux density= 368.852 MilliJy 35162 comps IMAGR1: Total Cleaned flux density = 1.693 Jy 37304 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 165724 Pts IMAGR1: Field 1 min = -1.3 MilliJy,max = 1.3 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 418.20 MicroJy IMAGR1: 19397 Residual map points loaded IMAGR1: Field 1 min algorithm flux= 441.533 MicroJy iter= 37255 IMAGR1: Field 1 Clean flux density= 369.322 MilliJy 37255 comps IMAGR1: Total Cleaned flux density = 1.693 Jy 39397 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 165724 Pts IMAGR1: Field 1 min = -1.3 MilliJy,max = 1.3 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 410.66 MicroJy IMAGR1: 19099 Residual map points loaded IMAGR1: Field 1 min algorithm flux= -432.649 MicroJy iter= 39368 IMAGR1: Field 1 Clean flux density= 374.202 MilliJy 39368 comps IMAGR1: Total Cleaned flux density = 1.698 Jy 41510 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 165724 Pts IMAGR1: Field 2 min = -627.5 MicroJy,max = 723.0 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 410.00 MicroJy IMAGR1: 140 Residual map points loaded IMAGR1: Field 2 min algorithm flux= 410.818 MicroJy iter= 2214 IMAGR1: Field 2 Clean flux density= 1.324 Jy 2214 comps IMAGR1: Total Cleaned flux density = 1.698 Jy 41582 comps IMAGR1: ALGSTB: All 182 Rows In AP (Max 267) IMAGR1: ALGSTB field 2 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 171- 0 Cells, with 165724 Pts IMAGR1: Field 1 min = -1.3 MilliJy,max = 1.3 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 402.29 MicroJy IMAGR1: 19665 Residual map points loaded IMAGR1: Field 1 min algorithm flux= 423.915 MicroJy iter= 41613 IMAGR1: Field 1 Clean flux density= 377.771 MilliJy 41613 comps IMAGR1: Total Cleaned flux density = 1.701 Jy 43827 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 165724 Pts IMAGR1: Field 1 min = -1.3 MilliJy,max = 1.3 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 394.97 MicroJy IMAGR1: 19441 Residual map points loaded IMAGR1: Field 1 min algorithm flux= -415.767 MicroJy iter= 43924 IMAGR1: Field 1 Clean flux density= 375.542 MilliJy 43924 comps IMAGR1: Total Cleaned flux density = 1.699 Jy 46138 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 165724 Pts IMAGR1: Field 1 min = -1.3 MilliJy,max = 1.2 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 387.84 MicroJy IMAGR1: 19141 Residual map points loaded IMAGR1: Field 1 min algorithm flux= -407.635 MicroJy iter= 46284 IMAGR1: Field 1 Clean flux density= 380.965 MilliJy 46284 comps IMAGR1: Total Cleaned flux density = 1.705 Jy 48498 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 165724 Pts IMAGR1: Field 2 min = -587.5 MicroJy,max = 675.9 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 387.23 MicroJy IMAGR1: 125 Residual map points loaded IMAGR1: Field 2 min algorithm flux= -387.338 MicroJy iter= 2274 IMAGR1: Field 2 Clean flux density= 1.324 Jy 2274 comps IMAGR1: Total Cleaned flux density = 1.705 Jy 48558 comps IMAGR1: ALGSTB: All 182 Rows In AP (Max 267) IMAGR1: ALGSTB field 2 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 171- 0 Cells, with 165724 Pts IMAGR1: Field 1 min = -1.3 MilliJy,max = 1.2 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 380.10 MicroJy IMAGR1: 19696 Residual map points loaded IMAGR1: Field 1 min algorithm flux= 399.485 MicroJy iter= 48762 IMAGR1: Field 1 Clean flux density= 384.103 MilliJy 48762 comps IMAGR1: Total Cleaned flux density = 1.708 Jy 51036 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 165724 Pts IMAGR1: Field 1 min = -1.2 MilliJy,max = 1.2 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 373.21 MicroJy IMAGR1: 19474 Residual map points loaded IMAGR1: Field 1 min algorithm flux= -391.703 MicroJy iter= 51286 IMAGR1: Field 1 Clean flux density= 386.914 MilliJy 51286 comps IMAGR1: Total Cleaned flux density = 1.711 Jy 53560 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 165724 Pts IMAGR1: Field 1 min = -1.2 MilliJy,max = 1.2 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 366.49 MicroJy IMAGR1: 19227 Residual map points loaded IMAGR1: Field 1 min algorithm flux= -384.067 MicroJy iter= 53843 IMAGR1: Field 1 Clean flux density= 389.989 MilliJy 53843 comps IMAGR1: Total Cleaned flux density = 1.714 Jy 56117 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 165724 Pts IMAGR1: Field 2 min = -573.8 MicroJy,max = 658.1 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 366.02 MicroJy IMAGR1: 105 Residual map points loaded IMAGR1: Field 2 min algorithm flux= 366.310 MicroJy iter= 2332 IMAGR1: Field 2 Clean flux density= 1.324 Jy 2332 comps IMAGR1: Total Cleaned flux density = 1.714 Jy 56175 comps IMAGR1: ALGSTB: All 182 Rows In AP (Max 267) IMAGR1: ALGSTB field 2 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 171- 0 Cells, with 165724 Pts IMAGR1: Field 1 min = -1.2 MilliJy,max = 1.2 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 359.18 MicroJy IMAGR1: 19705 Residual map points loaded IMAGR1: Field 1 min algorithm flux= 376.497 MicroJy iter= 56541 IMAGR1: Field 1 Clean flux density= 388.091 MilliJy 56541 comps IMAGR1: Total Cleaned flux density = 1.712 Jy 58873 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 165724 Pts IMAGR1: Field 1 min = -1.2 MilliJy,max = 1.2 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 352.63 MicroJy IMAGR1: 19521 Residual map points loaded IMAGR1: Field 1 min algorithm flux= 369.006 MicroJy iter= 59264 IMAGR1: Field 1 Clean flux density= 393.331 MilliJy 59264 comps IMAGR1: Total Cleaned flux density = 1.718 Jy 61596 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 165724 Pts IMAGR1: Field 1 min = -1.2 MilliJy,max = 1.2 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 346.31 MicroJy IMAGR1: 19271 Residual map points loaded IMAGR1: Field 1 min algorithm flux= 361.995 MicroJy iter= 62037 IMAGR1: Field 1 Clean flux density= 396.739 MilliJy 62037 comps IMAGR1: Total Cleaned flux density = 1.721 Jy 64369 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 165724 Pts IMAGR1: Field 2 min = -529.0 MicroJy,max = 618.3 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 345.91 MicroJy IMAGR1: 83 Residual map points loaded IMAGR1: Field 2 min algorithm flux= -346.333 MicroJy iter= 2378 IMAGR1: Field 2 Clean flux density= 1.325 Jy 2378 comps IMAGR1: Total Cleaned flux density = 1.721 Jy 64415 comps IMAGR1: ALGSTB: All 182 Rows In AP (Max 267) IMAGR1: ALGSTB field 2 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 171- 0 Cells, with 165724 Pts IMAGR1: Field 1 min = -1.2 MilliJy,max = 1.2 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 339.40 MicroJy IMAGR1: 19757 Residual map points loaded IMAGR1: Field 1 min algorithm flux= -354.866 MicroJy iter= 64944 IMAGR1: Field 1 Clean flux density= 399.379 MilliJy 64944 comps IMAGR1: Total Cleaned flux density = 1.724 Jy 67322 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 165724 Pts IMAGR1: Field 1 min = -1.2 MilliJy,max = 1.2 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 333.28 MicroJy IMAGR1: 19556 Residual map points loaded IMAGR1: Field 1 min algorithm flux= -348.014 MicroJy iter= 67897 IMAGR1: Field 1 Clean flux density= 396.380 MilliJy 67897 comps IMAGR1: Total Cleaned flux density = 1.721 Jy 70275 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 165724 Pts IMAGR1: Field 2 min = -518.7 MicroJy,max = 588.9 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 333.09 MicroJy IMAGR1: 89 Residual map points loaded IMAGR1: Field 2 min algorithm flux= -333.241 MicroJy iter= 2420 IMAGR1: Field 2 Clean flux density= 1.325 Jy 2420 comps IMAGR1: Total Cleaned flux density = 1.721 Jy 70317 comps IMAGR1: ALGSTB: All 182 Rows In AP (Max 267) IMAGR1: ALGSTB field 2 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 171- 0 Cells, with 165724 Pts IMAGR1: Field 1 min = -1.2 MilliJy,max = 1.2 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 326.93 MicroJy IMAGR1: 19773 Residual map points loaded IMAGR1: Field 1 min algorithm flux= 341.299 MicroJy iter= 70962 IMAGR1: Field 1 Clean flux density= 396.916 MilliJy 70962 comps IMAGR1: Total Cleaned flux density = 1.722 Jy 73382 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 165724 Pts IMAGR1: Field 1 min = -1.2 MilliJy,max = 1.2 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 320.91 MicroJy IMAGR1: 19603 Residual map points loaded IMAGR1: Field 1 min algorithm flux= 334.783 MicroJy iter= 74101 IMAGR1: Field 1 Clean flux density= 401.372 MilliJy 74101 comps IMAGR1: Total Cleaned flux density = 1.726 Jy 76521 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 165724 Pts IMAGR1: Field 2 min = -486.4 MicroJy,max = 565.9 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 320.72 MicroJy IMAGR1: 80 Residual map points loaded IMAGR1: Field 2 min algorithm flux= -320.919 MicroJy iter= 2463 IMAGR1: Field 2 Clean flux density= 1.325 Jy 2463 comps IMAGR1: Total Cleaned flux density = 1.726 Jy 76564 comps IMAGR1: ALGSTB: All 182 Rows In AP (Max 267) IMAGR1: ALGSTB field 2 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 171- 0 Cells, with 165724 Pts IMAGR1: Field 1 min = -1.1 MilliJy,max = 1.2 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 314.81 MicroJy IMAGR1: 19776 Residual map points loaded IMAGR1: Field 1 min algorithm flux= -328.329 MicroJy iter= 77355 IMAGR1: Field 1 Clean flux density= 406.113 MilliJy 77355 comps IMAGR1: Total Cleaned flux density = 1.731 Jy 79818 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 165724 Pts IMAGR1: Field 1 min = -1.1 MilliJy,max = 1.1 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 308.92 MicroJy IMAGR1: 19628 Residual map points loaded IMAGR1: Field 1 min algorithm flux= -322.084 MicroJy iter= 80724 IMAGR1: Field 1 Clean flux density= 410.826 MilliJy 80724 comps IMAGR1: Total Cleaned flux density = 1.736 Jy 83187 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 165724 Pts IMAGR1: Field 2 min = -477.1 MicroJy,max = 518.8 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 308.78 MicroJy IMAGR1: 74 Residual map points loaded IMAGR1: Field 2 min algorithm flux= 309.037 MicroJy iter= 2507 IMAGR1: Field 2 Clean flux density= 1.325 Jy 2507 comps IMAGR1: Total Cleaned flux density = 1.736 Jy 83231 comps IMAGR1: ALGSTB: All 182 Rows In AP (Max 267) IMAGR1: ALGSTB field 2 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 171- 0 Cells, with 165724 Pts IMAGR1: Field 1 min = -1.1 MilliJy,max = 1.1 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 303.00 MicroJy IMAGR1: 19789 Residual map points loaded IMAGR1: Field 1 min algorithm flux= 315.647 MicroJy iter= 84155 IMAGR1: Field 1 Clean flux density= 412.394 MilliJy 84155 comps IMAGR1: Total Cleaned flux density = 1.737 Jy 86662 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 165724 Pts IMAGR1: Field 1 min = -1.1 MilliJy,max = 1.1 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 297.47 MicroJy IMAGR1: 19637 Residual map points loaded IMAGR1: Field 1 min algorithm flux= 309.590 MicroJy iter= 87647 IMAGR1: Field 1 Clean flux density= 414.559 MilliJy 87647 comps IMAGR1: Total Cleaned flux density = 1.740 Jy 90154 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 165724 Pts IMAGR1: Field 2 min = -467.9 MicroJy,max = 504.4 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 297.35 MicroJy IMAGR1: 70 Residual map points loaded IMAGR1: Field 2 min algorithm flux= -297.614 MicroJy iter= 2545 IMAGR1: Field 2 Clean flux density= 1.325 Jy 2545 comps IMAGR1: Total Cleaned flux density = 1.739 Jy 90192 comps IMAGR1: ALGSTB: All 182 Rows In AP (Max 267) IMAGR1: ALGSTB field 2 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 171- 0 Cells, with 165724 Pts IMAGR1: Field 1 min = -1.1 MilliJy,max = 1.1 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 291.76 MicroJy IMAGR1: 19794 Residual map points loaded IMAGR1: Field 1 min algorithm flux= 303.522 MicroJy iter= 91234 IMAGR1: Field 1 Clean flux density= 414.154 MilliJy 91234 comps IMAGR1: Total Cleaned flux density = 1.739 Jy 93779 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 165724 Pts IMAGR1: Field 1 min = -1.1 MilliJy,max = 1.1 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 286.49 MicroJy IMAGR1: 19651 Residual map points loaded IMAGR1: Field 1 min algorithm flux= -297.783 MicroJy iter= 94885 IMAGR1: Field 1 Clean flux density= 418.074 MilliJy 94885 comps IMAGR1: Total Cleaned flux density = 1.743 Jy 97430 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 165724 Pts IMAGR1: Field 2 min = -454.4 MicroJy,max = 483.6 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 286.38 MicroJy IMAGR1: 71 Residual map points loaded IMAGR1: Field 2 min algorithm flux= -286.452 MicroJy iter= 2586 IMAGR1: Field 2 Clean flux density= 1.325 Jy 2586 comps IMAGR1: Total Cleaned flux density = 1.743 Jy 97471 comps IMAGR1: ALGSTB: All 182 Rows In AP (Max 267) IMAGR1: ALGSTB field 2 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 171- 0 Cells, with 165724 Pts IMAGR1: Field 1 min = -1.1 MilliJy,max = 1.1 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 280.98 MicroJy IMAGR1: 19779 Residual map points loaded IMAGR1: Field 1 min algorithm flux= 291.970 MicroJy iter= 98636 IMAGR1: Field 1 Clean flux density= 418.567 MilliJy 98636 comps IMAGR1: Total Cleaned flux density = 1.743 Jy 101222 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 165724 Pts IMAGR1: Field 1 min = -1.1 MilliJy,max = 1.1 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 275.92 MicroJy IMAGR1: 19648 Residual map points loaded IMAGR1: Field 1 min algorithm flux= 286.507 MicroJy iter= 102466 IMAGR1: Field 1 Clean flux density= 423.501 MilliJy 102466 comps IMAGR1: Total Cleaned flux density = 1.748 Jy 105052 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 165724 Pts IMAGR1: Field 2 min = -442.6 MicroJy,max = 476.1 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 275.80 MicroJy IMAGR1: 55 Residual map points loaded IMAGR1: Field 2 min algorithm flux= 276.003 MicroJy iter= 2619 IMAGR1: Field 2 Clean flux density= 1.325 Jy 2619 comps IMAGR1: Total Cleaned flux density = 1.749 Jy 105085 comps IMAGR1: ALGSTB: All 182 Rows In AP (Max 267) IMAGR1: ALGSTB field 2 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 171- 0 Cells, with 165724 Pts IMAGR1: Field 1 min = -1.1 MilliJy,max = 1.1 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 270.71 MicroJy IMAGR1: 19815 Residual map points loaded IMAGR1: Field 1 min algorithm flux= -280.967 MicroJy iter= 106387 IMAGR1: Field 1 Clean flux density= 422.402 MilliJy 106387 comps IMAGR1: Total Cleaned flux density = 1.748 Jy 109006 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 165724 Pts IMAGR1: Field 1 min = -1.1 MilliJy,max = 1.1 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 265.78 MicroJy IMAGR1: 19695 Residual map points loaded IMAGR1: Field 1 min algorithm flux= 275.772 MicroJy iter= 110377 IMAGR1: Field 1 Clean flux density= 422.485 MilliJy 110377 comps IMAGR1: Total Cleaned flux density = 1.748 Jy 112996 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 165724 Pts IMAGR1: Field 2 min = -430.9 MicroJy,max = 457.1 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 265.68 MicroJy IMAGR1: 57 Residual map points loaded IMAGR1: Field 2 min algorithm flux= 265.767 MicroJy iter= 2654 IMAGR1: Field 2 Clean flux density= 1.326 Jy 2654 comps IMAGR1: Total Cleaned flux density = 1.748 Jy 113031 comps IMAGR1: ALGSTB: All 182 Rows In AP (Max 267) IMAGR1: ALGSTB field 2 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 171- 0 Cells, with 165724 Pts IMAGR1: Field 1 min = -1.0 MilliJy,max = 1.0 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 260.78 MicroJy IMAGR1: 19841 Residual map points loaded IMAGR1: Field 1 min algorithm flux= -270.321 MicroJy iter= 114424 IMAGR1: Field 1 Clean flux density= 424.212 MilliJy 114424 comps IMAGR1: Total Cleaned flux density = 1.750 Jy 117078 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 165724 Pts IMAGR1: Field 1 min = -1.0 MilliJy,max = 1.0 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 256.21 MicroJy IMAGR1: 19720 Residual map points loaded IMAGR1: Field 1 min algorithm flux= 265.493 MicroJy iter= 118558 IMAGR1: Field 1 Clean flux density= 426.090 MilliJy 118558 comps IMAGR1: Total Cleaned flux density = 1.752 Jy 121212 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 165724 Pts IMAGR1: Field 2 min = -424.7 MicroJy,max = 431.4 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 256.14 MicroJy IMAGR1: 67 Residual map points loaded IMAGR1: Field 2 min algorithm flux= 256.262 MicroJy iter= 2694 IMAGR1: Field 2 Clean flux density= 1.326 Jy 2694 comps IMAGR1: Total Cleaned flux density = 1.752 Jy 121252 comps IMAGR1: ALGSTB: All 182 Rows In AP (Max 267) IMAGR1: ALGSTB field 2 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 171- 0 Cells, with 165724 Pts IMAGR1: Field 1 min = -1.0 MilliJy,max = 1.0 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 251.56 MicroJy IMAGR1: 19822 Residual map points loaded IMAGR1: Field 1 min algorithm flux= 260.534 MicroJy iter= 122770 IMAGR1: Field 1 Clean flux density= 426.128 MilliJy 122770 comps IMAGR1: Total Cleaned flux density = 1.752 Jy 125464 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 165724 Pts IMAGR1: Field 1 min = -1.0 MilliJy,max = 1.0 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 247.12 MicroJy IMAGR1: 19699 Residual map points loaded IMAGR1: Field 1 min algorithm flux= 255.759 MicroJy iter= 127036 IMAGR1: Field 1 Clean flux density= 428.373 MilliJy 127036 comps IMAGR1: Total Cleaned flux density = 1.754 Jy 129730 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 165724 Pts IMAGR1: Field 2 min = -409.6 MicroJy,max = 428.9 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 247.03 MicroJy IMAGR1: 42 Residual map points loaded IMAGR1: Field 2 min algorithm flux= -247.160 MicroJy iter= 2720 IMAGR1: Field 2 Clean flux density= 1.325 Jy 2720 comps IMAGR1: Total Cleaned flux density = 1.754 Jy 129756 comps IMAGR1: ALGSTB: All 182 Rows In AP (Max 267) IMAGR1: ALGSTB field 2 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 171- 0 Cells, with 165724 Pts IMAGR1: Field 1 min = -1.0 MilliJy,max = 1.0 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 242.53 MicroJy IMAGR1: 19833 Residual map points loaded IMAGR1: Field 1 min algorithm flux= 251.051 MicroJy iter= 131469 IMAGR1: Field 1 Clean flux density= 429.085 MilliJy 131469 comps IMAGR1: Total Cleaned flux density = 1.755 Jy 134189 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 165724 Pts IMAGR1: Field 1 min = -979.4 MicroJy,max = 1.0 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 238.40 MicroJy IMAGR1: 19760 Residual map points loaded IMAGR1: Field 1 min algorithm flux= -246.524 MicroJy iter= 135912 IMAGR1: Field 1 Clean flux density= 431.224 MilliJy 135912 comps IMAGR1: Total Cleaned flux density = 1.757 Jy 138632 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 165724 Pts IMAGR1: Field 2 min = -396.8 MicroJy,max = 392.2 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 238.34 MicroJy IMAGR1: 46 Residual map points loaded IMAGR1: Field 2 min algorithm flux= 238.521 MicroJy iter= 2746 IMAGR1: Field 2 Clean flux density= 1.326 Jy 2746 comps IMAGR1: Total Cleaned flux density = 1.757 Jy 138658 comps IMAGR1: ALGSTB: All 182 Rows In AP (Max 267) IMAGR1: ALGSTB field 2 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 171- 0 Cells, with 165724 Pts IMAGR1: Field 1 min = -974.1 MicroJy,max = 997.8 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 234.01 MicroJy IMAGR1: 19845 Residual map points loaded IMAGR1: Field 1 min algorithm flux= 241.871 MicroJy iter= 140453 IMAGR1: Field 1 Clean flux density= 433.202 MilliJy 140453 comps IMAGR1: Total Cleaned flux density = 1.759 Jy 143199 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 165724 Pts IMAGR1: Field 1 min = -978.3 MicroJy,max = 986.8 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 229.96 MicroJy IMAGR1: 19739 Residual map points loaded IMAGR1: Field 1 min algorithm flux= -237.629 MicroJy iter= 145113 IMAGR1: Field 1 Clean flux density= 437.312 MilliJy 145113 comps IMAGR1: Total Cleaned flux density = 1.763 Jy 147859 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 165724 Pts IMAGR1: Field 2 min = -391.7 MicroJy,max = 371.6 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 229.89 MicroJy IMAGR1: 41 Residual map points loaded IMAGR1: Field 2 min algorithm flux= -229.900 MicroJy iter= 2777 IMAGR1: Field 2 Clean flux density= 1.326 Jy 2777 comps IMAGR1: Total Cleaned flux density = 1.763 Jy 147890 comps IMAGR1: ALGSTB: All 182 Rows In AP (Max 267) IMAGR1: ALGSTB field 2 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 171- 0 Cells, with 165724 Pts IMAGR1: Field 1 min = -972.0 MicroJy,max = 974.4 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 225.84 MicroJy IMAGR1: 19831 Residual map points loaded IMAGR1: Field 1 min algorithm flux= 233.326 MicroJy iter= 149882 IMAGR1: Field 1 Clean flux density= 437.759 MilliJy 149882 comps IMAGR1: Total Cleaned flux density = 1.764 Jy 152659 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 165724 Pts IMAGR1: Field 1 min = -944.3 MicroJy,max = 970.7 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 221.98 MicroJy IMAGR1: 19740 Residual map points loaded IMAGR1: Field 1 min algorithm flux= -229.152 MicroJy iter= 154670 IMAGR1: Field 1 Clean flux density= 438.467 MilliJy 154670 comps IMAGR1: Total Cleaned flux density = 1.764 Jy 157447 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 165724 Pts IMAGR1: Field 2 min = -372.0 MicroJy,max = 350.1 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 221.92 MicroJy IMAGR1: 44 Residual map points loaded IMAGR1: Field 2 min algorithm flux= 222.055 MicroJy iter= 2805 IMAGR1: Field 2 Clean flux density= 1.326 Jy 2805 comps IMAGR1: Total Cleaned flux density = 1.764 Jy 157475 comps IMAGR1: ALGSTB: All 182 Rows In AP (Max 267) IMAGR1: ALGSTB field 2 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 171- 0 Cells, with 165724 Pts IMAGR1: Field 1 min = -935.6 MicroJy,max = 949.8 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 217.97 MicroJy IMAGR1: 19863 Residual map points loaded IMAGR1: Field 1 min algorithm flux= -224.962 MicroJy iter= 159562 IMAGR1: Field 1 Clean flux density= 437.943 MilliJy 159562 comps IMAGR1: Total Cleaned flux density = 1.764 Jy 162367 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 165724 Pts IMAGR1: Field 1 min = -931.4 MicroJy,max = 943.2 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 214.30 MicroJy IMAGR1: 19797 Residual map points loaded IMAGR1: Field 1 min algorithm flux= -221.109 MicroJy iter= 164568 IMAGR1: Field 1 Clean flux density= 440.078 MilliJy 164568 comps IMAGR1: Total Cleaned flux density = 1.766 Jy 167373 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 165724 Pts IMAGR1: Field 2 min = -360.4 MicroJy,max = 332.4 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 214.25 MicroJy IMAGR1: 41 Residual map points loaded IMAGR1: Field 2 min algorithm flux= 213.690 MicroJy iter= 2835 IMAGR1: Field 2 Clean flux density= 1.326 Jy 2835 comps IMAGR1: Total Cleaned flux density = 1.766 Jy 167403 comps IMAGR1: ALGSTB: All 182 Rows In AP (Max 267) IMAGR1: ALGSTB field 2 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 171- 0 Cells, with 165724 Pts IMAGR1: Field 1 min = -912.0 MicroJy,max = 925.9 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 210.56 MicroJy IMAGR1: 19830 Residual map points loaded IMAGR1: Field 1 min algorithm flux= 217.110 MicroJy iter= 169569 IMAGR1: Field 1 Clean flux density= 441.727 MilliJy 169569 comps IMAGR1: Total Cleaned flux density = 1.768 Jy 172404 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 165724 Pts IMAGR1: Field 1 min = -900.5 MicroJy,max = 909.5 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 207.12 MicroJy IMAGR1: 19767 Residual map points loaded IMAGR1: Field 1 min algorithm flux= 213.414 MicroJy iter= 174623 IMAGR1: Field 1 Clean flux density= 443.620 MilliJy 174623 comps IMAGR1: Total Cleaned flux density = 1.770 Jy 177458 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 165724 Pts IMAGR1: Field 2 min = -348.9 MicroJy,max = 328.8 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 207.07 MicroJy IMAGR1: 44 Residual map points loaded IMAGR1: Field 2 min algorithm flux= -207.100 MicroJy iter= 2863 IMAGR1: Field 2 Clean flux density= 1.326 Jy 2863 comps IMAGR1: Total Cleaned flux density = 1.770 Jy 177486 comps IMAGR1: ALGSTB: All 182 Rows In AP (Max 267) IMAGR1: ALGSTB field 2 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 171- 0 Cells, with 165724 Pts IMAGR1: Field 1 min = -912.7 MicroJy,max = 906.8 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 203.47 MicroJy IMAGR1: 19858 Residual map points loaded IMAGR1: Field 1 min algorithm flux= 209.624 MicroJy iter= 179800 IMAGR1: Field 1 Clean flux density= 445.599 MilliJy 179800 comps IMAGR1: Total Cleaned flux density = 1.772 Jy 182663 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 165724 Pts IMAGR1: Field 1 min = -890.7 MicroJy,max = 896.5 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 200.11 MicroJy IMAGR1: 19803 Residual map points loaded IMAGR1: Field 1 min algorithm flux= -206.084 MicroJy iter= 185067 IMAGR1: Field 1 Clean flux density= 448.689 MilliJy 185067 comps IMAGR1: Total Cleaned flux density = 1.775 Jy 187930 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 165724 Pts IMAGR1: Field 2 min = -351.3 MicroJy,max = 302.7 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 200.08 MicroJy IMAGR1: 46 Residual map points loaded IMAGR1: Field 2 min algorithm flux= 200.013 MicroJy iter= 2893 IMAGR1: Field 2 Clean flux density= 1.326 Jy 2893 comps IMAGR1: Total Cleaned flux density = 1.775 Jy 187960 comps IMAGR1: ALGSTB: All 182 Rows In AP (Max 267) IMAGR1: ALGSTB field 2 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 171- 0 Cells, with 165724 Pts IMAGR1: Field 1 min = -885.6 MicroJy,max = 893.9 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 196.68 MicroJy IMAGR1: 19876 Residual map points loaded IMAGR1: Field 1 min algorithm flux= 202.514 MicroJy iter= 190434 IMAGR1: Field 1 Clean flux density= 449.564 MilliJy 190434 comps IMAGR1: Total Cleaned flux density = 1.776 Jy 193327 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 165724 Pts IMAGR1: Field 1 min = -881.9 MicroJy,max = 887.4 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 193.47 MicroJy IMAGR1: 19806 Residual map points loaded IMAGR1: Field 1 min algorithm flux= 199.060 MicroJy iter= 195802 IMAGR1: Field 1 Clean flux density= 454.505 MilliJy 195802 comps IMAGR1: Total Cleaned flux density = 1.781 Jy 198695 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 165724 Pts IMAGR1: Field 2 min = -329.5 MicroJy,max = 281.9 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 193.44 MicroJy IMAGR1: 52 Residual map points loaded IMAGR1: Field 2 min algorithm flux= -193.486 MicroJy iter= 2929 IMAGR1: Field 2 Clean flux density= 1.326 Jy 2929 comps IMAGR1: Total Cleaned flux density = 1.781 Jy 198731 comps IMAGR1: ALGSTB: All 182 Rows In AP (Max 267) IMAGR1: ALGSTB field 2 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 171- 0 Cells, with 165724 Pts IMAGR1: Field 1 min = -878.8 MicroJy,max = 871.6 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 190.22 MicroJy IMAGR1: 19830 Residual map points loaded IMAGR1: Field 1 min algorithm flux= -195.675 MicroJy iter= 201236 IMAGR1: Field 1 Clean flux density= 453.208 MilliJy 201236 comps IMAGR1: Total Cleaned flux density = 1.779 Jy 204165 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 165724 Pts IMAGR1: Field 1 min = -866.3 MicroJy,max = 867.4 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 187.13 MicroJy IMAGR1: 19793 Residual map points loaded IMAGR1: Field 1 min algorithm flux= -192.433 MicroJy iter= 206797 IMAGR1: Field 1 Clean flux density= 456.637 MilliJy 206797 comps IMAGR1: Total Cleaned flux density = 1.783 Jy 209726 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 165724 Pts IMAGR1: Field 2 min = -328.6 MicroJy,max = 262.7 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 187.10 MicroJy IMAGR1: 44 Residual map points loaded IMAGR1: Field 2 min algorithm flux= -186.994 MicroJy iter= 2958 IMAGR1: Field 2 Clean flux density= 1.326 Jy 2958 comps IMAGR1: Total Cleaned flux density = 1.783 Jy 209755 comps IMAGR1: ALGSTB: All 182 Rows In AP (Max 267) IMAGR1: ALGSTB field 2 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 171- 0 Cells, with 165724 Pts IMAGR1: Field 1 min = -853.0 MicroJy,max = 862.0 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 184.09 MicroJy IMAGR1: 19850 Residual map points loaded IMAGR1: Field 1 min algorithm flux= -189.280 MicroJy iter= 212437 IMAGR1: Field 1 Clean flux density= 457.383 MilliJy 212437 comps IMAGR1: Total Cleaned flux density = 1.784 Jy 215395 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 165724 Pts IMAGR1: Field 1 min = -849.6 MicroJy,max = 858.1 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 181.15 MicroJy IMAGR1: 19819 Residual map points loaded IMAGR1: Field 1 min algorithm flux= 186.126 MicroJy iter= 218114 IMAGR1: Field 1 Clean flux density= 460.039 MilliJy 218114 comps IMAGR1: Total Cleaned flux density = 1.786 Jy 221072 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 165724 Pts IMAGR1: Field 2 min = -312.1 MicroJy,max = 257.7 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 181.11 MicroJy IMAGR1: 31 Residual map points loaded IMAGR1: Field 2 min algorithm flux= 171.503 MicroJy iter= 2978 IMAGR1: Field 2 Clean flux density= 1.326 Jy 2978 comps IMAGR1: Total Cleaned flux density = 1.786 Jy 221092 comps IMAGR1: ALGSTB: All 182 Rows In AP (Max 267) IMAGR1: ALGSTB field 2 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 171- 0 Cells, with 165724 Pts IMAGR1: Field 1 min = -847.4 MicroJy,max = 851.2 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 178.19 MicroJy IMAGR1: 19873 Residual map points loaded IMAGR1: Field 1 min algorithm flux= 183.056 MicroJy iter= 223893 IMAGR1: Field 1 Clean flux density= 461.184 MilliJy 223893 comps IMAGR1: Total Cleaned flux density = 1.788 Jy 226871 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 165724 Pts IMAGR1: Field 1 min = -838.6 MicroJy,max = 852.4 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 175.37 MicroJy IMAGR1: 19833 Residual map points loaded IMAGR1: Field 1 min algorithm flux= -180.147 MicroJy iter= 229744 IMAGR1: Field 1 Clean flux density= 461.281 MilliJy 229744 comps IMAGR1: Total Cleaned flux density = 1.788 Jy 232722 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 165724 Pts IMAGR1: Field 1 min = -834.7 MicroJy,max = 830.1 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 172.77 MicroJy IMAGR1: 19754 Residual map points loaded IMAGR1: Field 1 min algorithm flux= -177.355 MicroJy iter= 235625 IMAGR1: Field 1 Clean flux density= 463.872 MilliJy 235625 comps IMAGR1: Total Cleaned flux density = 1.790 Jy 238603 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 165724 Pts IMAGR1: Field 1 min = -836.5 MicroJy,max = 834.6 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 170.05 MicroJy IMAGR1: 19634 Residual map points loaded IMAGR1: Field 1 min algorithm flux= 174.499 MicroJy iter= 241503 IMAGR1: Field 1 Clean flux density= 463.582 MilliJy 241503 comps IMAGR1: Total Cleaned flux density = 1.790 Jy 244481 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 165724 Pts IMAGR1: Field 1 min = -824.3 MicroJy,max = 830.5 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 167.46 MicroJy IMAGR1: 19539 Residual map points loaded IMAGR1: Field 1 min algorithm flux= 171.762 MicroJy iter= 247447 IMAGR1: Field 1 Clean flux density= 464.282 MilliJy 247447 comps IMAGR1: Total Cleaned flux density = 1.791 Jy 250425 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 165724 Pts IMAGR1: Field 2 min = -296.5 MicroJy,max = 230.9 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 167.34 MicroJy IMAGR1: 39 Residual map points loaded IMAGR1: Field 2 min algorithm flux= 166.321 MicroJy iter= 3005 IMAGR1: Field 2 Clean flux density= 1.326 Jy 3005 comps IMAGR1: Total Cleaned flux density = 1.791 Jy 250452 comps IMAGR1: ALGSTB: All 182 Rows In AP (Max 267) IMAGR1: ALGSTB field 2 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 171- 0 Cells, with 165724 Pts IMAGR1: Field 1 min = -824.7 MicroJy,max = 817.5 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 165.00 MicroJy IMAGR1: 19887 Residual map points loaded IMAGR1: Field 1 min algorithm flux= -169.282 MicroJy iter= 253515 IMAGR1: Field 1 Clean flux density= 467.389 MilliJy 253515 comps IMAGR1: Total Cleaned flux density = 1.794 Jy 256520 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 165724 Pts IMAGR1: Field 1 min = -819.8 MicroJy,max = 814.0 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 162.51 MicroJy IMAGR1: 19821 Residual map points loaded IMAGR1: Field 1 min algorithm flux= 166.649 MicroJy iter= 259735 IMAGR1: Field 1 Clean flux density= 469.161 MilliJy 259735 comps IMAGR1: Total Cleaned flux density = 1.796 Jy 262740 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 165724 Pts IMAGR1: Field 2 min = -276.5 MicroJy,max = 234.1 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 162.48 MicroJy IMAGR1: 29 Residual map points loaded IMAGR1: Field 2 min algorithm flux= 162.311 MicroJy iter= 3028 IMAGR1: Field 2 Clean flux density= 1.326 Jy 3028 comps IMAGR1: Total Cleaned flux density = 1.796 Jy 262763 comps IMAGR1: ALGSTB: All 182 Rows In AP (Max 267) IMAGR1: ALGSTB field 2 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 171- 0 Cells, with 165724 Pts IMAGR1: Field 1 min = -813.9 MicroJy,max = 808.1 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 160.11 MicroJy IMAGR1: 19904 Residual map points loaded IMAGR1: Field 1 min algorithm flux= -164.177 MicroJy iter= 265976 IMAGR1: Field 1 Clean flux density= 470.123 MilliJy 265976 comps IMAGR1: Total Cleaned flux density = 1.797 Jy 269004 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 165724 Pts IMAGR1: Field 1 min = -810.9 MicroJy,max = 796.2 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 157.82 MicroJy IMAGR1: 19841 Residual map points loaded IMAGR1: Field 1 min algorithm flux= -161.764 MicroJy iter= 272334 IMAGR1: Field 1 Clean flux density= 471.838 MilliJy 272334 comps IMAGR1: Total Cleaned flux density = 1.798 Jy 275362 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 165724 Pts IMAGR1: Field 2 min = -269.3 MicroJy,max = 221.6 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 157.80 MicroJy IMAGR1: 39 Residual map points loaded IMAGR1: Field 2 min algorithm flux= 157.410 MicroJy iter= 3054 IMAGR1: Field 2 Clean flux density= 1.326 Jy 3054 comps IMAGR1: Total Cleaned flux density = 1.798 Jy 275388 comps IMAGR1: ALGSTB: All 182 Rows In AP (Max 267) IMAGR1: ALGSTB field 2 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 171- 0 Cells, with 165724 Pts IMAGR1: Field 1 min = -806.2 MicroJy,max = 795.1 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 155.42 MicroJy IMAGR1: 19887 Residual map points loaded IMAGR1: Field 1 min algorithm flux= -159.264 MicroJy iter= 278755 IMAGR1: Field 1 Clean flux density= 472.962 MilliJy 278755 comps IMAGR1: Total Cleaned flux density = 1.799 Jy 281809 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 165724 Pts IMAGR1: Field 1 min = -802.9 MicroJy,max = 789.1 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 153.12 MicroJy IMAGR1: 19838 Residual map points loaded IMAGR1: Field 1 min algorithm flux= -156.875 MicroJy iter= 285229 IMAGR1: Field 1 Clean flux density= 475.082 MilliJy 285229 comps IMAGR1: Total Cleaned flux density = 1.802 Jy 288283 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 165724 Pts IMAGR1: Field 2 min = -268.5 MicroJy,max = 216.1 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 153.10 MicroJy IMAGR1: 34 Residual map points loaded IMAGR1: Field 2 min algorithm flux= 152.967 MicroJy iter= 3079 IMAGR1: Field 2 Clean flux density= 1.327 Jy 3079 comps IMAGR1: Total Cleaned flux density = 1.802 Jy 288308 comps IMAGR1: ALGSTB: All 182 Rows In AP (Max 267) IMAGR1: ALGSTB field 2 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 171- 0 Cells, with 165724 Pts IMAGR1: Field 1 min = -791.9 MicroJy,max = 778.3 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 150.90 MicroJy IMAGR1: 19896 Residual map points loaded IMAGR1: Field 1 min algorithm flux= 154.566 MicroJy iter= 291769 IMAGR1: Field 1 Clean flux density= 478.571 MilliJy 291769 comps IMAGR1: Total Cleaned flux density = 1.805 Jy 294848 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 165724 Pts IMAGR1: Field 1 min = -790.5 MicroJy,max = 778.0 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 148.73 MicroJy IMAGR1: 19876 Residual map points loaded IMAGR1: Field 1 min algorithm flux= 152.294 MicroJy iter= 298384 IMAGR1: Field 1 Clean flux density= 477.921 MilliJy 298384 comps IMAGR1: Total Cleaned flux density = 1.805 Jy 301463 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 165724 Pts IMAGR1: Field 2 min = -253.6 MicroJy,max = 208.2 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 148.71 MicroJy IMAGR1: 26 Residual map points loaded IMAGR1: Field 2 min algorithm flux= 148.339 MicroJy iter= 3097 IMAGR1: Field 2 Clean flux density= 1.327 Jy 3097 comps IMAGR1: Total Cleaned flux density = 1.805 Jy 301481 comps IMAGR1: ALGSTB: All 182 Rows In AP (Max 267) IMAGR1: ALGSTB field 2 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 171- 0 Cells, with 165724 Pts IMAGR1: Field 1 min = -787.6 MicroJy,max = 775.6 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 146.58 MicroJy IMAGR1: 19918 Residual map points loaded IMAGR1: Field 1 min algorithm flux= 150.049 MicroJy iter= 305039 IMAGR1: Field 1 Clean flux density= 477.936 MilliJy 305039 comps IMAGR1: Total Cleaned flux density = 1.805 Jy 308136 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 165724 Pts IMAGR1: Field 1 min = -780.8 MicroJy,max = 760.8 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 144.49 MicroJy IMAGR1: 19824 Residual map points loaded IMAGR1: Field 1 min algorithm flux= -147.867 MicroJy iter= 311768 IMAGR1: Field 1 Clean flux density= 479.053 MilliJy 311768 comps IMAGR1: Total Cleaned flux density = 1.806 Jy 314865 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 165724 Pts IMAGR1: Field 2 min = -259.2 MicroJy,max = 204.7 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 144.47 MicroJy IMAGR1: 29 Residual map points loaded IMAGR1: Field 2 min algorithm flux= 144.569 MicroJy iter= 3111 IMAGR1: Field 2 Clean flux density= 1.327 Jy 3111 comps IMAGR1: Total Cleaned flux density = 1.806 Jy 314879 comps IMAGR1: VISDFT: Begin DFT component subtraction IMAGR1: I Polarization model processed IMAGR1: Field 1 min = -765.5 MicroJy,max = 757.8 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 142.38 MicroJy IMAGR1: 19900 Residual map points loaded IMAGR1: Field 1 min algorithm flux= 145.724 MicroJy iter= 318582 IMAGR1: Field 1 Clean flux density= 479.734 MilliJy 318582 comps IMAGR1: Total Cleaned flux density = 1.806 Jy 321693 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 165724 Pts IMAGR1: Field 1 min = -766.7 MicroJy,max = 749.7 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 140.39 MicroJy IMAGR1: 19880 Residual map points loaded IMAGR1: Field 1 min algorithm flux= -143.603 MicroJy iter= 325386 IMAGR1: Field 1 Clean flux density= 482.077 MilliJy 325386 comps IMAGR1: Total Cleaned flux density = 1.809 Jy 328497 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 165724 Pts IMAGR1: Field 2 min = -240.2 MicroJy,max = 199.1 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 140.37 MicroJy IMAGR1: 33 Residual map points loaded IMAGR1: Field 2 min algorithm flux= 140.401 MicroJy iter= 3134 IMAGR1: Field 2 Clean flux density= 1.327 Jy 3134 comps IMAGR1: Total Cleaned flux density = 1.809 Jy 328520 comps IMAGR1: ALGSTB: All 182 Rows In AP (Max 267) IMAGR1: ALGSTB field 2 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 171- 0 Cells, with 165724 Pts IMAGR1: Field 1 min = -761.5 MicroJy,max = 746.5 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 138.35 MicroJy IMAGR1: 19865 Residual map points loaded IMAGR1: Field 1 min algorithm flux= 141.478 MicroJy iter= 332280 IMAGR1: Field 1 Clean flux density= 483.372 MilliJy 332280 comps IMAGR1: Total Cleaned flux density = 1.810 Jy 335414 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 165724 Pts IMAGR1: Field 1 min = -764.0 MicroJy,max = 740.3 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 136.44 MicroJy IMAGR1: 19838 Residual map points loaded IMAGR1: Field 1 min algorithm flux= 139.465 MicroJy iter= 339153 IMAGR1: Field 1 Clean flux density= 483.508 MilliJy 339153 comps IMAGR1: Total Cleaned flux density = 1.810 Jy 342287 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 165724 Pts IMAGR1: Field 2 min = -236.4 MicroJy,max = 190.6 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 136.42 MicroJy IMAGR1: 33 Residual map points loaded IMAGR1: Field 2 min algorithm flux= -132.934 MicroJy iter= 3155 IMAGR1: Field 2 Clean flux density= 1.327 Jy 3155 comps IMAGR1: Total Cleaned flux density = 1.810 Jy 342308 comps IMAGR1: ALGSTB: All 182 Rows In AP (Max 267) IMAGR1: ALGSTB field 2 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 171- 0 Cells, with 165724 Pts IMAGR1: Field 1 min = -749.0 MicroJy,max = 739.9 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 134.48 MicroJy IMAGR1: 19913 Residual map points loaded IMAGR1: Field 1 min algorithm flux= 137.442 MicroJy iter= 346174 IMAGR1: Field 1 Clean flux density= 484.190 MilliJy 346174 comps IMAGR1: Total Cleaned flux density = 1.811 Jy 349329 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 165724 Pts IMAGR1: Field 1 min = -747.8 MicroJy,max = 735.5 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 132.74 MicroJy IMAGR1: 19869 Residual map points loaded IMAGR1: Field 1 min algorithm flux= -135.581 MicroJy iter= 353094 IMAGR1: Field 1 Clean flux density= 485.266 MilliJy 353094 comps IMAGR1: Total Cleaned flux density = 1.812 Jy 356249 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 165724 Pts IMAGR1: Field 1 min = -745.4 MicroJy,max = 731.8 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 131.04 MicroJy IMAGR1: 19845 Residual map points loaded IMAGR1: Field 1 min algorithm flux= -133.847 MicroJy iter= 360096 IMAGR1: Field 1 Clean flux density= 485.383 MilliJy 360096 comps IMAGR1: Total Cleaned flux density = 1.812 Jy 363251 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 165724 Pts IMAGR1: Field 1 min = -743.2 MicroJy,max = 719.7 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 129.34 MicroJy IMAGR1: 19795 Residual map points loaded IMAGR1: Field 1 min algorithm flux= 132.074 MicroJy iter= 367119 IMAGR1: Field 1 Clean flux density= 485.858 MilliJy 367119 comps IMAGR1: Total Cleaned flux density = 1.813 Jy 370274 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 165724 Pts IMAGR1: Field 2 min = -219.9 MicroJy,max = 179.6 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 129.31 MicroJy IMAGR1: 31 Residual map points loaded IMAGR1: Field 2 min algorithm flux= 128.985 MicroJy iter= 3179 IMAGR1: Field 2 Clean flux density= 1.327 Jy 3179 comps IMAGR1: Total Cleaned flux density = 1.813 Jy 370298 comps IMAGR1: ALGSTB: All 182 Rows In AP (Max 267) IMAGR1: ALGSTB field 2 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 171- 0 Cells, with 165724 Pts IMAGR1: Field 1 min = -732.8 MicroJy,max = 726.4 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 127.54 MicroJy IMAGR1: 19892 Residual map points loaded IMAGR1: Field 1 min algorithm flux= -130.195 MicroJy iter= 374281 IMAGR1: Field 1 Clean flux density= 487.815 MilliJy 374281 comps IMAGR1: Total Cleaned flux density = 1.815 Jy 377460 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 165724 Pts IMAGR1: Field 1 min = -735.3 MicroJy,max = 716.8 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 125.90 MicroJy IMAGR1: 19857 Residual map points loaded IMAGR1: Field 1 min algorithm flux= -128.480 MicroJy iter= 381444 IMAGR1: Field 1 Clean flux density= 487.587 MilliJy 381444 comps IMAGR1: Total Cleaned flux density = 1.815 Jy 384623 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 165724 Pts IMAGR1: Field 2 min = -207.9 MicroJy,max = 172.0 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 125.89 MicroJy IMAGR1: 26 Residual map points loaded IMAGR1: Field 2 min algorithm flux= -124.716 MicroJy iter= 3195 IMAGR1: Field 2 Clean flux density= 1.327 Jy 3195 comps IMAGR1: Total Cleaned flux density = 1.815 Jy 384639 comps IMAGR1: VISDFT: Begin DFT component subtraction IMAGR1: I Polarization model processed IMAGR1: Field 1 min = -726.0 MicroJy,max = 719.1 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 124.15 MicroJy IMAGR1: 19921 Residual map points loaded IMAGR1: Field 1 min algorithm flux= -126.667 MicroJy iter= 388630 IMAGR1: Field 1 Clean flux density= 488.068 MilliJy 388630 comps IMAGR1: Total Cleaned flux density = 1.815 Jy 391825 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 165724 Pts IMAGR1: Field 1 min = -726.2 MicroJy,max = 707.4 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 122.65 MicroJy IMAGR1: 19901 Residual map points loaded IMAGR1: Field 1 min algorithm flux= -125.127 MicroJy iter= 395838 IMAGR1: Field 1 Clean flux density= 486.404 MilliJy 395838 comps IMAGR1: Total Cleaned flux density = 1.813 Jy 399033 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 165724 Pts IMAGR1: Field 1 min = -717.0 MicroJy,max = 712.1 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 121.14 MicroJy IMAGR1: 19846 Residual map points loaded IMAGR1: Field 1 min algorithm flux= 123.524 MicroJy iter= 403028 IMAGR1: Field 1 Clean flux density= 487.998 MilliJy 403028 comps IMAGR1: Total Cleaned flux density = 1.815 Jy 406223 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 165724 Pts IMAGR1: Field 2 min = -201.0 MicroJy,max = 165.8 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 121.13 MicroJy IMAGR1: 25 Residual map points loaded IMAGR1: Field 2 min algorithm flux= -121.059 MicroJy iter= 3216 IMAGR1: Field 2 Clean flux density= 1.327 Jy 3216 comps IMAGR1: Total Cleaned flux density = 1.815 Jy 406244 comps IMAGR1: ALGSTB: All 182 Rows In AP (Max 267) IMAGR1: ALGSTB field 2 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 171- 0 Cells, with 165724 Pts IMAGR1: Field 1 min = -715.7 MicroJy,max = 701.8 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 119.65 MicroJy IMAGR1: 19921 Residual map points loaded IMAGR1: Field 1 min algorithm flux= 122.011 MicroJy iter= 410358 IMAGR1: Field 1 Clean flux density= 489.320 MilliJy 410358 comps IMAGR1: Total Cleaned flux density = 1.816 Jy 413574 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 165724 Pts IMAGR1: Field 1 min = -707.5 MicroJy,max = 702.2 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 118.22 MicroJy IMAGR1: 19862 Residual map points loaded IMAGR1: Field 1 min algorithm flux= -120.527 MicroJy iter= 417651 IMAGR1: Field 1 Clean flux density= 490.315 MilliJy 417651 comps IMAGR1: Total Cleaned flux density = 1.817 Jy 420867 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 165724 Pts IMAGR1: Field 2 min = -210.9 MicroJy,max = 166.9 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 118.20 MicroJy IMAGR1: 34 Residual map points loaded IMAGR1: Field 2 min algorithm flux= 118.130 MicroJy iter= 3243 IMAGR1: Field 2 Clean flux density= 1.327 Jy 3243 comps IMAGR1: Total Cleaned flux density = 1.817 Jy 420894 comps IMAGR1: ALGSTB: All 182 Rows In AP (Max 267) IMAGR1: ALGSTB field 2 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 171- 0 Cells, with 165724 Pts IMAGR1: Field 1 min = -704.0 MicroJy,max = 694.4 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 116.73 MicroJy IMAGR1: 19902 Residual map points loaded IMAGR1: Field 1 min algorithm flux= -119.011 MicroJy iter= 425007 IMAGR1: Field 1 Clean flux density= 489.389 MilliJy 425007 comps IMAGR1: Total Cleaned flux density = 1.817 Jy 428250 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 165724 Pts IMAGR1: Field 1 min = -695.5 MicroJy,max = 691.0 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 115.35 MicroJy IMAGR1: 19882 Residual map points loaded IMAGR1: Field 1 min algorithm flux= -117.536 MicroJy iter= 432413 IMAGR1: Field 1 Clean flux density= 490.393 MilliJy 432413 comps IMAGR1: Total Cleaned flux density = 1.818 Jy 435656 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 165724 Pts IMAGR1: Field 2 min = -188.8 MicroJy,max = 153.8 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 115.34 MicroJy IMAGR1: 18 Residual map points loaded IMAGR1: Field 2 min algorithm flux= -115.271 MicroJy iter= 3257 IMAGR1: Field 2 Clean flux density= 1.327 Jy 3257 comps IMAGR1: Total Cleaned flux density = 1.818 Jy 435670 comps IMAGR1: VISDFT: Begin DFT component subtraction IMAGR1: I Polarization model processed IMAGR1: Field 1 min = -696.8 MicroJy,max = 679.9 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 113.98 MicroJy IMAGR1: 19924 Residual map points loaded IMAGR1: Field 1 min algorithm flux= -116.110 MicroJy iter= 439866 IMAGR1: Field 1 Clean flux density= 488.997 MilliJy 439866 comps IMAGR1: Total Cleaned flux density = 1.816 Jy 443123 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 165724 Pts IMAGR1: Field 1 min = -688.7 MicroJy,max = 685.3 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 112.66 MicroJy IMAGR1: 19900 Residual map points loaded IMAGR1: Field 1 min algorithm flux= -114.747 MicroJy iter= 447332 IMAGR1: Field 1 Clean flux density= 489.080 MilliJy 447332 comps IMAGR1: Total Cleaned flux density = 1.816 Jy 450589 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 165724 Pts IMAGR1: Field 2 min = -196.1 MicroJy,max = 152.6 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 112.65 MicroJy IMAGR1: 24 Residual map points loaded IMAGR1: Field 2 min algorithm flux= 112.700 MicroJy iter= 3274 IMAGR1: Field 2 Clean flux density= 1.327 Jy 3274 comps IMAGR1: Total Cleaned flux density = 1.816 Jy 450606 comps IMAGR1: VISDFT: Begin DFT component subtraction IMAGR1: I Polarization model processed IMAGR1: Field 1 min = -686.9 MicroJy,max = 677.3 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 111.26 MicroJy IMAGR1: 19905 Residual map points loaded IMAGR1: Field 1 min algorithm flux= 113.335 MicroJy iter= 454745 IMAGR1: Field 1 Clean flux density= 489.892 MilliJy 454745 comps IMAGR1: Total Cleaned flux density = 1.817 Jy 458019 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 165724 Pts IMAGR1: Field 1 min = -681.3 MicroJy,max = 677.7 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 109.98 MicroJy IMAGR1: 19889 Residual map points loaded IMAGR1: Field 1 min algorithm flux= -111.978 MicroJy iter= 462188 IMAGR1: Field 1 Clean flux density= 491.566 MilliJy 462188 comps IMAGR1: Total Cleaned flux density = 1.819 Jy 465462 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 165724 Pts IMAGR1: Field 2 min = -190.3 MicroJy,max = 147.6 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 109.97 MicroJy IMAGR1: 26 Residual map points loaded IMAGR1: Field 2 min algorithm flux= 108.805 MicroJy iter= 3294 IMAGR1: Field 2 Clean flux density= 1.327 Jy 3294 comps IMAGR1: Total Cleaned flux density = 1.819 Jy 465482 comps IMAGR1: ALGSTB: All 182 Rows In AP (Max 267) IMAGR1: ALGSTB field 2 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 171- 0 Cells, with 165724 Pts IMAGR1: Field 1 min = -673.2 MicroJy,max = 666.4 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 108.70 MicroJy IMAGR1: 19919 Residual map points loaded IMAGR1: Field 1 min algorithm flux= 110.673 MicroJy iter= 469726 IMAGR1: Field 1 Clean flux density= 491.173 MilliJy 469726 comps IMAGR1: Total Cleaned flux density = 1.818 Jy 473020 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 165724 Pts IMAGR1: Field 1 min = -671.4 MicroJy,max = 669.4 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 107.54 MicroJy IMAGR1: 19875 Residual map points loaded IMAGR1: Field 1 min algorithm flux= -109.439 MicroJy iter= 477275 IMAGR1: Field 1 Clean flux density= 491.754 MilliJy 477275 comps IMAGR1: Total Cleaned flux density = 1.819 Jy 480569 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 165724 Pts IMAGR1: Field 1 min = -672.2 MicroJy,max = 664.8 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 106.32 MicroJy IMAGR1: 19869 Residual map points loaded IMAGR1: Field 1 min algorithm flux= -108.174 MicroJy iter= 484907 IMAGR1: Field 1 Clean flux density= 491.786 MilliJy 484907 comps IMAGR1: Total Cleaned flux density = 1.819 Jy 488201 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 165724 Pts IMAGR1: Field 2 min = -175.5 MicroJy,max = 147.6 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 106.31 MicroJy IMAGR1: 41 Residual map points loaded IMAGR1: Field 2 min algorithm flux= -106.222 MicroJy iter= 3319 IMAGR1: Field 2 Clean flux density= 1.327 Jy 3319 comps IMAGR1: Total Cleaned flux density = 1.819 Jy 488226 comps IMAGR1: ALGSTB: All 182 Rows In AP (Max 267) IMAGR1: ALGSTB field 2 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 171- 0 Cells, with 165724 Pts IMAGR1: Field 1 min = -665.1 MicroJy,max = 665.7 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 105.08 MicroJy IMAGR1: 19893 Residual map points loaded IMAGR1: Field 1 min algorithm flux= -106.886 MicroJy iter= 492551 IMAGR1: Field 1 Clean flux density= 491.596 MilliJy 492551 comps IMAGR1: Total Cleaned flux density = 1.819 Jy 495870 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 165724 Pts IMAGR1: Field 1 min = -661.0 MicroJy,max = 659.4 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 103.95 MicroJy IMAGR1: 19869 Residual map points loaded IMAGR1: Field 1 min algorithm flux= -105.718 MicroJy iter= 500233 IMAGR1: Field 1 Clean flux density= 492.036 MilliJy 500233 comps IMAGR1: Total Cleaned flux density = 1.819 Jy 503552 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 165724 Pts IMAGR1: Field 2 min = -177.1 MicroJy,max = 139.8 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 103.94 MicroJy IMAGR1: 28 Residual map points loaded IMAGR1: Field 2 min Clean flux = 105.225 MicroJy iter= 3332 IMAGR1: Field 2 Clean flux density= 1.327 Jy 3332 comps IMAGR1: Total Cleaned flux density = 1.819 Jy 503565 comps IMAGR1: VISDFT: Begin DFT component subtraction IMAGR1: I Polarization model processed IMAGR1: Field 1 min = -657.1 MicroJy,max = 656.1 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 102.80 MicroJy IMAGR1: 19952 Residual map points loaded IMAGR1: Field 1 min Clean flux = 105.370 MicroJy iter= 506309 IMAGR1: Field 1 Clean flux density= 491.863 MilliJy 506309 comps IMAGR1: Total Cleaned flux density = 1.819 Jy 509641 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 165724 Pts IMAGR1: Peak residual in window 105.370 less than limit 105.371 MicroJy IMAGR1: Merging the Clean components files IMAGR1: Field 1 compressed from 506309 to 104521 components IMAGR1: Field 2 compressed from 3332 to 1263 components IMAGR1: Field 1 min = -656.0 MicroJy,max = 654.4 MicroJy IMAGR1: Field 2 min = -174.7 MicroJy,max = 141.9 MicroJy IMAGR1: Restoring Clean components IMAGR1: Restoring overlapped Clean components IMAGR1: Restore 93.332 MilliJy ( 1666 CCs) from field 1 to field 2 IMAGR1: Restore 1.327 Jy ( 1263 CCs) from field 2 to field 1 IMAGR1: Checking image max/min IMAGR1: Field 1 final Clean flux 1.819 Jy IMAGR1: Field 2 final Clean flux 1.421 Jy IMAGR1: Deleting UV work file: IMAGR1: Destroyed 1 extension files of type AN IMAGR1: Destroyed 1 extension files of type FQ IMAGR1: Destroyed UV image file: catno= 12 disk= 1 IMAGR1: Appears to have ended successfully IMAGR1: auto 31DEC06 TST: Cpu= 688.1 Real= 727 FC@3C286_X,BAND.0-1 >& /dev/null AIPS 1: Destroyed 1 extension files of type HI AIPS 1: Destroyed MA image file: catno= 9 disk= 1 AIPS 1: Destroyed 1 extension files of type HI AIPS 1: Destroyed MA image file: catno= 10 disk= 1 AIPS 1: Disk 1 in-CNO 11 renumbered as CNO 8 AIPS 1: Disk 1 in-CNO 12 renumbered as CNO 9 AIPS 1: ' ' AIPS 1: 'ESTIMATED RMS:' '0.01574 MILLI JANSKY' AIPS 1: SYSTEM command to be executed is: AIPS 1: rm -f /tmp/SETFC@HD167971_X,BAND.0-1 >& /dev/null AIPS 1: Waiting for returned adverbs AIPS 1: Resumes AIPS 1: SYSTEM command to be executed is: AIPS 1: cat /tmp/SETFC@HD167971_X,BAND.0-1 >> /home/auto/run/BB116_1999D AIPS 1: EC04_1.log.0 AIPS 1: ' NOW STARTING WITH SOURCE :2 =HD167971' AIPS 1: ' ' AIPS 1: Resumes AIPS 1: SYSTEM command to be executed is: AIPS 1: rm -f /tmp/SETFC@HD167971_X,BAND.0-1 >& /dev/null AIPS 1: Destroyed 1 extension files of type HI AIPS 1: Destroyed MA image file: catno= 11 disk= 1 AIPS 1: Destroyed 1 extension files of type HI AIPS 1: Destroyed MA image file: catno= 12 disk= 1 AIPS 1: Disk 1 in-CNO 13 renumbered as CNO 10 AIPS 1: Disk 1 in-CNO 14 renumbered as CNO 11 AIPS 1: ' ' AIPS 1: 'ESTIMATED RMS:' '0.01756 MILLI JANSKY' AIPS 1: SYSTEM command to be executed is: AIPS 1: rm -f /tmp/SETFC@1819-096_X,BAND.0-1 >& /dev/null AIPS 1: Waiting for returned adverbs AIPS 1: Resumes AIPS 1: SYSTEM command to be executed is: AIPS 1: cat /tmp/SETFC@1819-096_X,BAND.0-1 >> /home/auto/run/BB116_1999D AIPS 1: EC04_1.log.0 AIPS 1: ' NOW STARTING WITH SOURCE :3 =1819-096' AIPS 1: ' ' AIPS 1: Resumes AIPS 1: SYSTEM command to be executed is: AIPS 1: rm -f /tmp/SETFC@1819-096_X,BAND.0-1 >& /dev/null AIPS 1: Destroyed 1 extension files of type HI AIPS 1: Destroyed MA image file: catno= 13 disk= 1 AIPS 1: Destroyed 1 extension files of type HI AIPS 1: Destroyed MA image file: catno= 14 disk= 1 AIPS 1: Disk 1 in-CNO 15 renumbered as CNO 12 AIPS 1: Disk 1 in-CNO 16 renumbered as CNO 13 AIPS 1: ' ' AIPS 1: 'ESTIMATED RMS:' '0.01744 MILLI JANSKY' AIPS 1: SYSTEM command to be executed is: AIPS 1: rm -f /tmp/SETFC@CYGOB2N9_X,BAND.0-1 >& /dev/null SETFC1: Task SETFC (release of 31DEC06) begins SETFC1: Found CYGOB2N9 X BAND Seq 1 Disk: 1 in slot 6 SETFC1: SETCEL: recommends IMSIZE 1458 CELLSIZE 0.22014 SETFC1: SETCEL: returns IMSIZE 2048 CELLSIZE 0.22014 SETFC1: ZTXOP2: using translated file name = SETFC1: ZTXOP2: /tmp/SETFC@CYGOB2N9_X,BAND.0-1 SETFC1: FLYEYE added 1 fields to BOXFILE to 0.000 deg SETFC1: WARNING: THIS MAY NOT COVER THE DESIRED AREA SETFC1: Searching catalog between 0.00 and 0.13 degrees radius SETFC1: ZTXOP2: using translated file name = SETFC1: ZTXOP2: /home/auto/aips/TEXT/STARS/NV00.0030 SETFC1: Field RA Dec Flux Beam Sep SETFC1: 2 20:33:07.22 41:16:33.6 0.117 0.791 0.026 SETFC1: Add NVSS: wrote 1 fields to BOXFILE SETFC1: The Sun is 82.8 deg away - ignoring SETFC1: First field number written was 1 SETFC1: Highest field number written was 2 SETFC1: returns adverbs to AIPS SETFC1: Appears to have ended successfully SETFC1: auto 31DEC06 TST: Cpu= 1.6 Real= 1 C 1 2036 2036 20 33 10.74 41 15 08.2 00001 -1 1019 1024 1025 C 2 246 246 20 33 07.22 41 16 33.6 00002 -1 100 128 129 FC@3C286_X,BAND.0-1 >& /dev/null AIPS 1: Destroyed 1 extension files of type HI AIPS 1: Destroyed MA image file: catno= 9 disk= 1 AIPS 1: Destroyed 1 extension files of type HI AIPS 1: Destroyed MA image file: catno= 10 disk= 1 AIPS 1: Disk 1 in-CNO 11 renumbered as CNO 8 AIPS 1: Disk 1 in-CNO 12 renumbered as CNO 9 AIPS 1: ' ' AIPS 1: 'ESTIMATED RMS:' '0.01574 MILLI JANSKY' AIPS 1: SYSTEM command to be executed is: AIPS 1: rm -f /tmp/SETFC@HD167971_X,BAND.0-1 >& /dev/null AIPS 1: Waiting for returned adverbs AIPS 1: Resumes AIPS 1: SYSTEM command to be executed is: AIPS 1: cat /tmp/SETFC@HD167971_X,BAND.0-1 >> /home/auto/run/BB116_1999D AIPS 1: EC04_1.log.0 AIPS 1: ' NOW STARTING WITH SOURCE :2 =HD167971' AIPS 1: ' ' AIPS 1: Resumes AIPS 1: SYSTEM command to be executed is: AIPS 1: rm -f /tmp/SETFC@HD167971_X,BAND.0-1 >& /dev/null AIPS 1: Destroyed 1 extension files of type HI AIPS 1: Destroyed MA image file: catno= 11 disk= 1 AIPS 1: Destroyed 1 extension files of type HI AIPS 1: Destroyed MA image file: catno= 12 disk= 1 AIPS 1: Disk 1 in-CNO 13 renumbered as CNO 10 AIPS 1: Disk 1 in-CNO 14 renumbered as CNO 11 AIPS 1: ' ' AIPS 1: 'ESTIMATED RMS:' '0.01756 MILLI JANSKY' AIPS 1: SYSTEM command to be executed is: AIPS 1: rm -f /tmp/SETFC@1819-096_X,BAND.0-1 >& /dev/null AIPS 1: Waiting for returned adverbs AIPS 1: Resumes AIPS 1: SYSTEM command to be executed is: AIPS 1: cat /tmp/SETFC@1819-096_X,BAND.0-1 >> /home/auto/run/BB116_1999D AIPS 1: EC04_1.log.0 AIPS 1: ' NOW STARTING WITH SOURCE :3 =1819-096' AIPS 1: ' ' AIPS 1: Resumes AIPS 1: SYSTEM command to be executed is: AIPS 1: rm -f /tmp/SETFC@1819-096_X,BAND.0-1 >& /dev/null AIPS 1: Destroyed 1 extension files of type HI AIPS 1: Destroyed MA image file: catno= 13 disk= 1 AIPS 1: Destroyed 1 extension files of type HI AIPS 1: Destroyed MA image file: catno= 14 disk= 1 AIPS 1: Disk 1 in-CNO 15 renumbered as CNO 12 AIPS 1: Disk 1 in-CNO 16 renumbered as CNO 13 AIPS 1: ' ' AIPS 1: 'ESTIMATED RMS:' '0.01744 MILLI JANSKY' AIPS 1: SYSTEM command to be executed is: AIPS 1: rm -f /tmp/SETFC@CYGOB2N9_X,BAND.0-1 >& /dev/null AIPS 1: Waiting for returned adverbs AIPS 1: Resumes AIPS 1: SYSTEM command to be executed is: AIPS 1: cat /tmp/SETFC@CYGOB2N9_X,BAND.0-1 >> /home/auto/run/BB116_1999D AIPS 1: EC04_1.log.0 AIPS 1: ' NOW STARTING WITH SOURCE :4 =CYGOB2N9' AIPS 1: ' ' IMAGR1: Task IMAGR (release of 31DEC06) begins IMAGR1: ZTXOP2: using translated file name = IMAGR1: ZTXOP2: /tmp/SETFC@CYGOB2N9_X,BAND.0-1 IMAGR1: FIELDF: Final field parameters and # read are: IMAGR1: Field 1 2036 2036 5.0747E-02 -2.1000E-02 0 IMAGR1: Field 2 246 246 -3.9645E+01 8.5379E+01 0 IMAGR1: ZTXOP2: using translated file name = IMAGR1: ZTXOP2: /tmp/SETFC@CYGOB2N9_X,BAND.0-1 IMAGR1: WINDF: Number of clean boxes/field read as follows: IMAGR1: Field 01: 1 Field 02: 1 IMAGR1: Create CYGOB2N9 .IMAGR . 1 (UV) on disk 1 cno 14 IMAGR1: Beginning channel 1 through 1 with 2 IFs IMAGR1: IMACPY: Copied 168139 visibilities to be imaged IMAGR1: **** WARNING data included out of inner portion of UV plane **** IMAGR1: **** Watch for high-frequency & other poor cleaning effects **** IMAGR1: UVWAIT: begin finding uniform weights IMAGR1: UVWAIT: Average grid weight 7.287E+04 IMAGR1: UVWAIT: Adding temperance S 1.457E+04 IMAGR1: UVWAIT: begin applying uniform or other weights IMAGR1: UVWAIT: Sum of weights in 1.794E+09 and out 2.456E+09 IMAGR1: UVWAIT: Noise is increased by a factor 1.136 due to weighting IMAGR1: UVWAIT: Average summed weight 7.288E+04 over 335578 vis IMAGR1: Create CYGOB2N9 .IBM001. 1 (MA) on disk 1 cno 15 IMAGR1: Create CYGOB2N9 .IBM002. 1 (MA) on disk 1 cno 16 IMAGR1: Create CYGOB2N9 .ICL001. 1 (MA) on disk 1 cno 17 IMAGR1: Create CYGOB2N9 .ICL002. 1 (MA) on disk 1 cno 18 IMAGR1: GRDFLT: X and Y convolution type = SPHEROIDAL IMAGR1: GRDFLT: X and Y parms = 3.0000 1.0000 IMAGR1: GRDFLT: convolution function sampled every 1/100 of a cell IMAGR1: GRDMEM: Ave 2 Channels; 8.414900E+09 to 8.414900E+09 Hz IMAGR1: Field 1 Sum of gridding weights = 2.60768E+10 IMAGR1: Field 1 Beam min = -51.4 MilliJy, max = 1.0 Jy IMAGR1: Field 1 fit FWHM = 763.891 x 705.070 Milliarcsec, PA= -40.9 IMAGR1: Field 2 Sum of gridding weights = 2.60771E+10 IMAGR1: Field 2 Beam min = -51.3 MilliJy, max = 1.0 Jy IMAGR1: Field 2 fit FWHM = 763.958 x 705.061 Milliarcsec, PA= -40.9 IMAGR1: CLBHIS: minimum component 0.090 of current peak IMAGR1: Field 1 min = -133.1 MicroJy,max = 1.3 MilliJy IMAGR1: Field 2 min = -127.4 MicroJy,max = 103.6 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 64.42 MicroJy IMAGR1: 19680 Residual map points loaded IMAGR1: Field 1 min algorithm flux= 315.721 MicroJy iter= 15 IMAGR1: Field 1 Clean flux density= 1.050 MilliJy 15 comps IMAGR1: Total Cleaned flux density = 1.050 MilliJy 15 comps IMAGR1: SETDO3: imaging done with multiple tangent planes IMAGR1: VISDFT: Begin DFT component subtraction IMAGR1: VISDFT: Model components of type Point IMAGR1: I Polarization model processed IMAGR1: Field 1 min = -130.4 MicroJy,max = 311.6 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 62.56 MicroJy IMAGR1: 19731 Residual map points loaded IMAGR1: Field 1 min algorithm flux= 126.014 MicroJy iter= 38 IMAGR1: Field 1 Clean flux density= 1.510 MilliJy 38 comps IMAGR1: Total Cleaned flux density = 1.510 MilliJy 38 comps IMAGR1: VISDFT: Begin DFT component subtraction IMAGR1: I Polarization model processed IMAGR1: Field 2 min = -116.1 MicroJy,max = 102.3 MicroJy IMAGR1: TRY ANOTHER FIELD: this is 1.113E-04 < Second best 1.201E-04 IMAGR1: Field 1 min = -129.5 MicroJy,max = 166.3 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 62.31 MicroJy IMAGR1: 19794 Residual map points loaded IMAGR1: Field 1 min Clean flux = -104.552 MicroJy iter= 58 IMAGR1: Field 1 Clean flux density= 1.555 MilliJy 58 comps IMAGR1: Total Cleaned flux density = 1.555 MilliJy 58 comps IMAGR1: VISDFT: Begin DFT component subtraction IMAGR1: I Polarization model processed IMAGR1: Field 2 min = -109.6 MicroJy,max = 102.0 MicroJy IMAGR1: CLRHIS: NO FIELDS THIS PASS ABOVE MINIMUM FLUX IMAGR1: CLEAN NO IMAGE PIXELS - TRY AGAIN IMAGR1: Merging the Clean components files IMAGR1: Field 1 compressed from 58 to 21 components IMAGR1: Field 2 compressed from 0 to 0 components IMAGR1: Field 1 min = -129.2 MicroJy,max = 166.7 MicroJy IMAGR1: Field 2 min = -109.6 MicroJy,max = 102.0 MicroJy IMAGR1: Restoring Clean components IMAGR1: Restoring overlapped Clean components IMAGR1: Restore -22.001 MicroJy ( 2 CCs) from field 1 to field 2 IMAGR1: Checking image max/min IMAGR1: Field 1 final Clean flux 1.555 MilliJy IMAGR1: Field 2 final Clean flux -22.001 MicroJy IMAGR1: Deleting UV work file: IMAGR1: Destroyed 1 extension files of type AN IMAGR1: Destroyed 1 extension files of type FQ IMAGR1: Destroyed UV image file: catno= 14 disk= 1 IMAGR1: Appears to have ended successfully IMAGR1: auto 31DEC06 TST: Cpu= 16.0 Real= 17 FC@3C286_X,BAND.0-1 >& /dev/null AIPS 1: Destroyed 1 extension files of type HI AIPS 1: Destroyed MA image file: catno= 9 disk= 1 AIPS 1: Destroyed 1 extension files of type HI AIPS 1: Destroyed MA image file: catno= 10 disk= 1 AIPS 1: Disk 1 in-CNO 11 renumbered as CNO 8 AIPS 1: Disk 1 in-CNO 12 renumbered as CNO 9 AIPS 1: ' ' AIPS 1: 'ESTIMATED RMS:' '0.01574 MILLI JANSKY' AIPS 1: SYSTEM command to be executed is: AIPS 1: rm -f /tmp/SETFC@HD167971_X,BAND.0-1 >& /dev/null AIPS 1: Waiting for returned adverbs AIPS 1: Resumes AIPS 1: SYSTEM command to be executed is: AIPS 1: cat /tmp/SETFC@HD167971_X,BAND.0-1 >> /home/auto/run/BB116_1999D AIPS 1: EC04_1.log.0 AIPS 1: ' NOW STARTING WITH SOURCE :2 =HD167971' AIPS 1: ' ' AIPS 1: Resumes AIPS 1: SYSTEM command to be executed is: AIPS 1: rm -f /tmp/SETFC@HD167971_X,BAND.0-1 >& /dev/null AIPS 1: Destroyed 1 extension files of type HI AIPS 1: Destroyed MA image file: catno= 11 disk= 1 AIPS 1: Destroyed 1 extension files of type HI AIPS 1: Destroyed MA image file: catno= 12 disk= 1 AIPS 1: Disk 1 in-CNO 13 renumbered as CNO 10 AIPS 1: Disk 1 in-CNO 14 renumbered as CNO 11 AIPS 1: ' ' AIPS 1: 'ESTIMATED RMS:' '0.01756 MILLI JANSKY' AIPS 1: SYSTEM command to be executed is: AIPS 1: rm -f /tmp/SETFC@1819-096_X,BAND.0-1 >& /dev/null AIPS 1: Waiting for returned adverbs AIPS 1: Resumes AIPS 1: SYSTEM command to be executed is: AIPS 1: cat /tmp/SETFC@1819-096_X,BAND.0-1 >> /home/auto/run/BB116_1999D AIPS 1: EC04_1.log.0 AIPS 1: ' NOW STARTING WITH SOURCE :3 =1819-096' AIPS 1: ' ' AIPS 1: Resumes AIPS 1: SYSTEM command to be executed is: AIPS 1: rm -f /tmp/SETFC@1819-096_X,BAND.0-1 >& /dev/null AIPS 1: Destroyed 1 extension files of type HI AIPS 1: Destroyed MA image file: catno= 13 disk= 1 AIPS 1: Destroyed 1 extension files of type HI AIPS 1: Destroyed MA image file: catno= 14 disk= 1 AIPS 1: Disk 1 in-CNO 15 renumbered as CNO 12 AIPS 1: Disk 1 in-CNO 16 renumbered as CNO 13 AIPS 1: ' ' AIPS 1: 'ESTIMATED RMS:' '0.01744 MILLI JANSKY' AIPS 1: SYSTEM command to be executed is: AIPS 1: rm -f /tmp/SETFC@CYGOB2N9_X,BAND.0-1 >& /dev/null AIPS 1: Waiting for returned adverbs AIPS 1: Resumes AIPS 1: SYSTEM command to be executed is: AIPS 1: cat /tmp/SETFC@CYGOB2N9_X,BAND.0-1 >> /home/auto/run/BB116_1999D AIPS 1: EC04_1.log.0 AIPS 1: ' NOW STARTING WITH SOURCE :4 =CYGOB2N9' AIPS 1: ' ' AIPS 1: Resumes AIPS 1: SYSTEM command to be executed is: AIPS 1: rm -f /tmp/SETFC@CYGOB2N9_X,BAND.0-1 >& /dev/null AIPS 1: Destroyed 1 extension files of type HI AIPS 1: Destroyed MA image file: catno= 15 disk= 1 AIPS 1: Destroyed 1 extension files of type HI AIPS 1: Destroyed MA image file: catno= 16 disk= 1 AIPS 1: Disk 1 in-CNO 17 renumbered as CNO 14 AIPS 1: Disk 1 in-CNO 18 renumbered as CNO 15 AIPS 1: ' ' AIPS 1: 'ESTIMATED RMS:' '0.02002 MILLI JANSKY' AIPS 1: SYSTEM command to be executed is: AIPS 1: rm -f /tmp/SETFC@2005+403_X,BAND.0-1 >& /dev/null SETFC1: Task SETFC (release of 31DEC06) begins SETFC1: Found 2005+403 X BAND Seq 1 Disk: 1 in slot 7 SETFC1: SETCEL: recommends IMSIZE 1458 CELLSIZE 0.22013 SETFC1: SETCEL: returns IMSIZE 2048 CELLSIZE 0.22013 SETFC1: ZTXOP2: using translated file name = SETFC1: ZTXOP2: /tmp/SETFC@2005+403_X,BAND.0-1 SETFC1: FLYEYE added 1 fields to BOXFILE to 0.000 deg SETFC1: WARNING: THIS MAY NOT COVER THE DESIRED AREA SETFC1: Searching catalog between 0.00 and 0.13 degrees radius SETFC1: ZTXOP2: using translated file name = SETFC1: ZTXOP2: /home/auto/aips/TEXT/STARS/NV00.0030 SETFC1: Field RA Dec Flux Beam Sep SETFC1: 2 20:07:44.96 40:29:48.4 2.471 1.000 0.000 SETFC1: Add NVSS: wrote 1 fields to BOXFILE SETFC1: The Sun is 78.7 deg away - ignoring SETFC1: First field number written was 1 SETFC1: Highest field number written was 2 SETFC1: returns adverbs to AIPS SETFC1: Appears to have ended successfully SETFC1: auto 31DEC06 TST: Cpu= 1.5 Real= 2 C 1 2036 2036 20 07 44.94 40 29 48.6 00001 -1 1019 1024 1025 C 2 246 246 20 07 44.96 40 29 48.4 00002 -1 100 128 129 FC@3C286_X,BAND.0-1 >& /dev/null AIPS 1: Destroyed 1 extension files of type HI AIPS 1: Destroyed MA image file: catno= 9 disk= 1 AIPS 1: Destroyed 1 extension files of type HI AIPS 1: Destroyed MA image file: catno= 10 disk= 1 AIPS 1: Disk 1 in-CNO 11 renumbered as CNO 8 AIPS 1: Disk 1 in-CNO 12 renumbered as CNO 9 AIPS 1: ' ' AIPS 1: 'ESTIMATED RMS:' '0.01574 MILLI JANSKY' AIPS 1: SYSTEM command to be executed is: AIPS 1: rm -f /tmp/SETFC@HD167971_X,BAND.0-1 >& /dev/null AIPS 1: Waiting for returned adverbs AIPS 1: Resumes AIPS 1: SYSTEM command to be executed is: AIPS 1: cat /tmp/SETFC@HD167971_X,BAND.0-1 >> /home/auto/run/BB116_1999D AIPS 1: EC04_1.log.0 AIPS 1: ' NOW STARTING WITH SOURCE :2 =HD167971' AIPS 1: ' ' AIPS 1: Resumes AIPS 1: SYSTEM command to be executed is: AIPS 1: rm -f /tmp/SETFC@HD167971_X,BAND.0-1 >& /dev/null AIPS 1: Destroyed 1 extension files of type HI AIPS 1: Destroyed MA image file: catno= 11 disk= 1 AIPS 1: Destroyed 1 extension files of type HI AIPS 1: Destroyed MA image file: catno= 12 disk= 1 AIPS 1: Disk 1 in-CNO 13 renumbered as CNO 10 AIPS 1: Disk 1 in-CNO 14 renumbered as CNO 11 AIPS 1: ' ' AIPS 1: 'ESTIMATED RMS:' '0.01756 MILLI JANSKY' AIPS 1: SYSTEM command to be executed is: AIPS 1: rm -f /tmp/SETFC@1819-096_X,BAND.0-1 >& /dev/null AIPS 1: Waiting for returned adverbs AIPS 1: Resumes AIPS 1: SYSTEM command to be executed is: AIPS 1: cat /tmp/SETFC@1819-096_X,BAND.0-1 >> /home/auto/run/BB116_1999D AIPS 1: EC04_1.log.0 AIPS 1: ' NOW STARTING WITH SOURCE :3 =1819-096' AIPS 1: ' ' AIPS 1: Resumes AIPS 1: SYSTEM command to be executed is: AIPS 1: rm -f /tmp/SETFC@1819-096_X,BAND.0-1 >& /dev/null AIPS 1: Destroyed 1 extension files of type HI AIPS 1: Destroyed MA image file: catno= 13 disk= 1 AIPS 1: Destroyed 1 extension files of type HI AIPS 1: Destroyed MA image file: catno= 14 disk= 1 AIPS 1: Disk 1 in-CNO 15 renumbered as CNO 12 AIPS 1: Disk 1 in-CNO 16 renumbered as CNO 13 AIPS 1: ' ' AIPS 1: 'ESTIMATED RMS:' '0.01744 MILLI JANSKY' AIPS 1: SYSTEM command to be executed is: AIPS 1: rm -f /tmp/SETFC@CYGOB2N9_X,BAND.0-1 >& /dev/null AIPS 1: Waiting for returned adverbs AIPS 1: Resumes AIPS 1: SYSTEM command to be executed is: AIPS 1: cat /tmp/SETFC@CYGOB2N9_X,BAND.0-1 >> /home/auto/run/BB116_1999D AIPS 1: EC04_1.log.0 AIPS 1: ' NOW STARTING WITH SOURCE :4 =CYGOB2N9' AIPS 1: ' ' AIPS 1: Resumes AIPS 1: SYSTEM command to be executed is: AIPS 1: rm -f /tmp/SETFC@CYGOB2N9_X,BAND.0-1 >& /dev/null AIPS 1: Destroyed 1 extension files of type HI AIPS 1: Destroyed MA image file: catno= 15 disk= 1 AIPS 1: Destroyed 1 extension files of type HI AIPS 1: Destroyed MA image file: catno= 16 disk= 1 AIPS 1: Disk 1 in-CNO 17 renumbered as CNO 14 AIPS 1: Disk 1 in-CNO 18 renumbered as CNO 15 AIPS 1: ' ' AIPS 1: 'ESTIMATED RMS:' '0.02002 MILLI JANSKY' AIPS 1: SYSTEM command to be executed is: AIPS 1: rm -f /tmp/SETFC@2005+403_X,BAND.0-1 >& /dev/null AIPS 1: Waiting for returned adverbs AIPS 1: Resumes AIPS 1: SYSTEM command to be executed is: AIPS 1: cat /tmp/SETFC@2005+403_X,BAND.0-1 >> /home/auto/run/BB116_1999D AIPS 1: EC04_1.log.0 AIPS 1: ' NOW STARTING WITH SOURCE :5 =2005+403' AIPS 1: ' ' IMAGR1: Task IMAGR (release of 31DEC06) begins IMAGR1: ZTXOP2: using translated file name = IMAGR1: ZTXOP2: /tmp/SETFC@2005+403_X,BAND.0-1 IMAGR1: FIELDF: Final field parameters and # read are: IMAGR1: Field 1 2036 2036 -5.4752E-02 -4.0000E-03 0 IMAGR1: Field 2 246 246 1.7338E-01 -2.0400E-01 0 IMAGR1: ZTXOP2: using translated file name = IMAGR1: ZTXOP2: /tmp/SETFC@2005+403_X,BAND.0-1 IMAGR1: WINDF: Number of clean boxes/field read as follows: IMAGR1: Field 01: 1 Field 02: 1 IMAGR1: Create 2005+403 .IMAGR . 1 (UV) on disk 1 cno 16 IMAGR1: Beginning channel 1 through 1 with 2 IFs IMAGR1: IMACPY: Copied 127480 visibilities to be imaged IMAGR1: **** WARNING data included out of inner portion of UV plane **** IMAGR1: **** Watch for high-frequency & other poor cleaning effects **** IMAGR1: UVWAIT: begin finding uniform weights IMAGR1: UVWAIT: Average grid weight 5.980E+04 IMAGR1: UVWAIT: Adding temperance S 1.196E+04 IMAGR1: UVWAIT: begin applying uniform or other weights IMAGR1: UVWAIT: Sum of weights in 1.334E+09 and out 1.793E+09 IMAGR1: UVWAIT: Noise is increased by a factor 1.135 due to weighting IMAGR1: UVWAIT: Average summed weight 5.980E+04 over 254502 vis IMAGR1: Create 2005+403 .IBM001. 1 (MA) on disk 1 cno 17 IMAGR1: Create 2005+403 .IBM002. 1 (MA) on disk 1 cno 18 IMAGR1: Create 2005+403 .ICL001. 1 (MA) on disk 1 cno 19 IMAGR1: Create 2005+403 .ICL002. 1 (MA) on disk 1 cno 20 IMAGR1: GRDFLT: X and Y convolution type = SPHEROIDAL IMAGR1: GRDFLT: X and Y parms = 3.0000 1.0000 IMAGR1: GRDFLT: convolution function sampled every 1/100 of a cell IMAGR1: GRDMEM: Ave 2 Channels; 8.414900E+09 to 8.414900E+09 Hz IMAGR1: Field 1 Sum of gridding weights = 1.90320E+10 IMAGR1: Field 1 Beam min = -55.2 MilliJy, max = 1.0 Jy IMAGR1: Field 1 fit FWHM = 793.882 x 724.528 Milliarcsec, PA= -58.1 IMAGR1: Field 2 Sum of gridding weights = 1.90322E+10 IMAGR1: Field 2 Beam min = -55.2 MilliJy, max = 1.0 Jy IMAGR1: Field 2 fit FWHM = 793.882 x 724.529 Milliarcsec, PA= -58.2 IMAGR1: CLBHIS: minimum component 0.101 of current peak IMAGR1: Field 1 min = -123.6 MilliJy,max = 2.1 Jy IMAGR1: Field 2 min = -123.1 MilliJy,max = 2.2 Jy IMAGR1: BGC Clean: using 509 cell beam + residuals > 40.41 MilliJy IMAGR1: 1348 Residual map points loaded IMAGR1: Field 2 min algorithm flux= 270.781 MilliJy iter= 22 IMAGR1: Field 2 Clean flux density= 1.976 Jy 22 comps IMAGR1: Total Cleaned flux density = 1.976 Jy 22 comps IMAGR1: SETDO3: imaging done with multiple tangent planes IMAGR1: ALGSTB: All 182 Rows In AP (Max 267) IMAGR1: ALGSTB field 2 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 171- 0 Cells, with 127480 Pts IMAGR1: Field 1 min = -17.0 MilliJy,max = 253.8 MilliJy IMAGR1: TRY ANOTHER FIELD: this is 2.412E-01 < Second best 2.573E-01 IMAGR1: Field 2 min = -17.1 MilliJy,max = 249.3 MilliJy IMAGR1: BGC Clean: using 509 cell beam + residuals > 5.08 MilliJy IMAGR1: 1405 Residual map points loaded IMAGR1: Field 2 min allowed flux = 24.678 MilliJy iter= 75 IMAGR1: Field 2 Clean flux density= 2.210 Jy 75 comps IMAGR1: Total Cleaned flux density = 2.210 Jy 75 comps IMAGR1: ALGSTB: All 182 Rows In AP (Max 267) IMAGR1: ALGSTB field 2 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 171- 0 Cells, with 127480 Pts IMAGR1: Field 1 min = -28.3 MilliJy,max = 24.2 MilliJy IMAGR1: BGC Clean: using 2043 cell beam + residuals > 4.76 MilliJy IMAGR1: 60 Residual map points loaded IMAGR1: Field 1 min algorithm flux= -9.727 MilliJy iter= 95 IMAGR1: Field 1 Clean flux density= -32.860 MilliJy 95 comps IMAGR1: Total Cleaned flux density = 2.177 Jy 170 comps IMAGR1: VISDFT: Begin DFT component subtraction IMAGR1: VISDFT: Model components of type Point IMAGR1: I Polarization model processed IMAGR1: Field 2 min = -9.8 MilliJy,max = 9.8 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 1.29 MilliJy IMAGR1: 661 Residual map points loaded IMAGR1: Field 2 min algorithm flux= -3.309 MilliJy iter= 500 IMAGR1: Field 2 Clean flux density= 2.214 Jy 500 comps IMAGR1: Total Cleaned flux density = 2.181 Jy 595 comps IMAGR1: ALGSTB: All 182 Rows In AP (Max 267) IMAGR1: ALGSTB field 2 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 171- 0 Cells, with 127480 Pts IMAGR1: Field 1 min = -4.4 MilliJy,max = 3.5 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 772.10 MicroJy IMAGR1: 17001 Residual map points loaded IMAGR1: Field 1 min algorithm flux= -1.490 MilliJy iter= 696 IMAGR1: Field 1 Clean flux density= -34.875 MilliJy 696 comps IMAGR1: Total Cleaned flux density = 2.179 Jy 1196 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 127480 Pts IMAGR1: Field 2 min = -1.5 MilliJy,max = 1.8 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 757.15 MicroJy IMAGR1: 182 Residual map points loaded IMAGR1: Field 2 min algorithm flux= 1.027 MilliJy iter= 972 IMAGR1: Field 2 Clean flux density= 2.216 Jy 972 comps IMAGR1: Total Cleaned flux density = 2.181 Jy 1668 comps IMAGR1: ALGSTB: All 182 Rows In AP (Max 267) IMAGR1: ALGSTB field 2 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 171- 0 Cells, with 127480 Pts IMAGR1: Field 1 min = -1.7 MilliJy,max = 1.7 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 688.00 MicroJy IMAGR1: 19717 Residual map points loaded IMAGR1: Field 1 min algorithm flux= -973.386 MicroJy iter= 1502 IMAGR1: Field 1 Clean flux density= -20.361 MilliJy 1502 comps IMAGR1: Total Cleaned flux density = 2.195 Jy 2474 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 127480 Pts IMAGR1: Field 2 min = -984.6 MicroJy,max = 961.4 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 687.42 MicroJy IMAGR1: 149 Residual map points loaded IMAGR1: Field 2 min algorithm flux= 791.114 MicroJy iter= 1365 IMAGR1: Field 2 Clean flux density= 2.216 Jy 1365 comps IMAGR1: Total Cleaned flux density = 2.196 Jy 2867 comps IMAGR1: ALGSTB: All 182 Rows In AP (Max 267) IMAGR1: ALGSTB field 2 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 171- 0 Cells, with 127480 Pts IMAGR1: Field 1 min = -1.7 MilliJy,max = 1.7 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 669.63 MicroJy IMAGR1: 19816 Residual map points loaded IMAGR1: Field 1 min algorithm flux= -880.768 MicroJy iter= 2547 IMAGR1: Field 1 Clean flux density= -7.723 MilliJy 2547 comps IMAGR1: Total Cleaned flux density = 2.208 Jy 3912 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 127480 Pts IMAGR1: Field 1 min = -1.7 MilliJy,max = 1.7 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 657.74 MicroJy IMAGR1: 19802 Residual map points loaded IMAGR1: Field 1 min algorithm flux= 831.036 MicroJy iter= 3710 IMAGR1: Field 1 Clean flux density= 825.752 MicroJy 3710 comps IMAGR1: Total Cleaned flux density = 2.217 Jy 5075 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 127480 Pts IMAGR1: Field 1 min = -1.7 MilliJy,max = 1.7 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 645.91 MicroJy IMAGR1: 19779 Residual map points loaded IMAGR1: Field 1 min algorithm flux= 791.717 MicroJy iter= 4976 IMAGR1: Field 1 Clean flux density= 6.018 MilliJy 4976 comps IMAGR1: Total Cleaned flux density = 2.222 Jy 6341 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 127480 Pts IMAGR1: Field 1 min = -1.7 MilliJy,max = 1.7 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 634.88 MicroJy IMAGR1: 19769 Residual map points loaded IMAGR1: Field 1 min algorithm flux= -759.755 MicroJy iter= 6334 IMAGR1: Field 1 Clean flux density= 13.107 MilliJy 6334 comps IMAGR1: Total Cleaned flux density = 2.229 Jy 7699 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 127480 Pts IMAGR1: Field 2 min = -781.6 MicroJy,max = 769.5 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 634.49 MicroJy IMAGR1: 99 Residual map points loaded IMAGR1: Field 2 min algorithm flux= 654.202 MicroJy iter= 1602 IMAGR1: Field 2 Clean flux density= 2.216 Jy 1602 comps IMAGR1: Total Cleaned flux density = 2.229 Jy 7936 comps IMAGR1: ALGSTB: All 182 Rows In AP (Max 267) IMAGR1: ALGSTB field 2 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 171- 0 Cells, with 127480 Pts IMAGR1: Field 1 min = -1.7 MilliJy,max = 1.7 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 620.89 MicroJy IMAGR1: 19873 Residual map points loaded IMAGR1: Field 1 min algorithm flux= -729.636 MicroJy iter= 7831 IMAGR1: Field 1 Clean flux density= 19.136 MilliJy 7831 comps IMAGR1: Total Cleaned flux density = 2.235 Jy 9433 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 127480 Pts IMAGR1: Field 1 min = -1.7 MilliJy,max = 1.7 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 610.08 MicroJy IMAGR1: 19854 Residual map points loaded IMAGR1: Field 1 min algorithm flux= 704.663 MicroJy iter= 9388 IMAGR1: Field 1 Clean flux density= 26.705 MilliJy 9388 comps IMAGR1: Total Cleaned flux density = 2.243 Jy 10990 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 127480 Pts IMAGR1: Field 1 min = -1.6 MilliJy,max = 1.7 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 599.18 MicroJy IMAGR1: 19854 Residual map points loaded IMAGR1: Field 1 min algorithm flux= -682.180 MicroJy iter= 10996 IMAGR1: Field 1 Clean flux density= 31.421 MilliJy 10996 comps IMAGR1: Total Cleaned flux density = 2.248 Jy 12598 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 127480 Pts IMAGR1: Field 1 min = -1.6 MilliJy,max = 1.7 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 588.64 MicroJy IMAGR1: 19838 Residual map points loaded IMAGR1: Field 1 min algorithm flux= 661.973 MicroJy iter= 12642 IMAGR1: Field 1 Clean flux density= 35.140 MilliJy 12642 comps IMAGR1: Total Cleaned flux density = 2.251 Jy 14244 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 127480 Pts IMAGR1: Field 1 min = -1.6 MilliJy,max = 1.6 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 577.91 MicroJy IMAGR1: 19821 Residual map points loaded IMAGR1: Field 1 min algorithm flux= -644.470 MicroJy iter= 14349 IMAGR1: Field 1 Clean flux density= 37.587 MilliJy 14349 comps IMAGR1: Total Cleaned flux density = 2.254 Jy 15951 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 127480 Pts IMAGR1: Field 2 min = -636.0 MicroJy,max = 665.7 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 577.55 MicroJy IMAGR1: 33 Residual map points loaded IMAGR1: Field 2 min algorithm flux= 579.055 MicroJy iter= 1631 IMAGR1: Field 2 Clean flux density= 2.216 Jy 1631 comps IMAGR1: Total Cleaned flux density = 2.254 Jy 15980 comps IMAGR1: ALGSTB: All 182 Rows In AP (Max 267) IMAGR1: ALGSTB field 2 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 171- 0 Cells, with 127480 Pts IMAGR1: Field 1 min = -1.6 MilliJy,max = 1.6 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 566.68 MicroJy IMAGR1: 19935 Residual map points loaded IMAGR1: Field 1 min algorithm flux= -627.188 MicroJy iter= 16121 IMAGR1: Field 1 Clean flux density= 46.085 MilliJy 16121 comps IMAGR1: Total Cleaned flux density = 2.262 Jy 17752 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 127480 Pts IMAGR1: Field 1 min = -1.6 MilliJy,max = 1.6 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 555.92 MicroJy IMAGR1: 19916 Residual map points loaded IMAGR1: Field 1 min algorithm flux= -610.926 MicroJy iter= 17934 IMAGR1: Field 1 Clean flux density= 53.338 MilliJy 17934 comps IMAGR1: Total Cleaned flux density = 2.269 Jy 19565 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 127480 Pts IMAGR1: Field 1 min = -1.5 MilliJy,max = 1.6 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 545.31 MicroJy IMAGR1: 19894 Residual map points loaded IMAGR1: Field 1 min algorithm flux= -595.673 MicroJy iter= 19795 IMAGR1: Field 1 Clean flux density= 51.014 MilliJy 19795 comps IMAGR1: Total Cleaned flux density = 2.267 Jy 21426 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 127480 Pts IMAGR1: Field 1 min = -1.5 MilliJy,max = 1.6 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 534.75 MicroJy IMAGR1: 19876 Residual map points loaded IMAGR1: Field 1 min algorithm flux= 581.090 MicroJy iter= 21697 IMAGR1: Field 1 Clean flux density= 55.571 MilliJy 21697 comps IMAGR1: Total Cleaned flux density = 2.272 Jy 23328 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 127480 Pts IMAGR1: Field 1 min = -1.5 MilliJy,max = 1.6 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 524.57 MicroJy IMAGR1: 19862 Residual map points loaded IMAGR1: Field 1 min algorithm flux= -567.869 MicroJy iter= 23669 IMAGR1: Field 1 Clean flux density= 57.607 MilliJy 23669 comps IMAGR1: Total Cleaned flux density = 2.274 Jy 25300 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 127480 Pts IMAGR1: Field 2 min = -577.7 MicroJy,max = 620.5 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 524.43 MicroJy IMAGR1: 13 Residual map points loaded IMAGR1: Field 2 min algorithm flux= 521.221 MicroJy iter= 1644 IMAGR1: Field 2 Clean flux density= 2.216 Jy 1644 comps IMAGR1: Total Cleaned flux density = 2.274 Jy 25313 comps IMAGR1: VISDFT: Begin DFT component subtraction IMAGR1: I Polarization model processed IMAGR1: Field 1 min = -1.5 MilliJy,max = 1.6 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 514.19 MicroJy IMAGR1: 19960 Residual map points loaded IMAGR1: Field 1 min algorithm flux= 554.668 MicroJy iter= 25701 IMAGR1: Field 1 Clean flux density= 58.653 MilliJy 25701 comps IMAGR1: Total Cleaned flux density = 2.275 Jy 27345 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 127480 Pts IMAGR1: Field 1 min = -1.5 MilliJy,max = 1.6 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 504.21 MicroJy IMAGR1: 19940 Residual map points loaded IMAGR1: Field 1 min algorithm flux= 542.222 MicroJy iter= 27798 IMAGR1: Field 1 Clean flux density= 58.502 MilliJy 27798 comps IMAGR1: Total Cleaned flux density = 2.275 Jy 29442 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 127480 Pts IMAGR1: Field 1 min = -1.4 MilliJy,max = 1.6 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 494.71 MicroJy IMAGR1: 19903 Residual map points loaded IMAGR1: Field 1 min algorithm flux= 530.606 MicroJy iter= 29969 IMAGR1: Field 1 Clean flux density= 57.783 MilliJy 29969 comps IMAGR1: Total Cleaned flux density = 2.274 Jy 31613 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) LOGFILE FOR USER **** GETTING LARGE: USE PRTMSG AND CLRMSG NOW! IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 127480 Pts IMAGR1: Field 1 min = -1.4 MilliJy,max = 1.6 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 485.25 MicroJy IMAGR1: 19884 Residual map points loaded IMAGR1: Field 1 min algorithm flux= -518.910 MicroJy iter= 32191 IMAGR1: Field 1 Clean flux density= 59.788 MilliJy 32191 comps IMAGR1: Total Cleaned flux density = 2.276 Jy 33835 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 127480 Pts IMAGR1: Field 2 min = -538.2 MicroJy,max = 604.4 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 485.13 MicroJy IMAGR1: 10 Residual map points loaded IMAGR1: Field 2 min algorithm flux= 484.727 MicroJy iter= 1652 IMAGR1: Field 2 Clean flux density= 2.216 Jy 1652 comps IMAGR1: Total Cleaned flux density = 2.276 Jy 33843 comps IMAGR1: VISDFT: Begin DFT component subtraction IMAGR1: I Polarization model processed IMAGR1: Field 1 min = -1.4 MilliJy,max = 1.6 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 475.79 MicroJy IMAGR1: 19946 Residual map points loaded IMAGR1: Field 1 min algorithm flux= 507.700 MicroJy iter= 34489 IMAGR1: Field 1 Clean flux density= 60.734 MilliJy 34489 comps IMAGR1: Total Cleaned flux density = 2.277 Jy 36141 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 127480 Pts IMAGR1: Field 1 min = -1.4 MilliJy,max = 1.6 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 466.34 MicroJy IMAGR1: 19939 Residual map points loaded IMAGR1: Field 1 min algorithm flux= 496.628 MicroJy iter= 36858 IMAGR1: Field 1 Clean flux density= 62.880 MilliJy 36858 comps IMAGR1: Total Cleaned flux density = 2.279 Jy 38510 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 127480 Pts IMAGR1: Field 1 min = -1.4 MilliJy,max = 1.6 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 457.42 MicroJy IMAGR1: 19928 Residual map points loaded IMAGR1: Field 1 min algorithm flux= -486.188 MicroJy iter= 39302 IMAGR1: Field 1 Clean flux density= 61.898 MilliJy 39302 comps IMAGR1: Total Cleaned flux density = 2.278 Jy 40954 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 127480 Pts IMAGR1: Field 1 min = -1.3 MilliJy,max = 1.5 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 448.69 MicroJy IMAGR1: 19919 Residual map points loaded IMAGR1: Field 1 min algorithm flux= -476.076 MicroJy iter= 41821 IMAGR1: Field 1 Clean flux density= 62.808 MilliJy 41821 comps IMAGR1: Total Cleaned flux density = 2.279 Jy 43473 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 127480 Pts IMAGR1: Field 2 min = -476.9 MicroJy,max = 589.5 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 448.62 MicroJy IMAGR1: 6 Residual map points loaded IMAGR1: Field 2 min algorithm flux= -448.579 MicroJy iter= 1658 IMAGR1: Field 2 Clean flux density= 2.216 Jy 1658 comps IMAGR1: Total Cleaned flux density = 2.279 Jy 43479 comps IMAGR1: VISDFT: Begin DFT component subtraction IMAGR1: I Polarization model processed IMAGR1: Field 1 min = -1.3 MilliJy,max = 1.6 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 440.00 MicroJy IMAGR1: 19950 Residual map points loaded IMAGR1: Field 1 min algorithm flux= 466.172 MicroJy iter= 44424 IMAGR1: Field 1 Clean flux density= 63.099 MilliJy 44424 comps IMAGR1: Total Cleaned flux density = 2.279 Jy 46082 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 127480 Pts IMAGR1: Field 1 min = -1.3 MilliJy,max = 1.5 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 431.41 MicroJy IMAGR1: 19934 Residual map points loaded IMAGR1: Field 1 min algorithm flux= -456.351 MicroJy iter= 47092 IMAGR1: Field 1 Clean flux density= 63.149 MilliJy 47092 comps IMAGR1: Total Cleaned flux density = 2.279 Jy 48750 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 127480 Pts IMAGR1: Field 1 min = -1.3 MilliJy,max = 1.5 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 423.22 MicroJy IMAGR1: 19933 Residual map points loaded IMAGR1: Field 1 min algorithm flux= 446.782 MicroJy iter= 49819 IMAGR1: Field 1 Clean flux density= 65.105 MilliJy 49819 comps IMAGR1: Total Cleaned flux density = 2.281 Jy 51477 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 127480 Pts IMAGR1: Field 2 min = -439.7 MicroJy,max = 535.2 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 423.18 MicroJy IMAGR1: 5 Residual map points loaded IMAGR1: Field 2 min algorithm flux= -400.660 MicroJy iter= 1663 IMAGR1: Field 2 Clean flux density= 2.216 Jy 1663 comps IMAGR1: Total Cleaned flux density = 2.281 Jy 51482 comps IMAGR1: VISDFT: Begin DFT component subtraction IMAGR1: I Polarization model processed IMAGR1: Field 1 min = -1.3 MilliJy,max = 1.5 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 414.97 MicroJy IMAGR1: 19955 Residual map points loaded IMAGR1: Field 1 min algorithm flux= 437.792 MicroJy iter= 52651 IMAGR1: Field 1 Clean flux density= 65.718 MilliJy 52651 comps IMAGR1: Total Cleaned flux density = 2.282 Jy 54314 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 127480 Pts IMAGR1: Field 1 min = -1.3 MilliJy,max = 1.5 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 406.78 MicroJy IMAGR1: 19945 Residual map points loaded IMAGR1: Field 1 min algorithm flux= 428.617 MicroJy iter= 55577 IMAGR1: Field 1 Clean flux density= 67.008 MilliJy 55577 comps IMAGR1: Total Cleaned flux density = 2.283 Jy 57240 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 127480 Pts IMAGR1: Field 1 min = -1.3 MilliJy,max = 1.5 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 398.91 MicroJy IMAGR1: 19945 Residual map points loaded IMAGR1: Field 1 min algorithm flux= -419.954 MicroJy iter= 58600 IMAGR1: Field 1 Clean flux density= 66.971 MilliJy 58600 comps IMAGR1: Total Cleaned flux density = 2.283 Jy 60263 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 127480 Pts IMAGR1: Field 1 min = -1.3 MilliJy,max = 1.5 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 391.26 MicroJy IMAGR1: 19924 Residual map points loaded IMAGR1: Field 1 min algorithm flux= 411.313 MicroJy iter= 61678 IMAGR1: Field 1 Clean flux density= 70.993 MilliJy 61678 comps IMAGR1: Total Cleaned flux density = 2.287 Jy 63341 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 127480 Pts IMAGR1: Field 1 min = -1.3 MilliJy,max = 1.4 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 383.66 MicroJy IMAGR1: 19901 Residual map points loaded IMAGR1: Field 1 min algorithm flux= 402.776 MicroJy iter= 64828 IMAGR1: Field 1 Clean flux density= 70.650 MilliJy 64828 comps IMAGR1: Total Cleaned flux density = 2.287 Jy 66491 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 127480 Pts IMAGR1: Field 1 min = -1.3 MilliJy,max = 1.4 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 376.43 MicroJy IMAGR1: 19891 Residual map points loaded IMAGR1: Field 1 min algorithm flux= 394.974 MicroJy iter= 68088 IMAGR1: Field 1 Clean flux density= 69.368 MilliJy 68088 comps IMAGR1: Total Cleaned flux density = 2.285 Jy 69751 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 127480 Pts IMAGR1: Field 2 min = -419.6 MicroJy,max = 508.0 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 376.39 MicroJy IMAGR1: 3 Residual map points loaded IMAGR1: Field 2 min algorithm flux= 375.887 MicroJy iter= 1666 IMAGR1: Field 2 Clean flux density= 2.216 Jy 1666 comps IMAGR1: Total Cleaned flux density = 2.285 Jy 69754 comps IMAGR1: VISDFT: Begin DFT component subtraction IMAGR1: I Polarization model processed IMAGR1: Field 1 min = -1.3 MilliJy,max = 1.4 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 369.12 MicroJy IMAGR1: 19943 Residual map points loaded IMAGR1: Field 1 min algorithm flux= 387.000 MicroJy iter= 71447 IMAGR1: Field 1 Clean flux density= 72.025 MilliJy 71447 comps IMAGR1: Total Cleaned flux density = 2.288 Jy 73113 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 127480 Pts IMAGR1: Field 1 min = -1.3 MilliJy,max = 1.4 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 361.88 MicroJy IMAGR1: 19917 Residual map points loaded IMAGR1: Field 1 min algorithm flux= -379.096 MicroJy iter= 74915 IMAGR1: Field 1 Clean flux density= 73.820 MilliJy 74915 comps IMAGR1: Total Cleaned flux density = 2.290 Jy 76581 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 127480 Pts IMAGR1: Field 1 min = -1.3 MilliJy,max = 1.4 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 354.88 MicroJy IMAGR1: 19910 Residual map points loaded IMAGR1: Field 1 min algorithm flux= 371.442 MicroJy iter= 78453 IMAGR1: Field 1 Clean flux density= 75.540 MilliJy 78453 comps IMAGR1: Total Cleaned flux density = 2.292 Jy 80119 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 127480 Pts IMAGR1: Field 2 min = -405.8 MicroJy,max = 465.9 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 354.84 MicroJy IMAGR1: 1 Residual map points loaded IMAGR1: Field 2 min algorithm flux= 325.854 MicroJy iter= 1668 IMAGR1: Field 2 Clean flux density= 2.216 Jy 1668 comps IMAGR1: Total Cleaned flux density = 2.292 Jy 80121 comps IMAGR1: VISDFT: Begin DFT component subtraction IMAGR1: I Polarization model processed IMAGR1: Field 1 min = -1.3 MilliJy,max = 1.4 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 347.92 MicroJy IMAGR1: 19951 Residual map points loaded IMAGR1: Field 1 min algorithm flux= -363.845 MicroJy iter= 82089 IMAGR1: Field 1 Clean flux density= 76.588 MilliJy 82089 comps IMAGR1: Total Cleaned flux density = 2.293 Jy 83757 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 127480 Pts IMAGR1: Field 1 min = -1.2 MilliJy,max = 1.4 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 341.16 MicroJy IMAGR1: 19927 Residual map points loaded IMAGR1: Field 1 min algorithm flux= -356.541 MicroJy iter= 85829 IMAGR1: Field 1 Clean flux density= 78.177 MilliJy 85829 comps IMAGR1: Total Cleaned flux density = 2.294 Jy 87497 comps LOGFILE FOR USER **** GETTING LARGE: USE PRTMSG AND CLRMSG NOW! IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 127480 Pts IMAGR1: Field 1 min = -1.2 MilliJy,max = 1.4 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 334.55 MicroJy IMAGR1: 19931 Residual map points loaded IMAGR1: Field 1 min algorithm flux= 349.242 MicroJy iter= 89628 IMAGR1: Field 1 Clean flux density= 78.503 MilliJy 89628 comps IMAGR1: Total Cleaned flux density = 2.295 Jy 91296 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 127480 Pts IMAGR1: Field 1 min = -1.2 MilliJy,max = 1.4 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 328.17 MicroJy IMAGR1: 19899 Residual map points loaded IMAGR1: Field 1 min algorithm flux= -342.280 MicroJy iter= 93499 IMAGR1: Field 1 Clean flux density= 79.189 MilliJy 93499 comps IMAGR1: Total Cleaned flux density = 2.295 Jy 95167 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 127480 Pts IMAGR1: Field 1 min = -1.2 MilliJy,max = 1.4 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 321.88 MicroJy IMAGR1: 19897 Residual map points loaded IMAGR1: Field 1 min algorithm flux= -335.507 MicroJy iter= 97466 IMAGR1: Field 1 Clean flux density= 79.962 MilliJy 97466 comps IMAGR1: Total Cleaned flux density = 2.296 Jy 99134 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 127480 Pts IMAGR1: Field 1 min = -1.2 MilliJy,max = 1.4 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 315.80 MicroJy IMAGR1: 19890 Residual map points loaded IMAGR1: Field 1 min algorithm flux= 328.902 MicroJy iter= 101507 IMAGR1: Field 1 Clean flux density= 82.309 MilliJy 101507 comps IMAGR1: Total Cleaned flux density = 2.298 Jy 103175 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 127480 Pts IMAGR1: Field 1 min = -1.2 MilliJy,max = 1.4 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 309.68 MicroJy IMAGR1: 19890 Residual map points loaded IMAGR1: Field 1 min algorithm flux= -322.336 MicroJy iter= 105667 IMAGR1: Field 1 Clean flux density= 83.441 MilliJy 105667 comps IMAGR1: Total Cleaned flux density = 2.300 Jy 107335 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 127480 Pts IMAGR1: Field 2 min = -385.2 MicroJy,max = 413.4 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 309.65 MicroJy IMAGR1: 6 Residual map points loaded IMAGR1: Field 2 min algorithm flux= 309.517 MicroJy iter= 1674 IMAGR1: Field 2 Clean flux density= 2.216 Jy 1674 comps IMAGR1: Total Cleaned flux density = 2.300 Jy 107341 comps IMAGR1: VISDFT: Begin DFT component subtraction IMAGR1: I Polarization model processed IMAGR1: Field 1 min = -1.2 MilliJy,max = 1.4 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 303.97 MicroJy IMAGR1: 19924 Residual map points loaded IMAGR1: Field 1 min algorithm flux= -316.234 MicroJy iter= 109920 IMAGR1: Field 1 Clean flux density= 85.204 MilliJy 109920 comps IMAGR1: Total Cleaned flux density = 2.301 Jy 111594 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 127480 Pts IMAGR1: Field 1 min = -1.2 MilliJy,max = 1.4 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 297.96 MicroJy IMAGR1: 19922 Residual map points loaded IMAGR1: Field 1 min algorithm flux= -309.773 MicroJy iter= 114272 IMAGR1: Field 1 Clean flux density= 90.085 MilliJy 114272 comps IMAGR1: Total Cleaned flux density = 2.306 Jy 115946 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 127480 Pts IMAGR1: Field 1 min = -1.2 MilliJy,max = 1.3 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 292.33 MicroJy IMAGR1: 19908 Residual map points loaded IMAGR1: Field 1 min algorithm flux= -303.702 MicroJy iter= 118711 IMAGR1: Field 1 Clean flux density= 89.714 MilliJy 118711 comps IMAGR1: Total Cleaned flux density = 2.306 Jy 120385 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 127480 Pts IMAGR1: Field 2 min = -369.8 MicroJy,max = 421.1 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 292.32 MicroJy IMAGR1: 4 Residual map points loaded IMAGR1: Field 2 min algorithm flux= 271.157 MicroJy iter= 1679 IMAGR1: Field 2 Clean flux density= 2.216 Jy 1679 comps IMAGR1: Total Cleaned flux density = 2.306 Jy 120390 comps IMAGR1: VISDFT: Begin DFT component subtraction IMAGR1: I Polarization model processed IMAGR1: Field 1 min = -1.2 MilliJy,max = 1.3 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 286.75 MicroJy IMAGR1: 19947 Residual map points loaded IMAGR1: Field 1 min algorithm flux= 297.787 MicroJy iter= 123256 IMAGR1: Field 1 Clean flux density= 92.342 MilliJy 123256 comps IMAGR1: Total Cleaned flux density = 2.309 Jy 124935 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 127480 Pts IMAGR1: Field 1 min = -1.2 MilliJy,max = 1.3 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 281.46 MicroJy IMAGR1: 19929 Residual map points loaded IMAGR1: Field 1 min algorithm flux= -292.108 MicroJy iter= 127893 IMAGR1: Field 1 Clean flux density= 91.224 MilliJy 127893 comps IMAGR1: Total Cleaned flux density = 2.308 Jy 129572 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 127480 Pts IMAGR1: Field 1 min = -1.2 MilliJy,max = 1.3 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 276.16 MicroJy IMAGR1: 19927 Residual map points loaded IMAGR1: Field 1 min algorithm flux= 286.389 MicroJy iter= 132593 IMAGR1: Field 1 Clean flux density= 94.643 MilliJy 132593 comps IMAGR1: Total Cleaned flux density = 2.311 Jy 134272 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 127480 Pts IMAGR1: Field 1 min = -1.1 MilliJy,max = 1.3 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 271.03 MicroJy IMAGR1: 19916 Residual map points loaded IMAGR1: Field 1 min algorithm flux= 281.008 MicroJy iter= 137425 IMAGR1: Field 1 Clean flux density= 94.697 MilliJy 137425 comps IMAGR1: Total Cleaned flux density = 2.311 Jy 139104 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 127480 Pts IMAGR1: Field 1 min = -1.1 MilliJy,max = 1.3 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 265.92 MicroJy IMAGR1: 19907 Residual map points loaded IMAGR1: Field 1 min algorithm flux= -275.558 MicroJy iter= 142357 IMAGR1: Field 1 Clean flux density= 94.322 MilliJy 142357 comps IMAGR1: Total Cleaned flux density = 2.311 Jy 144036 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 127480 Pts IMAGR1: Field 1 min = -1.1 MilliJy,max = 1.3 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 261.05 MicroJy IMAGR1: 19898 Residual map points loaded IMAGR1: Field 1 min algorithm flux= -270.384 MicroJy iter= 147365 IMAGR1: Field 1 Clean flux density= 95.414 MilliJy 147365 comps IMAGR1: Total Cleaned flux density = 2.312 Jy 149044 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 127480 Pts IMAGR1: Field 1 min = -1.1 MilliJy,max = 1.3 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 256.20 MicroJy IMAGR1: 19869 Residual map points loaded IMAGR1: Field 1 min algorithm flux= -265.231 MicroJy iter= 152485 IMAGR1: Field 1 Clean flux density= 94.020 MilliJy 152485 comps IMAGR1: Total Cleaned flux density = 2.310 Jy 154164 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 127480 Pts IMAGR1: Field 2 min = -327.9 MicroJy,max = 372.3 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 256.15 MicroJy IMAGR1: 5 Residual map points loaded IMAGR1: Field 2 min algorithm flux= 240.136 MicroJy iter= 1685 IMAGR1: Field 2 Clean flux density= 2.216 Jy 1685 comps IMAGR1: Total Cleaned flux density = 2.310 Jy 154170 comps IMAGR1: VISDFT: Begin DFT component subtraction IMAGR1: I Polarization model processed IMAGR1: Field 1 min = -1.1 MilliJy,max = 1.3 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 251.49 MicroJy IMAGR1: 19935 Residual map points loaded IMAGR1: Field 1 min algorithm flux= 260.252 MicroJy iter= 157710 IMAGR1: Field 1 Clean flux density= 96.344 MilliJy 157710 comps IMAGR1: Total Cleaned flux density = 2.313 Jy 159395 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 127480 Pts IMAGR1: Field 1 min = -1.1 MilliJy,max = 1.2 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 246.76 MicroJy IMAGR1: 19943 Residual map points loaded IMAGR1: Field 1 min algorithm flux= 255.205 MicroJy iter= 163019 IMAGR1: Field 1 Clean flux density= 95.740 MilliJy 163019 comps IMAGR1: Total Cleaned flux density = 2.312 Jy 164704 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 127480 Pts IMAGR1: Field 1 min = -1.1 MilliJy,max = 1.2 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 242.28 MicroJy IMAGR1: 19940 Residual map points loaded IMAGR1: Field 1 min algorithm flux= 250.527 MicroJy iter= 168406 IMAGR1: Field 1 Clean flux density= 93.830 MilliJy 168406 comps IMAGR1: Total Cleaned flux density = 2.310 Jy 170091 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 127480 Pts IMAGR1: Field 1 min = -1.1 MilliJy,max = 1.2 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 237.90 MicroJy IMAGR1: 19901 Residual map points loaded IMAGR1: Field 1 min algorithm flux= 245.877 MicroJy iter= 173851 IMAGR1: Field 1 Clean flux density= 94.631 MilliJy 173851 comps IMAGR1: Total Cleaned flux density = 2.311 Jy 175536 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 127480 Pts IMAGR1: Field 1 min = -1.1 MilliJy,max = 1.2 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 233.64 MicroJy IMAGR1: 19926 Residual map points loaded IMAGR1: Field 1 min algorithm flux= 241.316 MicroJy iter= 179397 IMAGR1: Field 1 Clean flux density= 96.633 MilliJy 179397 comps IMAGR1: Total Cleaned flux density = 2.313 Jy 181082 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 127480 Pts IMAGR1: Field 1 min = -1.1 MilliJy,max = 1.2 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 229.52 MicroJy IMAGR1: 19920 Residual map points loaded LOGFILE FOR USER **** GETTING LARGE: USE PRTMSG AND CLRMSG NOW! IMAGR1: Field 1 min algorithm flux= -237.026 MicroJy iter= 185122 IMAGR1: Field 1 Clean flux density= 94.812 MilliJy 185122 comps IMAGR1: Total Cleaned flux density = 2.311 Jy 186807 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 127480 Pts IMAGR1: Field 2 min = -294.8 MicroJy,max = 365.1 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 229.52 MicroJy IMAGR1: 4 Residual map points loaded IMAGR1: Field 2 min algorithm flux= 225.037 MicroJy iter= 1690 IMAGR1: Field 2 Clean flux density= 2.216 Jy 1690 comps IMAGR1: Total Cleaned flux density = 2.311 Jy 186812 comps IMAGR1: VISDFT: Begin DFT component subtraction IMAGR1: I Polarization model processed IMAGR1: Field 1 min = -1.1 MilliJy,max = 1.2 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 225.43 MicroJy IMAGR1: 19964 Residual map points loaded IMAGR1: Field 1 min algorithm flux= -232.607 MicroJy iter= 190854 IMAGR1: Field 1 Clean flux density= 94.430 MilliJy 190854 comps IMAGR1: Total Cleaned flux density = 2.311 Jy 192544 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 127480 Pts IMAGR1: Field 1 min = -1.1 MilliJy,max = 1.2 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 221.44 MicroJy IMAGR1: 19926 Residual map points loaded IMAGR1: Field 1 min algorithm flux= -228.396 MicroJy iter= 196698 IMAGR1: Field 1 Clean flux density= 94.716 MilliJy 196698 comps IMAGR1: Total Cleaned flux density = 2.311 Jy 198388 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 127480 Pts IMAGR1: Field 1 min = -1.0 MilliJy,max = 1.2 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 217.59 MicroJy IMAGR1: 19928 Residual map points loaded IMAGR1: Field 1 min algorithm flux= 224.363 MicroJy iter= 202648 IMAGR1: Field 1 Clean flux density= 96.359 MilliJy 202648 comps IMAGR1: Total Cleaned flux density = 2.313 Jy 204338 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 127480 Pts IMAGR1: Field 1 min = -1.0 MilliJy,max = 1.2 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 213.84 MicroJy IMAGR1: 19918 Residual map points loaded IMAGR1: Field 1 min algorithm flux= 220.356 MicroJy iter= 208649 IMAGR1: Field 1 Clean flux density= 98.870 MilliJy 208649 comps IMAGR1: Total Cleaned flux density = 2.315 Jy 210339 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 127480 Pts IMAGR1: Field 2 min = -290.4 MicroJy,max = 346.6 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 213.82 MicroJy IMAGR1: 5 Residual map points loaded IMAGR1: Field 2 min algorithm flux= 199.083 MicroJy iter= 1695 IMAGR1: Field 2 Clean flux density= 2.216 Jy 1695 comps IMAGR1: Total Cleaned flux density = 2.315 Jy 210344 comps IMAGR1: VISDFT: Begin DFT component subtraction IMAGR1: I Polarization model processed IMAGR1: Field 1 min = -1.0 MilliJy,max = 1.1 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 210.14 MicroJy IMAGR1: 19930 Residual map points loaded IMAGR1: Field 1 min algorithm flux= -216.418 MicroJy iter= 214702 IMAGR1: Field 1 Clean flux density= 100.305 MilliJy 214702 comps IMAGR1: Total Cleaned flux density = 2.317 Jy 216397 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 127480 Pts IMAGR1: Field 1 min = -1.0 MilliJy,max = 1.1 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 206.50 MicroJy IMAGR1: 19934 Residual map points loaded IMAGR1: Field 1 min algorithm flux= -212.642 MicroJy iter= 220856 IMAGR1: Field 1 Clean flux density= 101.535 MilliJy 220856 comps IMAGR1: Total Cleaned flux density = 2.318 Jy 222551 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 127480 Pts IMAGR1: Field 1 min = -1.0 MilliJy,max = 1.1 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 203.08 MicroJy IMAGR1: 19943 Residual map points loaded IMAGR1: Field 1 min algorithm flux= 208.965 MicroJy iter= 227071 IMAGR1: Field 1 Clean flux density= 103.119 MilliJy 227071 comps IMAGR1: Total Cleaned flux density = 2.320 Jy 228766 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 127480 Pts IMAGR1: Field 1 min = -1.0 MilliJy,max = 1.1 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 199.69 MicroJy IMAGR1: 19945 Residual map points loaded IMAGR1: Field 1 min algorithm flux= -205.454 MicroJy iter= 233409 IMAGR1: Field 1 Clean flux density= 105.885 MilliJy 233409 comps IMAGR1: Total Cleaned flux density = 2.322 Jy 235104 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 127480 Pts IMAGR1: Field 1 min = -978.0 MicroJy,max = 1.1 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 196.44 MicroJy IMAGR1: 19933 Residual map points loaded IMAGR1: Field 1 min algorithm flux= -201.993 MicroJy iter= 239749 IMAGR1: Field 1 Clean flux density= 106.663 MilliJy 239749 comps IMAGR1: Total Cleaned flux density = 2.323 Jy 241444 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 127480 Pts IMAGR1: Field 1 min = -979.3 MicroJy,max = 1.1 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 193.11 MicroJy IMAGR1: 19912 Residual map points loaded IMAGR1: Field 1 min algorithm flux= 198.416 MicroJy iter= 246120 IMAGR1: Field 1 Clean flux density= 106.883 MilliJy 246120 comps IMAGR1: Total Cleaned flux density = 2.323 Jy 247815 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 127480 Pts IMAGR1: Field 1 min = -963.9 MicroJy,max = 1.1 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 189.98 MicroJy IMAGR1: 19865 Residual map points loaded IMAGR1: Field 1 min algorithm flux= 195.197 MicroJy iter= 252560 IMAGR1: Field 1 Clean flux density= 105.358 MilliJy 252560 comps IMAGR1: Total Cleaned flux density = 2.322 Jy 254255 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 127480 Pts IMAGR1: Field 2 min = -249.6 MicroJy,max = 310.7 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 189.96 MicroJy IMAGR1: 5 Residual map points loaded IMAGR1: Field 2 min algorithm flux= 177.038 MicroJy iter= 1700 IMAGR1: Field 2 Clean flux density= 2.216 Jy 1700 comps IMAGR1: Total Cleaned flux density = 2.322 Jy 254260 comps IMAGR1: VISDFT: Begin DFT component subtraction IMAGR1: I Polarization model processed IMAGR1: Field 1 min = -967.5 MicroJy,max = 1.1 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 186.97 MicroJy IMAGR1: 19937 Residual map points loaded IMAGR1: Field 1 min algorithm flux= -192.040 MicroJy iter= 259122 IMAGR1: Field 1 Clean flux density= 106.433 MilliJy 259122 comps IMAGR1: Total Cleaned flux density = 2.323 Jy 260822 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 127480 Pts IMAGR1: Field 1 min = -941.3 MicroJy,max = 1.0 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 183.95 MicroJy IMAGR1: 19933 Residual map points loaded IMAGR1: Field 1 min algorithm flux= 188.869 MicroJy iter= 265760 IMAGR1: Field 1 Clean flux density= 108.115 MilliJy 265760 comps IMAGR1: Total Cleaned flux density = 2.325 Jy 267460 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 127480 Pts IMAGR1: Field 1 min = -950.8 MicroJy,max = 1.0 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 181.12 MicroJy IMAGR1: 19936 Residual map points loaded IMAGR1: Field 1 min algorithm flux= 185.917 MicroJy iter= 272439 IMAGR1: Field 1 Clean flux density= 109.310 MilliJy 272439 comps IMAGR1: Total Cleaned flux density = 2.326 Jy 274139 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 127480 Pts IMAGR1: Field 1 min = -934.7 MicroJy,max = 1.0 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 178.30 MicroJy IMAGR1: 19935 Residual map points loaded IMAGR1: Field 1 min algorithm flux= -182.977 MicroJy iter= 279189 IMAGR1: Field 1 Clean flux density= 108.612 MilliJy 279189 comps IMAGR1: Total Cleaned flux density = 2.325 Jy 280889 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 127480 Pts IMAGR1: Field 1 min = -916.6 MicroJy,max = 1.0 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 175.58 MicroJy IMAGR1: 19908 Residual map points loaded IMAGR1: Field 1 min algorithm flux= -180.111 MicroJy iter= 286100 IMAGR1: Field 1 Clean flux density= 109.012 MilliJy 286100 comps IMAGR1: Total Cleaned flux density = 2.326 Jy 287800 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 127480 Pts IMAGR1: Field 1 min = -903.3 MicroJy,max = 1.0 MilliJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 172.85 MicroJy IMAGR1: 19870 Residual map points loaded IMAGR1: Field 1 min algorithm flux= -177.303 MicroJy iter= 293145 IMAGR1: Field 1 Clean flux density= 109.060 MilliJy 293145 comps IMAGR1: Total Cleaned flux density = 2.326 Jy 294845 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 127480 Pts IMAGR1: Field 1 min = -899.3 MicroJy,max = 999.0 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 170.23 MicroJy IMAGR1: 19899 Residual map points loaded IMAGR1: Field 1 min algorithm flux= -174.499 MicroJy iter= 300138 IMAGR1: Field 1 Clean flux density= 110.758 MilliJy 300138 comps IMAGR1: Total Cleaned flux density = 2.327 Jy 301838 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 127480 Pts IMAGR1: Field 2 min = -223.7 MicroJy,max = 286.6 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 170.22 MicroJy IMAGR1: 11 Residual map points loaded IMAGR1: Field 2 min algorithm flux= 159.844 MicroJy iter= 1711 IMAGR1: Field 2 Clean flux density= 2.217 Jy 1711 comps IMAGR1: Total Cleaned flux density = 2.327 Jy 301849 comps IMAGR1: VISDFT: Begin DFT component subtraction IMAGR1: I Polarization model processed IMAGR1: Field 1 min = -887.9 MicroJy,max = 998.0 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 167.64 MicroJy IMAGR1: 19922 Residual map points loaded IMAGR1: Field 1 min algorithm flux= 171.824 MicroJy iter= 307244 IMAGR1: Field 1 Clean flux density= 111.571 MilliJy 307244 comps IMAGR1: Total Cleaned flux density = 2.328 Jy 308955 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 127480 Pts IMAGR1: Field 1 min = -868.6 MicroJy,max = 980.6 MicroJy LOGFILE FOR USER **** GETTING LARGE: USE PRTMSG AND CLRMSG NOW! IMAGR1: BGC Clean: using 103 cell beam + residuals > 165.18 MicroJy IMAGR1: 19938 Residual map points loaded IMAGR1: Field 1 min algorithm flux= 169.308 MicroJy iter= 314395 IMAGR1: Field 1 Clean flux density= 113.921 MilliJy 314395 comps IMAGR1: Total Cleaned flux density = 2.330 Jy 316106 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 127480 Pts IMAGR1: Field 1 min = -868.4 MicroJy,max = 979.3 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 162.66 MicroJy IMAGR1: 19924 Residual map points loaded IMAGR1: Field 1 min algorithm flux= 166.609 MicroJy iter= 321622 IMAGR1: Field 1 Clean flux density= 111.912 MilliJy 321622 comps IMAGR1: Total Cleaned flux density = 2.328 Jy 323333 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 127480 Pts IMAGR1: Field 1 min = -859.7 MicroJy,max = 967.3 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 160.32 MicroJy IMAGR1: 19917 Residual map points loaded IMAGR1: Field 1 min algorithm flux= -164.152 MicroJy iter= 328899 IMAGR1: Field 1 Clean flux density= 112.801 MilliJy 328899 comps IMAGR1: Total Cleaned flux density = 2.329 Jy 330610 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 127480 Pts IMAGR1: Field 1 min = -850.0 MicroJy,max = 954.5 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 157.98 MicroJy IMAGR1: 19887 Residual map points loaded IMAGR1: Field 1 min algorithm flux= -161.708 MicroJy iter= 336256 IMAGR1: Field 1 Clean flux density= 114.167 MilliJy 336256 comps IMAGR1: Total Cleaned flux density = 2.331 Jy 337967 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 127480 Pts IMAGR1: Field 1 min = -849.0 MicroJy,max = 939.5 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 155.76 MicroJy IMAGR1: 19862 Residual map points loaded IMAGR1: Field 1 min algorithm flux= -159.409 MicroJy iter= 343688 IMAGR1: Field 1 Clean flux density= 115.705 MilliJy 343688 comps IMAGR1: Total Cleaned flux density = 2.332 Jy 345399 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 127480 Pts IMAGR1: Field 1 min = -839.7 MicroJy,max = 929.5 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 153.60 MicroJy IMAGR1: 19848 Residual map points loaded IMAGR1: Field 1 min algorithm flux= 157.138 MicroJy iter= 351092 IMAGR1: Field 1 Clean flux density= 113.819 MilliJy 351092 comps IMAGR1: Total Cleaned flux density = 2.330 Jy 352803 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 127480 Pts IMAGR1: Field 2 min = -213.4 MicroJy,max = 260.3 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 153.58 MicroJy IMAGR1: 12 Residual map points loaded IMAGR1: Field 2 min algorithm flux= 149.835 MicroJy iter= 1722 IMAGR1: Field 2 Clean flux density= 2.217 Jy 1722 comps IMAGR1: Total Cleaned flux density = 2.330 Jy 352814 comps IMAGR1: VISDFT: Begin DFT component subtraction IMAGR1: I Polarization model processed IMAGR1: Field 1 min = -827.4 MicroJy,max = 926.9 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 151.36 MicroJy IMAGR1: 19915 Residual map points loaded IMAGR1: Field 1 min algorithm flux= 154.823 MicroJy iter= 358638 IMAGR1: Field 1 Clean flux density= 116.063 MilliJy 358638 comps IMAGR1: Total Cleaned flux density = 2.333 Jy 360360 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 127480 Pts IMAGR1: Field 1 min = -831.0 MicroJy,max = 909.9 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 149.29 MicroJy IMAGR1: 19927 Residual map points loaded IMAGR1: Field 1 min algorithm flux= 152.663 MicroJy iter= 366206 IMAGR1: Field 1 Clean flux density= 115.172 MilliJy 366206 comps IMAGR1: Total Cleaned flux density = 2.332 Jy 367928 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 127480 Pts IMAGR1: Field 1 min = -815.2 MicroJy,max = 895.5 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 147.23 MicroJy IMAGR1: 19930 Residual map points loaded IMAGR1: Field 1 min algorithm flux= -150.509 MicroJy iter= 373841 IMAGR1: Field 1 Clean flux density= 116.007 MilliJy 373841 comps IMAGR1: Total Cleaned flux density = 2.333 Jy 375563 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 127480 Pts IMAGR1: Field 1 min = -803.3 MicroJy,max = 888.5 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 145.28 MicroJy IMAGR1: 19913 Residual map points loaded IMAGR1: Field 1 min algorithm flux= -148.455 MicroJy iter= 381525 IMAGR1: Field 1 Clean flux density= 115.196 MilliJy 381525 comps IMAGR1: Total Cleaned flux density = 2.332 Jy 383247 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 127480 Pts IMAGR1: Field 2 min = -220.5 MicroJy,max = 245.4 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 145.27 MicroJy IMAGR1: 8 Residual map points loaded IMAGR1: Field 2 min algorithm flux= 136.693 MicroJy iter= 1731 IMAGR1: Field 2 Clean flux density= 2.217 Jy 1731 comps IMAGR1: Total Cleaned flux density = 2.332 Jy 383256 comps IMAGR1: VISDFT: Begin DFT component subtraction IMAGR1: I Polarization model processed IMAGR1: Field 1 min = -799.1 MicroJy,max = 884.2 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 143.33 MicroJy IMAGR1: 19944 Residual map points loaded IMAGR1: Field 1 min algorithm flux= 146.466 MicroJy iter= 389221 IMAGR1: Field 1 Clean flux density= 114.860 MilliJy 389221 comps IMAGR1: Total Cleaned flux density = 2.332 Jy 390952 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 127480 Pts IMAGR1: Field 1 min = -798.5 MicroJy,max = 869.2 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 141.39 MicroJy IMAGR1: 19944 Residual map points loaded IMAGR1: Field 1 min algorithm flux= -144.430 MicroJy iter= 397010 IMAGR1: Field 1 Clean flux density= 116.047 MilliJy 397010 comps IMAGR1: Total Cleaned flux density = 2.333 Jy 398741 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 127480 Pts IMAGR1: Field 1 min = -782.1 MicroJy,max = 857.9 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 139.49 MicroJy IMAGR1: 19914 Residual map points loaded IMAGR1: Field 1 min algorithm flux= 142.483 MicroJy iter= 404760 IMAGR1: Field 1 Clean flux density= 116.782 MilliJy 404760 comps IMAGR1: Total Cleaned flux density = 2.333 Jy 406491 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 127480 Pts IMAGR1: Field 1 min = -770.7 MicroJy,max = 845.3 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 137.79 MicroJy IMAGR1: 19910 Residual map points loaded IMAGR1: Field 1 min algorithm flux= -140.656 MicroJy iter= 412600 IMAGR1: Field 1 Clean flux density= 116.691 MilliJy 412600 comps IMAGR1: Total Cleaned flux density = 2.333 Jy 414331 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 127480 Pts IMAGR1: Field 1 min = -762.9 MicroJy,max = 836.2 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 136.00 MicroJy IMAGR1: 19887 Residual map points loaded IMAGR1: Field 1 min algorithm flux= 138.827 MicroJy iter= 420535 IMAGR1: Field 1 Clean flux density= 116.889 MilliJy 420535 comps IMAGR1: Total Cleaned flux density = 2.334 Jy 422266 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 127480 Pts IMAGR1: Field 1 min = -755.7 MicroJy,max = 831.5 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 134.31 MicroJy IMAGR1: 19909 Residual map points loaded IMAGR1: Field 1 min algorithm flux= -137.038 MicroJy iter= 428490 IMAGR1: Field 1 Clean flux density= 117.518 MilliJy 428490 comps IMAGR1: Total Cleaned flux density = 2.334 Jy 430221 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 127480 Pts IMAGR1: Field 1 min = -749.9 MicroJy,max = 823.1 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 132.58 MicroJy IMAGR1: 19888 Residual map points loaded IMAGR1: Field 1 min algorithm flux= -135.270 MicroJy iter= 436516 IMAGR1: Field 1 Clean flux density= 115.726 MilliJy 436516 comps IMAGR1: Total Cleaned flux density = 2.332 Jy 438247 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 127480 Pts IMAGR1: Field 2 min = -193.1 MicroJy,max = 222.0 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 132.57 MicroJy IMAGR1: 12 Residual map points loaded IMAGR1: Field 2 min algorithm flux= -132.628 MicroJy iter= 1740 IMAGR1: Field 2 Clean flux density= 2.217 Jy 1740 comps IMAGR1: Total Cleaned flux density = 2.332 Jy 438256 comps IMAGR1: VISDFT: Begin DFT component subtraction IMAGR1: I Polarization model processed IMAGR1: Field 1 min = -733.9 MicroJy,max = 816.2 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 130.96 MicroJy IMAGR1: 19931 Residual map points loaded IMAGR1: Field 1 min algorithm flux= -133.583 MicroJy iter= 444594 IMAGR1: Field 1 Clean flux density= 114.912 MilliJy 444594 comps IMAGR1: Total Cleaned flux density = 2.332 Jy 446334 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 127480 Pts IMAGR1: Field 1 min = -730.6 MicroJy,max = 800.2 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 129.33 MicroJy IMAGR1: 19920 Residual map points loaded IMAGR1: Field 1 min algorithm flux= 131.879 MicroJy iter= 452665 IMAGR1: Field 1 Clean flux density= 114.390 MilliJy 452665 comps IMAGR1: Total Cleaned flux density = 2.331 Jy 454405 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 127480 Pts IMAGR1: Field 2 min = -197.5 MicroJy,max = 207.9 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 129.33 MicroJy IMAGR1: 5 Residual map points loaded IMAGR1: Field 2 min algorithm flux= -129.295 MicroJy iter= 1745 IMAGR1: Field 2 Clean flux density= 2.217 Jy 1745 comps IMAGR1: Total Cleaned flux density = 2.331 Jy 454410 comps IMAGR1: VISDFT: Begin DFT component subtraction IMAGR1: I Polarization model processed IMAGR1: Field 1 min = -721.0 MicroJy,max = 788.2 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 127.79 MicroJy IMAGR1: 19945 Residual map points loaded IMAGR1: Field 1 min algorithm flux= -130.269 MicroJy iter= 460722 IMAGR1: Field 1 Clean flux density= 115.625 MilliJy 460722 comps IMAGR1: Total Cleaned flux density = 2.332 Jy 462467 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 LOGFILE FOR USER **** GETTING LARGE: USE PRTMSG AND CLRMSG NOW! IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 127480 Pts IMAGR1: Field 1 min = -710.1 MicroJy,max = 790.5 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 126.25 MicroJy IMAGR1: 19927 Residual map points loaded IMAGR1: Field 1 min algorithm flux= -128.692 MicroJy iter= 468883 IMAGR1: Field 1 Clean flux density= 114.671 MilliJy 468883 comps IMAGR1: Total Cleaned flux density = 2.331 Jy 470628 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 127480 Pts IMAGR1: Field 2 min = -188.8 MicroJy,max = 223.2 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 126.24 MicroJy IMAGR1: 12 Residual map points loaded IMAGR1: Field 2 min algorithm flux= -121.021 MicroJy iter= 1755 IMAGR1: Field 2 Clean flux density= 2.217 Jy 1755 comps IMAGR1: Total Cleaned flux density = 2.331 Jy 470638 comps IMAGR1: VISDFT: Begin DFT component subtraction IMAGR1: I Polarization model processed IMAGR1: Field 1 min = -706.3 MicroJy,max = 774.9 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 124.78 MicroJy IMAGR1: 19917 Residual map points loaded IMAGR1: Field 1 min algorithm flux= -127.163 MicroJy iter= 477075 IMAGR1: Field 1 Clean flux density= 117.131 MilliJy 477075 comps IMAGR1: Total Cleaned flux density = 2.334 Jy 478830 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 127480 Pts IMAGR1: Field 1 min = -690.1 MicroJy,max = 760.2 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 123.25 MicroJy IMAGR1: 19922 Residual map points loaded IMAGR1: Field 1 min algorithm flux= 125.588 MicroJy iter= 485354 IMAGR1: Field 1 Clean flux density= 115.511 MilliJy 485354 comps IMAGR1: Total Cleaned flux density = 2.332 Jy 487109 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 127480 Pts IMAGR1: Field 1 min = -692.1 MicroJy,max = 760.4 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 121.96 MicroJy IMAGR1: 19930 Residual map points loaded IMAGR1: Field 1 min algorithm flux= -124.222 MicroJy iter= 493678 IMAGR1: Field 1 Clean flux density= 116.479 MilliJy 493678 comps IMAGR1: Total Cleaned flux density = 2.333 Jy 495433 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 127480 Pts IMAGR1: Field 1 min = -681.8 MicroJy,max = 743.2 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 120.50 MicroJy IMAGR1: 19929 Residual map points loaded IMAGR1: Field 1 min algorithm flux= 122.719 MicroJy iter= 501999 IMAGR1: Field 1 Clean flux density= 115.503 MilliJy 501999 comps IMAGR1: Total Cleaned flux density = 2.332 Jy 503754 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 127480 Pts IMAGR1: Field 1 min = -677.5 MicroJy,max = 745.1 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 119.12 MicroJy IMAGR1: 19892 Residual map points loaded IMAGR1: Field 1 min algorithm flux= 121.297 MicroJy iter= 510374 IMAGR1: Field 1 Clean flux density= 116.475 MilliJy 510374 comps IMAGR1: Total Cleaned flux density = 2.333 Jy 512129 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 127480 Pts IMAGR1: Field 1 min = -665.0 MicroJy,max = 731.4 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 117.80 MicroJy IMAGR1: 19888 Residual map points loaded IMAGR1: Field 1 min Clean flux = 120.141 MicroJy iter= 518315 IMAGR1: Field 1 Clean flux density= 117.594 MilliJy 518315 comps IMAGR1: Total Cleaned flux density = 2.334 Jy 520070 comps IMAGR1: ALGSTB: All 1374 Rows In AP (Max 2059) IMAGR1: ALGSTB field 1 Ipol gridded model subtraction chns 1- 2 IMAGR1: ALGSTB: Pass 1; 1363- 0 Cells, with 127480 Pts IMAGR1: Field 2 min = -185.1 MicroJy,max = 201.6 MicroJy IMAGR1: BGC Clean: using 103 cell beam + residuals > 18.98 MicroJy IMAGR1: 19993 Residual map points loaded IMAGR1: Field 2 min Clean flux = 119.430 MicroJy iter= 1758 IMAGR1: Field 2 Clean flux density= 2.217 Jy 1758 comps IMAGR1: Total Cleaned flux density = 2.334 Jy 520073 comps IMAGR1: VISDFT: Begin DFT component subtraction IMAGR1: I Polarization model processed IMAGR1: Peak residual in window 120.141 less than limit 120.141 MicroJy IMAGR1: Merging the Clean components files IMAGR1: Field 1 compressed from 518315 to 105770 components IMAGR1: Field 2 compressed from 1758 to 148 components IMAGR1: Field 1 min = -658.7 MicroJy,max = 720.4 MicroJy IMAGR1: Field 2 min = -187.0 MicroJy,max = 199.7 MicroJy IMAGR1: Restoring Clean components IMAGR1: Restoring overlapped Clean components IMAGR1: Restore -35.160 MilliJy ( 287 CCs) from field 1 to field 2 IMAGR1: Restore 2.217 Jy ( 148 CCs) from field 2 to field 1 IMAGR1: Checking image max/min IMAGR1: Field 1 final Clean flux 2.334 Jy IMAGR1: Field 2 final Clean flux 2.181 Jy IMAGR1: Deleting UV work file: IMAGR1: Destroyed 1 extension files of type AN IMAGR1: Destroyed 1 extension files of type FQ IMAGR1: Destroyed UV image file: catno= 16 disk= 1 IMAGR1: Appears to have ended successfully IMAGR1: auto 31DEC06 TST: Cpu= 585.8 Real= 620 FC@3C286_X,BAND.0-1 >& /dev/null AIPS 1: Destroyed 1 extension files of type HI AIPS 1: Destroyed MA image file: catno= 9 disk= 1 AIPS 1: Destroyed 1 extension files of type HI AIPS 1: Destroyed MA image file: catno= 10 disk= 1 AIPS 1: Disk 1 in-CNO 11 renumbered as CNO 8 AIPS 1: Disk 1 in-CNO 12 renumbered as CNO 9 AIPS 1: ' ' AIPS 1: 'ESTIMATED RMS:' '0.01574 MILLI JANSKY' AIPS 1: SYSTEM command to be executed is: AIPS 1: rm -f /tmp/SETFC@HD167971_X,BAND.0-1 >& /dev/null AIPS 1: Waiting for returned adverbs AIPS 1: Resumes AIPS 1: SYSTEM command to be executed is: AIPS 1: cat /tmp/SETFC@HD167971_X,BAND.0-1 >> /home/auto/run/BB116_1999D AIPS 1: EC04_1.log.0 AIPS 1: ' NOW STARTING WITH SOURCE :2 =HD167971' AIPS 1: ' ' AIPS 1: Resumes AIPS 1: SYSTEM command to be executed is: AIPS 1: rm -f /tmp/SETFC@HD167971_X,BAND.0-1 >& /dev/null AIPS 1: Destroyed 1 extension files of type HI AIPS 1: Destroyed MA image file: catno= 11 disk= 1 AIPS 1: Destroyed 1 extension files of type HI AIPS 1: Destroyed MA image file: catno= 12 disk= 1 AIPS 1: Disk 1 in-CNO 13 renumbered as CNO 10 AIPS 1: Disk 1 in-CNO 14 renumbered as CNO 11 AIPS 1: ' ' AIPS 1: 'ESTIMATED RMS:' '0.01756 MILLI JANSKY' AIPS 1: SYSTEM command to be executed is: AIPS 1: rm -f /tmp/SETFC@1819-096_X,BAND.0-1 >& /dev/null AIPS 1: Waiting for returned adverbs AIPS 1: Resumes AIPS 1: SYSTEM command to be executed is: AIPS 1: cat /tmp/SETFC@1819-096_X,BAND.0-1 >> /home/auto/run/BB116_1999D AIPS 1: EC04_1.log.0 AIPS 1: ' NOW STARTING WITH SOURCE :3 =1819-096' AIPS 1: ' ' AIPS 1: Resumes AIPS 1: SYSTEM command to be executed is: AIPS 1: rm -f /tmp/SETFC@1819-096_X,BAND.0-1 >& /dev/null AIPS 1: Destroyed 1 extension files of type HI AIPS 1: Destroyed MA image file: catno= 13 disk= 1 AIPS 1: Destroyed 1 extension files of type HI AIPS 1: Destroyed MA image file: catno= 14 disk= 1 AIPS 1: Disk 1 in-CNO 15 renumbered as CNO 12 AIPS 1: Disk 1 in-CNO 16 renumbered as CNO 13 AIPS 1: ' ' AIPS 1: 'ESTIMATED RMS:' '0.01744 MILLI JANSKY' AIPS 1: SYSTEM command to be executed is: AIPS 1: rm -f /tmp/SETFC@CYGOB2N9_X,BAND.0-1 >& /dev/null AIPS 1: Waiting for returned adverbs AIPS 1: Resumes AIPS 1: SYSTEM command to be executed is: AIPS 1: cat /tmp/SETFC@CYGOB2N9_X,BAND.0-1 >> /home/auto/run/BB116_1999D AIPS 1: EC04_1.log.0 AIPS 1: ' NOW STARTING WITH SOURCE :4 =CYGOB2N9' AIPS 1: ' ' AIPS 1: Resumes AIPS 1: SYSTEM command to be executed is: AIPS 1: rm -f /tmp/SETFC@CYGOB2N9_X,BAND.0-1 >& /dev/null AIPS 1: Destroyed 1 extension files of type HI AIPS 1: Destroyed MA image file: catno= 15 disk= 1 AIPS 1: Destroyed 1 extension files of type HI AIPS 1: Destroyed MA image file: catno= 16 disk= 1 AIPS 1: Disk 1 in-CNO 17 renumbered as CNO 14 AIPS 1: Disk 1 in-CNO 18 renumbered as CNO 15 AIPS 1: ' ' AIPS 1: 'ESTIMATED RMS:' '0.02002 MILLI JANSKY' AIPS 1: SYSTEM command to be executed is: AIPS 1: rm -f /tmp/SETFC@2005+403_X,BAND.0-1 >& /dev/null AIPS 1: Waiting for returned adverbs AIPS 1: Resumes AIPS 1: SYSTEM command to be executed is: AIPS 1: cat /tmp/SETFC@2005+403_X,BAND.0-1 >> /home/auto/run/BB116_1999D AIPS 1: EC04_1.log.0 AIPS 1: ' NOW STARTING WITH SOURCE :5 =2005+403' AIPS 1: ' ' AIPS 1: Resumes AIPS 1: SYSTEM command to be executed is: AIPS 1: rm -f /tmp/SETFC@2005+403_X,BAND.0-1 >& /dev/null AIPS 1: Destroyed 1 extension files of type HI AIPS 1: Destroyed MA image file: catno= 17 disk= 1 AIPS 1: Destroyed 1 extension files of type HI AIPS 1: Destroyed MA image file: catno= 18 disk= 1 AIPS 1: Disk 1 in-CNO 19 renumbered as CNO 16 AIPS 1: Disk 1 in-CNO 20 renumbered as CNO 17 AIPS 1: ' ' AIPS 1: ' ' AIPS 1: Found in Version=ABIN AIPS 1: '* APPEARS TO HAVE ENDED SUCCESSFULLY *' >>AIPS 1: Disk 1 No files needed renumbering AIPS 1: 'EMPTY CATALOG ?' 17 >AIPS 1: Begin check for any 'standard' scratch files AIPS 1: Scratch files -- destroyed: 0 still active: 0 AIPS 1: User18326: 5999 messages, oldest written 11-SEP-2006 15:34:54 AIPS 1: Deleted 0 messages AIPS 1: Saved POPS environment in area named 'LASTEXIT' AIPS 1: Session command-line history saved. AIPS 1: auto 31DEC06 TST: Cpu= 1.2 Real= 1730 /home/auto/run/BB116_1999DEC04_1.run.0 finished on Tue Sep 12 15:44:33 MDT 2006