[2707] | 1 | // C++ Interface: STSideBandSep
|
---|
| 2 | //
|
---|
| 3 | // Description:
|
---|
| 4 | // A class to invoke sideband separation of Scantable
|
---|
| 5 | //
|
---|
| 6 | // Author: Kana Sugimoto <kana.sugi@nao.ac.jp>, (C) 2012
|
---|
| 7 | //
|
---|
| 8 | // Copyright: See COPYING file that comes with this distribution
|
---|
| 9 | //
|
---|
| 10 | //
|
---|
| 11 |
|
---|
| 12 | // STL
|
---|
| 13 | #include <ctype.h>
|
---|
| 14 |
|
---|
| 15 | // cascore
|
---|
| 16 | #include <casa/OS/File.h>
|
---|
| 17 | #include <casa/Logging/LogIO.h>
|
---|
| 18 | #include <casa/Quanta/QuantumHolder.h>
|
---|
| 19 |
|
---|
| 20 | #include <measures/Measures/MFrequency.h>
|
---|
| 21 | #include <measures/Measures/MCFrequency.h>
|
---|
| 22 |
|
---|
[2711] | 23 | #include <tables/Tables/TableRow.h>
|
---|
[2707] | 24 | #include <tables/Tables/TableRecord.h>
|
---|
| 25 | #include <tables/Tables/TableVector.h>
|
---|
| 26 |
|
---|
| 27 | // asap
|
---|
[2794] | 28 | #include "STGrid.h"
|
---|
| 29 | #include "STMath.h"
|
---|
| 30 | #include "MathUtils.h"
|
---|
[2707] | 31 | #include "STSideBandSep.h"
|
---|
| 32 |
|
---|
| 33 | using namespace std ;
|
---|
| 34 | using namespace casa ;
|
---|
| 35 | using namespace asap ;
|
---|
| 36 |
|
---|
[2794] | 37 | // #ifndef KS_DEBUG
|
---|
| 38 | // #define KS_DEBUG
|
---|
| 39 | // #endif
|
---|
[2707] | 40 |
|
---|
| 41 | namespace asap {
|
---|
| 42 |
|
---|
| 43 | // constructors
|
---|
[2726] | 44 | STSideBandSep::STSideBandSep(const vector<string> &names)
|
---|
[2707] | 45 | {
|
---|
[2726] | 46 | LogIO os(LogOrigin("STSideBandSep","STSideBandSep()", WHERE));
|
---|
| 47 | os << "Setting scantable names to process." << LogIO::POST ;
|
---|
| 48 | // Set file names
|
---|
| 49 | ntable_ = names.size();
|
---|
| 50 | infileList_.resize(ntable_);
|
---|
| 51 | for (unsigned int i = 0; i < ntable_; i++){
|
---|
| 52 | if (!checkFile(names[i], "d"))
|
---|
| 53 | throw( AipsError("File does not exist") );
|
---|
| 54 | infileList_[i] = names[i];
|
---|
| 55 | }
|
---|
| 56 | intabList_.resize(0);
|
---|
| 57 |
|
---|
| 58 | init();
|
---|
| 59 |
|
---|
| 60 | {// Summary
|
---|
| 61 | os << ntable_ << " files are set: [";
|
---|
| 62 | for (unsigned int i = 0; i < ntable_; i++) {
|
---|
| 63 | os << " '" << infileList_[i] << "' ";
|
---|
| 64 | if (i != ntable_-1) os << ",";
|
---|
| 65 | }
|
---|
| 66 | os << "] " << LogIO::POST;
|
---|
| 67 | }
|
---|
[2707] | 68 | };
|
---|
| 69 |
|
---|
[2726] | 70 | STSideBandSep::STSideBandSep(const vector<ScantableWrapper> &tables)
|
---|
| 71 | {
|
---|
| 72 | LogIO os(LogOrigin("STSideBandSep","STSideBandSep()", WHERE));
|
---|
| 73 | os << "Setting list of scantables to process." << LogIO::POST ;
|
---|
| 74 | // Set file names
|
---|
| 75 | ntable_ = tables.size();
|
---|
| 76 | intabList_.resize(ntable_);
|
---|
| 77 | for (unsigned int i = 0; i < ntable_; i++){
|
---|
| 78 | intabList_[i] = tables[i].getCP();
|
---|
| 79 | }
|
---|
| 80 | infileList_.resize(0);
|
---|
| 81 |
|
---|
| 82 | init();
|
---|
[2794] | 83 | tp_ = intabList_[0]->table().tableType();
|
---|
[2726] | 84 |
|
---|
| 85 | os << ntable_ << " tables are set." << LogIO::POST;
|
---|
| 86 | };
|
---|
| 87 |
|
---|
[2707] | 88 | STSideBandSep::~STSideBandSep()
|
---|
| 89 | {
|
---|
| 90 | #ifdef KS_DEBUG
|
---|
| 91 | cout << "Destructor ~STSideBandSep()" << endl;
|
---|
| 92 | #endif
|
---|
| 93 | };
|
---|
| 94 |
|
---|
[2726] | 95 | void STSideBandSep::init()
|
---|
| 96 | {
|
---|
| 97 | // frequency setup
|
---|
[2794] | 98 | sigIfno_= -1;
|
---|
[2726] | 99 | ftol_ = -1;
|
---|
| 100 | solFrame_ = MFrequency::N_Types;
|
---|
| 101 | // shifts
|
---|
| 102 | initshift();
|
---|
| 103 | // direction tolerance
|
---|
| 104 | xtol_ = ytol_ = 9.69627e-6; // 2arcsec
|
---|
| 105 | // solution parameters
|
---|
| 106 | otherside_ = false;
|
---|
| 107 | doboth_ = false;
|
---|
| 108 | rejlimit_ = 0.2;
|
---|
| 109 | // LO1 values
|
---|
| 110 | lo1Freq_ = -1;
|
---|
| 111 | loTime_ = -1;
|
---|
| 112 | loDir_ = "";
|
---|
| 113 | // Default LO frame is TOPO
|
---|
| 114 | loFrame_ = MFrequency::TOPO;
|
---|
[2794] | 115 | // scantable storage
|
---|
| 116 | tp_ = Table::Memory;
|
---|
[2726] | 117 | };
|
---|
[2707] | 118 |
|
---|
[2726] | 119 | void STSideBandSep::initshift()
|
---|
[2707] | 120 | {
|
---|
[2726] | 121 | // shifts
|
---|
| 122 | nshift_ = 0;
|
---|
| 123 | nchan_ = 0;
|
---|
| 124 | sigShift_.resize(0);
|
---|
| 125 | imgShift_.resize(0);
|
---|
| 126 | tableList_.resize(0);
|
---|
[2707] | 127 | };
|
---|
| 128 |
|
---|
[2726] | 129 | void STSideBandSep::setFrequency(const unsigned int ifno,
|
---|
| 130 | const string freqtol,
|
---|
| 131 | const string frame)
|
---|
| 132 | {
|
---|
| 133 | LogIO os(LogOrigin("STSideBandSep","setFrequency()", WHERE));
|
---|
| 134 |
|
---|
| 135 | initshift();
|
---|
| 136 |
|
---|
| 137 | // IFNO
|
---|
[2794] | 138 | sigIfno_ = (int) ifno;
|
---|
[2726] | 139 |
|
---|
| 140 | // Frequency tolerance
|
---|
| 141 | Quantum<Double> qftol;
|
---|
| 142 | readQuantity(qftol, String(freqtol));
|
---|
| 143 | if (!qftol.getUnit().empty()){
|
---|
| 144 | // make sure the quantity is frequency
|
---|
| 145 | if (qftol.getFullUnit().getValue() != Unit("Hz").getValue())
|
---|
| 146 | throw( AipsError("Invalid quantity for frequency tolerance.") );
|
---|
| 147 | qftol.convert("Hz");
|
---|
| 148 | }
|
---|
| 149 | ftol_ = qftol;
|
---|
| 150 |
|
---|
| 151 | // Frequency Frame
|
---|
| 152 | if (!frame.empty()){
|
---|
| 153 | MFrequency::Types mft;
|
---|
| 154 | if (!MFrequency::getType(mft, frame))
|
---|
| 155 | throw( AipsError("Invalid frame type.") );
|
---|
| 156 | solFrame_ = mft;
|
---|
| 157 | } else {
|
---|
| 158 | solFrame_ = MFrequency::N_Types;
|
---|
| 159 | }
|
---|
| 160 |
|
---|
| 161 | {// Summary
|
---|
| 162 | const String sframe = ( (solFrame_ == MFrequency::N_Types) ?
|
---|
| 163 | "table frame" :
|
---|
| 164 | MFrequency::showType(solFrame_) );
|
---|
| 165 | os << "Frequency setup to search IF group: "
|
---|
| 166 | << "IFNO of table[0] = " << sigIfno_
|
---|
| 167 | << " , Freq tolerance = " << ftol_.getValue() << " [ "
|
---|
| 168 | << (ftol_.getUnit().empty() ? "channel" : ftol_.getUnit() )
|
---|
| 169 | << " ] (in " << sframe <<")" << LogIO::POST;
|
---|
| 170 | }
|
---|
| 171 | };
|
---|
| 172 |
|
---|
| 173 |
|
---|
| 174 | void STSideBandSep::setDirTolerance(const vector<string> dirtol)
|
---|
| 175 | {
|
---|
| 176 | LogIO os(LogOrigin("STSideBandSep","setDirTolerance()", WHERE));
|
---|
| 177 | Quantum<Double> qcell;
|
---|
| 178 | if ( (dirtol.size() == 1) && !dirtol[0].empty() ) {
|
---|
| 179 | readQuantity(qcell, String(dirtol[0]));
|
---|
| 180 | if (qcell.getFullUnit().getValue() == Unit("rad").getValue())
|
---|
| 181 | xtol_ = ytol_ = qcell.getValue("rad");
|
---|
| 182 | else
|
---|
| 183 | throw( AipsError("Invalid unit for direction tolerance.") );
|
---|
| 184 | }
|
---|
| 185 | else if (dirtol.size() > 1) {
|
---|
| 186 | if ( dirtol[0].empty() && dirtol[1].empty() )
|
---|
| 187 | throw( AipsError("Direction tolerance is empty.") );
|
---|
| 188 | if ( !dirtol[0].empty() ) {
|
---|
| 189 | readQuantity(qcell, String(dirtol[0]));
|
---|
| 190 | if (qcell.getFullUnit().getValue() == Unit("rad").getValue())
|
---|
| 191 | xtol_ = qcell.getValue("rad");
|
---|
| 192 | else
|
---|
| 193 | throw( AipsError("Invalid unit for direction tolerance.") );
|
---|
| 194 | }
|
---|
| 195 | if ( !dirtol[1].empty() ) {
|
---|
| 196 | readQuantity(qcell, String(dirtol[1]));
|
---|
| 197 | if (qcell.getFullUnit().getValue() == Unit("rad").getValue())
|
---|
| 198 | ytol_ = qcell.getValue("rad");
|
---|
| 199 | else
|
---|
| 200 | throw( AipsError("Invalid unit for direction tolerance.") );
|
---|
| 201 | }
|
---|
| 202 | else {
|
---|
| 203 | ytol_ = xtol_;
|
---|
| 204 | }
|
---|
| 205 | }
|
---|
| 206 | else throw( AipsError("Invalid direction tolerance.") );
|
---|
| 207 |
|
---|
| 208 | os << "Direction tolerance: ( "
|
---|
| 209 | << xtol_ << " , " << ytol_ << " ) [rad]" << LogIO::POST;
|
---|
| 210 | };
|
---|
| 211 |
|
---|
| 212 | void STSideBandSep::setShift(const vector<double> &shift)
|
---|
| 213 | {
|
---|
| 214 | LogIO os(LogOrigin("STSideBandSep","setShift()", WHERE));
|
---|
| 215 | imgShift_.resize(shift.size());
|
---|
| 216 | for (unsigned int i = 0; i < shift.size(); i++)
|
---|
| 217 | imgShift_[i] = shift[i];
|
---|
| 218 |
|
---|
| 219 | if (imgShift_.size() == 0) {
|
---|
| 220 | os << "Channel shifts are cleared." << LogIO::POST;
|
---|
| 221 | } else {
|
---|
| 222 | os << "Channel shifts of image sideband are set: ( ";
|
---|
| 223 | for (unsigned int i = 0; i < imgShift_.size(); i++) {
|
---|
| 224 | os << imgShift_[i];
|
---|
| 225 | if (i != imgShift_.size()-1) os << " , ";
|
---|
| 226 | }
|
---|
[2794] | 227 | os << " ) [channels]" << LogIO::POST;
|
---|
[2726] | 228 | }
|
---|
| 229 | };
|
---|
| 230 |
|
---|
| 231 | void STSideBandSep::setThreshold(const double limit)
|
---|
| 232 | {
|
---|
| 233 | LogIO os(LogOrigin("STSideBandSep","setThreshold()", WHERE));
|
---|
| 234 | if (limit < 0)
|
---|
[2794] | 235 | throw( AipsError("Rejection limit should be a positive number.") );
|
---|
[2726] | 236 |
|
---|
| 237 | rejlimit_ = limit;
|
---|
[2794] | 238 | os << "Rejection limit is set to " << rejlimit_ << LogIO::POST;
|
---|
[2726] | 239 | };
|
---|
| 240 |
|
---|
[2794] | 241 | void STSideBandSep::separate(string outname)
|
---|
[2707] | 242 | {
|
---|
| 243 | #ifdef KS_DEBUG
|
---|
[2794] | 244 | cout << "STSideBandSep::separate" << endl;
|
---|
[2707] | 245 | #endif
|
---|
[2794] | 246 | LogIO os(LogOrigin("STSideBandSep","separate()", WHERE));
|
---|
| 247 | if (outname.empty())
|
---|
| 248 | outname = "sbseparated.asap";
|
---|
[2707] | 249 |
|
---|
[2794] | 250 | // Set up a goup of IFNOs in the list of scantables within
|
---|
| 251 | // the frequency tolerance and make them a list.
|
---|
| 252 | nshift_ = setupShift();
|
---|
| 253 | if (nshift_ < 2)
|
---|
| 254 | throw( AipsError("At least 2 IFs are necessary for convolution.") );
|
---|
| 255 | // Grid scantable and generate output tables
|
---|
| 256 | ScantableWrapper gridst = gridTable();
|
---|
| 257 | sigTab_p = gridst.getCP();
|
---|
| 258 | if (doboth_)
|
---|
| 259 | imgTab_p = gridst.copy().getCP();
|
---|
| 260 | vector<unsigned int> remRowIds;
|
---|
| 261 | remRowIds.resize(0);
|
---|
| 262 | Matrix<float> specMat(nchan_, nshift_);
|
---|
| 263 | vector<float> sigSpec(nchan_), imgSpec(nchan_);
|
---|
| 264 | vector<uInt> tabIdvec;
|
---|
| 265 |
|
---|
| 266 | //Generate FFTServer
|
---|
| 267 | fftsf.resize(IPosition(1, nchan_), FFTEnums::REALTOCOMPLEX);
|
---|
| 268 | fftsi.resize(IPosition(1, nchan_), FFTEnums::COMPLEXTOREAL);
|
---|
| 269 |
|
---|
| 270 | /// Loop over sigTab_p and separate sideband
|
---|
| 271 | for (int irow = 0; irow < sigTab_p->nrow(); irow++){
|
---|
| 272 | tabIdvec.resize(0);
|
---|
| 273 | const int polId = sigTab_p->getPol(irow);
|
---|
| 274 | const int beamId = sigTab_p->getBeam(irow);
|
---|
| 275 | const vector<double> dir = sigTab_p->getDirectionVector(irow);
|
---|
| 276 | // Get a set of spectra to solve
|
---|
| 277 | if (!getSpectraToSolve(polId, beamId, dir[0], dir[1],
|
---|
| 278 | specMat, tabIdvec)){
|
---|
| 279 | remRowIds.push_back(irow);
|
---|
| 280 | #ifdef KS_DEBUG
|
---|
| 281 | cout << "no matching row found. skipping row = " << irow << endl;
|
---|
| 282 | #endif
|
---|
| 283 | continue;
|
---|
| 284 | }
|
---|
| 285 | // Solve signal sideband
|
---|
| 286 | sigSpec = solve(specMat, tabIdvec, true);
|
---|
| 287 | sigTab_p->setSpectrum(sigSpec, irow);
|
---|
| 288 |
|
---|
| 289 | // Solve image sideband
|
---|
| 290 | if (doboth_) {
|
---|
| 291 | imgSpec = solve(specMat, tabIdvec, false);
|
---|
| 292 | imgTab_p->setSpectrum(imgSpec, irow);
|
---|
| 293 | }
|
---|
| 294 | } // end of row loop
|
---|
| 295 |
|
---|
| 296 | // Remove or flag rows without relevant data from gridded tables
|
---|
| 297 | if (remRowIds.size() > 0) {
|
---|
| 298 | const size_t nrem = remRowIds.size();
|
---|
| 299 | if ( sigTab_p->table().canRemoveRow() ) {
|
---|
| 300 | sigTab_p->table().removeRow(remRowIds);
|
---|
| 301 | os << "Removing " << nrem << " rows from the signal band table"
|
---|
| 302 | << LogIO::POST;
|
---|
| 303 | } else {
|
---|
| 304 | sigTab_p->flagRow(remRowIds, false);
|
---|
| 305 | os << "Cannot remove rows from the signal band table. Flagging "
|
---|
| 306 | << nrem << " rows" << LogIO::POST;
|
---|
| 307 | }
|
---|
| 308 |
|
---|
| 309 | if (doboth_) {
|
---|
| 310 | if ( imgTab_p->table().canRemoveRow() ) {
|
---|
| 311 | imgTab_p->table().removeRow(remRowIds);
|
---|
| 312 | os << "Removing " << nrem << " rows from the image band table"
|
---|
| 313 | << LogIO::POST;
|
---|
| 314 | } else {
|
---|
| 315 | imgTab_p->flagRow(remRowIds, false);
|
---|
| 316 | os << "Cannot remove rows from the image band table. Flagging "
|
---|
| 317 | << nrem << " rows" << LogIO::POST;
|
---|
| 318 | }
|
---|
| 319 | }
|
---|
| 320 | }
|
---|
| 321 |
|
---|
| 322 | // Finally, save tables on disk
|
---|
| 323 | if (outname.size() ==0)
|
---|
| 324 | outname = "sbseparated.asap";
|
---|
| 325 | const string sigName = outname + ".signalband";
|
---|
| 326 | os << "Saving SIGNAL sideband table: " << sigName << LogIO::POST;
|
---|
| 327 | sigTab_p->makePersistent(sigName);
|
---|
| 328 | if (doboth_) {
|
---|
| 329 | solveImageFrequency();
|
---|
| 330 | const string imgName = outname + ".imageband";
|
---|
| 331 | os << "Saving IMAGE sideband table: " << sigName << LogIO::POST;
|
---|
| 332 | imgTab_p->makePersistent(imgName);
|
---|
| 333 | }
|
---|
| 334 |
|
---|
[2707] | 335 | };
|
---|
| 336 |
|
---|
[2794] | 337 | unsigned int STSideBandSep::setupShift()
|
---|
| 338 | {
|
---|
| 339 | LogIO os(LogOrigin("STSideBandSep","setupShift()", WHERE));
|
---|
| 340 | if (infileList_.size() == 0 && intabList_.size() == 0)
|
---|
| 341 | throw( AipsError("No scantable has been set. Set a list of scantables first.") );
|
---|
| 342 |
|
---|
| 343 | const bool byname = (intabList_.size() == 0);
|
---|
| 344 | // Make sure sigIfno_ exists in the first table.
|
---|
| 345 | CountedPtr<Scantable> stab;
|
---|
| 346 | vector<string> coordsav;
|
---|
| 347 | vector<string> coordtmp(3);
|
---|
| 348 | os << "Checking IFNO in the first table." << LogIO::POST;
|
---|
| 349 | if (byname) {
|
---|
| 350 | if (!checkFile(infileList_[0], "d"))
|
---|
| 351 | os << LogIO::SEVERE << "Could not find scantable '" << infileList_[0]
|
---|
| 352 | << "'" << LogIO::EXCEPTION;
|
---|
| 353 | stab = CountedPtr<Scantable>(new Scantable(infileList_[0]));
|
---|
| 354 | } else {
|
---|
| 355 | stab = intabList_[0];
|
---|
| 356 | }
|
---|
| 357 | if (sigIfno_ < 0) {
|
---|
| 358 | sigIfno_ = (int) stab->getIF(0);
|
---|
| 359 | os << "IFNO to process has not been set. Using the first IF = "
|
---|
| 360 | << sigIfno_ << LogIO::POST;
|
---|
| 361 | }
|
---|
| 362 |
|
---|
| 363 | unsigned int basench;
|
---|
| 364 | double basech0, baseinc, ftolval, inctolval;
|
---|
| 365 | coordsav = stab->getCoordInfo();
|
---|
| 366 | const string stfframe = coordsav[1];
|
---|
| 367 | coordtmp[0] = "Hz";
|
---|
| 368 | coordtmp[1] = ( (solFrame_ == MFrequency::N_Types) ?
|
---|
| 369 | stfframe :
|
---|
| 370 | MFrequency::showType(solFrame_) );
|
---|
| 371 | coordtmp[2] = coordsav[2];
|
---|
| 372 | stab->setCoordInfo(coordtmp);
|
---|
| 373 | if (!getFreqInfo(stab, (unsigned int) sigIfno_, basech0, baseinc, basench)) {
|
---|
| 374 | os << LogIO::SEVERE << "No data with IFNO=" << sigIfno_
|
---|
| 375 | << " found in the first table." << LogIO::EXCEPTION;
|
---|
| 376 | }
|
---|
| 377 | else {
|
---|
| 378 | os << "Found IFNO = " << sigIfno_
|
---|
| 379 | << " in the first table." << LogIO::POST;
|
---|
| 380 | }
|
---|
| 381 | if (ftol_.getUnit().empty()) {
|
---|
| 382 | // tolerance in unit of channels
|
---|
| 383 | ftolval = ftol_.getValue() * baseinc;
|
---|
| 384 | }
|
---|
| 385 | else {
|
---|
| 386 | ftolval = ftol_.getValue("Hz");
|
---|
| 387 | }
|
---|
| 388 | inctolval = abs(baseinc/(double) basench);
|
---|
| 389 | const string poltype0 = stab->getPolType();
|
---|
| 390 |
|
---|
| 391 | // Initialize shift values
|
---|
| 392 | initshift();
|
---|
| 393 |
|
---|
| 394 | const bool setImg = ( doboth_ && (imgShift_.size() == 0) );
|
---|
| 395 | // Select IFs
|
---|
| 396 | for (unsigned int itab = 0; itab < ntable_; itab++ ){
|
---|
| 397 | os << "Table " << itab << LogIO::POST;
|
---|
| 398 | if (itab > 0) {
|
---|
| 399 | if (byname) {
|
---|
| 400 | if (!checkFile(infileList_[itab], "d"))
|
---|
| 401 | os << LogIO::SEVERE << "Could not find scantable '"
|
---|
| 402 | << infileList_[itab] << "'" << LogIO::EXCEPTION;
|
---|
| 403 | stab = CountedPtr<Scantable>(new Scantable(infileList_[itab]));
|
---|
| 404 | } else {
|
---|
| 405 | stab = intabList_[itab];
|
---|
| 406 | }
|
---|
| 407 | //POLTYPE should be the same.
|
---|
| 408 | if (stab->getPolType() != poltype0 ) {
|
---|
| 409 | os << LogIO::WARN << "POLTYPE differs from the first table."
|
---|
| 410 | << " Skipping the table" << LogIO::POST;
|
---|
| 411 | continue;
|
---|
| 412 | }
|
---|
| 413 | // Multi beam data may not handled properly
|
---|
| 414 | if (stab->nbeam() > 1)
|
---|
| 415 | os << LogIO::WARN << "Table contains multiple beams. "
|
---|
| 416 | << "It may not be handled properly." << LogIO::POST;
|
---|
| 417 |
|
---|
| 418 | coordsav = stab->getCoordInfo();
|
---|
| 419 | coordtmp[2] = coordsav[2];
|
---|
| 420 | stab->setCoordInfo(coordtmp);
|
---|
| 421 | }
|
---|
| 422 | bool selected = false;
|
---|
| 423 | vector<uint> ifnos = stab->getIFNos();
|
---|
| 424 | vector<uint>::iterator iter;
|
---|
| 425 | const STSelector& basesel = stab->getSelection();
|
---|
| 426 | for (iter = ifnos.begin(); iter != ifnos.end(); iter++){
|
---|
| 427 | unsigned int nch;
|
---|
| 428 | double freq0, incr;
|
---|
| 429 | if ( getFreqInfo(stab, *iter, freq0, incr, nch) ){
|
---|
| 430 | if ( (nch == basench) && (abs(freq0-basech0) < ftolval)
|
---|
| 431 | && (abs(incr-baseinc) < inctolval) ){
|
---|
| 432 | //Found
|
---|
| 433 | STSelector sel(basesel);
|
---|
| 434 | sel.setIFs(vector<int>(1,(int) *iter));
|
---|
| 435 | stab->setSelection(sel);
|
---|
| 436 | CountedPtr<Scantable> seltab = ( new Scantable(*stab, false) );
|
---|
| 437 | stab->setSelection(basesel);
|
---|
| 438 | seltab->setCoordInfo(coordsav);
|
---|
| 439 | const double chShift = (freq0 - basech0) / baseinc;
|
---|
| 440 | tableList_.push_back(seltab);
|
---|
[2808] | 441 | sigShift_.push_back(-chShift);
|
---|
[2794] | 442 | if (setImg)
|
---|
[2808] | 443 | imgShift_.push_back(chShift);
|
---|
[2794] | 444 |
|
---|
| 445 | selected = true;
|
---|
| 446 | os << "- IF" << *iter << " selected: sideband shift = "
|
---|
| 447 | << chShift << " channels" << LogIO::POST;
|
---|
| 448 | }
|
---|
| 449 | }
|
---|
| 450 | } // ifno loop
|
---|
| 451 | stab->setCoordInfo(coordsav);
|
---|
| 452 | if (!selected)
|
---|
| 453 | os << LogIO::WARN << "No data selected in Table "
|
---|
| 454 | << itab << LogIO::POST;
|
---|
| 455 | } // table loop
|
---|
| 456 | nchan_ = basench;
|
---|
| 457 |
|
---|
| 458 | os << "Total number of IFs selected = " << tableList_.size()
|
---|
| 459 | << LogIO::POST;
|
---|
| 460 | if ( setImg && (sigShift_.size() != imgShift_.size()) ){
|
---|
| 461 | os << LogIO::SEVERE
|
---|
| 462 | << "User defined channel shift of image sideband has "
|
---|
| 463 | << imgShift_.size()
|
---|
| 464 | << " elements, while selected IFNOs are " << sigShift_.size()
|
---|
| 465 | << "\nThe frequency tolerance (freqtol) may be too small."
|
---|
| 466 | << LogIO::EXCEPTION;
|
---|
| 467 | }
|
---|
| 468 |
|
---|
| 469 | return tableList_.size();
|
---|
| 470 | };
|
---|
| 471 |
|
---|
| 472 | bool STSideBandSep::getFreqInfo(const CountedPtr<Scantable> &stab,
|
---|
| 473 | const unsigned int &ifno,
|
---|
| 474 | double &freq0, double &incr,
|
---|
| 475 | unsigned int &nchan)
|
---|
| 476 | {
|
---|
| 477 | vector<uint> ifnos = stab->getIFNos();
|
---|
| 478 | bool found = false;
|
---|
| 479 | vector<uint>::iterator iter;
|
---|
| 480 | for (iter = ifnos.begin(); iter != ifnos.end(); iter++){
|
---|
| 481 | if (*iter == ifno) {
|
---|
| 482 | found = true;
|
---|
| 483 | break;
|
---|
| 484 | }
|
---|
| 485 | }
|
---|
| 486 | if (!found)
|
---|
| 487 | return false;
|
---|
| 488 |
|
---|
| 489 | const STSelector& basesel = stab->getSelection();
|
---|
| 490 | STSelector sel(basesel);
|
---|
| 491 | sel.setIFs(vector<int>(1,(int) ifno));
|
---|
| 492 | stab->setSelection(sel);
|
---|
| 493 | vector<double> freqs;
|
---|
| 494 | freqs = stab->getAbcissa(0);
|
---|
| 495 | freq0 = freqs[0];
|
---|
| 496 | incr = freqs[1] - freqs[0];
|
---|
| 497 | nchan = freqs.size();
|
---|
| 498 | stab->setSelection(basesel);
|
---|
| 499 | return true;
|
---|
| 500 | };
|
---|
| 501 |
|
---|
| 502 | ScantableWrapper STSideBandSep::gridTable()
|
---|
| 503 | {
|
---|
| 504 | LogIO os(LogOrigin("STSideBandSep","gridTable()", WHERE));
|
---|
| 505 | if (tableList_.size() == 0)
|
---|
| 506 | throw( AipsError("Internal error. No scantable has been set to grid.") );
|
---|
| 507 | Double xmin, xmax, ymin, ymax;
|
---|
| 508 | mapExtent(tableList_, xmin, xmax, ymin, ymax);
|
---|
| 509 | const Double centx = 0.5 * (xmin + xmax);
|
---|
| 510 | const Double centy = 0.5 * (ymin + ymax);
|
---|
| 511 | const int nx = max(1, (int) ceil( (xmax - xmin) * cos(centy) /xtol_ ) );
|
---|
| 512 | const int ny = max(1, (int) ceil( (ymax - ymin) / ytol_ ) );
|
---|
| 513 |
|
---|
| 514 | string scellx, scelly;
|
---|
| 515 | {
|
---|
| 516 | ostringstream oss;
|
---|
| 517 | oss << xtol_ << "rad" ;
|
---|
| 518 | scellx = oss.str();
|
---|
| 519 | }
|
---|
| 520 | {
|
---|
| 521 | ostringstream oss;
|
---|
| 522 | oss << ytol_ << "rad" ;
|
---|
| 523 | scelly = oss.str();
|
---|
| 524 | }
|
---|
| 525 |
|
---|
| 526 | ScantableWrapper stab0;
|
---|
| 527 | if (intabList_.size() > 0)
|
---|
| 528 | stab0 = ScantableWrapper(intabList_[0]);
|
---|
| 529 | else
|
---|
| 530 | stab0 = ScantableWrapper(infileList_[0]);
|
---|
| 531 |
|
---|
| 532 | string scenter;
|
---|
| 533 | {
|
---|
| 534 | ostringstream oss;
|
---|
| 535 | oss << stab0.getCP()->getDirectionRefString() << " "
|
---|
| 536 | << centx << "rad" << " " << centy << "rad";
|
---|
| 537 | scenter = oss.str();
|
---|
| 538 | }
|
---|
| 539 |
|
---|
| 540 | STGrid2 gridder = STGrid2(stab0);
|
---|
| 541 | gridder.setIF(sigIfno_);
|
---|
| 542 | gridder.defineImage(nx, ny, scellx, scelly, scenter);
|
---|
[2835] | 543 | // gridder.setFunc("box", 1); // convsupport=1 fails
|
---|
| 544 | gridder.setFunc("box");
|
---|
[2794] | 545 | gridder.setWeight("uniform");
|
---|
| 546 | #ifdef KS_DEBUG
|
---|
| 547 | cout << "Grid parameter summary: " << endl;
|
---|
| 548 | cout << "- IF = " << sigIfno_ << endl;
|
---|
[2836] | 549 | cout << "- center = " << scenter << "\n"
|
---|
[2794] | 550 | << "- npix = (" << nx << ", " << ny << ")\n"
|
---|
[2836] | 551 | << "- cell = (" << scellx << ", " << scelly << ")" << endl;
|
---|
[2794] | 552 | #endif
|
---|
| 553 | gridder.grid();
|
---|
| 554 | const int itp = (tp_ == Table::Memory ? 0 : 1);
|
---|
| 555 | ScantableWrapper gtab = gridder.getResultAsScantable(itp);
|
---|
| 556 | return gtab;
|
---|
| 557 | };
|
---|
| 558 |
|
---|
| 559 | void STSideBandSep::mapExtent(vector< CountedPtr<Scantable> > &tablist,
|
---|
| 560 | Double &xmin, Double &xmax,
|
---|
| 561 | Double &ymin, Double &ymax)
|
---|
| 562 | {
|
---|
| 563 | ROArrayColumn<Double> dirCol_;
|
---|
| 564 | dirCol_.attach( tablist[0]->table(), "DIRECTION" );
|
---|
| 565 | Matrix<Double> direction = dirCol_.getColumn();
|
---|
| 566 | Vector<Double> ra( direction.row(0) );
|
---|
| 567 | mathutil::rotateRA(ra);
|
---|
| 568 | minMax( xmin, xmax, ra );
|
---|
| 569 | minMax( ymin, ymax, direction.row(1) );
|
---|
| 570 | Double amin, amax, bmin, bmax;
|
---|
| 571 | const uInt ntab = tablist.size();
|
---|
| 572 | for ( uInt i = 1 ; i < ntab ; i++ ) {
|
---|
| 573 | dirCol_.attach( tablist[i]->table(), "DIRECTION" );
|
---|
| 574 | direction.assign( dirCol_.getColumn() );
|
---|
| 575 | ra.assign( direction.row(0) );
|
---|
| 576 | mathutil::rotateRA(ra);
|
---|
| 577 | minMax( amin, amax, ra );
|
---|
| 578 | minMax( bmin, bmax, direction.row(1) );
|
---|
| 579 | xmin = min(xmin, amin);
|
---|
| 580 | xmax = max(xmax, amax);
|
---|
| 581 | ymin = min(ymin, bmin);
|
---|
| 582 | ymax = max(ymax, bmax);
|
---|
| 583 | }
|
---|
| 584 | };
|
---|
| 585 |
|
---|
| 586 | bool STSideBandSep::getSpectraToSolve(const int polId, const int beamId,
|
---|
| 587 | const double dirX, const double dirY,
|
---|
| 588 | Matrix<float> &specMat, vector<uInt> &tabIdvec)
|
---|
| 589 | {
|
---|
| 590 | LogIO os(LogOrigin("STSideBandSep","getSpectraToSolve()", WHERE));
|
---|
| 591 |
|
---|
| 592 | tabIdvec.resize(0);
|
---|
| 593 | specMat.resize(nchan_, nshift_);
|
---|
| 594 | Vector<float> spec;
|
---|
| 595 | uInt nspec = 0;
|
---|
| 596 | STMath stm(false); // insitu has no effect for average.
|
---|
| 597 | for (uInt itab = 0 ; itab < nshift_ ; itab++) {
|
---|
| 598 | CountedPtr<Scantable> currtab_p = tableList_[itab];
|
---|
| 599 | // Selection by POLNO and BEAMNO
|
---|
| 600 | const STSelector& basesel = currtab_p->getSelection();
|
---|
| 601 | STSelector sel(basesel);
|
---|
| 602 | sel.setPolarizations(vector<int>(1, polId));
|
---|
| 603 | sel.setBeams(vector<int>(1, beamId));
|
---|
| 604 | try {
|
---|
| 605 | currtab_p->setSelection(sel);
|
---|
| 606 | } catch (...) {
|
---|
| 607 | #ifdef KS_DEBUG
|
---|
| 608 | cout << "Table " << itab << " - No spectrum found. skipping the table."
|
---|
| 609 | << endl;
|
---|
| 610 | #endif
|
---|
| 611 | continue;
|
---|
| 612 | }
|
---|
| 613 | // Selection by direction;
|
---|
| 614 | vector<int> selrow(0);
|
---|
| 615 | vector<double> currDir(2, 0.);
|
---|
| 616 | const int nselrow = currtab_p->nrow();
|
---|
| 617 | for (int irow = 0 ; irow < nselrow ; irow++) {
|
---|
| 618 | currDir = currtab_p->getDirectionVector(irow);
|
---|
| 619 | if ( (abs(currDir[0]-dirX) > xtol_) ||
|
---|
| 620 | (abs(currDir[1]-dirY) > ytol_) )
|
---|
| 621 | continue;
|
---|
| 622 | // within direction tolerance
|
---|
| 623 | selrow.push_back(irow);
|
---|
| 624 | } // end of row loop
|
---|
| 625 |
|
---|
| 626 | if (selrow.size() < 1) {
|
---|
| 627 | currtab_p->setSelection(basesel);
|
---|
| 628 |
|
---|
| 629 | #ifdef KS_DEBUG
|
---|
| 630 | cout << "Table " << itab << " - No spectrum found. skipping the table."
|
---|
| 631 | << endl;
|
---|
| 632 | #endif
|
---|
| 633 |
|
---|
| 634 | continue;
|
---|
| 635 | }
|
---|
| 636 |
|
---|
| 637 | // At least a spectrum is selected in this table
|
---|
| 638 | CountedPtr<Scantable> seltab_p = ( new Scantable(*currtab_p, false) );
|
---|
| 639 | currtab_p->setSelection(basesel);
|
---|
| 640 | STSelector sel2(seltab_p->getSelection());
|
---|
| 641 | sel2.setRows(selrow);
|
---|
| 642 | seltab_p->setSelection(sel2);
|
---|
| 643 | CountedPtr<Scantable> avetab_p;
|
---|
| 644 | if (seltab_p->nrow() > 1) {
|
---|
[2836] | 645 | // STMath::average also merges FLAGTRA and FLAGROW
|
---|
[2794] | 646 | avetab_p = stm.average(vector< CountedPtr<Scantable> >(1, seltab_p),
|
---|
| 647 | vector<bool>(), "TINTSYS", "NONE");
|
---|
| 648 | #ifdef KS_DEBUG
|
---|
| 649 | cout << "Table " << itab << " - more than a spectrum is selected. averaging rows..."
|
---|
| 650 | << endl;
|
---|
| 651 | #endif
|
---|
| 652 | if (avetab_p->nrow() > 1)
|
---|
| 653 | throw( AipsError("Averaged table has more than a row. Somethigs went wrong.") );
|
---|
| 654 | } else {
|
---|
| 655 | avetab_p = seltab_p;
|
---|
| 656 | }
|
---|
[2836] | 657 | // Check FLAGTRA and FLAGROW if there's any valid channel in the spectrum
|
---|
| 658 | if (avetab_p->getFlagRow(0) || avetab_p->isAllChannelsFlagged(0)) {
|
---|
| 659 | #ifdef KS_DEBUG
|
---|
| 660 | cout << "Table " << itab << " - All data are flagged. skipping the table."
|
---|
| 661 | << endl;
|
---|
| 662 | #endif
|
---|
| 663 | continue;
|
---|
| 664 | }
|
---|
| 665 | // Interpolate flagged channels of the spectrum.
|
---|
| 666 | Vector<Float> tmpSpec = avetab_p->getSpectrum(0);
|
---|
| 667 | vector<bool> mask = avetab_p->getMask(0);
|
---|
| 668 | mathutil::doZeroOrderInterpolation(tmpSpec, mask);
|
---|
[2794] | 669 | spec.reference(specMat.column(nspec));
|
---|
[2836] | 670 | spec = tmpSpec;
|
---|
[2794] | 671 | tabIdvec.push_back((uInt) itab);
|
---|
| 672 | nspec++;
|
---|
| 673 | } // end of table loop
|
---|
[2836] | 674 | // Check the number of selected spectra and resize matrix.
|
---|
[2794] | 675 | if (nspec != nshift_){
|
---|
| 676 | //shiftSpecmat.resize(nchan_, nspec, true);
|
---|
[2836] | 677 | specMat.resize(nchan_, nspec, true);
|
---|
[2794] | 678 | #ifdef KS_DEBUG
|
---|
| 679 | cout << "Could not find corresponding rows in some tables."
|
---|
| 680 | << endl;
|
---|
| 681 | cout << "Number of spectra selected = " << nspec << endl;
|
---|
| 682 | #endif
|
---|
| 683 | }
|
---|
| 684 | if (nspec < 2) {
|
---|
| 685 | #ifdef KS_DEBUG
|
---|
| 686 | cout << "At least 2 spectra are necessary for convolution"
|
---|
| 687 | << endl;
|
---|
| 688 | #endif
|
---|
| 689 | return false;
|
---|
| 690 | }
|
---|
| 691 | return true;
|
---|
| 692 | };
|
---|
| 693 |
|
---|
| 694 | vector<float> STSideBandSep::solve(const Matrix<float> &specmat,
|
---|
| 695 | const vector<uInt> &tabIdvec,
|
---|
| 696 | const bool signal)
|
---|
| 697 | {
|
---|
| 698 | LogIO os(LogOrigin("STSideBandSep","solve()", WHERE));
|
---|
| 699 | if (tabIdvec.size() == 0)
|
---|
| 700 | throw(AipsError("Internal error. Table index is not defined."));
|
---|
| 701 | if (specmat.ncolumn() != tabIdvec.size())
|
---|
| 702 | throw(AipsError("Internal error. The row number of input matrix is not conformant."));
|
---|
| 703 | if (specmat.nrow() != nchan_)
|
---|
| 704 | throw(AipsError("Internal error. The channel size of input matrix is not conformant."));
|
---|
| 705 |
|
---|
| 706 |
|
---|
| 707 | #ifdef KS_DEBUG
|
---|
| 708 | cout << "Solving " << (signal ? "SIGNAL" : "IMAGE") << " sideband."
|
---|
| 709 | << endl;
|
---|
| 710 | #endif
|
---|
| 711 |
|
---|
| 712 | const size_t nspec = tabIdvec.size();
|
---|
| 713 | vector<double> *thisShift, *otherShift;
|
---|
| 714 | if (signal == otherside_) {
|
---|
| 715 | // (solve signal && solveother = T) OR (solve image && solveother = F)
|
---|
| 716 | thisShift = &imgShift_;
|
---|
| 717 | otherShift = &sigShift_;
|
---|
| 718 | #ifdef KS_DEBUG
|
---|
| 719 | cout << "Image sideband will be deconvolved." << endl;
|
---|
| 720 | #endif
|
---|
| 721 | } else {
|
---|
| 722 | // (solve signal && solveother = F) OR (solve image && solveother = T)
|
---|
| 723 | thisShift = &sigShift_;
|
---|
| 724 | otherShift = &imgShift_;
|
---|
| 725 | #ifdef KS_DEBUG
|
---|
| 726 | cout << "Signal sideband will be deconvolved." << endl;
|
---|
| 727 | #endif
|
---|
| 728 | }
|
---|
| 729 |
|
---|
| 730 | vector<double> spshift(nspec);
|
---|
| 731 | Matrix<float> shiftSpecmat(nchan_, nspec, 0.);
|
---|
| 732 | double tempshift;
|
---|
| 733 | Vector<float> shiftspvec;
|
---|
| 734 | for (uInt i = 0 ; i < nspec; i++) {
|
---|
| 735 | spshift[i] = otherShift->at(i) - thisShift->at(i);
|
---|
| 736 | tempshift = - thisShift->at(i);
|
---|
| 737 | shiftspvec.reference(shiftSpecmat.column(i));
|
---|
| 738 | shiftSpectrum(specmat.column(i), tempshift, shiftspvec);
|
---|
| 739 | }
|
---|
| 740 |
|
---|
| 741 | Matrix<float> convmat(nchan_, nspec*(nspec-1)/2, 0.);
|
---|
| 742 | vector<float> thisvec(nchan_, 0.);
|
---|
| 743 |
|
---|
| 744 | float minval, maxval;
|
---|
| 745 | minMax(minval, maxval, shiftSpecmat);
|
---|
| 746 | #ifdef KS_DEBUG
|
---|
| 747 | cout << "Max/Min of input Matrix = (max: " << maxval << ", min: " << minval << ")" << endl;
|
---|
| 748 | #endif
|
---|
| 749 |
|
---|
| 750 | #ifdef KS_DEBUG
|
---|
| 751 | cout << "starting deconvolution" << endl;
|
---|
| 752 | #endif
|
---|
| 753 | deconvolve(shiftSpecmat, spshift, rejlimit_, convmat);
|
---|
| 754 | #ifdef KS_DEBUG
|
---|
| 755 | cout << "finished deconvolution" << endl;
|
---|
| 756 | #endif
|
---|
| 757 |
|
---|
| 758 | minMax(minval, maxval, convmat);
|
---|
| 759 | #ifdef KS_DEBUG
|
---|
| 760 | cout << "Max/Min of output Matrix = (max: " << maxval << ", min: " << minval << ")" << endl;
|
---|
| 761 | #endif
|
---|
| 762 |
|
---|
| 763 | aggregateMat(convmat, thisvec);
|
---|
| 764 |
|
---|
| 765 | if (!otherside_) return thisvec;
|
---|
| 766 |
|
---|
| 767 | // subtract from the other side band.
|
---|
| 768 | vector<float> othervec(nchan_, 0.);
|
---|
| 769 | subtractFromOther(shiftSpecmat, thisvec, spshift, othervec);
|
---|
| 770 | return othervec;
|
---|
| 771 | };
|
---|
| 772 |
|
---|
| 773 |
|
---|
| 774 | void STSideBandSep::shiftSpectrum(const Vector<float> &invec,
|
---|
| 775 | double shift,
|
---|
| 776 | Vector<float> &outvec)
|
---|
| 777 | {
|
---|
| 778 | LogIO os(LogOrigin("STSideBandSep","shiftSpectrum()", WHERE));
|
---|
| 779 | if (invec.size() != nchan_)
|
---|
| 780 | throw(AipsError("Internal error. The length of input vector differs from nchan_"));
|
---|
| 781 | if (outvec.size() != nchan_)
|
---|
| 782 | throw(AipsError("Internal error. The length of output vector differs from nchan_"));
|
---|
| 783 |
|
---|
| 784 | #ifdef KS_DEBUG
|
---|
| 785 | cout << "Start shifting spectrum for " << shift << "channels" << endl;
|
---|
| 786 | #endif
|
---|
| 787 |
|
---|
| 788 | // tweak shift to be in 0 ~ nchan_-1
|
---|
| 789 | if ( fabs(shift) > nchan_ ) shift = fmod(shift, nchan_);
|
---|
| 790 | if (shift < 0.) shift += nchan_;
|
---|
| 791 | double rweight = fmod(shift, 1.);
|
---|
| 792 | if (rweight < 0.) rweight += 1.;
|
---|
| 793 | double lweight = 1. - rweight;
|
---|
| 794 | uInt lchan, rchan;
|
---|
| 795 |
|
---|
| 796 | outvec = 0;
|
---|
| 797 | for (uInt i = 0 ; i < nchan_ ; i++) {
|
---|
| 798 | lchan = uInt( floor( fmod( (i + shift), nchan_ ) ) );
|
---|
| 799 | if (lchan < 0.) lchan += nchan_;
|
---|
| 800 | rchan = ( (lchan + 1) % nchan_ );
|
---|
| 801 | outvec(lchan) += invec(i) * lweight;
|
---|
| 802 | outvec(rchan) += invec(i) * rweight;
|
---|
| 803 | }
|
---|
| 804 | };
|
---|
| 805 |
|
---|
| 806 | void STSideBandSep::deconvolve(Matrix<float> &specmat,
|
---|
| 807 | const vector<double> shiftvec,
|
---|
| 808 | const double threshold,
|
---|
| 809 | Matrix<float> &outmat)
|
---|
| 810 | {
|
---|
| 811 | LogIO os(LogOrigin("STSideBandSep","deconvolve()", WHERE));
|
---|
| 812 | if (specmat.nrow() != nchan_)
|
---|
| 813 | throw(AipsError("Internal error. The length of input matrix differs from nchan_"));
|
---|
| 814 | if (specmat.ncolumn() != shiftvec.size())
|
---|
| 815 | throw(AipsError("Internal error. The number of input shifts and spectrum differs."));
|
---|
| 816 |
|
---|
[2836] | 817 | #ifdef KS_DEBUG
|
---|
[2794] | 818 | float minval, maxval;
|
---|
[2836] | 819 | #endif
|
---|
[2794] | 820 | #ifdef KS_DEBUG
|
---|
| 821 | minMax(minval, maxval, specmat);
|
---|
| 822 | cout << "Max/Min of input Matrix = (max: " << maxval << ", min: " << minval << ")" << endl;
|
---|
| 823 | #endif
|
---|
| 824 |
|
---|
| 825 | uInt ninsp = shiftvec.size();
|
---|
| 826 | outmat.resize(nchan_, ninsp*(ninsp-1)/2, 0.);
|
---|
| 827 | Matrix<Complex> fftspmat(nchan_/2+1, ninsp, 0.);
|
---|
| 828 | Vector<float> rvecref(nchan_, 0.);
|
---|
| 829 | Vector<Complex> cvecref(nchan_/2+1, 0.);
|
---|
| 830 | uInt icol = 0;
|
---|
| 831 | unsigned int nreject = 0;
|
---|
| 832 |
|
---|
| 833 | #ifdef KS_DEBUG
|
---|
| 834 | cout << "Starting initial FFT. The number of input spectra = " << ninsp << endl;
|
---|
| 835 | cout << "out matrix has ncolumn = " << outmat.ncolumn() << endl;
|
---|
| 836 | #endif
|
---|
| 837 |
|
---|
| 838 | for (uInt isp = 0 ; isp < ninsp ; isp++) {
|
---|
| 839 | rvecref.reference( specmat.column(isp) );
|
---|
| 840 | cvecref.reference( fftspmat.column(isp) );
|
---|
| 841 |
|
---|
| 842 | #ifdef KS_DEBUG
|
---|
| 843 | minMax(minval, maxval, rvecref);
|
---|
| 844 | cout << "Max/Min of inv FFTed Matrix = (max: " << maxval << ", min: " << minval << ")" << endl;
|
---|
| 845 | #endif
|
---|
| 846 |
|
---|
| 847 | fftsf.fft0(cvecref, rvecref, true);
|
---|
| 848 |
|
---|
| 849 | #ifdef KS_DEBUG
|
---|
| 850 | double maxr=cvecref[0].real(), minr=cvecref[0].real(),
|
---|
| 851 | maxi=cvecref[0].imag(), mini=cvecref[0].imag();
|
---|
| 852 | for (uInt i = 1; i<cvecref.size();i++){
|
---|
| 853 | maxr = max(maxr, cvecref[i].real());
|
---|
| 854 | maxi = max(maxi, cvecref[i].imag());
|
---|
| 855 | minr = min(minr, cvecref[i].real());
|
---|
| 856 | mini = min(mini, cvecref[i].imag());
|
---|
| 857 | }
|
---|
| 858 | cout << "Max/Min of inv FFTed Matrix (size=" << cvecref.size() << ") = (max: " << maxr << " + " << maxi << "j , min: " << minr << " + " << mini << "j)" << endl;
|
---|
| 859 | #endif
|
---|
| 860 | }
|
---|
| 861 |
|
---|
| 862 | //Liberate from reference
|
---|
| 863 | rvecref.unique();
|
---|
| 864 |
|
---|
| 865 | Vector<Complex> cspec(nchan_/2+1, 0.);
|
---|
| 866 | const double PI = 6.0 * asin(0.5);
|
---|
| 867 | const double nchani = 1. / (float) nchan_;
|
---|
| 868 | const Complex trans(0., 1.);
|
---|
| 869 | #ifdef KS_DEBUG
|
---|
| 870 | cout << "starting actual deconvolution" << endl;
|
---|
| 871 | #endif
|
---|
| 872 | for (uInt j = 0 ; j < ninsp ; j++) {
|
---|
| 873 | for (uInt k = j+1 ; k < ninsp ; k++) {
|
---|
| 874 | const double dx = (shiftvec[k] - shiftvec[j]) * 2. * PI * nchani;
|
---|
| 875 |
|
---|
| 876 | #ifdef KS_DEBUG
|
---|
| 877 | cout << "icol = " << icol << endl;
|
---|
| 878 | #endif
|
---|
| 879 |
|
---|
| 880 | for (uInt ichan = 0 ; ichan < cspec.size() ; ichan++){
|
---|
| 881 | cspec[ichan] = ( fftspmat(ichan, j) + fftspmat(ichan, k) )*0.5;
|
---|
| 882 | double phase = dx*ichan;
|
---|
| 883 | if ( fabs( sin(phase) ) > threshold){
|
---|
| 884 | cspec[ichan] += ( fftspmat(ichan, j) - fftspmat(ichan, k) ) * 0.5
|
---|
| 885 | * trans * sin(phase) / ( 1. - cos(phase) );
|
---|
| 886 | } else {
|
---|
| 887 | nreject++;
|
---|
| 888 | }
|
---|
| 889 | } // end of channel loop
|
---|
| 890 |
|
---|
| 891 | #ifdef KS_DEBUG
|
---|
| 892 | cout << "done calculation of cspec" << endl;
|
---|
| 893 | #endif
|
---|
| 894 |
|
---|
| 895 | Vector<Float> rspec;
|
---|
| 896 | rspec.reference( outmat.column(icol) );
|
---|
| 897 |
|
---|
| 898 | #ifdef KS_DEBUG
|
---|
| 899 | cout << "Starting inverse FFT. icol = " << icol << endl;
|
---|
| 900 | //cout << "- size of complex vector = " << cspec.size() << endl;
|
---|
| 901 | double maxr=cspec[0].real(), minr=cspec[0].real(),
|
---|
| 902 | maxi=cspec[0].imag(), mini=cspec[0].imag();
|
---|
| 903 | for (uInt i = 1; i<cspec.size();i++){
|
---|
| 904 | maxr = max(maxr, cspec[i].real());
|
---|
| 905 | maxi = max(maxi, cspec[i].imag());
|
---|
| 906 | minr = min(minr, cspec[i].real());
|
---|
| 907 | mini = min(mini, cspec[i].imag());
|
---|
| 908 | }
|
---|
| 909 | cout << "Max/Min of conv vector (size=" << cspec.size() << ") = (max: " << maxr << " + " << maxi << "j , min: " << minr << " + " << mini << "j)" << endl;
|
---|
| 910 | #endif
|
---|
| 911 |
|
---|
| 912 | fftsi.fft0(rspec, cspec, false);
|
---|
| 913 |
|
---|
| 914 | #ifdef KS_DEBUG
|
---|
| 915 | //cout << "- size of inversed real vector = " << rspec.size() << endl;
|
---|
| 916 | minMax(minval, maxval, rspec);
|
---|
| 917 | cout << "Max/Min of inv FFTed Vector (size=" << rspec.size() << ") = (max: " << maxval << ", min: " << minval << ")" << endl;
|
---|
| 918 | //cout << "Done inverse FFT. icol = " << icol << endl;
|
---|
| 919 | #endif
|
---|
| 920 |
|
---|
| 921 | icol++;
|
---|
| 922 | }
|
---|
| 923 | }
|
---|
| 924 |
|
---|
| 925 | #ifdef KS_DEBUG
|
---|
| 926 | minMax(minval, maxval, outmat);
|
---|
| 927 | cout << "Max/Min of inv FFTed Matrix = (max: " << maxval << ", min: " << minval << ")" << endl;
|
---|
| 928 | #endif
|
---|
| 929 |
|
---|
| 930 | os << "Threshold = " << threshold << ", Rejected channels = " << nreject << endl;
|
---|
| 931 | };
|
---|
| 932 |
|
---|
| 933 |
|
---|
| 934 | void STSideBandSep::aggregateMat(Matrix<float> &inmat,
|
---|
| 935 | vector<float> &outvec)
|
---|
| 936 | {
|
---|
| 937 | LogIO os(LogOrigin("STSideBandSep","aggregateMat()", WHERE));
|
---|
| 938 | if (inmat.nrow() != nchan_)
|
---|
| 939 | throw(AipsError("Internal error. The row numbers of input matrix differs from nchan_"));
|
---|
| 940 | // if (outvec.size() != nchan_)
|
---|
| 941 | // throw(AipsError("Internal error. The size of output vector should be equal to nchan_"));
|
---|
| 942 |
|
---|
| 943 | os << "Averaging " << inmat.ncolumn() << " spectra in the input matrix."
|
---|
| 944 | << LogIO::POST;
|
---|
| 945 |
|
---|
| 946 | const uInt nspec = inmat.ncolumn();
|
---|
| 947 | const double scale = 1./( (double) nspec );
|
---|
| 948 | // initialize values with 0
|
---|
| 949 | outvec.assign(nchan_, 0);
|
---|
| 950 | for (uInt isp = 0 ; isp < nspec ; isp++) {
|
---|
| 951 | for (uInt ich = 0 ; ich < nchan_ ; ich++) {
|
---|
| 952 | outvec[ich] += inmat(ich, isp);
|
---|
| 953 | }
|
---|
| 954 | }
|
---|
| 955 |
|
---|
| 956 | vector<float>::iterator iter;
|
---|
| 957 | for (iter = outvec.begin(); iter != outvec.end(); iter++){
|
---|
| 958 | *iter *= scale;
|
---|
| 959 | }
|
---|
| 960 | };
|
---|
| 961 |
|
---|
| 962 | void STSideBandSep::subtractFromOther(const Matrix<float> &shiftmat,
|
---|
| 963 | const vector<float> &invec,
|
---|
| 964 | const vector<double> &shift,
|
---|
| 965 | vector<float> &outvec)
|
---|
| 966 | {
|
---|
| 967 | LogIO os(LogOrigin("STSideBandSep","subtractFromOther()", WHERE));
|
---|
| 968 | if (shiftmat.nrow() != nchan_)
|
---|
| 969 | throw(AipsError("Internal error. The row numbers of input matrix differs from nchan_"));
|
---|
| 970 | if (invec.size() != nchan_)
|
---|
| 971 | throw(AipsError("Internal error. The length of input vector should be nchan_"));
|
---|
| 972 | if (shift.size() != shiftmat.ncolumn())
|
---|
| 973 | throw(AipsError("Internal error. The column numbers of input matrix != the number of elements in shift"));
|
---|
| 974 |
|
---|
| 975 | const uInt nspec = shiftmat.ncolumn();
|
---|
| 976 | Vector<float> subsp(nchan_, 0.), shiftsub;
|
---|
| 977 | Matrix<float> submat(nchan_, nspec, 0.);
|
---|
| 978 | vector<float>::iterator iter;
|
---|
| 979 | for (uInt isp = 0 ; isp < nspec ; isp++) {
|
---|
| 980 | for (uInt ich = 0; ich < nchan_ ; ich++) {
|
---|
| 981 | subsp(ich) = shiftmat(ich, isp) - invec[ich];
|
---|
| 982 | }
|
---|
| 983 | shiftsub.reference(submat.column(isp));
|
---|
| 984 | shiftSpectrum(subsp, shift[isp], shiftsub);
|
---|
| 985 | }
|
---|
| 986 |
|
---|
| 987 | aggregateMat(submat, outvec);
|
---|
| 988 | };
|
---|
| 989 |
|
---|
| 990 |
|
---|
| 991 | void STSideBandSep::setLO1(const string lo1, const string frame,
|
---|
[2726] | 992 | const double reftime, const string refdir)
|
---|
[2707] | 993 | {
|
---|
[2794] | 994 | Quantum<Double> qfreq;
|
---|
| 995 | readQuantity(qfreq, String(lo1));
|
---|
| 996 | lo1Freq_ = qfreq.getValue("Hz");
|
---|
[2707] | 997 | MFrequency::getType(loFrame_, frame);
|
---|
| 998 | loTime_ = reftime;
|
---|
| 999 | loDir_ = refdir;
|
---|
| 1000 |
|
---|
| 1001 | #ifdef KS_DEBUG
|
---|
| 1002 | cout << "STSideBandSep::setLO1" << endl;
|
---|
| 1003 | if (lo1Freq_ > 0.)
|
---|
| 1004 | cout << "lo1 = " << lo1Freq_ << " [Hz] (" << frame << ")" << endl;
|
---|
| 1005 | if (loTime_ > 0.)
|
---|
| 1006 | cout << "ref time = " << loTime_ << " [day]" << endl;
|
---|
| 1007 | if (!loDir_.empty())
|
---|
| 1008 | cout << "ref direction = " << loDir_ << " [day]" << endl;
|
---|
| 1009 | #endif
|
---|
| 1010 | };
|
---|
| 1011 |
|
---|
[2711] | 1012 | void STSideBandSep::setLO1Root(string name)
|
---|
[2707] | 1013 | {
|
---|
[2711] | 1014 | LogIO os(LogOrigin("STSideBandSep","setLO1Root()", WHERE));
|
---|
| 1015 | os << "Searching for '" << name << "'..." << LogIO::POST;
|
---|
| 1016 | // Check for existance of the file
|
---|
| 1017 | if (!checkFile(name)) {
|
---|
[2707] | 1018 | throw(AipsError("File does not exist"));
|
---|
| 1019 | }
|
---|
[2711] | 1020 | if (name[(name.size()-1)] == '/')
|
---|
| 1021 | name = name.substr(0,(name.size()-2));
|
---|
[2707] | 1022 |
|
---|
[2711] | 1023 | if (checkFile(name+"/Receiver.xml", "file") &&
|
---|
| 1024 | checkFile(name+"/SpectralWindow.xml", "file")){
|
---|
| 1025 | os << "Found '" << name << "/Receiver.xml' ... got an ASDM name." << LogIO::POST;
|
---|
| 1026 | asdmName_ = name;
|
---|
| 1027 | } else if (checkFile(name+"/ASDM_RECEIVER") &&
|
---|
| 1028 | checkFile(name+"/ASDM_SPECTRALWINDOW")){
|
---|
| 1029 | os << "Found '" << name << "/ASDM_RECEIVER' ... got a Table name." << LogIO::POST;
|
---|
| 1030 | asisName_ = name;
|
---|
| 1031 | } else {
|
---|
| 1032 | throw(AipsError("Invalid file name. Set an MS or ASDM name."));
|
---|
| 1033 | }
|
---|
[2707] | 1034 |
|
---|
| 1035 | #ifdef KS_DEBUG
|
---|
[2711] | 1036 | cout << "STSideBandSep::setLO1Root" << endl;
|
---|
| 1037 | if (!asdmName_.empty())
|
---|
| 1038 | cout << "asdm name = " << asdmName_ << endl;
|
---|
| 1039 | if (!asisName_.empty())
|
---|
| 1040 | cout << "MS name = " << asisName_ << endl;
|
---|
[2707] | 1041 | #endif
|
---|
| 1042 | };
|
---|
| 1043 |
|
---|
[2712] | 1044 |
|
---|
[2794] | 1045 | void STSideBandSep::solveImageFrequency()
|
---|
[2707] | 1046 | {
|
---|
| 1047 | LogIO os(LogOrigin("STSideBandSep","solveImageFreqency()", WHERE));
|
---|
| 1048 | os << "Start calculating frequencies of image side band" << LogIO::POST;
|
---|
| 1049 |
|
---|
| 1050 | if (imgTab_p.null())
|
---|
| 1051 | throw AipsError("STSideBandSep::solveImageFreqency - an image side band scantable should be set first");
|
---|
| 1052 |
|
---|
[2711] | 1053 | // Convert frequency REFVAL to the value in frame of LO.
|
---|
[2707] | 1054 | // The code assumes that imgTab_p has only an IF and only a FREQ_ID
|
---|
| 1055 | // is associated to an IFNO
|
---|
| 1056 | // TODO: More complete Procedure would be
|
---|
| 1057 | // 1. Get freq IDs associated to sigIfno_
|
---|
| 1058 | // 2. Get freq information of the freq IDs
|
---|
| 1059 | // 3. For each freqIDs, get freq infromation in TOPO and an LO1
|
---|
| 1060 | // frequency and calculate image band frequencies.
|
---|
| 1061 | STFrequencies freqTab_ = imgTab_p->frequencies();
|
---|
| 1062 | // get the base frame of table
|
---|
| 1063 | const MFrequency::Types tabframe = freqTab_.getFrame(true);
|
---|
| 1064 | TableVector<uInt> freqIdVec( imgTab_p->table(), "FREQ_ID" );
|
---|
| 1065 | // assuming single freqID per IFNO
|
---|
| 1066 | uInt freqid = freqIdVec(0);
|
---|
[2711] | 1067 | int nChan = imgTab_p->nchan(imgTab_p->getIF(0));
|
---|
[2707] | 1068 | double refpix, refval, increment ;
|
---|
| 1069 | freqTab_.getEntry(refpix, refval, increment, freqid);
|
---|
| 1070 | //MFrequency sigrefval = MFrequency(MVFrequency(refval),tabframe);
|
---|
| 1071 | // get freq infromation of sigIfno_ in loFrame_
|
---|
| 1072 | const MPosition mp = imgTab_p->getAntennaPosition();
|
---|
| 1073 | MEpoch me;
|
---|
| 1074 | MDirection md;
|
---|
| 1075 | if (loTime_ < 0.)
|
---|
| 1076 | me = imgTab_p->getEpoch(-1);
|
---|
| 1077 | else
|
---|
| 1078 | me = MEpoch(MVEpoch(loTime_));
|
---|
| 1079 | if (loDir_.empty()) {
|
---|
| 1080 | ArrayColumn<Double> srcdirCol_;
|
---|
| 1081 | srcdirCol_.attach(imgTab_p->table(), "SRCDIRECTION");
|
---|
| 1082 | // Assuming J2000 and SRCDIRECTION in unit of rad
|
---|
| 1083 | Quantum<Double> srcra = Quantum<Double>(srcdirCol_(0)(IPosition(1,0)), "rad");
|
---|
| 1084 | Quantum<Double> srcdec = Quantum<Double>(srcdirCol_(0)(IPosition(1,1)), "rad");
|
---|
| 1085 | md = MDirection(srcra, srcdec, MDirection::J2000);
|
---|
| 1086 | //imgTab_p->getDirection(0);
|
---|
| 1087 | } else {
|
---|
| 1088 | // parse direction string
|
---|
| 1089 | string::size_type pos0 = loDir_.find(" ");
|
---|
| 1090 |
|
---|
| 1091 | if (pos0 == string::npos) {
|
---|
| 1092 | throw AipsError("bad string format in LO1 direction");
|
---|
| 1093 | }
|
---|
| 1094 | string::size_type pos1 = loDir_.find(" ", pos0+1);
|
---|
| 1095 | String sepoch, sra, sdec;
|
---|
| 1096 | if (pos1 != string::npos) {
|
---|
| 1097 | sepoch = loDir_.substr(0, pos0);
|
---|
| 1098 | sra = loDir_.substr(pos0+1, pos1-pos0);
|
---|
| 1099 | sdec = loDir_.substr(pos1+1);
|
---|
| 1100 | }
|
---|
| 1101 | MDirection::Types epoch;
|
---|
| 1102 | MDirection::getType(epoch, sepoch);
|
---|
| 1103 | QuantumHolder qh ;
|
---|
| 1104 | String err ;
|
---|
| 1105 | qh.fromString( err, sra);
|
---|
| 1106 | Quantum<Double> ra = qh.asQuantumDouble() ;
|
---|
| 1107 | qh.fromString( err, sdec ) ;
|
---|
| 1108 | Quantum<Double> dec = qh.asQuantumDouble() ;
|
---|
[2716] | 1109 | //md = MDirection(ra.getValue("rad"), dec.getValue("rad"),epoch);
|
---|
| 1110 | md = MDirection(ra, dec, epoch);
|
---|
[2707] | 1111 | }
|
---|
| 1112 | MeasFrame mframe( me, mp, md );
|
---|
[2709] | 1113 | MFrequency::Convert tobframe(loFrame_, MFrequency::Ref(tabframe, mframe));
|
---|
| 1114 | MFrequency::Convert toloframe(tabframe, MFrequency::Ref(loFrame_, mframe));
|
---|
[2711] | 1115 | // Convert refval to loFrame_
|
---|
[2707] | 1116 | double sigrefval;
|
---|
| 1117 | if (tabframe == loFrame_)
|
---|
| 1118 | sigrefval = refval;
|
---|
| 1119 | else
|
---|
| 1120 | sigrefval = toloframe(Quantum<Double>(refval, "Hz")).get("Hz").getValue();
|
---|
| 1121 |
|
---|
[2711] | 1122 | // Check for the availability of LO1
|
---|
| 1123 | if (lo1Freq_ > 0.) {
|
---|
| 1124 | os << "Using user defined LO1 frequency." << LogIO::POST;
|
---|
| 1125 | } else if (!asisName_.empty()) {
|
---|
| 1126 | // MS name is set.
|
---|
| 1127 | os << "Using user defined MS (asis): " << asisName_ << LogIO::POST;
|
---|
| 1128 | if (!getLo1FromAsisTab(asisName_, sigrefval, refpix, increment, nChan)) {
|
---|
| 1129 | throw AipsError("Failed to get LO1 frequency from MS");
|
---|
| 1130 | }
|
---|
| 1131 | } else if (!asdmName_.empty()) {
|
---|
| 1132 | // ASDM name is set.
|
---|
| 1133 | os << "Using user defined ASDM: " << asdmName_ << LogIO::POST;
|
---|
| 1134 | if (!getLo1FromAsdm(asdmName_, sigrefval, refpix, increment, nChan)) {
|
---|
| 1135 | throw AipsError("Failed to get LO1 frequency from ASDM");
|
---|
| 1136 | }
|
---|
| 1137 | } else {
|
---|
| 1138 | // Try getting ASDM name from scantable header
|
---|
| 1139 | os << "Try getting information from scantable header" << LogIO::POST;
|
---|
[2794] | 1140 | if (!getLo1FromScanTab(tableList_[0], sigrefval, refpix, increment, nChan)) {
|
---|
[2711] | 1141 | //throw AipsError("Failed to get LO1 frequency from asis table");
|
---|
| 1142 | os << LogIO::WARN << "Failed to get LO1 frequency using information in scantable." << LogIO::POST;
|
---|
| 1143 | os << LogIO::WARN << "Could not fill frequency information of IMAGE sideband properly." << LogIO::POST;
|
---|
| 1144 | os << LogIO::WARN << "Storing values of SIGNAL sideband in FREQUENCIES table" << LogIO::POST;
|
---|
| 1145 | return;
|
---|
| 1146 | }
|
---|
| 1147 | }
|
---|
[2794] | 1148 |
|
---|
[2711] | 1149 | // LO1 should now be ready.
|
---|
| 1150 | if (lo1Freq_ < 0.)
|
---|
| 1151 | throw(AipsError("Got negative LO1 Frequency"));
|
---|
| 1152 |
|
---|
[2794] | 1153 | // Print summary
|
---|
| 1154 | {
|
---|
| 1155 | // LO1
|
---|
| 1156 | Vector<Double> dirvec = md.getAngle(Unit(String("rad"))).getValue();
|
---|
| 1157 | os << "[LO1 settings]" << LogIO::POST;
|
---|
| 1158 | os << "- Frequency: " << lo1Freq_ << " [Hz] ("
|
---|
| 1159 | << MFrequency::showType(loFrame_) << ")" << LogIO::POST;
|
---|
| 1160 | os << "- Reference time: " << me.get(Unit(String("d"))).getValue()
|
---|
| 1161 | << " [day]" << LogIO::POST;
|
---|
| 1162 | os << "- Reference direction: [" << dirvec[0] << ", " << dirvec[1]
|
---|
| 1163 | << "] (" << md.getRefString() << ") " << LogIO::POST;
|
---|
[2711] | 1164 |
|
---|
[2794] | 1165 | // signal sideband
|
---|
| 1166 | os << "[Signal side band]" << LogIO::POST;
|
---|
| 1167 | os << "- IFNO: " << imgTab_p->getIF(0) << " (FREQ_ID = " << freqid << ")"
|
---|
| 1168 | << LogIO::POST;
|
---|
| 1169 | os << "- Reference value: " << refval << " [Hz] ("
|
---|
| 1170 | << MFrequency::showType(tabframe) << ") = "
|
---|
| 1171 | << sigrefval << " [Hz] (" << MFrequency::showType(loFrame_)
|
---|
| 1172 | << ")" << LogIO::POST;
|
---|
| 1173 | os << "- Reference pixel: " << refpix << LogIO::POST;
|
---|
| 1174 | os << "- Increment: " << increment << " [Hz]" << LogIO::POST;
|
---|
| 1175 | }
|
---|
[2711] | 1176 |
|
---|
| 1177 | // Calculate image band incr and refval in loFrame_
|
---|
[2707] | 1178 | Double imgincr = -increment;
|
---|
| 1179 | Double imgrefval = 2 * lo1Freq_ - sigrefval;
|
---|
| 1180 | Double imgrefval_tab = imgrefval;
|
---|
[2711] | 1181 | // Convert imgrefval back to table base frame
|
---|
[2707] | 1182 | if (tabframe != loFrame_)
|
---|
| 1183 | imgrefval = tobframe(Quantum<Double>(imgrefval, "Hz")).get("Hz").getValue();
|
---|
[2711] | 1184 | // Set new frequencies table
|
---|
[2707] | 1185 | uInt fIDnew = freqTab_.addEntry(refpix, imgrefval, imgincr);
|
---|
[2711] | 1186 | // Update FREQ_ID in table.
|
---|
[2707] | 1187 | freqIdVec = fIDnew;
|
---|
[2711] | 1188 |
|
---|
[2794] | 1189 | // Print summary (Image sideband)
|
---|
| 1190 | {
|
---|
| 1191 | os << "[Image side band]" << LogIO::POST;
|
---|
| 1192 | os << "- IFNO: " << imgTab_p->getIF(0) << " (FREQ_ID = " << freqIdVec(0)
|
---|
| 1193 | << ")" << LogIO::POST;
|
---|
| 1194 | os << "- Reference value: " << imgrefval << " [Hz] ("
|
---|
| 1195 | << MFrequency::showType(tabframe) << ") = "
|
---|
| 1196 | << imgrefval_tab << " [Hz] (" << MFrequency::showType(loFrame_)
|
---|
| 1197 | << ")" << LogIO::POST;
|
---|
| 1198 | os << "- Reference pixel: " << refpix << LogIO::POST;
|
---|
| 1199 | os << "- Increment: " << imgincr << " [Hz]" << LogIO::POST;
|
---|
| 1200 | }
|
---|
[2707] | 1201 | };
|
---|
| 1202 |
|
---|
| 1203 | Bool STSideBandSep::checkFile(const string name, string type)
|
---|
| 1204 | {
|
---|
| 1205 | File file(name);
|
---|
| 1206 | if (!file.exists()){
|
---|
| 1207 | return false;
|
---|
| 1208 | } else if (type.empty()) {
|
---|
| 1209 | return true;
|
---|
| 1210 | } else {
|
---|
| 1211 | // Check for file type
|
---|
| 1212 | switch (tolower(type[0])) {
|
---|
| 1213 | case 'f':
|
---|
| 1214 | return file.isRegular(True);
|
---|
| 1215 | case 'd':
|
---|
| 1216 | return file.isDirectory(True);
|
---|
| 1217 | case 's':
|
---|
| 1218 | return file.isSymLink();
|
---|
| 1219 | default:
|
---|
| 1220 | throw AipsError("Invalid file type. Available types are 'file', 'directory', and 'symlink'.");
|
---|
| 1221 | }
|
---|
| 1222 | }
|
---|
| 1223 | };
|
---|
| 1224 |
|
---|
[2711] | 1225 | bool STSideBandSep::getLo1FromAsdm(const string asdmname,
|
---|
[2836] | 1226 | const double /*refval*/,
|
---|
| 1227 | const double /*refpix*/,
|
---|
| 1228 | const double /*increment*/,
|
---|
| 1229 | const int /*nChan*/)
|
---|
[2707] | 1230 | {
|
---|
| 1231 | // Check for relevant tables.
|
---|
| 1232 | string spwname = asdmname + "/SpectralWindow.xml";
|
---|
| 1233 | string recname = asdmname + "/Receiver.xml";
|
---|
| 1234 | if (!checkFile(spwname) || !checkFile(recname)) {
|
---|
| 1235 | throw(AipsError("Could not find subtables in ASDM"));
|
---|
| 1236 | }
|
---|
| 1237 |
|
---|
| 1238 | return false;
|
---|
| 1239 |
|
---|
| 1240 | };
|
---|
| 1241 |
|
---|
| 1242 |
|
---|
[2711] | 1243 | bool STSideBandSep::getLo1FromScanTab(CountedPtr< Scantable > &scantab,
|
---|
| 1244 | const double refval,
|
---|
| 1245 | const double refpix,
|
---|
| 1246 | const double increment,
|
---|
| 1247 | const int nChan)
|
---|
[2707] | 1248 | {
|
---|
[2711] | 1249 | LogIO os(LogOrigin("STSideBandSep","getLo1FromScanTab()", WHERE));
|
---|
[2707] | 1250 | // Check for relevant tables.
|
---|
[2712] | 1251 | const TableRecord &rec = scantab->table().keywordSet() ;
|
---|
[2711] | 1252 | String spwname, recname;
|
---|
[2712] | 1253 | if (rec.isDefined("ASDM_SPECTRALWINDOW") && rec.isDefined("ASDM_RECEIVER")){
|
---|
| 1254 | spwname = rec.asString("ASDM_SPECTRALWINDOW");
|
---|
| 1255 | recname = rec.asString("ASDM_RECEIVER");
|
---|
| 1256 | }
|
---|
| 1257 | else {
|
---|
[2711] | 1258 | // keywords are not there
|
---|
| 1259 | os << LogIO::WARN
|
---|
| 1260 | << "Could not find necessary table names in scantable header."
|
---|
| 1261 | << LogIO::POST;
|
---|
| 1262 | return false;
|
---|
| 1263 | }
|
---|
[2707] | 1264 | if (!checkFile(spwname,"directory") || !checkFile(recname,"directory")) {
|
---|
[2711] | 1265 | throw(AipsError("Could not find relevant subtables in MS"));
|
---|
[2707] | 1266 | }
|
---|
[2711] | 1267 | // Get root MS name
|
---|
| 1268 | string msname;
|
---|
| 1269 | const String recsuff = "/ASDM_RECEIVER";
|
---|
| 1270 | String::size_type pos;
|
---|
[2712] | 1271 | pos = recname.size()-recsuff.size();
|
---|
[2711] | 1272 | if (recname.substr(pos) == recsuff)
|
---|
[2712] | 1273 | msname = recname.substr(0, pos);
|
---|
[2711] | 1274 | else
|
---|
| 1275 | throw(AipsError("Internal error in parsing table name from a scantable keyword."));
|
---|
[2707] | 1276 |
|
---|
[2711] | 1277 | if (!checkFile(msname))
|
---|
| 1278 | throw(AipsError("Internal error in parsing MS name from a scantable keyword."));
|
---|
[2707] | 1279 |
|
---|
[2711] | 1280 | return getLo1FromAsisTab(msname, refval, refpix, increment, nChan);
|
---|
| 1281 |
|
---|
[2707] | 1282 | };
|
---|
| 1283 |
|
---|
[2711] | 1284 | bool STSideBandSep::getLo1FromAsisTab(const string msname,
|
---|
| 1285 | const double refval,
|
---|
| 1286 | const double refpix,
|
---|
| 1287 | const double increment,
|
---|
| 1288 | const int nChan)
|
---|
| 1289 | {
|
---|
| 1290 | LogIO os(LogOrigin("STSideBandSep","getLo1FromAsisTab()", WHERE));
|
---|
| 1291 | os << "Searching an LO1 frequency in '" << msname << "'" << LogIO::POST;
|
---|
| 1292 | // Check for relevant tables.
|
---|
| 1293 | const string spwname = msname + "/ASDM_SPECTRALWINDOW";
|
---|
| 1294 | const string recname = msname + "/ASDM_RECEIVER";
|
---|
| 1295 | if (!checkFile(spwname,"directory") || !checkFile(recname,"directory")) {
|
---|
| 1296 | throw(AipsError("Could not find relevant tables in MS"));
|
---|
| 1297 | }
|
---|
[2707] | 1298 |
|
---|
[2711] | 1299 | Table spwtab_ = Table(spwname);
|
---|
| 1300 | String asdmSpw;
|
---|
| 1301 | ROTableRow spwrow(spwtab_);
|
---|
| 1302 | const Double rtol = 0.01;
|
---|
| 1303 | for (uInt idx = 0; idx < spwtab_.nrow(); idx++){
|
---|
| 1304 | const TableRecord& rec = spwrow.get(idx);
|
---|
| 1305 | // Compare nchan
|
---|
| 1306 | if (rec.asInt("numChan") != (Int) nChan)
|
---|
| 1307 | continue;
|
---|
| 1308 | // Compare increment
|
---|
| 1309 | Double asdminc;
|
---|
| 1310 | Array<Double> incarr = rec.asArrayDouble("chanWidthArray");
|
---|
| 1311 | if (incarr.size() > 0)
|
---|
| 1312 | asdminc = incarr(IPosition(1, (uInt) refpix));
|
---|
| 1313 | else
|
---|
| 1314 | asdminc = rec.asDouble("chanWidth");
|
---|
| 1315 | if (abs(asdminc - abs(increment)) > rtol * abs(increment))
|
---|
| 1316 | continue;
|
---|
| 1317 | // Compare refval
|
---|
| 1318 | Double asdmrefv;
|
---|
| 1319 | Array<Double> refvarr = rec.asArrayDouble("chanFreqArray");
|
---|
| 1320 | if (refvarr.size() > 0){
|
---|
| 1321 | const uInt iref = (uInt) refpix;
|
---|
| 1322 | const Double ratio = refpix - (Double) iref;
|
---|
| 1323 | asdmrefv = refvarr(IPosition(1, iref))*(1.-ratio)
|
---|
| 1324 | + refvarr(IPosition(1,iref+1))*ratio;
|
---|
| 1325 | }
|
---|
| 1326 | else {
|
---|
| 1327 | const Double ch0 = rec.asDouble("chanFreqStart");
|
---|
| 1328 | const Double chstep = rec.asDouble("chanFreqStep");
|
---|
| 1329 | asdmrefv = ch0 + chstep * refpix;
|
---|
| 1330 | }
|
---|
| 1331 | if (abs(asdmrefv - refval) < 0.5*abs(asdminc)){
|
---|
| 1332 | asdmSpw = rec.asString("spectralWindowId");
|
---|
| 1333 | break;
|
---|
| 1334 | }
|
---|
| 1335 | }
|
---|
| 1336 |
|
---|
| 1337 | if (asdmSpw.empty()){
|
---|
| 1338 | os << LogIO::WARN << "Could not find relevant SPW ID in " << spwname << LogIO::POST;
|
---|
| 1339 | return false;
|
---|
| 1340 | }
|
---|
| 1341 | else {
|
---|
| 1342 | os << asdmSpw << " in " << spwname
|
---|
| 1343 | << " matches the freqeuncies of signal side band." << LogIO::POST;
|
---|
| 1344 | }
|
---|
| 1345 |
|
---|
| 1346 | Table rectab_ = Table(recname);
|
---|
| 1347 | ROTableRow recrow(rectab_);
|
---|
| 1348 | for (uInt idx = 0; idx < rectab_.nrow(); idx++){
|
---|
| 1349 | const TableRecord& rec = recrow.get(idx);
|
---|
| 1350 | if (rec.asString("spectralWindowId") == asdmSpw){
|
---|
| 1351 | const Array<Double> loarr = rec.asArrayDouble("freqLO");
|
---|
| 1352 | lo1Freq_ = loarr(IPosition(1,0));
|
---|
| 1353 | os << "Found LO1 Frequency in " << recname << ": "
|
---|
| 1354 | << lo1Freq_ << " [Hz]" << LogIO::POST;
|
---|
| 1355 | return true;
|
---|
| 1356 | }
|
---|
| 1357 | }
|
---|
| 1358 | os << LogIO::WARN << "Could not find " << asdmSpw << " in " << recname
|
---|
| 1359 | << LogIO::POST;
|
---|
| 1360 | return false;
|
---|
| 1361 | };
|
---|
| 1362 |
|
---|
[2707] | 1363 | } //namespace asap
|
---|