[1325] | 1 | //#--------------------------------------------------------------------------- |
---|
| 2 | //# PKSMS2reader.cc: Class to read Parkes Multibeam data from a v2 MS. |
---|
| 3 | //#--------------------------------------------------------------------------- |
---|
| 4 | //# Copyright (C) 2000-2006 |
---|
| 5 | //# Associated Universities, Inc. Washington DC, USA. |
---|
| 6 | //# |
---|
| 7 | //# This library is free software; you can redistribute it and/or modify it |
---|
| 8 | //# under the terms of the GNU Library General Public License as published by |
---|
| 9 | //# the Free Software Foundation; either version 2 of the License, or (at your |
---|
| 10 | //# option) any later version. |
---|
| 11 | //# |
---|
| 12 | //# This library is distributed in the hope that it will be useful, but |
---|
| 13 | //# WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY |
---|
| 14 | //# or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Library General Public |
---|
| 15 | //# License for more details. |
---|
| 16 | //# |
---|
| 17 | //# You should have received a copy of the GNU Library General Public License |
---|
| 18 | //# along with this library; if not, write to the Free Software Foundation, |
---|
| 19 | //# Inc., 675 Massachusetts Ave, Cambridge, MA 02139, USA. |
---|
| 20 | //# |
---|
| 21 | //# Correspondence concerning AIPS++ should be addressed as follows: |
---|
| 22 | //# Internet email: aips2-request@nrao.edu. |
---|
| 23 | //# Postal address: AIPS++ Project Office |
---|
| 24 | //# National Radio Astronomy Observatory |
---|
| 25 | //# 520 Edgemont Road |
---|
| 26 | //# Charlottesville, VA 22903-2475 USA |
---|
| 27 | //# |
---|
[1393] | 28 | //# $Id$ |
---|
[1325] | 29 | //#--------------------------------------------------------------------------- |
---|
| 30 | //# Original: 2000/08/03, Mark Calabretta, ATNF |
---|
| 31 | //#--------------------------------------------------------------------------- |
---|
| 32 | |
---|
| 33 | |
---|
| 34 | // AIPS++ includes. |
---|
| 35 | #include <casa/stdio.h> |
---|
| 36 | #include <casa/Arrays/ArrayMath.h> |
---|
| 37 | #include <casa/Arrays/Slice.h> |
---|
| 38 | #include <ms/MeasurementSets/MSColumns.h> |
---|
| 39 | #include <tables/Tables.h> |
---|
[1393] | 40 | #include <casa/Quanta/MVTime.h> |
---|
| 41 | #include <casa/Quanta/MVAngle.h> |
---|
| 42 | #include <casa/BasicMath/Math.h> |
---|
| 43 | #include <measures/Measures/MeasConvert.h> |
---|
| 44 | #include <measures/Measures/MEpoch.h> |
---|
| 45 | #include <measures/Measures/MeasRef.h> |
---|
[1325] | 46 | |
---|
[1393] | 47 | |
---|
[1325] | 48 | // Parkes includes. |
---|
| 49 | #include <atnf/pks/pks_maths.h> |
---|
| 50 | #include <atnf/PKSIO/PKSMS2reader.h> |
---|
| 51 | |
---|
| 52 | |
---|
| 53 | //------------------------------------------------- PKSMS2reader::PKSMS2reader |
---|
| 54 | |
---|
| 55 | // Default constructor. |
---|
| 56 | |
---|
| 57 | PKSMS2reader::PKSMS2reader() |
---|
| 58 | { |
---|
| 59 | cMSopen = False; |
---|
| 60 | } |
---|
| 61 | |
---|
| 62 | //------------------------------------------------ PKSMS2reader::~PKSMS2reader |
---|
| 63 | |
---|
| 64 | PKSMS2reader::~PKSMS2reader() |
---|
| 65 | { |
---|
| 66 | close(); |
---|
| 67 | } |
---|
| 68 | |
---|
| 69 | //--------------------------------------------------------- PKSMS2reader::open |
---|
| 70 | |
---|
| 71 | // Open the MS for reading. |
---|
| 72 | |
---|
| 73 | Int PKSMS2reader::open( |
---|
| 74 | const String msName, |
---|
| 75 | Vector<Bool> &beams, |
---|
| 76 | Vector<Bool> &IFs, |
---|
| 77 | Vector<uInt> &nChan, |
---|
| 78 | Vector<uInt> &nPol, |
---|
| 79 | Vector<Bool> &haveXPol, |
---|
| 80 | Bool &haveBase, |
---|
| 81 | Bool &haveSpectra) |
---|
| 82 | { |
---|
| 83 | // Check that MS is readable. |
---|
| 84 | if (!MS::isReadable(msName)) { |
---|
| 85 | return 1; |
---|
| 86 | } |
---|
| 87 | |
---|
| 88 | if (cMSopen) { |
---|
| 89 | close(); |
---|
| 90 | } |
---|
| 91 | |
---|
| 92 | cPKSMS = MeasurementSet(msName); |
---|
[1393] | 93 | // taql access to the syscal table |
---|
[1453] | 94 | cHaveSysCal = False; |
---|
| 95 | if (cHaveSysCal=Table::isReadable(cPKSMS.sysCalTableName())) { |
---|
| 96 | cSysCalTab = Table(cPKSMS.sysCalTableName()); |
---|
| 97 | } |
---|
[1393] | 98 | |
---|
[1325] | 99 | cIdx = 0; |
---|
[1393] | 100 | lastmjd = 0.0; |
---|
[1325] | 101 | cNRow = cPKSMS.nrow(); |
---|
| 102 | cMSopen = True; |
---|
| 103 | |
---|
| 104 | // Lock the table for read access. |
---|
| 105 | cPKSMS.lock(False); |
---|
| 106 | |
---|
| 107 | // Main MS table and subtable column access. |
---|
| 108 | ROMSMainColumns msCols(cPKSMS); |
---|
| 109 | ROMSDataDescColumns dataDescCols(cPKSMS.dataDescription()); |
---|
| 110 | ROMSFeedColumns feedCols(cPKSMS.feed()); |
---|
| 111 | ROMSFieldColumns fieldCols(cPKSMS.field()); |
---|
| 112 | ROMSPointingColumns pointingCols(cPKSMS.pointing()); |
---|
| 113 | ROMSPolarizationColumns polarizationCols(cPKSMS.polarization()); |
---|
| 114 | ROMSSourceColumns sourceCols(cPKSMS.source()); |
---|
| 115 | ROMSSpWindowColumns spWinCols(cPKSMS.spectralWindow()); |
---|
| 116 | ROMSStateColumns stateCols(cPKSMS.state()); |
---|
| 117 | ROMSSysCalColumns sysCalCols(cPKSMS.sysCal()); |
---|
| 118 | ROMSWeatherColumns weatherCols(cPKSMS.weather()); |
---|
[1453] | 119 | ROMSAntennaColumns antennaCols(cPKSMS.antenna()); |
---|
[1325] | 120 | |
---|
| 121 | // Column accessors for required columns. |
---|
| 122 | cScanNoCol.reference(msCols.scanNumber()); |
---|
| 123 | cTimeCol.reference(msCols.time()); |
---|
| 124 | cIntervalCol.reference(msCols.interval()); |
---|
| 125 | |
---|
| 126 | cFieldIdCol.reference(msCols.fieldId()); |
---|
| 127 | cFieldNameCol.reference(fieldCols.name()); |
---|
[1393] | 128 | cFieldDelayDirCol.reference(fieldCols.delayDir()); |
---|
[1325] | 129 | |
---|
| 130 | cSrcIdCol.reference(fieldCols.sourceId()); |
---|
[1393] | 131 | cSrcId2Col.reference(sourceCols.sourceId()); |
---|
[1325] | 132 | cSrcNameCol.reference(sourceCols.name()); |
---|
| 133 | cSrcDirCol.reference(sourceCols.direction()); |
---|
| 134 | cSrcPMCol.reference(sourceCols.properMotion()); |
---|
| 135 | cSrcRestFrqCol.reference(sourceCols.restFrequency()); |
---|
| 136 | |
---|
| 137 | cStateIdCol.reference(msCols.stateId()); |
---|
| 138 | cObsModeCol.reference(stateCols.obsMode()); |
---|
[1393] | 139 | cCalCol.reference(stateCols.cal()); |
---|
| 140 | cSigStateCol.reference(stateCols.sig()); |
---|
| 141 | cRefStateCol.reference(stateCols.ref()); |
---|
[1325] | 142 | cDataDescIdCol.reference(msCols.dataDescId()); |
---|
[1393] | 143 | cSpWinIdCol.reference(dataDescCols.spectralWindowId()); |
---|
[1325] | 144 | cChanFreqCol.reference(spWinCols.chanFreq()); |
---|
| 145 | |
---|
| 146 | cWeatherTimeCol.reference(weatherCols.time()); |
---|
| 147 | cTemperatureCol.reference(weatherCols.temperature()); |
---|
| 148 | cPressureCol.reference(weatherCols.pressure()); |
---|
| 149 | cHumidityCol.reference(weatherCols.relHumidity()); |
---|
| 150 | |
---|
| 151 | cBeamNoCol.reference(msCols.feed1()); |
---|
| 152 | cPointingCol.reference(pointingCols.direction()); |
---|
| 153 | cSigmaCol.reference(msCols.sigma()); |
---|
| 154 | cNumReceptorCol.reference(feedCols.numReceptors()); |
---|
| 155 | |
---|
| 156 | // Optional columns. |
---|
[1453] | 157 | cHaveTsys = False; |
---|
| 158 | cHaveTcal = False; |
---|
[1325] | 159 | if ((cHaveSrcVel = cPKSMS.source().tableDesc().isColumn("SYSVEL"))) { |
---|
| 160 | cSrcVelCol.attach(cPKSMS.source(), "SYSVEL"); |
---|
| 161 | } |
---|
| 162 | |
---|
[1453] | 163 | if (cHaveSysCal && (cHaveTsys = cPKSMS.sysCal().tableDesc().isColumn("TSYS"))) { |
---|
[1325] | 164 | cTsysCol.attach(cPKSMS.sysCal(), "TSYS"); |
---|
| 165 | } |
---|
[1393] | 166 | |
---|
[1453] | 167 | if (cHaveSysCal && (cHaveTcal = cPKSMS.sysCal().tableDesc().isColumn("TCAL"))) { |
---|
[1393] | 168 | cTcalCol.attach(cPKSMS.sysCal(), "TCAL"); |
---|
| 169 | } |
---|
[1325] | 170 | |
---|
| 171 | if ((cHaveCalFctr = cPKSMS.tableDesc().isColumn("CALFCTR"))) { |
---|
| 172 | cCalFctrCol.attach(cPKSMS, "CALFCTR"); |
---|
| 173 | } |
---|
| 174 | |
---|
| 175 | if ((cHaveBaseLin = cPKSMS.tableDesc().isColumn("BASELIN"))) { |
---|
| 176 | cBaseLinCol.attach(cPKSMS, "BASELIN"); |
---|
| 177 | cBaseSubCol.attach(cPKSMS, "BASESUB"); |
---|
| 178 | } |
---|
| 179 | |
---|
| 180 | // Spectral data should always be present. |
---|
| 181 | haveSpectra = True; |
---|
[1453] | 182 | cHaveDataCol = False; |
---|
| 183 | cHaveCorrectedDataCol = False; |
---|
| 184 | //String telName = antennaCols.name()(0); |
---|
| 185 | ROMSObservationColumns observationCols(cPKSMS.observation()); |
---|
| 186 | String telName = observationCols.telescopeName()(0); |
---|
| 187 | //cATF = (telName.contains("DA41") || telName.contains("DV01")); |
---|
| 188 | cATF = telName.contains("ATF"); |
---|
| 189 | |
---|
| 190 | if (cHaveDataCol = cPKSMS.isColumn(MSMainEnums::DATA)) { |
---|
| 191 | if (cATF) { |
---|
| 192 | //try to read a single baseline interferometeric data |
---|
| 193 | //and treat it as single dish data |
---|
| 194 | //maybe extended for ALMA commissioning later |
---|
| 195 | cDataCol.reference(msCols.data()); |
---|
| 196 | if (cHaveCorrectedDataCol = cPKSMS.isColumn(MSMainEnums::CORRECTED_DATA)) { |
---|
| 197 | //cerr<<"Do have CORRECTED_DATA column"<<endl; |
---|
| 198 | cCorrectedDataCol.reference(msCols.correctedData()); |
---|
| 199 | } |
---|
| 200 | } |
---|
| 201 | } |
---|
| 202 | else { |
---|
| 203 | cFloatDataCol.reference(msCols.floatData()); |
---|
| 204 | } |
---|
[1325] | 205 | cFlagCol.reference(msCols.flag()); |
---|
| 206 | |
---|
[1393] | 207 | |
---|
[1453] | 208 | if (cGetXPol = (cPKSMS.isColumn(MSMainEnums::DATA) && (!cATF))) { |
---|
[1325] | 209 | if ((cHaveXCalFctr = cPKSMS.tableDesc().isColumn("XCALFCTR"))) { |
---|
| 210 | cXCalFctrCol.attach(cPKSMS, "XCALFCTR"); |
---|
| 211 | } |
---|
| 212 | |
---|
| 213 | cDataCol.reference(msCols.data()); |
---|
| 214 | } |
---|
| 215 | |
---|
| 216 | // Find which beams are present in the data. |
---|
| 217 | Vector<Int> beamNos = cBeamNoCol.getColumn(); |
---|
| 218 | Int maxBeamNo = max(beamNos) + 1; |
---|
| 219 | beams.resize(maxBeamNo); |
---|
| 220 | |
---|
| 221 | beams = False; |
---|
| 222 | for (uInt irow = 0; irow < beamNos.nelements(); irow++) { |
---|
| 223 | beams(beamNos(irow)) = True; |
---|
| 224 | } |
---|
| 225 | |
---|
| 226 | |
---|
| 227 | // Number of IFs. |
---|
[1393] | 228 | //uInt nIF = dataDescCols.nrow(); |
---|
| 229 | uInt nIF =spWinCols.nrow(); |
---|
[1325] | 230 | IFs.resize(nIF); |
---|
| 231 | IFs = True; |
---|
| 232 | |
---|
| 233 | // Number of polarizations and channels in each IF. |
---|
| 234 | ROScalarColumn<Int> spWinIdCol(dataDescCols.spectralWindowId()); |
---|
| 235 | ROScalarColumn<Int> numChanCol(spWinCols.numChan()); |
---|
| 236 | |
---|
| 237 | ROScalarColumn<Int> polIdCol(dataDescCols.polarizationId()); |
---|
| 238 | ROScalarColumn<Int> numPolCol(polarizationCols.numCorr()); |
---|
| 239 | |
---|
| 240 | nChan.resize(nIF); |
---|
| 241 | nPol.resize(nIF); |
---|
| 242 | for (uInt iIF = 0; iIF < nIF; iIF++) { |
---|
| 243 | nChan(iIF) = numChanCol(spWinIdCol(iIF)); |
---|
| 244 | nPol(iIF) = numPolCol(polIdCol(iIF)); |
---|
| 245 | } |
---|
| 246 | |
---|
| 247 | // Cross-polarization data present? |
---|
| 248 | haveXPol.resize(nIF); |
---|
| 249 | haveXPol = False; |
---|
| 250 | |
---|
[1453] | 251 | if (cGetXPol && !(cATF)) { |
---|
[1325] | 252 | for (Int irow = 0; irow < cNRow; irow++) { |
---|
| 253 | if (cDataCol.isDefined(irow)) { |
---|
| 254 | Int iIF = cDataDescIdCol(irow); |
---|
| 255 | haveXPol(iIF) = True; |
---|
| 256 | } |
---|
| 257 | } |
---|
| 258 | } |
---|
| 259 | |
---|
| 260 | |
---|
| 261 | // Initialize member data. |
---|
| 262 | cBeams.assign(beams); |
---|
| 263 | cIFs.assign(IFs); |
---|
| 264 | cNChan.assign(nChan); |
---|
| 265 | cNPol.assign(nPol); |
---|
| 266 | cHaveXPol.assign(haveXPol); |
---|
| 267 | |
---|
| 268 | |
---|
| 269 | // Default channel range selection. |
---|
| 270 | cStartChan.resize(nIF); |
---|
| 271 | cEndChan.resize(nIF); |
---|
| 272 | cRefChan.resize(nIF); |
---|
| 273 | |
---|
| 274 | for (uInt iIF = 0; iIF < nIF; iIF++) { |
---|
| 275 | cStartChan(iIF) = 1; |
---|
| 276 | cEndChan(iIF) = cNChan(iIF); |
---|
| 277 | cRefChan(iIF) = cNChan(iIF)/2 + 1; |
---|
| 278 | } |
---|
| 279 | |
---|
| 280 | Slice all; |
---|
| 281 | cDataSel.resize(nIF); |
---|
| 282 | cDataSel = Slicer(all, all); |
---|
| 283 | |
---|
| 284 | cScanNo = 0; |
---|
| 285 | cCycleNo = 1; |
---|
| 286 | cTime = cTimeCol(0); |
---|
| 287 | |
---|
| 288 | return 0; |
---|
| 289 | } |
---|
| 290 | |
---|
| 291 | //---------------------------------------------------- PKSMS2reader::getHeader |
---|
| 292 | |
---|
| 293 | // Get parameters describing the data. |
---|
| 294 | |
---|
| 295 | Int PKSMS2reader::getHeader( |
---|
| 296 | String &observer, |
---|
| 297 | String &project, |
---|
| 298 | String &antName, |
---|
| 299 | Vector<Double> &antPosition, |
---|
| 300 | String &obsMode, |
---|
| 301 | Float &equinox, |
---|
| 302 | String &dopplerFrame, |
---|
| 303 | Double &mjd, |
---|
| 304 | Double &refFreq, |
---|
[1393] | 305 | Double &bandwidth, |
---|
| 306 | String &fluxunit) |
---|
[1325] | 307 | { |
---|
| 308 | if (!cMSopen) { |
---|
| 309 | return 1; |
---|
| 310 | } |
---|
| 311 | |
---|
| 312 | // Observer and project. |
---|
| 313 | ROMSObservationColumns observationCols(cPKSMS.observation()); |
---|
| 314 | observer = observationCols.observer()(0); |
---|
| 315 | project = observationCols.project()(0); |
---|
| 316 | |
---|
| 317 | // Antenna name and ITRF coordinates. |
---|
| 318 | ROMSAntennaColumns antennaCols(cPKSMS.antenna()); |
---|
| 319 | antName = antennaCols.name()(0); |
---|
| 320 | antPosition = antennaCols.position()(0); |
---|
| 321 | |
---|
| 322 | // Observation type. |
---|
| 323 | if (cObsModeCol.nrow()) { |
---|
| 324 | obsMode = cObsModeCol(0); |
---|
| 325 | if (obsMode == "\0") obsMode = "RF"; |
---|
| 326 | } else { |
---|
| 327 | obsMode = "RF"; |
---|
| 328 | } |
---|
| 329 | |
---|
[1393] | 330 | fluxunit = ""; |
---|
[1453] | 331 | if (cHaveDataCol) { |
---|
| 332 | const TableRecord& keywordSet2 |
---|
| 333 | = cDataCol.columnDesc().keywordSet(); |
---|
| 334 | if(keywordSet2.isDefined("UNIT")) { |
---|
| 335 | fluxunit = keywordSet2.asString("UNIT"); |
---|
| 336 | } |
---|
| 337 | } else { |
---|
| 338 | const TableRecord& keywordSet |
---|
| 339 | = cFloatDataCol.columnDesc().keywordSet(); |
---|
| 340 | if(keywordSet.isDefined("UNIT")) { |
---|
| 341 | fluxunit = keywordSet.asString("UNIT"); |
---|
| 342 | } |
---|
| 343 | } |
---|
| 344 | |
---|
| 345 | /*** |
---|
| 346 | const TableRecord& keywordSet |
---|
| 347 | = cFloatDataCol.columnDesc().keywordSet(); |
---|
[1393] | 348 | if(keywordSet.isDefined("UNIT")) { |
---|
| 349 | fluxunit = keywordSet.asString("UNIT"); |
---|
| 350 | } |
---|
[1453] | 351 | ***/ |
---|
[1325] | 352 | // Coordinate equinox. |
---|
| 353 | ROMSPointingColumns pointingCols(cPKSMS.pointing()); |
---|
| 354 | String dirref = pointingCols.direction().keywordSet().asRecord("MEASINFO"). |
---|
| 355 | asString("Ref"); |
---|
| 356 | sscanf(dirref.chars()+1, "%f", &equinox); |
---|
| 357 | |
---|
| 358 | // Frequency/velocity reference frame. |
---|
| 359 | ROMSSpWindowColumns spWinCols(cPKSMS.spectralWindow()); |
---|
| 360 | dopplerFrame = MFrequency::showType(spWinCols.measFreqRef()(0)); |
---|
| 361 | |
---|
| 362 | // Translate to FITS standard names. |
---|
| 363 | if (dopplerFrame == "TOPO") { |
---|
| 364 | dopplerFrame = "TOPOCENT"; |
---|
| 365 | } else if (dopplerFrame == "GEO") { |
---|
| 366 | dopplerFrame = "GEOCENTR"; |
---|
| 367 | } else if (dopplerFrame == "BARY") { |
---|
| 368 | dopplerFrame = "BARYCENT"; |
---|
| 369 | } else if (dopplerFrame == "GALACTO") { |
---|
| 370 | dopplerFrame = "GALACTOC"; |
---|
| 371 | } else if (dopplerFrame == "LGROUP") { |
---|
| 372 | dopplerFrame = "LOCALGRP"; |
---|
| 373 | } else if (dopplerFrame == "CMB") { |
---|
| 374 | dopplerFrame = "CMBDIPOL"; |
---|
| 375 | } else if (dopplerFrame == "REST") { |
---|
| 376 | dopplerFrame = "SOURCE"; |
---|
| 377 | } |
---|
| 378 | |
---|
| 379 | // MJD at start of observation. |
---|
| 380 | mjd = cTimeCol(0)/86400.0; |
---|
| 381 | |
---|
| 382 | // Reference frequency and bandwidth. |
---|
| 383 | refFreq = spWinCols.refFrequency()(0); |
---|
| 384 | bandwidth = spWinCols.totalBandwidth()(0); |
---|
| 385 | |
---|
| 386 | return 0; |
---|
| 387 | } |
---|
| 388 | |
---|
| 389 | //-------------------------------------------------- PKSMS2reader::getFreqInfo |
---|
| 390 | |
---|
| 391 | // Get frequency parameters for each IF. |
---|
| 392 | |
---|
| 393 | Int PKSMS2reader::getFreqInfo( |
---|
| 394 | Vector<Double> &startFreq, |
---|
| 395 | Vector<Double> &endFreq) |
---|
| 396 | { |
---|
| 397 | uInt nIF = cIFs.nelements(); |
---|
| 398 | startFreq.resize(nIF); |
---|
| 399 | endFreq.resize(nIF); |
---|
| 400 | |
---|
| 401 | for (uInt iIF = 0; iIF < nIF; iIF++) { |
---|
| 402 | Vector<Double> chanFreq = cChanFreqCol(iIF); |
---|
| 403 | |
---|
| 404 | Int nChan = chanFreq.nelements(); |
---|
| 405 | startFreq(iIF) = chanFreq(0); |
---|
| 406 | endFreq(iIF) = chanFreq(nChan-1); |
---|
| 407 | } |
---|
| 408 | |
---|
| 409 | return 0; |
---|
| 410 | } |
---|
| 411 | |
---|
| 412 | //------------------------------------------------------- PKSMS2reader::select |
---|
| 413 | |
---|
| 414 | // Set data selection by beam number and channel. |
---|
| 415 | |
---|
| 416 | uInt PKSMS2reader::select( |
---|
| 417 | const Vector<Bool> beamSel, |
---|
| 418 | const Vector<Bool> IFsel, |
---|
| 419 | const Vector<Int> startChan, |
---|
| 420 | const Vector<Int> endChan, |
---|
| 421 | const Vector<Int> refChan, |
---|
| 422 | const Bool getSpectra, |
---|
| 423 | const Bool getXPol, |
---|
| 424 | const Bool getFeedPos) |
---|
| 425 | { |
---|
| 426 | if (!cMSopen) { |
---|
| 427 | return 1; |
---|
| 428 | } |
---|
| 429 | |
---|
| 430 | // Beam selection. |
---|
| 431 | uInt nBeam = cBeams.nelements(); |
---|
| 432 | uInt nBeamSel = beamSel.nelements(); |
---|
| 433 | for (uInt ibeam = 0; ibeam < nBeam; ibeam++) { |
---|
| 434 | if (ibeam < nBeamSel) { |
---|
| 435 | cBeams(ibeam) = beamSel(ibeam); |
---|
| 436 | } else { |
---|
| 437 | cBeams(ibeam) = False; |
---|
| 438 | } |
---|
| 439 | } |
---|
| 440 | |
---|
| 441 | uInt nIF = cIFs.nelements(); |
---|
| 442 | uInt maxNChan = 0; |
---|
| 443 | for (uInt iIF = 0; iIF < nIF; iIF++) { |
---|
| 444 | // IF selection. |
---|
| 445 | if (iIF < IFsel.nelements()) { |
---|
| 446 | cIFs(iIF) = IFsel(iIF); |
---|
| 447 | } else { |
---|
| 448 | cIFs(iIF) = False; |
---|
| 449 | } |
---|
| 450 | |
---|
| 451 | if (!cIFs(iIF)) continue; |
---|
| 452 | |
---|
| 453 | |
---|
| 454 | // Channel selection. |
---|
| 455 | if (iIF < startChan.nelements()) { |
---|
| 456 | cStartChan(iIF) = startChan(iIF); |
---|
| 457 | |
---|
| 458 | if (cStartChan(iIF) <= 0) { |
---|
| 459 | cStartChan(iIF) += cNChan(iIF); |
---|
| 460 | } else if (cStartChan(iIF) > Int(cNChan(iIF))) { |
---|
| 461 | cStartChan(iIF) = cNChan(iIF); |
---|
| 462 | } |
---|
| 463 | } |
---|
| 464 | |
---|
| 465 | if (iIF < endChan.nelements()) { |
---|
| 466 | cEndChan(iIF) = endChan(iIF); |
---|
| 467 | |
---|
| 468 | if (cEndChan(iIF) <= 0) { |
---|
| 469 | cEndChan(iIF) += cNChan(iIF); |
---|
| 470 | } else if (cEndChan(iIF) > Int(cNChan(iIF))) { |
---|
| 471 | cEndChan(iIF) = cNChan(iIF); |
---|
| 472 | } |
---|
| 473 | } |
---|
| 474 | |
---|
| 475 | if (iIF < refChan.nelements()) { |
---|
| 476 | cRefChan(iIF) = refChan(iIF); |
---|
| 477 | } else { |
---|
| 478 | cRefChan(iIF) = cStartChan(iIF); |
---|
| 479 | if (cStartChan(iIF) <= cEndChan(iIF)) { |
---|
| 480 | cRefChan(iIF) += (cEndChan(iIF) - cStartChan(iIF) + 1)/2; |
---|
| 481 | } else { |
---|
| 482 | cRefChan(iIF) -= (cStartChan(iIF) - cEndChan(iIF) + 1)/2; |
---|
| 483 | } |
---|
| 484 | } |
---|
| 485 | |
---|
| 486 | uInt nChan = abs(cEndChan(iIF) - cStartChan(iIF)) + 1; |
---|
| 487 | if (maxNChan < nChan) { |
---|
| 488 | maxNChan = nChan; |
---|
| 489 | } |
---|
| 490 | |
---|
| 491 | // Inverted Slices are not allowed. |
---|
| 492 | Slice outPols; |
---|
| 493 | Slice outChans(min(cStartChan(iIF),cEndChan(iIF))-1, nChan); |
---|
| 494 | cDataSel(iIF) = Slicer(outPols, outChans); |
---|
| 495 | } |
---|
| 496 | |
---|
| 497 | // Get spectral data? |
---|
| 498 | cGetSpectra = getSpectra; |
---|
| 499 | |
---|
| 500 | // Get cross-polarization data? |
---|
| 501 | cGetXPol = cGetXPol && getXPol; |
---|
| 502 | |
---|
| 503 | // Get feed positions? (Not available.) |
---|
| 504 | cGetFeedPos = False; |
---|
| 505 | |
---|
| 506 | return maxNChan; |
---|
| 507 | } |
---|
| 508 | |
---|
| 509 | //---------------------------------------------------- PKSMS2reader::findRange |
---|
| 510 | |
---|
| 511 | // Find the range of the data in time and position. |
---|
| 512 | |
---|
| 513 | Int PKSMS2reader::findRange( |
---|
| 514 | Int &nRow, |
---|
| 515 | Int &nSel, |
---|
| 516 | Vector<Double> &timeSpan, |
---|
| 517 | Matrix<Double> &positions) |
---|
| 518 | { |
---|
| 519 | if (!cMSopen) { |
---|
| 520 | return 1; |
---|
| 521 | } |
---|
| 522 | |
---|
| 523 | nRow = cNRow; |
---|
| 524 | |
---|
| 525 | // Find the number of rows selected. |
---|
| 526 | nSel = 0; |
---|
| 527 | Vector<Bool> sel(nRow); |
---|
| 528 | for (Int irow = 0; irow < nRow; irow++) { |
---|
| 529 | if ((sel(irow) = cBeams(cBeamNoCol(irow)) && |
---|
| 530 | cIFs(cDataDescIdCol(irow)))) { |
---|
| 531 | nSel++; |
---|
| 532 | } |
---|
| 533 | } |
---|
| 534 | |
---|
| 535 | // Find the time range (s). |
---|
| 536 | timeSpan.resize(2); |
---|
| 537 | timeSpan(0) = cTimeCol(0); |
---|
| 538 | timeSpan(1) = cTimeCol(nRow-1); |
---|
| 539 | |
---|
| 540 | // Retrieve positions for selected data. |
---|
| 541 | Int isel = 0; |
---|
| 542 | positions.resize(2,nSel); |
---|
| 543 | for (Int irow = 0; irow < nRow; irow++) { |
---|
| 544 | if (sel(irow)) { |
---|
| 545 | Matrix<Double> pointingDir = cPointingCol(cFieldIdCol(irow)); |
---|
| 546 | positions.column(isel++) = pointingDir.column(0); |
---|
| 547 | } |
---|
| 548 | } |
---|
| 549 | |
---|
| 550 | return 0; |
---|
| 551 | } |
---|
| 552 | |
---|
| 553 | //--------------------------------------------------------- PKSMS2reader::read |
---|
| 554 | |
---|
| 555 | // Read the next data record. |
---|
| 556 | |
---|
| 557 | Int PKSMS2reader::read( |
---|
| 558 | Int &scanNo, |
---|
| 559 | Int &cycleNo, |
---|
| 560 | Double &mjd, |
---|
| 561 | Double &interval, |
---|
| 562 | String &fieldName, |
---|
| 563 | String &srcName, |
---|
| 564 | Vector<Double> &srcDir, |
---|
| 565 | Vector<Double> &srcPM, |
---|
| 566 | Double &srcVel, |
---|
| 567 | String &obsMode, |
---|
| 568 | Int &IFno, |
---|
| 569 | Double &refFreq, |
---|
| 570 | Double &bandwidth, |
---|
| 571 | Double &freqInc, |
---|
[1453] | 572 | Vector<Double> &restFreq, |
---|
[1325] | 573 | Vector<Float> &tcal, |
---|
| 574 | String &tcalTime, |
---|
| 575 | Float &azimuth, |
---|
| 576 | Float &elevation, |
---|
| 577 | Float &parAngle, |
---|
| 578 | Float &focusAxi, |
---|
| 579 | Float &focusTan, |
---|
| 580 | Float &focusRot, |
---|
| 581 | Float &temperature, |
---|
| 582 | Float &pressure, |
---|
| 583 | Float &humidity, |
---|
| 584 | Float &windSpeed, |
---|
| 585 | Float &windAz, |
---|
| 586 | Int &refBeam, |
---|
| 587 | Int &beamNo, |
---|
| 588 | Vector<Double> &direction, |
---|
| 589 | Vector<Double> &scanRate, |
---|
| 590 | Vector<Float> &tsys, |
---|
| 591 | Vector<Float> &sigma, |
---|
| 592 | Vector<Float> &calFctr, |
---|
| 593 | Matrix<Float> &baseLin, |
---|
| 594 | Matrix<Float> &baseSub, |
---|
| 595 | Matrix<Float> &spectra, |
---|
| 596 | Matrix<uChar> &flagged, |
---|
| 597 | Complex &xCalFctr, |
---|
| 598 | Vector<Complex> &xPol) |
---|
| 599 | { |
---|
| 600 | if (!cMSopen) { |
---|
| 601 | return 1; |
---|
| 602 | } |
---|
| 603 | |
---|
| 604 | // Check for EOF. |
---|
| 605 | if (cIdx >= cNRow) { |
---|
| 606 | return -1; |
---|
| 607 | } |
---|
| 608 | |
---|
| 609 | // Find the next selected beam and IF. |
---|
| 610 | Int ibeam; |
---|
| 611 | Int iIF; |
---|
[1393] | 612 | Int iDataDesc; |
---|
| 613 | |
---|
[1325] | 614 | while (True) { |
---|
| 615 | ibeam = cBeamNoCol(cIdx); |
---|
[1393] | 616 | iDataDesc = cDataDescIdCol(cIdx); |
---|
| 617 | iIF =cSpWinIdCol(iDataDesc); |
---|
[1325] | 618 | if (cBeams(ibeam) && cIFs(iIF)) { |
---|
| 619 | break; |
---|
| 620 | } |
---|
| 621 | |
---|
| 622 | // Check for EOF. |
---|
| 623 | if (++cIdx >= cNRow) { |
---|
| 624 | return -1; |
---|
| 625 | } |
---|
| 626 | } |
---|
| 627 | // Renumerate scan no. Here still is 1-based |
---|
[1393] | 628 | //scanNo = cScanNoCol(cIdx) - cScanNoCol(0) + 1; |
---|
| 629 | scanNo = cScanNoCol(cIdx); |
---|
| 630 | |
---|
[1325] | 631 | if (scanNo != cScanNo) { |
---|
| 632 | // Start of new scan. |
---|
| 633 | cScanNo = scanNo; |
---|
| 634 | cCycleNo = 1; |
---|
| 635 | cTime = cTimeCol(cIdx); |
---|
| 636 | } |
---|
| 637 | |
---|
| 638 | Double time = cTimeCol(cIdx); |
---|
| 639 | mjd = time/86400.0; |
---|
| 640 | interval = cIntervalCol(cIdx); |
---|
| 641 | |
---|
| 642 | // Reconstruct the integration cycle number; due to small latencies the |
---|
| 643 | // integration time is usually slightly less than the time between cycles, |
---|
| 644 | // resetting cTime will prevent the difference from accumulating. |
---|
| 645 | cCycleNo += nint((time - cTime)/interval); |
---|
| 646 | cycleNo = cCycleNo; |
---|
| 647 | cTime = time; |
---|
| 648 | |
---|
| 649 | Int fieldId = cFieldIdCol(cIdx); |
---|
| 650 | fieldName = cFieldNameCol(fieldId); |
---|
| 651 | |
---|
| 652 | Int srcId = cSrcIdCol(fieldId); |
---|
[1393] | 653 | //For source with multiple spectral window setting, this is not |
---|
| 654 | // correct. Source name of srcId may not be at 'srcId'th row of SrcNameCol |
---|
| 655 | //srcName = cSrcNameCol(srcId); |
---|
| 656 | for (uInt irow = 0; irow < cSrcId2Col.nrow(); irow++) { |
---|
| 657 | if (cSrcId2Col(irow) == srcId) { |
---|
| 658 | srcName = cSrcNameCol(irow); |
---|
| 659 | } |
---|
| 660 | } |
---|
| 661 | |
---|
[1325] | 662 | srcDir = cSrcDirCol(srcId); |
---|
| 663 | srcPM = cSrcPMCol(srcId); |
---|
| 664 | |
---|
| 665 | // Systemic velocity. |
---|
[1453] | 666 | if (!cHaveSrcVel || cATF) { |
---|
[1325] | 667 | srcVel = 0.0f; |
---|
| 668 | } else { |
---|
| 669 | srcVel = cSrcVelCol(srcId)(IPosition(1,0)); |
---|
| 670 | } |
---|
| 671 | |
---|
[1393] | 672 | ROMSAntennaColumns antennaCols(cPKSMS.antenna()); |
---|
| 673 | String telescope = antennaCols.name()(0); |
---|
| 674 | Bool cGBT = telescope.contains("GBT"); |
---|
[1325] | 675 | // Observation type. |
---|
[1453] | 676 | // check if State Table exist |
---|
| 677 | //Bool cHaveStateTab=Table::isReadable(cPKSMS.stateTableName()); |
---|
| 678 | Int stateId = 0; |
---|
| 679 | Int StateNRow = 0; |
---|
| 680 | StateNRow=cObsModeCol.nrow(); |
---|
| 681 | if (Table::isReadable(cPKSMS.stateTableName())) { |
---|
| 682 | obsMode = " "; |
---|
| 683 | if (StateNRow > 0) { |
---|
| 684 | stateId = cStateIdCol(cIdx); |
---|
| 685 | if (stateId == -1) { |
---|
| 686 | //obsMode = " "; |
---|
| 687 | } else { |
---|
| 688 | obsMode = cObsModeCol(stateId); |
---|
| 689 | Bool sigState =cSigStateCol(stateId); |
---|
| 690 | Bool refState =cRefStateCol(stateId); |
---|
| 691 | //DEBUG |
---|
| 692 | //cerr <<"stateid="<<stateId<<" obsmode="<<obsMode<<endl; |
---|
| 693 | if (cGBT) { |
---|
| 694 | // split the obsMode string and append a proper label |
---|
| 695 | // (these are GBT specific) |
---|
| 696 | int epos = obsMode.find_first_of(':'); |
---|
| 697 | int nextpos = obsMode.find_first_of(':',epos+1); |
---|
| 698 | string obsMode1 = obsMode.substr(0,epos); |
---|
| 699 | string obsMode2 = obsMode.substr(epos+1,nextpos-epos-1); |
---|
[1393] | 700 | |
---|
[1453] | 701 | //cerr <<"obsMode2= "<<obsMode2<<endl; |
---|
| 702 | if (!srcName.contains("_ps") |
---|
| 703 | &&!srcName.contains("_psr") |
---|
| 704 | &&!srcName.contains("_nod") |
---|
| 705 | &&!srcName.contains("_fs") |
---|
| 706 | &&!srcName.contains("_fsr")) { |
---|
| 707 | // if Nod mode observation , append '_nod' |
---|
| 708 | if (obsMode1 == "Nod") { |
---|
| 709 | srcName.append("_nod"); |
---|
| 710 | } else if (obsMode1 == "OffOn") { |
---|
| 711 | // for GBT position switch observations (OffOn or OnOff) |
---|
| 712 | if (obsMode2 == "PSWITCHON") srcName.append("_ps"); |
---|
| 713 | if (obsMode2 == "PSWITCHOFF") srcName.append("_psr"); |
---|
| 714 | } else { |
---|
| 715 | if (obsMode2 == "FSWITCH") { |
---|
| 716 | // for GBT frequency switch mode |
---|
| 717 | if (sigState) srcName.append("_fs"); |
---|
| 718 | if (refState) srcName.append("_fsr"); |
---|
| 719 | } |
---|
| 720 | } |
---|
[1393] | 721 | } |
---|
[1453] | 722 | } |
---|
| 723 | } |
---|
[1393] | 724 | } |
---|
[1453] | 725 | } |
---|
[1393] | 726 | // CAL state |
---|
| 727 | // this should be apply just for GBT data? |
---|
| 728 | Double Cal; |
---|
[1453] | 729 | if (stateId==-1 || StateNRow==0) { |
---|
[1393] | 730 | Cal = 0; |
---|
| 731 | } else { |
---|
| 732 | Cal = cCalCol(stateId); |
---|
| 733 | } |
---|
| 734 | if (cGBT) { |
---|
| 735 | if (Cal > 0 && !srcName.contains("_calon")) { |
---|
| 736 | srcName.append("_calon"); |
---|
| 737 | } |
---|
| 738 | } |
---|
[1325] | 739 | |
---|
| 740 | IFno = iIF + 1; |
---|
| 741 | Int nChan = abs(cEndChan(iIF) - cStartChan(iIF)) + 1; |
---|
[1393] | 742 | |
---|
[1325] | 743 | // Minimal handling on continuum data. |
---|
| 744 | Vector<Double> chanFreq = cChanFreqCol(iIF); |
---|
| 745 | if (nChan == 1) { |
---|
| 746 | freqInc = chanFreq(0); |
---|
| 747 | refFreq = chanFreq(0); |
---|
| 748 | restFreq = 0.0f; |
---|
| 749 | } else { |
---|
[1453] | 750 | |
---|
[1325] | 751 | if (cStartChan(iIF) <= cEndChan(iIF)) { |
---|
| 752 | freqInc = chanFreq(1) - chanFreq(0); |
---|
| 753 | } else { |
---|
| 754 | freqInc = chanFreq(0) - chanFreq(1); |
---|
| 755 | } |
---|
| 756 | refFreq = chanFreq(cRefChan(iIF)-1); |
---|
[1453] | 757 | Bool HaveSrcRestFreq= cSrcRestFrqCol.isDefined(srcId); |
---|
| 758 | if (HaveSrcRestFreq) { |
---|
| 759 | //restFreq = cSrcRestFrqCol(srcId)(IPosition(1,0)); |
---|
| 760 | restFreq = cSrcRestFrqCol(srcId); |
---|
| 761 | } else { |
---|
| 762 | restFreq = 0.0f; |
---|
| 763 | } |
---|
[1325] | 764 | } |
---|
| 765 | bandwidth = abs(freqInc * nChan); |
---|
| 766 | |
---|
| 767 | tcal.resize(cNPol(iIF)); |
---|
| 768 | tcal = 0.0f; |
---|
| 769 | tcalTime = ""; |
---|
[1393] | 770 | //azimuth = 0.0f; |
---|
| 771 | //elevation = 0.0f; |
---|
[1325] | 772 | parAngle = 0.0f; |
---|
| 773 | focusAxi = 0.0f; |
---|
| 774 | focusTan = 0.0f; |
---|
| 775 | focusRot = 0.0f; |
---|
| 776 | |
---|
| 777 | // Find the appropriate entry in the WEATHER subtable. |
---|
[1453] | 778 | //Bool cHaveStateTab=Table::isReadable(cPKSMS.stateTableName()); |
---|
| 779 | Bool cHaveWeatherTab = Table::isReadable(cPKSMS.weatherTableName()); |
---|
| 780 | Int weatherIdx=-1; |
---|
| 781 | if (cHaveWeatherTab) { |
---|
| 782 | Vector<Double> wTimes = cWeatherTimeCol.getColumn(); |
---|
| 783 | for (weatherIdx = wTimes.nelements()-1; weatherIdx >= 0; weatherIdx--) { |
---|
| 784 | if (cWeatherTimeCol(weatherIdx) <= time) { |
---|
| 785 | break; |
---|
| 786 | } |
---|
[1325] | 787 | } |
---|
| 788 | } |
---|
[1453] | 789 | if (weatherIdx < 0 || !cHaveWeatherTab) { |
---|
[1325] | 790 | // No appropriate WEATHER entry. |
---|
| 791 | pressure = 0.0f; |
---|
| 792 | humidity = 0.0f; |
---|
| 793 | temperature = 0.0f; |
---|
| 794 | } else { |
---|
| 795 | pressure = cPressureCol(weatherIdx); |
---|
| 796 | humidity = cHumidityCol(weatherIdx); |
---|
| 797 | temperature = cTemperatureCol(weatherIdx); |
---|
| 798 | } |
---|
| 799 | |
---|
| 800 | windSpeed = 0.0f; |
---|
| 801 | windAz = 0.0f; |
---|
| 802 | |
---|
| 803 | refBeam = 0; |
---|
| 804 | beamNo = ibeam + 1; |
---|
| 805 | |
---|
[1393] | 806 | //Matrix<Double> pointingDir = cPointingCol(fieldId); |
---|
| 807 | //pointingDir = cPointingCol(fieldId); |
---|
| 808 | //direction = pointingDir.column(0); |
---|
| 809 | //uInt ncols = pointingDir.ncolumn(); |
---|
| 810 | //if (ncols == 1) { |
---|
| 811 | // scanRate = 0.0f; |
---|
| 812 | //} else { |
---|
| 813 | // scanRate = pointingDir.column(1); |
---|
| 814 | //} |
---|
| 815 | |
---|
| 816 | // Get direction from FIELD table |
---|
| 817 | // here, assume direction to be the field direction not pointing |
---|
| 818 | Matrix<Double> delayDir = cFieldDelayDirCol(fieldId); |
---|
| 819 | direction = delayDir.column(0); |
---|
| 820 | uInt ncols = delayDir.ncolumn(); |
---|
[1325] | 821 | if (ncols == 1) { |
---|
| 822 | scanRate = 0.0f; |
---|
| 823 | } else { |
---|
[1393] | 824 | scanRate = delayDir.column(1); |
---|
[1325] | 825 | } |
---|
| 826 | |
---|
[1393] | 827 | // caluculate azimuth and elevation |
---|
| 828 | // first, get the reference frame |
---|
| 829 | MVPosition mvpos(antennaCols.position()(0)); |
---|
| 830 | MPosition mp(mvpos); |
---|
| 831 | Quantum<Double> qt(time,"s"); |
---|
| 832 | MVEpoch mvt(qt); |
---|
| 833 | MEpoch me(mvt); |
---|
| 834 | MeasFrame frame(mp, me); |
---|
| 835 | // |
---|
| 836 | ROMSFieldColumns fldCols(cPKSMS.field()); |
---|
| 837 | Vector<MDirection> vmd(1); |
---|
| 838 | MDirection md; |
---|
| 839 | fldCols.delayDirMeasCol().get(fieldId,vmd); |
---|
| 840 | md = vmd[0]; |
---|
| 841 | //Vector<Double> dircheck = md.getAngle("rad").getValue(); |
---|
| 842 | //cerr<<"dircheck="<<dircheck<<endl; |
---|
| 843 | |
---|
| 844 | Vector<Double> azel = |
---|
| 845 | MDirection::Convert(md, MDirection::Ref(MDirection::AZEL, |
---|
| 846 | frame) |
---|
| 847 | )().getAngle("rad").getValue(); |
---|
| 848 | //cerr<<"azel="<<azel<<endl; |
---|
| 849 | azimuth = azel[0]; |
---|
| 850 | elevation = azel[1]; |
---|
| 851 | |
---|
[1325] | 852 | // Get Tsys assuming that entries in the SYSCAL table match the main table. |
---|
| 853 | if (cHaveTsys) { |
---|
| 854 | Int nTsysColRow = cTsysCol.nrow(); |
---|
| 855 | if (nTsysColRow != cNRow) { |
---|
| 856 | cHaveTsys=0; |
---|
| 857 | } |
---|
| 858 | } |
---|
| 859 | if (cHaveTsys) { |
---|
| 860 | cTsysCol.get(cIdx, tsys, True); |
---|
| 861 | } else { |
---|
| 862 | Int numReceptor; |
---|
| 863 | cNumReceptorCol.get(0, numReceptor); |
---|
| 864 | tsys.resize(numReceptor); |
---|
| 865 | tsys = 1.0f; |
---|
| 866 | } |
---|
| 867 | cSigmaCol.get(cIdx, sigma, True); |
---|
| 868 | |
---|
[1393] | 869 | //get Tcal if available |
---|
| 870 | if (cHaveTcal) { |
---|
| 871 | Int nTcalColRow = cTcalCol.nrow(); |
---|
| 872 | uInt nBeam = cBeams.nelements(); |
---|
| 873 | uInt nIF = cIFs.nelements(); |
---|
| 874 | uInt nrws = nBeam * nIF; |
---|
| 875 | if (nTcalColRow > 0) { |
---|
| 876 | // find tcal match with the data with the data time stamp |
---|
| 877 | Double mjds = mjd*(24*3600); |
---|
| 878 | Double dtcalTime; |
---|
| 879 | if ( mjd > lastmjd || cIdx==0 ) { |
---|
| 880 | //Table tmptab = cSysCalTab(near(cSysCalTab.col("TIME"),mjds)); |
---|
| 881 | tmptab = cSysCalTab(near(cSysCalTab.col("TIME"),mjds), nrws); |
---|
| 882 | //DEBUG |
---|
| 883 | //if (cIdx == 0) { |
---|
| 884 | // cerr<<"inital table retrieved"<<endl; |
---|
| 885 | //} |
---|
| 886 | |
---|
| 887 | } |
---|
| 888 | |
---|
| 889 | if (nBeam == 1) { |
---|
| 890 | tmptab2 = tmptab( tmptab.col("SPECTRAL_WINDOW_ID") == iIF, 1); |
---|
| 891 | } else { |
---|
| 892 | tmptab2 = tmptab( tmptab.col("SPECTRAL_WINDOW_ID") == iIF && |
---|
| 893 | tmptab.col("FEED_ID") == ibeam , 1); |
---|
| 894 | } |
---|
| 895 | //cerr<<"first subtab rows="<<tmptab.nrow()<<endl; |
---|
| 896 | int syscalrow = tmptab2.nrow(); |
---|
| 897 | ROArrayColumn<Float> tcalCol(tmptab2, "TCAL"); |
---|
| 898 | ROScalarColumn<Double> tcalTimeCol(tmptab2, "TIME"); |
---|
| 899 | if (syscalrow==0) { |
---|
| 900 | cerr<<"Cannot find any matching Tcal at/near the data timestamp." |
---|
| 901 | << " Set Tcal=0.0"<<endl; |
---|
| 902 | } else { |
---|
| 903 | tcalCol.get(0, tcal); |
---|
| 904 | tcalTimeCol.get(0,dtcalTime); |
---|
| 905 | tcalTime = MVTime(dtcalTime/(24*3600)).string(MVTime::YMD); |
---|
| 906 | //DEBUG |
---|
| 907 | //cerr<<"cIdx:"<<cIdx<<" tcal="<<tcal<<" tcalTime="<<tcalTime<<endl; |
---|
| 908 | tmptab.markForDelete(); |
---|
| 909 | tmptab2.markForDelete(); |
---|
| 910 | } |
---|
| 911 | } |
---|
| 912 | lastmjd = mjd; |
---|
| 913 | } |
---|
| 914 | |
---|
[1325] | 915 | // Calibration factors (if available). |
---|
| 916 | calFctr.resize(cNPol(iIF)); |
---|
| 917 | if (cHaveCalFctr) { |
---|
| 918 | cCalFctrCol.get(cIdx, calFctr); |
---|
| 919 | } else { |
---|
| 920 | calFctr = 0.0f; |
---|
| 921 | } |
---|
| 922 | |
---|
| 923 | // Baseline parameters (if available). |
---|
| 924 | if (cHaveBaseLin) { |
---|
| 925 | baseLin.resize(2,cNPol(iIF)); |
---|
| 926 | cBaseLinCol.get(cIdx, baseLin); |
---|
| 927 | |
---|
| 928 | baseSub.resize(9,cNPol(iIF)); |
---|
| 929 | cBaseSubCol.get(cIdx, baseSub); |
---|
| 930 | |
---|
| 931 | } else { |
---|
| 932 | baseLin.resize(0,0); |
---|
| 933 | baseSub.resize(0,0); |
---|
| 934 | } |
---|
| 935 | // Get spectral data. |
---|
| 936 | if (cGetSpectra) { |
---|
| 937 | Matrix<Float> tmpData; |
---|
| 938 | Matrix<Bool> tmpFlag; |
---|
[1453] | 939 | if (cHaveDataCol) { |
---|
| 940 | Matrix<Complex> tmpCmplxData; |
---|
| 941 | Matrix<Float> tmpReData; |
---|
| 942 | Matrix<Float> tmpImData; |
---|
| 943 | //cerr<<"reading spectra..."<<endl; |
---|
| 944 | //# TODO - should have a flag to user to select DATA or CORRECTED_DATA |
---|
| 945 | //# currently just automatically determined, --- read CORRECTED one |
---|
| 946 | //# if the column exist. |
---|
| 947 | if (cHaveCorrectedDataCol) { |
---|
| 948 | cCorrectedDataCol.getSlice(cIdx, cDataSel(iIF), tmpCmplxData, True); |
---|
| 949 | } else { |
---|
| 950 | cDataCol.getSlice(cIdx, cDataSel(iIF), tmpCmplxData, True); |
---|
| 951 | } |
---|
| 952 | tmpReData = real(tmpCmplxData); |
---|
| 953 | tmpImData = imag(tmpCmplxData); |
---|
| 954 | tmpData = sqrt(tmpReData*tmpReData + tmpImData*tmpImData); |
---|
| 955 | } else { |
---|
| 956 | cFloatDataCol.getSlice(cIdx, cDataSel(iIF), tmpData, True); |
---|
| 957 | } |
---|
[1325] | 958 | cFlagCol.getSlice(cIdx, cDataSel(iIF), tmpFlag, True); |
---|
| 959 | |
---|
| 960 | // Transpose spectra. |
---|
| 961 | Int nPol = tmpData.nrow(); |
---|
| 962 | spectra.resize(nChan, nPol); |
---|
| 963 | flagged.resize(nChan, nPol); |
---|
| 964 | if (cEndChan(iIF) >= cStartChan(iIF)) { |
---|
| 965 | // Simple transposition. |
---|
| 966 | for (Int ipol = 0; ipol < nPol; ipol++) { |
---|
| 967 | for (Int ichan = 0; ichan < nChan; ichan++) { |
---|
| 968 | spectra(ichan,ipol) = tmpData(ipol,ichan); |
---|
| 969 | flagged(ichan,ipol) = tmpFlag(ipol,ichan); |
---|
| 970 | } |
---|
| 971 | } |
---|
| 972 | |
---|
| 973 | } else { |
---|
| 974 | // Transpose with inversion. |
---|
| 975 | Int jchan = nChan - 1; |
---|
| 976 | for (Int ipol = 0; ipol < nPol; ipol++) { |
---|
| 977 | for (Int ichan = 0; ichan < nChan; ichan++, jchan--) { |
---|
| 978 | spectra(ichan,ipol) = tmpData(ipol,jchan); |
---|
| 979 | flagged(ichan,ipol) = tmpFlag(ipol,jchan); |
---|
| 980 | } |
---|
| 981 | } |
---|
| 982 | } |
---|
| 983 | } |
---|
| 984 | |
---|
| 985 | // Get cross-polarization data. |
---|
| 986 | if (cGetXPol) { |
---|
[1453] | 987 | //cerr<<"cGetXPol="<<cGetXPol<<endl; |
---|
| 988 | //cerr<<"cHaveXCalFctr="<<cHaveXCalFctr<<endl; |
---|
| 989 | |
---|
[1325] | 990 | if (cHaveXCalFctr) { |
---|
| 991 | cXCalFctrCol.get(cIdx, xCalFctr); |
---|
| 992 | } else { |
---|
| 993 | xCalFctr = Complex(0.0f, 0.0f); |
---|
| 994 | } |
---|
| 995 | |
---|
[1453] | 996 | if(!cATF) { |
---|
| 997 | cDataCol.get(cIdx, xPol, True); |
---|
[1325] | 998 | |
---|
[1453] | 999 | if (cEndChan(iIF) < cStartChan(iIF)) { |
---|
| 1000 | Complex ctmp; |
---|
| 1001 | Int jchan = nChan - 1; |
---|
| 1002 | for (Int ichan = 0; ichan < nChan/2; ichan++, jchan--) { |
---|
| 1003 | ctmp = xPol(ichan); |
---|
| 1004 | xPol(ichan) = xPol(jchan); |
---|
| 1005 | xPol(jchan) = ctmp; |
---|
| 1006 | } |
---|
[1325] | 1007 | } |
---|
| 1008 | } |
---|
| 1009 | } |
---|
[1453] | 1010 | /** |
---|
| 1011 | cerr<<"scanNo="<<scanNo<<endl; |
---|
| 1012 | cerr<<"cycleNo="<<cycleNo<<endl; |
---|
| 1013 | cerr<<"mjd="<<mjd<<endl; |
---|
| 1014 | cerr<<"interval="<<interval<<endl; |
---|
| 1015 | cerr<<"fieldName="<<fieldName<<endl; |
---|
| 1016 | cerr<<"srcNmae="<<srcName<<endl; |
---|
| 1017 | cerr<<"srcDir="<<srcDir<<endl; |
---|
| 1018 | cerr<<"srcPM="<<srcPM<<endl; |
---|
| 1019 | cerr<<"srcVel="<<srcVel<<endl; |
---|
| 1020 | cerr<<"obsMode="<<obsMode<<endl; |
---|
| 1021 | cerr<<"IFno="<<IFno<<endl; |
---|
| 1022 | cerr<<"refFreq="<<refFreq<<endl; |
---|
| 1023 | cerr<<"tcal="<<tcal<<endl; |
---|
| 1024 | cerr<<"direction="<<direction<<endl; |
---|
| 1025 | cerr<<"scanRate="<<scanRate<<endl; |
---|
| 1026 | cerr<<"tsys="<<tsys<<endl; |
---|
| 1027 | cerr<<"sigma="<<sigma<<endl; |
---|
| 1028 | cerr<<"calFctr="<<calFctr<<endl; |
---|
| 1029 | cerr<<"baseLin="<<baseLin<<endl; |
---|
| 1030 | cerr<<"baseSub="<<baseSub<<endl; |
---|
| 1031 | cerr<<"spectra="<<spectra.shape()<<endl; |
---|
| 1032 | cerr<<"flagged="<<flagged.shape()<<endl; |
---|
| 1033 | cerr<<"xCalFctr="<<xCalFctr<<endl; |
---|
| 1034 | cerr<<"xPol="<<xPol<<endl; |
---|
| 1035 | **/ |
---|
[1325] | 1036 | cIdx++; |
---|
| 1037 | |
---|
| 1038 | return 0; |
---|
| 1039 | } |
---|
| 1040 | |
---|
| 1041 | //--------------------------------------------------------- PKSMS2reader::read |
---|
| 1042 | |
---|
| 1043 | // Read the next data record, just the basics. |
---|
| 1044 | |
---|
| 1045 | Int PKSMS2reader::read( |
---|
| 1046 | Int &IFno, |
---|
| 1047 | Vector<Float> &tsys, |
---|
| 1048 | Vector<Float> &calFctr, |
---|
| 1049 | Matrix<Float> &baseLin, |
---|
| 1050 | Matrix<Float> &baseSub, |
---|
| 1051 | Matrix<Float> &spectra, |
---|
| 1052 | Matrix<uChar> &flagged) |
---|
| 1053 | { |
---|
| 1054 | if (!cMSopen) { |
---|
| 1055 | return 1; |
---|
| 1056 | } |
---|
| 1057 | |
---|
| 1058 | // Check for EOF. |
---|
| 1059 | if (cIdx >= cNRow) { |
---|
| 1060 | return -1; |
---|
| 1061 | } |
---|
| 1062 | |
---|
| 1063 | // Find the next selected beam and IF. |
---|
| 1064 | Int ibeam; |
---|
| 1065 | Int iIF; |
---|
[1393] | 1066 | Int iDataDesc; |
---|
[1325] | 1067 | while (True) { |
---|
| 1068 | ibeam = cBeamNoCol(cIdx); |
---|
[1393] | 1069 | //iIF = cDataDescIdCol(cIdx); |
---|
| 1070 | iDataDesc = cDataDescIdCol(cIdx); |
---|
| 1071 | iIF = cSpWinIdCol(iDataDesc); |
---|
[1325] | 1072 | if (cBeams(ibeam) && cIFs(iIF)) { |
---|
| 1073 | break; |
---|
| 1074 | } |
---|
| 1075 | |
---|
| 1076 | // Check for EOF. |
---|
| 1077 | if (++cIdx >= cNRow) { |
---|
| 1078 | return -1; |
---|
| 1079 | } |
---|
| 1080 | } |
---|
| 1081 | |
---|
| 1082 | IFno = iIF + 1; |
---|
| 1083 | // Get Tsys assuming that entries in the SYSCAL table match the main table. |
---|
| 1084 | cTsysCol.get(cIdx, tsys, True); |
---|
| 1085 | |
---|
| 1086 | // Calibration factors (if available). |
---|
| 1087 | if (cHaveCalFctr) { |
---|
| 1088 | cCalFctrCol.get(cIdx, calFctr, True); |
---|
| 1089 | } else { |
---|
| 1090 | calFctr.resize(cNPol(iIF)); |
---|
| 1091 | calFctr = 0.0f; |
---|
| 1092 | } |
---|
| 1093 | |
---|
| 1094 | // Baseline parameters (if available). |
---|
| 1095 | if (cHaveBaseLin) { |
---|
| 1096 | baseLin.resize(2,cNPol(iIF)); |
---|
| 1097 | cBaseLinCol.get(cIdx, baseLin); |
---|
| 1098 | |
---|
| 1099 | baseSub.resize(9,cNPol(iIF)); |
---|
| 1100 | cBaseSubCol.get(cIdx, baseSub); |
---|
| 1101 | |
---|
| 1102 | } else { |
---|
| 1103 | baseLin.resize(0,0); |
---|
| 1104 | baseSub.resize(0,0); |
---|
| 1105 | } |
---|
| 1106 | |
---|
| 1107 | if (cGetSpectra) { |
---|
| 1108 | // Get spectral data. |
---|
| 1109 | Matrix<Float> tmpData; |
---|
| 1110 | Matrix<Bool> tmpFlag; |
---|
[1453] | 1111 | if (cHaveDataCol) { |
---|
| 1112 | Matrix<Complex> tmpCmplxData; |
---|
| 1113 | cDataCol.getSlice(cIdx, cDataSel(iIF), tmpCmplxData, True); |
---|
| 1114 | tmpData = real(tmpCmplxData); |
---|
| 1115 | } else { |
---|
| 1116 | cFloatDataCol.getSlice(cIdx, cDataSel(iIF), tmpData, True); |
---|
| 1117 | } |
---|
[1325] | 1118 | cFlagCol.getSlice(cIdx, cDataSel(iIF), tmpFlag, True); |
---|
| 1119 | |
---|
| 1120 | // Transpose spectra. |
---|
| 1121 | Int nChan = tmpData.ncolumn(); |
---|
| 1122 | Int nPol = tmpData.nrow(); |
---|
| 1123 | spectra.resize(nChan, nPol); |
---|
| 1124 | flagged.resize(nChan, nPol); |
---|
| 1125 | if (cEndChan(iIF) >= cStartChan(iIF)) { |
---|
| 1126 | // Simple transposition. |
---|
| 1127 | for (Int ipol = 0; ipol < nPol; ipol++) { |
---|
| 1128 | for (Int ichan = 0; ichan < nChan; ichan++) { |
---|
| 1129 | spectra(ichan,ipol) = tmpData(ipol,ichan); |
---|
| 1130 | flagged(ichan,ipol) = tmpFlag(ipol,ichan); |
---|
| 1131 | } |
---|
| 1132 | } |
---|
| 1133 | |
---|
| 1134 | } else { |
---|
| 1135 | // Transpose with inversion. |
---|
| 1136 | Int jchan = nChan - 1; |
---|
| 1137 | for (Int ipol = 0; ipol < nPol; ipol++) { |
---|
| 1138 | for (Int ichan = 0; ichan < nChan; ichan++, jchan--) { |
---|
| 1139 | spectra(ichan,ipol) = tmpData(ipol,jchan); |
---|
| 1140 | flagged(ichan,ipol) = tmpFlag(ipol,jchan); |
---|
| 1141 | } |
---|
| 1142 | } |
---|
| 1143 | } |
---|
| 1144 | } |
---|
| 1145 | |
---|
| 1146 | cIdx++; |
---|
| 1147 | |
---|
| 1148 | return 0; |
---|
| 1149 | } |
---|
| 1150 | |
---|
| 1151 | //-------------------------------------------------------- PKSMS2reader::close |
---|
| 1152 | |
---|
| 1153 | // Close the MS. |
---|
| 1154 | |
---|
| 1155 | void PKSMS2reader::close() |
---|
| 1156 | { |
---|
| 1157 | cPKSMS = MeasurementSet(); |
---|
| 1158 | cMSopen = False; |
---|
| 1159 | } |
---|