Changeset 1399 for trunk/external/atnf/PKSIO/SDFITSwriter.cc

Timestamp:

11/16/07 13:36:15 (17 years ago)

Author:

Malte Marquarding

Message:

Mark C added brightness unit to getHeader()

File:

• trunk/external/atnf/PKSIO/SDFITSwriter.cc (modified) (9 diffs)

trunk/external/atnf/PKSIO/SDFITSwriter.cc

@@ -2 +2 @@
 //# SDFITSwriter.cc: ATNF CFITSIO interface class for SDFITS output.
 //#---------------------------------------------------------------------------
-//# Copyright (C) 2000-2006
+//# Copyright (C) 2000-2007
 //# Mark Calabretta, ATNF
 //#
@@ -27 +27 @@
 //#                        AUSTRALIA
 //#
-//# $Id: SDFITSwriter.cc,v 19.10 2006/07/05 05:44:52 mcalabre Exp $
+//# $Id: SDFITSwriter.cc,v 19.12 2007/11/12 03:37:56 cal103 Exp $
 //#---------------------------------------------------------------------------
 //# Original: 2000/07/24, Mark Calabretta, ATNF
@@ -76 +76 @@
         double antPos[3],
         char*  obsMode,
+        char*  bunit,
         float  equinox,
         char*  dopplerFrame,
@@ -113 +114 @@
       break;
     }
-    
+
     if (cNChan[iIF] != cNChan[0] || cNPol[iIF] != cNPol[0]) {
       // Varying channels and/or polarizations, need a TDIM column at least.
@@ -159 +160 @@
   char version[7];
   char date[11];
-  sscanf("$Revision: 19.10 $", "%*s%s", version);
-  sscanf("$Date: 2006/07/05 05:44:52 $", "%*s%s", date);
+  sscanf("$Revision: 19.12 $", "%*s%s", version);
+  sscanf("$Date: 2007/11/12 03:37:56 $", "%*s%s", date);
   sprintf(text, "SDFITSwriter (v%s, %s)", version, date);
   fits_write_key_str(cSDptr, "ORIGIN", text, "output class", &cStatus);
@@ -355 +356 @@
   fits_insert_col(cSDptr, ++ncol, "TSYS", tform, &cStatus);
   sprintf(tunit, "TUNIT%d", ncol);
-  fits_write_key_str(cSDptr, tunit, "Jy", "units of field", &cStatus);
+  fits_write_key_str(cSDptr, tunit, bunit, "units of field", &cStatus);
 
   // CALFCTR (additional, real).
@@ -396 +397 @@
 
   sprintf(tunit, "TUNIT%d", ncol);
-  fits_write_key_str(cSDptr, tunit, "Jy", "units of field", &cStatus);
+  fits_write_key_str(cSDptr, tunit, bunit, "units of field", &cStatus);
 
   // FLAGGED (additional, logical).
@@ -444 +445 @@
 
     sprintf(tunit, "TUNIT%d", ncol);
-    fits_write_key_str(cSDptr, tunit, "Jy", "units of field", &cStatus);
+    fits_write_key_str(cSDptr, tunit, bunit, "units of field", &cStatus);
   }
 
@@ -743 +744 @@
 
 
+//------------------------------------------------------ SDFITSwriter::history
+
+// Write a history record.
+
+int SDFITSwriter::history(char *text)
+
+{
+  fits_write_history(cSDptr, text, &cStatus);
+
+  return cStatus;
+}
+
 //-------------------------------------------------- SDFITSwriter::reportError