Changeset 1491 for branches/alma

Timestamp:

01/26/09 16:33:42 (16 years ago)

Author:

Takeshi Nakazato

Message:

New Development: No

JIRA Issue: Yes CAS-1043

Ready to Release: Yes

Interface Changes: No

What Interface Changed: Please list interface changes

Test Programs: List test programs

Put in Release Notes: Yes/No

Module(s): Module Names change impacts.

Description: Fixed bug in frequency conversion again.

File:

• branches/alma/src/STFiller.cpp (modified) (3 diffs)

branches/alma/src/STFiller.cpp

@@ -492 +492 @@
   else if ( strncmp( eq, "J2000", 5 ) == 0 ) 
     header_->equinox = 2000.0 ;
-  header_->freqref = nheader->getVREF() ;
+  char *vref = nheader->getVREF() ;
+  //if ( strncmp( vref, "LSR", 3 ) == 0 ) {
+  //strcat( vref, "K" ) ;
+  //}
+  header_->freqref = vref ;
   header_->reffreq = nheader->getF0CAL()[0] ;
   header_->bandwidth = nheader->getBEBW()[0] ;
@@ -551 +555 @@
   table_->setHeader( *header_ ) ;
 
+  // set velocity reference 
+  //table_->frequencies().setFrame( vref ) ;
+
   // DEBUG
   //cout << "STFiller::openNRO() Velocity Definition = " << nheader->getVDEF() << endl ;
@@ -637 +644 @@
       *sdirCol = nreader_->getSourceDirection() ;
       RecordFieldPtr<Double> svelCol(rec, "SRCVELOCITY") ;
-      //*svelCol = h->getURVEL() ;   // [m/s]
-      *svelCol = h->getURVEL() + d->VRAD ;  // [m/s]
+      *svelCol = h->getURVEL() ;   // [m/s]
+      //*svelCol = h->getURVEL() + d->VRAD ;  // [m/s]
+      //*svelCol = d->VRAD ;  // [m/s]
+      //*svelCol = 0.0 ; 
       RecordFieldPtr<Int> fitCol(rec, "FIT_ID") ;
       *fitCol = -1 ;