Changeset 1550 in Sophya for trunk/SophyaLib/TArray/tarray.cc
- Timestamp:
- Jun 27, 2001, 10:13:16 AM (24 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/SophyaLib/TArray/tarray.cc
r1543 r1550 1000 1000 \param maxprt : maximum numer of print 1001 1001 \param si : if true, display attached DvList 1002 \param ascd : if true, suppresses the display of line numbers, 1003 suitable for ascii dump format. 1002 1004 \sa SetMaxPrint 1003 */ 1004 template <class T> 1005 void TArray<T>::Print(ostream& os, int_4 maxprt, bool si) const 1005 \sa WriteASCII 1006 */ 1007 template <class T> 1008 void TArray<T>::Print(ostream& os, sa_size_t maxprt, bool si, bool ascd) const 1006 1009 { 1007 1010 if (maxprt < 0) maxprt = max_nprt_; … … 1011 1014 sa_size_t k0,k1,k2,k3,k4; 1012 1015 for(k4=0; k4<size_[4]; k4++) { 1013 if (size_[4] > 1) cout << "\n ----- Dimension 5 (U) K4= " << k4 << endl; 1016 if ((size_[4] > 1) && ascd) 1017 cout << "\n ----- Dimension 5 (U) K4= " << k4 << endl; 1014 1018 for(k3=0; k3<size_[3]; k3++) { 1015 if (size_[3] > 1) cout << "\n ----- Dimension 4 (T) K3= " << k3 << endl; 1019 if ((size_[3] > 1) && ascd) 1020 cout << "\n ----- Dimension 4 (T) K3= " << k3 << endl; 1016 1021 for(k2=0; k2<size_[2]; k2++) { 1017 if (size_[2] > 1) cout << "\n ----- Dimension 3 (Z) K2= " << k2 << endl; 1022 if ((size_[2] > 1) & ascd) 1023 cout << "\n ----- Dimension 3 (Z) K2= " << k2 << endl; 1018 1024 for(k1=0; k1<size_[1]; k1++) { 1019 if ( (size_[1] > 1) && (size_[0] > 10) ) cout << "----- Dimension 2 (Y) K1= " << k1 << endl; 1025 if ( (size_[1] > 1) && (size_[0] > 10) && ascd) 1026 cout << "----- Dimension 2 (Y) K1= " << k1 << endl; 1020 1027 for(k0=0; k0<size_[0]; k0++) { 1021 if(k0 > 0) os << " ,";1028 if(k0 > 0) os << " "; 1022 1029 os << Elem(k0, k1, k2, k3, k4); npr++; 1023 1030 if (npr >= (sa_size_t) maxprt) { … … 1040 1047 void TArray<T>::ReadASCII(istream& is) 1041 1048 { 1042 cerr << " TArray<T>::ReadASCII() - Pas encore implemente - Reza 12/6/2001 " << endl; 1049 EnumeratedSequence es; 1050 sa_size_t nr, nc; 1051 es.FillFromFile(is, nr, nc); 1043 1052 } 1044 1053 … … 1050 1059 void TArray<T>::WriteASCII(ostream& os) const 1051 1060 { 1052 Print(os, Size(), true);1061 Print(os, Size(), false, true); 1053 1062 } 1054 1063
Note:
See TracChangeset
for help on using the changeset viewer.