src/IntRank2/SolidSys.cc
// Input                ssys    : Solid spin system (this)
//                      Iso     : Isotope type
//                      symbol  : Isotope type (e.g. 1H, 13C,...)
// Output               none    : Solid spin system spin isotope
//                                type is switched to Iso
Input                ssys    : Solid spin system (this)
Iso     : Isotope type
symbol  : Isotope type
Output               none    : Solid spin system spin isotope
type is switched to Iso
Input ssys : Solid spin system ( this ) Iso : Isotope type symbol : Isotope type Output none : Solid spin system spin isotope type is switched to Iso
void solid_sys::isotope(int spin, const string& symbol)
  {
  spin_sys::isotope(spin, symbol);		
  if(symbol == "e-")
    {
    }
  else
    {
    }
  ResetSOps(spin);				
  }
void solid_sys :: isotope ( int spin , const string & symbol ) { spin_sys :: isotope ( spin , symbol ) ; if ( symbol == " " ) { } else { } ResetSOps ( spin ) ; }
Input                ssys    : Solid spin system (this)
Iso     : Isotope type
symbol  : Isotope type (e.g.
Input ssys : Solid spin system ( this ) Iso : Isotope type symbol : Isotope type ( e . g .
// Use base function // sosiz // Reset the spin operators