src/IntRank2/IntRank2.cc
// ____________________________________________________________________________
// G                RANK 2 INTERACTION COMPARISON FUNCTIONS
// ____________________________________________________________________________
G                RANK 2 INTERACTION COMPARISON FUNCTIONS
G RANK 2 INTERACTION COMPARISON FUNCTIONS
int IntRank2::operator==(const IntRank2 &R2I2) const
  {
  double cutoff = 1.e-9;
if(IntRank2T::operator!=(R2I2)) 
  {
  cout << "\n\tFailed Spin Tensor Comparison.";
  return 0;
  }
if(IntRank2A::operator!=(R2I2))
  {
  cout << "\n\tFailed Space Tensor Comparison.";
 return 0;
  }
if(fabs(_XI-R2I2._XI) > cutoff)
  {
  cout << "\n\tFailed Xi Comparison.";
 return 0;
  }
  return 1;
  }
int IntRank2 :: operator == ( const IntRank2 & R2I2 ) const { double cutoff = 1.e-9 ; if ( IntRank2T :: operator != ( R2I2 ) ) { cout << " \n \t " ; return 0 ; } if ( IntRank2A :: operator != ( R2I2 ) ) { cout << " \n \t " ; return 0 ; } if ( fabs ( _XI - R2I2 . _XI ) > cutoff ) { cout << " \n \t " ; return 0 ; } return 1 ; }
____________________________________________________________________________
G                RANK 2 INTERACTION COMPARISON FUNCTIONS
____________________________________________________________________________
____________________________________________________________________________ G RANK 2 INTERACTION COMPARISON FUNCTIONS ____________________________________________________________________________
// Input                R2I     : Rank 2 interaction (this) //                      R2I2	: Another rank 2 interaction // Output               T/F     : TRUE if R2I2 and this are equal /*
  if(IntRank2T::operator!=(R2I2)) return 0;
  if(IntRank2A::operator!=(R2I2)) return 0;
  if(fabs(I-R2I2.I) > cutoff) return 0;
  if(fabs(S-R2I2.S) > cutoff) return 0;
  if(fabs(_XI-R2I2._XI) > cutoff) return 0;
*/