casa6

//# MFCleanImageSkyModel.cc: Implementation of MFCleanImageSkyModel class

//# Copyrighogt (C) 1996,1997,1998,1999,2000,2001,2002,2003

//# Associated Universities, Inc. Washington DC, USA.

//#

//# This library is free software; you can redistribute it and/or modify it

//# under the terms of the GNU Library General Public License as published by

//# the Free Software Foundation; either version 2 of the License, or (at your

//# option) any later version.

//#

//# This library is distributed in the hope that it will be useful, but WITHOUT

//# ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or

//# FITNESS FOR A PARTICULAR PURPOSE.  See the GNU Library General Public

//# License for more details.

//#

//# You should have received a copy of the GNU Library General Public License

//# along with this library; if not, write to the Free Software Foundation,

//# Inc., 675 Massachusetts Ave, Cambridge, MA 02139, USA.

//#

//# Correspondence concerning AIPS++ should be addressed as follows:

//#        Internet email: aips2-request@nrao.edu.

//#        Postal address: AIPS++ Project Office

//#                        National Radio Astronomy Observatory

//#                        520 Edgemont Road

//#                        Charlottesville, VA 22903-2475 USA

//#

//# $Id$

​

#include <casa/Arrays/ArrayMath.h>

#include <casa/Arrays/ArrayLogical.h>

#include <casa/Arrays/Matrix.h>

#include <synthesis/MeasurementComponents/MFCleanImageSkyModel.h>

#include <images/Images/PagedImage.h>

#include <images/Images/SubImage.h>

#include <images/Regions/ImageRegion.h>

#include <images/Regions/WCBox.h>

#include <casa/OS/File.h>

#include <lattices/LEL/LatticeExpr.h>

#include <lattices/LEL/LatticeExprNode.h>

#include <lattices/Lattices/LatticeStepper.h>

#include <lattices/Lattices/LatticeIterator.h>

#include <lattices/LRegions/RegionType.h>

#include <lattices/Lattices/SubLattice.h>

#include <lattices/LRegions/LCBox.h>

​

#include <synthesis/MeasurementEquations/SkyEquation.h>

#include <casa/Exceptions/Error.h>

#include <casa/BasicSL/String.h>

#include <casa/Utilities/Assert.h>

#include <casa/Utilities/CountedPtr.h>

​

#include <casa/sstream.h>

​

#include <casa/Logging/LogMessage.h>

#include <casa/Logging/LogSink.h>

#include <casa/Logging/LogIO.h>

#include <casa/BasicSL/Constants.h>

​

#include <msvis/MSVis/StokesVector.h>

#include <synthesis/MeasurementEquations/ConvolutionEquation.h>

#include <synthesis/MeasurementEquations/ClarkCleanModel.h>

​

​

​

using namespace casacore;

namespace casa {

​

#define NEED_UNDERSCORES

#if defined(NEED_UNDERSCORES)

#define hclean hclean_

#endif

extern "C" {

  void hclean(Float*, Float*, Float*, int*, Float*, int*, int*, int*,

              int*, int*, int*, int*, int*, int*, int*, Float*, Float*,

              Float*, void *, void *);

};

​

​

// This is defined in HogbomCleanImageSkyModel.cc

void HogbomCleanImageSkyModelstopnow (Int *yes);

​

// This is defined in HogbomCleanImageSkyModel.cc

void HogbomCleanImageSkyModelmsgput(Int* npol, Int* pol, Int* iter, Int* px, Int* py, Float* fMaxVal);

​

​

Int MFCleanImageSkyModel::add(ImageInterface<Float>& image,

                  const Int maxNumXfr)

{

  return CleanImageSkyModel::add(image, maxNumXfr);

};

​

Bool MFCleanImageSkyModel::addMask(Int image,