Changeset 817 in Sophya

Timestamp:

Apr 5, 2000, 6:16:25 PM (25 years ago)

Author:

ansari

Message:

Adaptation modifs ppersist/TArray - Reza 05/04/2000

File:

• trunk/SophyaProg/PMixer/extractRS.cc (modified) (2 diffs)

trunk/SophyaProg/PMixer/extractRS.cc

@@ -185 +185 @@
         K = dc.DParam(key, 1, 1.);
         if (debuglev > 4) {  // Writing the input map to the outppf
-          FIO_TMatrix<float> fiog;
-          fiog.Write(*so, key);
+          so->PutObject(ings, key);    // $CHECK$  Reza 05/04/2000 
         }
         
@@ -301 +300 @@
     if (narg > 3) {
       POutPersist s(arg[3]); 
-      FIO_TMatrix<float> fiog ;
-      fiog.Write(s);
+      s.PutObject(outgs);   //  $CHECK$  Reza 05/04/2000
       cout << "Output Map (TMatrix<float>) written to POutPersist file "  
            << (string)(arg[3]) << endl;