src/Gradients/sys_gradz.cc
// Input		sysg	: System in z-gradient (this)
//                      pset    : A parameter set
// Output               none    : Spin system # of sub-systems 
//                                is set from parameter in pset
Input          sysg    : System in z-gradient (this)
pset    : A parameter set
Output               none    : Spin system # of sub-systems
is set from parameter in pset
Input sysg : System in z - gradient ( this ) pset : A parameter set Output none : Spin system # of sub - systems is set from parameter in pset
void sys_gradz::setSubSys(const ParameterSet& pset)
  {
  int ival;				
  std::string pstate, pname="NSubSys";	
  ParameterSet::const_iterator item;	
  item = pset.seek(pname);
  if(item == pset.end())
    {
    SysGZerr(2, pname, 1);		
    SysGZerr(51, 1);			
    SysGZfatal(3);	 		
    }
  (*item).parse(pname,ival,pstate);	
  _NSS = ival;				
  }
void sys_gradz :: setSubSys ( const ParameterSet & pset ) { int ival ; std :: string pstate , pname = " " ; ParameterSet :: const_iterator item ; item = pset . seek ( pname ) ; if ( item == pset . end ( ) ) { SysGZerr ( 2 , pname , 1 ) ; SysGZerr ( 51 , 1 ) ; SysGZfatal ( 3 ) ; } ( * item ) . parse ( pname , ival , pstate ) ; _NSS = ival ; }
Input          sysg    : System in z-gradient (this)
pset    : A parameter set
Output               none    : Spin system # of sub-systems
is set from parameter in pset
Input sysg : System in z - gradient ( this ) pset : A parameter set Output none : Spin system # of sub - systems is set from parameter in pset
// For # of sub-systems // For parameter name and statement // A pix into parameter list // Can't read NSubSys // No sub-systems defined // Can't make system from pset // Get # of sub-systems // Set # of sub_systems