Changeset 274 in Sophya for trunk/SophyaProg/Tests/tblitz.cc

Timestamp:

Apr 27, 1999, 5:41:21 PM (26 years ago)

Author:

ansari

Message:

Ameliorations Tests Reza 27/04/99

File:

• trunk/SophyaProg/Tests/tblitz.cc (modified) (2 diffs)

trunk/SophyaProg/Tests/tblitz.cc

@@ -4 +4 @@
 #include "timing.h"
 #include "cimage.h"
+#include "outilsinit.h"
+// Test des NDataBlock
+#include "ndatablock.h"
 
 #include "blitz/array.h"
@@ -54 +57 @@
 }
 
+ cout << "\n ====  Test avec NDataBlock<float> " << endl;
+NDataBlock<r_4> b1(sx*sy), b2(sx*sy), b3(sx*sy);
+for(kk=0; kk<N1; kk++) {
+  cout << kk << " NDataBlock<float> (" << sx*sy <<  ") , " << N2 << " mult. " << endl;
+  for(k=0; k<sx*sy; k++) {
+    b1(k) = frand01()*10.*k;
+    b2(k) = frand01()*10.*k;
+    }
+  for(k=0; k<N2; k++) b3 = b1*b2;
+  sprintf(strg, "NDataBlock<float> T[%d] ", kk);
+  PrtTim(strg);
+}
 
 exit(0);