Changeset 1315 in Sophya for trunk/SophyaPI/PIext/piinit.cc

Timestamp:

Nov 9, 2000, 6:46:33 PM (25 years ago)

Author:

ercodmgr

Message:

Adaptateur pour TArray et flag share ds methode CloneDataObj() - Reza 9/11/2000

File:

• trunk/SophyaPI/PIext/piinit.cc (modified) (3 diffs)

trunk/SophyaPI/PIext/piinit.cc

@@ -14 +14 @@
 #include <complex>
 #include "nomtmatvecadapter.h"
+#include "nomtarradapter.h"
 #include "nomskymapadapter.h"
 #include "spherethetaphi.h"
@@ -55 +56 @@
   serv->RegisterClass(new Matrix, new NOMAdapter_Matrix );
 #else
+  serv->RegisterClass(new TArray<int_4>, new NOMAdapter_TArray<int_4> );
+  serv->RegisterClass(new TArray<r_4>, new NOMAdapter_TArray<r_4> );
+  serv->RegisterClass(new TArray<r_8>, new NOMAdapter_TArray<r_8> );
+  serv->RegisterClass(new TArray<complex<r_4> >, new NOMAdapter_TArray<complex<r_4> > );
+  serv->RegisterClass(new TArray<complex<r_8> >, new NOMAdapter_TArray<complex<r_8> > );
+
   serv->RegisterClass(new TVector<int_4>, new NOMAdapter_TMatrix<int_4> );
   serv->RegisterClass(new TMatrix<int_4>, new NOMAdapter_TMatrix<int_4> );
@@ -61 +68 @@
   serv->RegisterClass(new TVector<r_8>, new NOMAdapter_TMatrix<r_8> );
   serv->RegisterClass(new TMatrix<r_8>, new NOMAdapter_TMatrix<r_8> );
-  //CMV// serv->RegisterClass(new TVector<complex<r_4> >, new NOMAdapter_TMatrix<complex<r_4> > );
-  //CMV// serv->RegisterClass(new TMatrix<complex<r_4> >, new NOMAdapter_TMatrix<complex<r_4> > );
-  //CMV// serv->RegisterClass(new TVector<complex<r_8> >, new NOMAdapter_TMatrix<complex<r_8> > );
-  //CMV// serv->RegisterClass(new TMatrix<complex<r_8> >, new NOMAdapter_TMatrix<complex<r_8> > );
+  serv->RegisterClass(new TVector<complex<r_4> >, new NOMAdapter_TMatrix<complex<r_4> > );
+  serv->RegisterClass(new TMatrix<complex<r_4> >, new NOMAdapter_TMatrix<complex<r_4> > );
+  serv->RegisterClass(new TVector<complex<r_8> >, new NOMAdapter_TMatrix<complex<r_8> > );
+  serv->RegisterClass(new TMatrix<complex<r_8> >, new NOMAdapter_TMatrix<complex<r_8> > );
 #endif