Changeset 271 in Sophya for trunk

Timestamp:

Apr 27, 1999, 5:03:48 PM (26 years ago)

Author:

ansari

Message:

test de Persist<NDataBlock> Reza 27/04/99

Location:

trunk/SophyaProg/Tests

Files:

• Makefile (modified) (3 diffs)
• timg.cc (modified) (2 diffs)

trunk/SophyaProg/Tests/Makefile

@@ -7 +7 @@
 LIBF =  $(LIB)libSysTools.a $(LIB)libNTools.a $(LIB)libBlitz.a $(LIB)libPI.a $(LIB)libPIext.a 
 LIBS = -L$(LIB) -lPIext -lPI -lSysTools -lNTools -lBlitz -lm
+#LIBS =  -L$(LIB) -lSysTools -lm
 ifeq ($(CXX),cxx)
 # librairie des instances de templates cxx
@@ -13 +14 @@
 else
 LIBF =  $(SLB)libtools.so 
-LIBS = -L$(SLB) -lPI -ltools -lm 
+#LIBS = -L$(SLB) -lPI -ltools -lm 
+LIBS = -L$(SLB) -ltools -lm 
 ifeq ($(MACHEROS),Linux)
-LIBS = $(LIBS) -ldl
+LIBS := $(LIBS) -ldl
 endif
 endif
@@ -25 +27 @@
 endif
 
-LIBS =  -L$(LIB) -lSysTools -lm
 
 LDLIBS := $(LIBS) $(LDLIBS)

trunk/SophyaProg/Tests/timg.cc

@@ -6 +6 @@
 // Utilisation des generateurs aleatoires
 #include "nbrandom.h"
+
+// Test des NDataBlock
+#include "ndatablock.h"
+#include <complex>
 
 
@@ -67 +71 @@
 img.Print();
 
-cout << " ========= Fin de timg.cc ======== " << endl;
+// ---- Test des NDataBlock 
+cout << "\n ----------> Test des NDataBlock <r_8>" << endl;
+NDataBlock<r_8> db(20);
+for(i=0; i<20; i++) db(i) = i*5.;
+cout << " DataBlock<r_8> i*5 : (db)" << endl;
+cout << db << endl;
+NDataBlock<r_8> db2(20,false);
+cout << " DataBlock<r_8> (db2=db) - db" << endl;
+cout << db2-db << endl;
+
+FIO_NDataBlock<r_8> fdb(db);
+fdb.Write("db_r8.ppf");
+cout << " DataBlock<r_8> db -> File db_r8.ppf" << endl;
+FIO_NDataBlock<r_8> fdb2("db_r8.ppf");
+cout << " DataBlock<r_8> Frome file(db_r8.ppf) - db" << endl;
+cout << (NDataBlock<r_8>)fdb2-db << endl;
+
+cout << "\n\n ----------> Test des NDataBlock <complex<double>>" << endl;
+NDataBlock< complex<double> > zb(20);
+for(i=0; i<20; i++) {complex<double> z(i*10., 0.1*i); zb(i) = z; }
+cout << " DataBlock<complex<double>>  (zb) = " << endl;
+cout << zb << endl;
+FIO_NDataBlock< complex<double> > fzb(zb);
+fzb.Write("zb_z8.ppf");
+FIO_NDataBlock< complex<double> > fzb2("zb_z8.ppf");
+cout << " DataBlock<complex<double>> Frome file(zb_z8.ppf) - db" << endl;
+cout << (NDataBlock< complex<double> >)(fzb2) ;
+
+cout << "\n ========= Fin de timg.cc ======== " << endl;
 exit(0);
 }