Changeset 1321 in Sophya for trunk/SophyaPI/PIext/nomtmatvecadapter.cc

Timestamp:

Nov 13, 2000, 4:32:34 PM (25 years ago)

Author:

ercodmgr

Message:

Adaptateur de TArray et lecture FITS - Reza 13/11/2000

File:

• trunk/SophyaPI/PIext/nomtmatvecadapter.cc (modified) (2 diffs)

trunk/SophyaPI/PIext/nomtmatvecadapter.cc

@@ -15 +15 @@
 
 #include "fioarr.h"
-
+#include "fitstarray.h"
 
 
@@ -69 +69 @@
 if (v != NULL) return( new TVector<T>(*v, share) );
 else return ( new TMatrix<T>(*mMtx, share) );
+}
+
+/* --Methode-- */
+template <class T> 
+void NOMAdapter_TMatrix<T>::ReadFits(string const & flnm)
+{
+  FitsInFile fis(flnm);
+  fis >> (*mMtx);
+}
+
+/* --Methode-- */
+template <class T> 
+void NOMAdapter_TMatrix<T>::SaveFits(string const & flnm)
+{
+  FitsOutFile fos(flnm);
+  fos << (*mMtx);
+}
+// ---- Specialisation pour complexes -----
+void NOMAdapter_TMatrix< complex<r_4> >::ReadFits(string const & flnm)
+{
+cout << " NOMAdapter_TMatrix< complex<r_4> >::ReadFits() - Error " 
+     << " Not supported (complex data type)" << endl;
+}
+void NOMAdapter_TMatrix< complex<r_4> >::SaveFits(string const & flnm)
+{
+cout << " NOMAdapter_TMatrix< complex<r_4> >::SaveFits() - Error " 
+     << " Not supported (complex data type)" << endl;
+}
+
+void NOMAdapter_TMatrix< complex<r_8> >::ReadFits(string const & flnm)
+{
+cout << " NOMAdapter_TMatrix< complex<r_8> >::ReadFits() - Error " 
+     << " Not supported (complex data type)" << endl;
+}
+void NOMAdapter_TMatrix< complex<r_8> >::SaveFits(string const & flnm)
+{
+cout << " NOMAdapter_TMatrix< complex<r_8> >::SaveFits() - Error " 
+     << " Not supported (complex data type)" << endl;
 }