src/GamIO/ML5AF.cc
// ____________________________________________________________________________
// E         MATLAB MAT 5 Array Flags Sub-Element ASCII Output Functions
// ____________________________________________________________________________
E         MATLAB MAT 5 Array Flags Sub-Element ASCII Output Functions
E MATLAB MAT 5 Array Flags Sub - Element ASCII Output Functions
void MatLab5AF::print(std::ostream& ostr) const
 {
 ostr << "\n\t\tSE Array Flags  ";		
 MLTag.print(ostr, 0);				
 ostr << "\n\t\t  Array Type:   " << Class
      << " - " << SClass();
if(Class)
{
int Flags[8];
register int t;
unsigned u = MLData[2];
int i=0;
for(t=128; t>0; t/=2)
  {
  if(u & t) Flags[i] = 1;
  else      Flags[i] = 0;
  i++;
  }
   ostr << "\n\t\t  Real/Cmplx:   ";
   if(Flags[4]) ostr << "Complex";
   else         ostr << "Real";
   ostr << "\n\t\t  Global/Local: ";
   if(Flags[5]) ostr << "Global";
   else         ostr << "Local";
   ostr << "\n\t\t  Logical:      ";
   if(Flags[6]) ostr << "Yes";
   else         ostr << "No";
   }
 }
void MatLab5AF :: print ( std :: ostream & ostr ) const { ostr << " \n \t \t " ; MLTag . print ( ostr , 0 ) ; ostr << " \n \t \t " << Class << " " << SClass ( ) ; if ( Class ) { int Flags [ 8 ] ; register int t ; unsigned u = MLData [ 2 ] ; int i = 0 ; for ( t = 128 ; t > 0 ; t /= 2 ) { if ( u & t ) Flags [ i ] = 1 ; else Flags [ i ] = 0 ; i ++ ; } ostr << " \n \t \t " ; if ( Flags [ 4 ] ) ostr << " " ; else ostr << " " ; ostr << " \n \t \t " ; if ( Flags [ 5 ] ) ostr << " " ; else ostr << " " ; ostr << " \n \t \t " ; if ( Flags [ 6 ] ) ostr << " " ; else ostr << " " ; } }
____________________________________________________________________________
E         MATLAB MAT 5 Array Flags Sub-Element ASCII Output Functions
____________________________________________________________________________
____________________________________________________________________________ E MATLAB MAT 5 Array Flags Sub - Element ASCII Output Functions ____________________________________________________________________________
// Input                ML5AF	: MAT version 5 sub-element (this) //                      ostr    : An output stream // Output               ostr    : Output stream with MATLAB MAT file //                                sub-element version 5 info placed //				  into it // Note                         : This information exists at the //                                beginning of each sub-element // Output header // Output tag values /******************************************************************************
  sosi - will want to replace this when libstdc++ bitset class works!
******************************************************************************/ /******************************************************************************
******************************************************************************/