Changeset 836 in Sophya for trunk/SophyaProg/Tests/tfft.cc

Timestamp:

Apr 7, 2000, 1:35:43 PM (25 years ago)

Author:

ansari

Message:

Adaptation TArray de tfft.cc - Reza 7/4/2000

File:

• trunk/SophyaProg/Tests/tfft.cc (modified) (7 diffs)

trunk/SophyaProg/Tests/tfft.cc

@@ -55 +55 @@
   
 
-  cout << "Input / L = " << num << endl; 
-  in.Print(0,0,nprt,0,nprt);
+  cout << "Input / L = " << num << in; 
   cout << endl;
 
@@ -64 +63 @@
   fftp.fftf(in.NElts(), in.Data());
   //  in /= (num/2.);
-  cout << " fftp.fftf(in.NElts(), in.Data()) FORWARD: " << endl; 
-  in.Print(0,0,nprtfc,0,nprtfc);
+  cout << " fftp.fftf(in.NElts(), in.Data()) FORWARD: " << in << endl; 
   cout << endl;
   fftp.fftb(in.NElts(), in.Data());
-  cout << " fftp.fftb(in.NElts(), in.Data()) BACKWARD: " << endl; 
-  in.Print(0,0,nprt,0,nprt);
+  cout << " fftp.fftb(in.NElts(), in.Data()) BACKWARD: " << in <<endl; 
   cout << endl;
   dif = ino-in;
-  cout << " dif , NElts= " << dif.NElts() << endl;
-  dif.Print(0,0,nprt,0,nprt);
+  cout << " dif , NElts= " << dif.NElts() << dif << endl;
 
   int ndiff = 0;
@@ -109 +105 @@
   cout << " Testing FFTServer " << ffts.getInfo() << endl;
 
-  cout << "Input / L = " << num << endl; 
-  in.Print(0,0,nprt,0,nprt);
+  cout << "Input / L = " << num << in << endl; 
   cout << endl;
 
@@ -117 +112 @@
   cout << "\n ----  Testing FFT(T, complex<T>) ---- " << endl;
   ffts.FFTForward(in, outc);
-  cout << " FourierCoefs , NElts= " << outc.NElts() << endl;
-  outc.Print(0,0,nprtfc,0,nprtfc);
+  cout << " FourierCoefs , NElts= " << outc.NElts() << outc << endl;
 
   ffts.FFTBackward(outc, bk);
-  cout << " Backward , NElts= " << bk.NElts() << endl;
-  bk.Print(0,0,nprt,0,nprt);
+  cout << " Backward , NElts= " << bk.NElts() << bk << endl;
  
   dif = bk*fact - in;
-  cout << " Difference , NElts= " << dif.NElts() << endl;
-  dif.Print(0,0,nprt,0,nprt);
+  cout << " Difference , NElts= " << dif.NElts() << dif << endl;
 
   ndiff = 0;
@@ -140 +132 @@
   cout << "\n ----  Testing FFT(complex<T>, complex<T>) ---- " << endl;
   ffts.FFTForward(inc, outc);
-  cout << " FourierCoef , NElts= " << outc.NElts() << endl;
-  outc.Print(0,0,nprtfc,0,nprtfc);
+  cout << " FourierCoef , NElts= " << outc.NElts() << outc << endl;
 
   ffts.FFTBackward(outc, bkc);
-  cout << " Backward , NElts= " << bkc.NElts() << endl;
-  bkc.Print(0,0,nprt,0,nprt);
+  cout << " Backward , NElts= " << bkc.NElts() << bkc << endl;
  
   difc = bkc*complex<T>(fact,0.) - inc;
-  cout << " Difference , NElts= " << difc.NElts() << endl;
-  difc.Print(0,0,nprt,0,nprt);
+  cout << " Difference , NElts= " << difc.NElts() << difc << endl;
 
   ndiff = 0;
@@ -173 +162 @@
 
   if (narg < 4) {
-    cout << "tfft/ args error - \n  Usage tfft size px/Px/Mx/Wx f/d [NPrtFC NPrt] \n" 
+    cout << "tfft/ args error - \n  Usage tfft size px/Px/Mx/Wx f/d [NPrt=50 PrtLev=0] \n" 
          << " p=FFTPackTest  P=FFTPack, M=FFTMayer, W= FFTWServer" 
          << " x=0 -> Random input - f=float, d=double " << endl;
@@ -188 +177 @@
 
   int sz = atoi(arg[1]);
-  if (narg > 4) nprtfc = atoi(arg[4]);
-  if (narg > 5) nprt = atoi(arg[4]);
+  int nprt = 50;
+  int prtlev = 0;
+  if (narg > 4) nprt = atoi(arg[4]);
+  if (narg > 5) prtlev = atoi(arg[5]);
+  BaseArray::SetMaxPrint(nprt, prtlev);
 
   if (sz < 2) sz = 2;