src/HSLib/SpinOpRot.cc
// ____________________________________________________________________________
// G                    GENERIC ROTATED SPIN OPERATOR FUNCTION
// ____________________________________________________________________________
G                    GENERIC ROTATED SPIN OPERATOR FUNCTION
G GENERIC ROTATED SPIN OPERATOR FUNCTION
spin_op Fplane(const spin_sys& sys, double theta, char OPtype)
  { 
  spin_op R = Rz_sp(sys,theta);
  spin_op F = Faxis(sys, OPtype);
  return RotSpinOp(R, F);
  }
spin_op Fplane ( const spin_sys & sys , double theta , char OPtype ) { spin_op R = Rz_sp ( sys , theta ) ; spin_op F = Faxis ( sys , OPtype ) ; return RotSpinOp ( R , F ) ; }
____________________________________________________________________________
G                    GENERIC ROTATED SPIN OPERATOR FUNCTION
____________________________________________________________________________
____________________________________________________________________________ G GENERIC ROTATED SPIN OPERATOR FUNCTION ____________________________________________________________________________
// Input		sys	: Spin system (base) // 			OPtype	: Operator type // Return		SOp	: Spin operator rotated about //			          the z-axis by the angle theta // Note				: Spins included if flags = TRUE // sosi				: Should be able to do this better