Changeset 2907 in Sophya for trunk/SophyaExt/FitsIOServer/fitsfile.cc

Timestamp:

Jan 17, 2006, 10:09:29 AM (20 years ago)

Author:

ansari

Message:

debug/check fits : gestion NTuple colonnes double + init hdunum_ ds FitsFile(FitsInOutFile&) + correction gestion TArray/TMatrix/TVector ds fitsarrhand.h - Reza 17/01/2006

File:

• trunk/SophyaExt/FitsIOServer/fitsfile.cc (modified) (2 diffs)

trunk/SophyaExt/FitsIOServer/fitsfile.cc

@@ -298 +298 @@
 {
   InitNull();
+  hdunum_ = fios.CurrentHDU();
 }
 
@@ -1145 +1146 @@
     {
       fits_read_col(fptr_,TFLOAT,ncol+1,NoLine+1,1,1,&fnull,&fdata[ncol],&anynul,&status);
+      if (status)
+        {
+          ResetStatus(status);
+          break;
+        }
+    }
+}
+
+/*! 
+Get the NoLine-th float 'line'  from the current BINTABLE extension on FITS file,
+*/
+void FitsInFile::GetBinTabLine(int NoLine, double* ddata) 
+{
+  int status= 0;
+  int    anynul;
+  double dnull= fnull_;
+  long nels=1;
+  int ncol;
+  for (ncol=0; ncol<nbcols_; ncol++)
+    {
+      fits_read_col(fptr_, TDOUBLE, ncol+1,NoLine+1,1,1,&dnull,&ddata[ncol],&anynul,&status);
       if (status)
         {