src/IntRank2/IntRank2.cc
//-----------------------------------------------------------------------------
//     Functions That Generate Strings to Simplify and Modularize Printing
//-----------------------------------------------------------------------------
Functions That Generate Strings to Simplify and Modularize Printing
Functions That Generate Strings to Simplify and Modularize Printing
string IntRank2::XiString() const
  {
  string XS("Xi Value");
  string SU;
  double xval = _XI;
       if(fabs(_XI) > 1.e6) { SU=string(" (x 10^-6):"); xval*=1.e-6; }
  else if(fabs(_XI) > 1.e3) { SU=string(" (x 10^-3):"); xval*=1.e-3; }
  else if(fabs(_XI) > 1.0)  { SU=string(":          ");              }
  else if(fabs(_XI) == 0.0) { SU=string(":          ");              }
  else if(fabs(_XI) < 1.e3) { SU=string(" (x 10^3): "); xval*=1.e3;  }
  else if(fabs(_XI) < 1.e6) { SU=string(" (x 10^6): "); xval*=1.e6;  }
  XS += SU + Gform("%10.2f", xval) + string(" /sec");
  return XS;
  }
string IntRank2 :: XiString ( ) const { string XS ( " " ) ; string SU ; double xval = _XI ; if ( fabs ( _XI ) > 1.e6 ) { SU = string ( " " ) ; xval *= 1.e-6 ; } else if ( fabs ( _XI ) > 1.e3 ) { SU = string ( " " ) ; xval *= 1.e-3 ; } else if ( fabs ( _XI ) > 1.0 ) { SU = string ( " " ) ; } else if ( fabs ( _XI ) == 0.0 ) { SU = string ( " " ) ; } else if ( fabs ( _XI ) < 1.e3 ) { SU = string ( " " ) ; xval *= 1.e3 ; } else if ( fabs ( _XI ) < 1.e6 ) { SU = string ( " " ) ; xval *= 1.e6 ; } XS += SU + Gform ( " " , xval ) + string ( " " ) ; return XS ; }
Functions That Generate Strings to Simplify and Modularize Printing
Functions That Generate Strings to Simplify and Modularize Printing