[2] | 1 | //#--------------------------------------------------------------------------- |
---|
| 2 | //# SDContainer.cc: A container class for single dish integrations |
---|
| 3 | //#--------------------------------------------------------------------------- |
---|
| 4 | //# Copyright (C) 2004 |
---|
[125] | 5 | //# ATNF |
---|
[2] | 6 | //# |
---|
| 7 | //# This program is free software; you can redistribute it and/or modify it |
---|
| 8 | //# under the terms of the GNU General Public License as published by the Free |
---|
| 9 | //# Software Foundation; either version 2 of the License, or (at your option) |
---|
| 10 | //# any later version. |
---|
| 11 | //# |
---|
| 12 | //# This program is distributed in the hope that it will be useful, but |
---|
| 13 | //# WITHOUT ANY WARRANTY; without even the implied warranty of |
---|
| 14 | //# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General |
---|
| 15 | //# Public License for more details. |
---|
| 16 | //# |
---|
| 17 | //# You should have received a copy of the GNU General Public License along |
---|
| 18 | //# with this program; if not, write to the Free Software Foundation, Inc., |
---|
| 19 | //# 675 Massachusetts Ave, Cambridge, MA 02139, USA. |
---|
| 20 | //# |
---|
| 21 | //# Correspondence concerning this software should be addressed as follows: |
---|
| 22 | //# Internet email: Malte.Marquarding@csiro.au |
---|
| 23 | //# Postal address: Malte Marquarding, |
---|
| 24 | //# Australia Telescope National Facility, |
---|
| 25 | //# P.O. Box 76, |
---|
| 26 | //# Epping, NSW, 2121, |
---|
| 27 | //# AUSTRALIA |
---|
| 28 | //# |
---|
| 29 | //# $Id: |
---|
| 30 | //#--------------------------------------------------------------------------- |
---|
[125] | 31 | #include <casa/aips.h> |
---|
[104] | 32 | #include <casa/Exceptions.h> |
---|
[81] | 33 | #include <tables/Tables/Table.h> |
---|
| 34 | #include <casa/Arrays/IPosition.h> |
---|
[125] | 35 | #include <casa/Arrays/Matrix.h> |
---|
[81] | 36 | #include <casa/Arrays/ArrayAccessor.h> |
---|
| 37 | #include <casa/Quanta/MVTime.h> |
---|
[2] | 38 | |
---|
[215] | 39 | #include "SDDefs.h" |
---|
[2] | 40 | #include "SDContainer.h" |
---|
| 41 | |
---|
[125] | 42 | using namespace casa; |
---|
[83] | 43 | using namespace asap; |
---|
[2] | 44 | |
---|
[18] | 45 | void SDHeader::print() const { |
---|
| 46 | MVTime mvt(this->utc); |
---|
[47] | 47 | mvt.setFormat(MVTime::YMD); |
---|
[18] | 48 | cout << "Observer: " << this->observer << endl |
---|
| 49 | << "Project: " << this->project << endl |
---|
| 50 | << "Obstype: " << this->obstype << endl |
---|
| 51 | << "Antenna: " << this->antennaname << endl |
---|
| 52 | << "Ant. Position: " << this->antennaposition << endl |
---|
| 53 | << "Equinox: " << this->equinox << endl |
---|
| 54 | << "Freq. ref.: " << this->freqref << endl |
---|
| 55 | << "Ref. frequency: " << this->reffreq << endl |
---|
| 56 | << "Bandwidth: " << this->bandwidth << endl |
---|
| 57 | << "Time (utc): " |
---|
[47] | 58 | << mvt |
---|
[18] | 59 | << endl; |
---|
| 60 | //setprecision(10) << this->utc << endl; |
---|
| 61 | } |
---|
| 62 | |
---|
| 63 | |
---|
[16] | 64 | SDContainer::SDContainer(uInt nBeam, uInt nIF, uInt nPol, uInt nChan) |
---|
[2] | 65 | : nBeam_(nBeam), |
---|
[16] | 66 | nIF_(nIF), |
---|
| 67 | nPol_(nPol), |
---|
| 68 | nChan_(nChan), |
---|
| 69 | spectrum_(IPosition(4,nBeam,nIF,nPol,nChan)), |
---|
| 70 | flags_(IPosition(4,nBeam,nIF,nPol,nChan)), |
---|
[34] | 71 | tsys_(IPosition(4,nBeam,nIF,nPol,nChan)), |
---|
[79] | 72 | freqidx_(nIF), |
---|
| 73 | direction_(IPosition(2,nBeam,2)) { |
---|
[2] | 74 | uChar x = 0; |
---|
| 75 | flags_ = ~x; |
---|
[104] | 76 | tcal.resize(2); |
---|
[2] | 77 | } |
---|
| 78 | |
---|
[16] | 79 | SDContainer::SDContainer(IPosition shp) |
---|
| 80 | : nBeam_(shp(0)), |
---|
| 81 | nIF_(shp(1)), |
---|
| 82 | nPol_(shp(2)), |
---|
| 83 | nChan_(shp(3)), |
---|
| 84 | spectrum_(shp), |
---|
| 85 | flags_(shp), |
---|
[34] | 86 | tsys_(shp), |
---|
[79] | 87 | freqidx_(shp(1)) { |
---|
| 88 | IPosition ip(2,shp(0),2); |
---|
| 89 | direction_.resize(ip); |
---|
[16] | 90 | uChar x = 0; |
---|
| 91 | flags_ = ~x; |
---|
[104] | 92 | tcal.resize(2); |
---|
[16] | 93 | } |
---|
| 94 | |
---|
[2] | 95 | SDContainer::~SDContainer() { |
---|
| 96 | } |
---|
| 97 | |
---|
[47] | 98 | Bool SDContainer::resize(IPosition shp) { |
---|
| 99 | nBeam_ = shp(0); |
---|
| 100 | nIF_ = shp(1); |
---|
| 101 | nPol_ = shp(2); |
---|
| 102 | nChan_ = shp(3); |
---|
| 103 | spectrum_.resize(shp); |
---|
| 104 | flags_.resize(shp); |
---|
| 105 | tsys_.resize(shp); |
---|
| 106 | freqidx_.resize(shp(1)); |
---|
[79] | 107 | IPosition ip(2,shp(0),2); |
---|
| 108 | direction_.resize(ip); |
---|
[47] | 109 | } |
---|
| 110 | |
---|
[2] | 111 | Bool SDContainer::putSpectrum(const Array<Float>& spec) { |
---|
| 112 | spectrum_ = spec; |
---|
| 113 | } |
---|
[7] | 114 | Bool SDContainer::putFlags(const Array<uChar>& flag) { |
---|
| 115 | flags_ = flag; |
---|
[2] | 116 | } |
---|
[7] | 117 | Bool SDContainer::putTsys(const Array<Float>& tsys) { |
---|
| 118 | tsys_ = tsys; |
---|
[2] | 119 | } |
---|
| 120 | |
---|
| 121 | Bool SDContainer::setSpectrum(const Matrix<Float>& spec, |
---|
| 122 | uInt whichBeam, uInt whichIF) { |
---|
| 123 | |
---|
[204] | 124 | ArrayAccessor<Float, Axis<asap::BeamAxis> > aa0(spectrum_); |
---|
[2] | 125 | aa0.reset(aa0.begin(whichBeam)); |
---|
[204] | 126 | ArrayAccessor<Float, Axis<asap::IFAxis> > aa1(aa0); |
---|
[2] | 127 | aa1.reset(aa1.begin(whichIF)); |
---|
| 128 | |
---|
[14] | 129 | //Vector<Float> pols(nPol); |
---|
[204] | 130 | ArrayAccessor<Float, Axis<asap::IFAxis> > j(spec); |
---|
[14] | 131 | IPosition shp0 = spectrum_.shape(); |
---|
| 132 | IPosition shp1 = spec.shape(); |
---|
[16] | 133 | if ( (shp0(2) != shp1(1)) || (shp0(3) != shp1(0)) ) { |
---|
[104] | 134 | throw(AipsError("Arrays not conformant")); |
---|
[14] | 135 | return False; |
---|
| 136 | } |
---|
[2] | 137 | // assert dimensions are the same.... |
---|
[204] | 138 | for (ArrayAccessor<Float, Axis<asap::PolAxis> > i(aa1);i != i.end(); ++i) { |
---|
| 139 | ArrayAccessor<Float, Axis<asap::BeamAxis> > jj(j); |
---|
| 140 | for (ArrayAccessor<Float, Axis<asap::ChanAxis> > ii(i);ii != ii.end(); ++ii) { |
---|
[14] | 141 | (*ii) = (*jj); |
---|
| 142 | jj++; |
---|
[2] | 143 | } |
---|
[14] | 144 | j++; |
---|
[2] | 145 | } |
---|
| 146 | // unset flags for this spectrum, they might be set again by the |
---|
| 147 | // setFlags method |
---|
[14] | 148 | |
---|
[2] | 149 | IPosition shp = flags_.shape(); |
---|
| 150 | IPosition start(4,whichBeam,whichIF,0,0); |
---|
| 151 | IPosition end(4,whichBeam,whichIF,shp(2)-1,shp(3)-1); |
---|
| 152 | Array<uChar> arr(flags_(start,end)); |
---|
| 153 | arr = uChar(0); |
---|
| 154 | } |
---|
| 155 | |
---|
| 156 | Bool SDContainer::setFlags(const Matrix<uChar>& flag, |
---|
| 157 | uInt whichBeam, uInt whichIF) { |
---|
| 158 | |
---|
[204] | 159 | ArrayAccessor<uChar, Axis<asap::BeamAxis> > aa0(flags_); |
---|
[2] | 160 | aa0.reset(aa0.begin(whichBeam)); |
---|
[204] | 161 | ArrayAccessor<uChar, Axis<asap::IFAxis> > aa1(aa0); |
---|
[2] | 162 | aa1.reset(aa1.begin(whichIF)); |
---|
| 163 | |
---|
[204] | 164 | ArrayAccessor<uChar, Axis<asap::IFAxis> > j(flag); |
---|
[14] | 165 | IPosition shp0 = flags_.shape(); |
---|
| 166 | IPosition shp1 = flag.shape(); |
---|
[16] | 167 | if ( (shp0(2) != shp1(1)) || (shp0(3) != shp1(0)) ) { |
---|
[14] | 168 | cerr << "Arrays not conformant" << endl; |
---|
| 169 | return False; |
---|
| 170 | } |
---|
| 171 | |
---|
[2] | 172 | // assert dimensions are the same.... |
---|
[204] | 173 | for (ArrayAccessor<uChar, Axis<asap::PolAxis> > i(aa1);i != i.end(); ++i) { |
---|
| 174 | ArrayAccessor<uChar, Axis<asap::BeamAxis> > jj(j); |
---|
| 175 | for (ArrayAccessor<uChar, Axis<asap::ChanAxis> > ii(i);ii != ii.end(); ++ii) { |
---|
[14] | 176 | (*ii) = (*jj); |
---|
| 177 | jj++; |
---|
[2] | 178 | } |
---|
[14] | 179 | j++; |
---|
[2] | 180 | } |
---|
[16] | 181 | return True; |
---|
[2] | 182 | } |
---|
| 183 | |
---|
| 184 | Bool SDContainer::setTsys(const Vector<Float>& tsys, |
---|
| 185 | uInt whichBeam, uInt whichIF) { |
---|
[204] | 186 | ArrayAccessor<Float, Axis<asap::BeamAxis> > aa0(tsys_); |
---|
[2] | 187 | aa0.reset(aa0.begin(whichBeam)); |
---|
[204] | 188 | ArrayAccessor<Float, Axis<asap::IFAxis> > aa1(aa0); |
---|
[2] | 189 | aa1.reset(aa1.begin(whichIF)); |
---|
| 190 | // assert dimensions are the same.... |
---|
[204] | 191 | for (ArrayAccessor<Float, Axis<asap::ChanAxis> > i(aa1);i != i.end(); ++i) { |
---|
| 192 | ArrayAccessor<Float, Axis<asap::BeamAxis> > j(tsys); |
---|
| 193 | for (ArrayAccessor<Float, Axis<asap::PolAxis> > ii(i);ii != ii.end(); ++ii) { |
---|
[14] | 194 | (*ii) = (*j); |
---|
| 195 | j++; |
---|
[7] | 196 | } |
---|
| 197 | } |
---|
[2] | 198 | } |
---|
[27] | 199 | |
---|
[125] | 200 | Array<Float> SDContainer::getSpectrum(uInt whichBeam, uInt whichIF) const |
---|
| 201 | { |
---|
[27] | 202 | Matrix<Float> spectra(nChan_, nPol_); |
---|
| 203 | |
---|
| 204 | // Beam. |
---|
[204] | 205 | ArrayAccessor<Float, Axis<asap::BeamAxis> > i0(spectrum_); |
---|
[27] | 206 | i0.reset(i0.begin(whichBeam)); |
---|
| 207 | |
---|
| 208 | // IF. |
---|
[204] | 209 | ArrayAccessor<Float, Axis<asap::IFAxis> > i1(i0); |
---|
[27] | 210 | i1.reset(i1.begin(whichIF)); |
---|
| 211 | |
---|
| 212 | // Polarization. |
---|
[204] | 213 | ArrayAccessor<Float, Axis<asap::PolAxis> > i2(i1); |
---|
| 214 | ArrayAccessor<Float, Axis<asap::IFAxis> > o1(spectra); |
---|
[27] | 215 | |
---|
| 216 | while (i2 != i2.end()) { |
---|
| 217 | // Channel. |
---|
[204] | 218 | ArrayAccessor<Float, Axis<asap::ChanAxis> > i3(i2); |
---|
| 219 | ArrayAccessor<Float, Axis<asap::BeamAxis> > o0(o1); |
---|
[27] | 220 | |
---|
| 221 | while (i3 != i3.end()) { |
---|
| 222 | *o0 = *i3; |
---|
| 223 | |
---|
| 224 | i3++; |
---|
| 225 | o0++; |
---|
| 226 | } |
---|
| 227 | |
---|
| 228 | i2++; |
---|
| 229 | o1++; |
---|
| 230 | } |
---|
| 231 | |
---|
[67] | 232 | return spectra.copy(); |
---|
[27] | 233 | } |
---|
| 234 | |
---|
[125] | 235 | |
---|
[67] | 236 | Array<uChar> SDContainer::getFlags(uInt whichBeam, uInt whichIF) const |
---|
[27] | 237 | { |
---|
| 238 | Matrix<uChar> flagtra(nChan_, nPol_); |
---|
| 239 | |
---|
| 240 | // Beam. |
---|
[204] | 241 | ArrayAccessor<uChar, Axis<asap::BeamAxis> > i0(flags_); |
---|
[27] | 242 | i0.reset(i0.begin(whichBeam)); |
---|
| 243 | |
---|
| 244 | // IF. |
---|
[204] | 245 | ArrayAccessor<uChar, Axis<asap::IFAxis> > i1(i0); |
---|
[27] | 246 | i1.reset(i1.begin(whichIF)); |
---|
| 247 | |
---|
| 248 | // Polarization. |
---|
[204] | 249 | ArrayAccessor<uChar, Axis<asap::PolAxis> > i2(i1); |
---|
| 250 | ArrayAccessor<uChar, Axis<asap::IFAxis> > o1(flagtra); |
---|
[27] | 251 | |
---|
| 252 | while (i2 != i2.end()) { |
---|
| 253 | // Channel. |
---|
[204] | 254 | ArrayAccessor<uChar, Axis<asap::ChanAxis> > i3(i2); |
---|
| 255 | ArrayAccessor<uChar, Axis<asap::BeamAxis> > o0(o1); |
---|
[27] | 256 | |
---|
| 257 | while (i3 != i3.end()) { |
---|
| 258 | *o0 = *i3; |
---|
| 259 | |
---|
| 260 | i3++; |
---|
| 261 | o0++; |
---|
| 262 | } |
---|
| 263 | |
---|
| 264 | i2++; |
---|
| 265 | o1++; |
---|
| 266 | } |
---|
| 267 | |
---|
[67] | 268 | return flagtra.copy(); |
---|
[27] | 269 | } |
---|
| 270 | |
---|
[67] | 271 | Array<Float> SDContainer::getTsys(uInt whichBeam, uInt whichIF) const |
---|
[27] | 272 | { |
---|
| 273 | Vector<Float> tsys(nPol_); |
---|
| 274 | |
---|
| 275 | // Beam. |
---|
[204] | 276 | ArrayAccessor<Float, Axis<asap::BeamAxis> > i0(tsys_); |
---|
[27] | 277 | i0.reset(i0.begin(whichBeam)); |
---|
| 278 | |
---|
| 279 | // IF. |
---|
[204] | 280 | ArrayAccessor<Float, Axis<asap::IFAxis> > i1(i0); |
---|
[27] | 281 | i1.reset(i1.begin(whichIF)); |
---|
| 282 | |
---|
| 283 | // Channel. |
---|
[204] | 284 | ArrayAccessor<Float, Axis<asap::ChanAxis> > i3(i1); |
---|
[27] | 285 | |
---|
| 286 | // Polarization. |
---|
[204] | 287 | ArrayAccessor<Float, Axis<asap::PolAxis> > i2(i3); |
---|
| 288 | ArrayAccessor<Float, Axis<asap::BeamAxis> > o0(tsys); |
---|
[27] | 289 | |
---|
| 290 | while (i2 != i2.end()) { |
---|
| 291 | *o0 = *i2; |
---|
| 292 | |
---|
| 293 | i2++; |
---|
| 294 | o0++; |
---|
| 295 | } |
---|
[67] | 296 | return tsys.copy(); |
---|
[27] | 297 | } |
---|
[34] | 298 | |
---|
[79] | 299 | Array<Double> SDContainer::getDirection(uInt whichBeam) const { |
---|
| 300 | Vector<Double> direct(2); |
---|
[204] | 301 | ArrayAccessor<Double, Axis<asap::BeamAxis> > i0(direction_); |
---|
[79] | 302 | i0.reset(i0.begin(whichBeam)); |
---|
[204] | 303 | ArrayAccessor<Double, Axis<asap::BeamAxis> > o0(direct); |
---|
| 304 | ArrayAccessor<Double, Axis<asap::IFAxis> > i1(i0); |
---|
[79] | 305 | while (i1 != i1.end()) { |
---|
| 306 | *o0 = *i1; |
---|
| 307 | i1++; |
---|
| 308 | o0++; |
---|
| 309 | } |
---|
| 310 | return direct.copy(); |
---|
| 311 | } |
---|
| 312 | |
---|
| 313 | |
---|
[34] | 314 | Bool SDContainer::setFrequencyMap(uInt freqslot, uInt whichIF) { |
---|
| 315 | freqidx_[whichIF] = freqslot; |
---|
| 316 | return True; |
---|
| 317 | } |
---|
| 318 | |
---|
| 319 | Bool SDContainer::putFreqMap(const Vector<uInt>& freqs) { |
---|
| 320 | freqidx_.resize(); |
---|
| 321 | freqidx_ = freqs; |
---|
| 322 | return True; |
---|
| 323 | } |
---|
| 324 | |
---|
[79] | 325 | Bool SDContainer::setDirection(const Vector<Double>& point, uInt whichBeam) { |
---|
| 326 | if (point.nelements() != 2) return False; |
---|
[204] | 327 | ArrayAccessor<Double, Axis<asap::BeamAxis> > aa0(direction_); |
---|
[79] | 328 | aa0.reset(aa0.begin(whichBeam)); |
---|
[204] | 329 | ArrayAccessor<Double, Axis<asap::BeamAxis> > jj(point); |
---|
| 330 | for (ArrayAccessor<Double, Axis<asap::IFAxis> > i(aa0);i != i.end(); ++i) { |
---|
[79] | 331 | |
---|
| 332 | (*i) = (*jj); |
---|
| 333 | jj++; |
---|
| 334 | } |
---|
| 335 | return True; |
---|
| 336 | } |
---|
| 337 | |
---|
| 338 | Bool SDContainer::putDirection(const Array<Double>& dir) { |
---|
| 339 | direction_.resize(); |
---|
| 340 | direction_ = dir; |
---|
| 341 | return True; |
---|
| 342 | } |
---|
| 343 | |
---|
[204] | 344 | Bool SDContainer::appendHistory(const String& hist) |
---|
| 345 | { |
---|
| 346 | history_.resize(history_.nelements()+1,True); |
---|
| 347 | history_[history_.nelements()-1] = hist; |
---|
| 348 | return True; |
---|
| 349 | } |
---|
| 350 | Bool SDContainer::putHistory(const Vector<String>& hist) |
---|
| 351 | { |
---|
| 352 | history_.resize(); |
---|
| 353 | history_ = hist; |
---|
| 354 | return True; |
---|
| 355 | } |
---|
| 356 | |
---|
[34] | 357 | Int SDFrequencyTable::addFrequency(Int refPix, Double refVal, Double inc) { |
---|
| 358 | Int idx = -1; |
---|
| 359 | Bool addit = False; |
---|
| 360 | if (length() > 0) { |
---|
| 361 | for (uInt i=0; i< length();++i) { |
---|
| 362 | if ( refVal == refVal_[i] ) { // probably check with tolerance |
---|
| 363 | if ( refPix == refPix_[i] ) |
---|
| 364 | if ( inc == increment_[i] ) |
---|
| 365 | idx = Int(i); |
---|
| 366 | } |
---|
| 367 | } |
---|
| 368 | if (idx >= 0) { |
---|
| 369 | return idx; |
---|
| 370 | } |
---|
| 371 | } |
---|
| 372 | nFreq_ += 1; |
---|
| 373 | refPix_.resize(nFreq_,True); |
---|
| 374 | refVal_.resize(nFreq_,True); |
---|
| 375 | increment_.resize(nFreq_,True); |
---|
| 376 | refPix_[nFreq_-1] = refPix; |
---|
| 377 | refVal_[nFreq_-1] = refVal; |
---|
| 378 | increment_[nFreq_-1] = inc; |
---|
| 379 | idx = nFreq_-1; |
---|
| 380 | return idx; |
---|
| 381 | } |
---|
| 382 | |
---|
[204] | 383 | void SDFrequencyTable::addRestFrequency(Double val) |
---|
| 384 | { |
---|
| 385 | if (restFreqs_.nelements() == 0) { |
---|
| 386 | restFreqs_.resize(1); |
---|
| 387 | restFreqs_[0] = val; |
---|
| 388 | } else { |
---|
| 389 | Bool found = False; |
---|
| 390 | for (uInt i=0;i<restFreqs_.nelements();++i) { |
---|
| 391 | if (restFreqs_[i] == val) { |
---|
| 392 | found = True; |
---|
| 393 | return; |
---|
| 394 | } |
---|
| 395 | } |
---|
| 396 | if (!found) { |
---|
| 397 | restFreqs_.resize(restFreqs_.nelements()+1,True); |
---|
| 398 | restFreqs_[restFreqs_.nelements()-1] = val; |
---|
| 399 | } |
---|
| 400 | } |
---|
| 401 | } |
---|
| 402 | void SDFrequencyTable::restFrequencies(Vector<Double>& rfs, |
---|
| 403 | String& rfunit ) const |
---|
| 404 | { |
---|
| 405 | rfs.resize(restFreqs_.nelements()); |
---|
| 406 | rfs = restFreqs_; |
---|
| 407 | rfunit = restFreqUnit_; |
---|
| 408 | } |
---|