Changeset 1120 in Sophya for trunk/SophyaProg/PMixer/tgrsr.cc

Timestamp:

Jul 31, 2000, 3:47:02 PM (25 years ago)

Author:

ansari

Message:

Adaptation de PMixer aux changements suivants :

• Remplacement de l'ancienne classe Image<T> par une nouvelle, heritant

de TMatrix<T>

• Remplacement des FitsIoServer par FITS_xxx<T>

Reza 31/7/2000

File:

• trunk/SophyaProg/PMixer/tgrsr.cc (modified) (1 diff)

trunk/SophyaProg/PMixer/tgrsr.cc

@@ -128 +128 @@
   PrtTim("End of filling ");
 
-  FitsIoServer fios;
+  {
   cout << "\n Writing Matrix NRows= " << mtx.NRows() << "  NCols= " 
        << mtx.NCols() << " to FITS file: " << (string)(arg[4]) << endl;
-  fios.save(mtx, arg[4]);
+  FITS_TArray<r_8> fios(&mtx);
+  fios.Write(arg[4]);   // $CHECK$ A passer em HDU=2 , Reza 31/7/2000
   PrtTim("End of Matrix->FITS ");
+  }
 
   if (narg > 5) { // Writing ImageR4 fo FITS file
     cout << "wrting ImageR4(" << npt << ", 2) to FITS file: " 
          << (string)(arg[5]) << endl;
-    fios.save(img, arg[5]);
+    FITS_TArray<r_4> fios(&img);
+    fios.Write(arg[5]);
     PrtTim("End of ImageR4->FITS ");
   }