src/IntRank2/IntQuadVec.cc
// Input		IQV	: Quadrupolar interaction vector (this)
// 			spin	: A G index
//			warn    : Warning level
// Output		TF	: Returns TRUE if spin is a valid
//			  	  interaction index, FALSE if not
Input          IQV     : Quadrupolar interaction vector (this)
spin    : A G index
warn    : Warning level
Output         TF      : Returns TRUE if spin is a valid
interaction index, FALSE if not
Input IQV : Quadrupolar interaction vector ( this ) spin : A G index warn : Warning level Output TF : Returns TRUE if spin is a valid interaction index FALSE if not
bool IntQuadVec::check_spin(int spin, int warn) const
  {
  if(spin>=int(size()) || spin<0)
    {
    if(warn)
      {
      IQVerror(120, Gdec(spin), 1);
      IQVerror(121, Gdec(spin), 1);
      }
    if(warn>1) IQVfatality(24);
    return false;
    }
  return true;
  }
bool IntQuadVec :: check_spin ( int spin , int warn ) const { if ( spin >= int ( size ( ) ) || spin < 0 ) { if ( warn ) { IQVerror ( 120 , Gdec ( spin ) , 1 ) ; IQVerror ( 121 , Gdec ( spin ) , 1 ) ; } if ( warn > 1 ) IQVfatality ( 24 ) ; return false ; } return true ; }
Input          IQV     : Quadrupolar interaction vector (this)
spin    : A G index
warn    : Warning level
Output         TF      : Returns TRUE if spin is a valid
interaction index, FALSE if not
Input IQV : Quadrupolar interaction vector ( this ) spin : A G index warn : Warning level Output TF : Returns TRUE if spin is a valid interaction index FALSE if not