Changeset 857 in Sophya for trunk/SophyaProg/Tests/arrt.cc

Timestamp:

Apr 10, 2000, 3:04:05 PM (25 years ago)

Author:

ansari

Message:

Adapatation a SphereHEALPix, correction tsttmatrix.cc tsttvector.cc - Reza 10/4/2000

File:

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

trunk/SophyaProg/Tests/arrt.cc

@@ -4 +4 @@
 #include <iostream.h>
 
-#include "nbrandom.h"
 #include "tarrinit.h"
 #include "array.h"
-// #include "fioarr.h"
-// #include "matharr.h"
 #include "timing.h"
 
@@ -136 +133 @@
 
     
-  for(int i=0; i<n; i++)
-    for(int j=0; j<n; j++)  a(j,i) = GauRnd(0., 1.);
-  cout << " ----- Matrix a = \n " << a << endl;
+  //  for(int i=0; i<n; i++)
+  //    for(int j=0; j<n; j++)  a(j,i) = GauRnd(0., 1.);
+  a = Sequence(RandomSequence(RandomSequence::Gaussian, 0., 2.5));
+  cout << " ----- Matrix a=Sequence(RandomSequence(RandomSequence::Gaussian, 0., 2.5)) = \n " << a << endl;
   Vector x(n);
   x = Sequence(1.,3.);