src/Gradients/sys_gradz.cc
// Input		sysg	: System in z-gradient (this)
//                      pset    : A parameter set
// Output               none    : Spin system field gradient
//                                is set from parameter in pset
// Note				: Input units expected T/m
Input          sysg    : System in z-gradient (this)
pset    : A parameter set
Output               none    : Spin system field gradient
is set from parameter in pset
Note                           : Input units expected T/m
Input sysg : System in z - gradient ( this ) pset : A parameter set Output none : Spin system field gradient is set from parameter in pset Note : Input units expected T / m
void sys_gradz::setBoGrad(const ParameterSet& pset)
  {
  double dval;				
  std::string pstate, pname="BoGrad";	
  ParameterSet::const_iterator item;	
  item = pset.seek(pname);		
  if(item == pset.end())
    {
    SysGZerr(2, pname, 1);		
    SysGZerr(12, 1);	 		
    SysGZfatal(3);	 		
    }
  (*item).parse(pname,dval,pstate);	
  dBodm = dval;				
  }
void sys_gradz :: setBoGrad ( const ParameterSet & pset ) { double dval ; std :: string pstate , pname = " " ; ParameterSet :: const_iterator item ; item = pset . seek ( pname ) ; if ( item == pset . end ( ) ) { SysGZerr ( 2 , pname , 1 ) ; SysGZerr ( 12 , 1 ) ; SysGZfatal ( 3 ) ; } ( * item ) . parse ( pname , dval , pstate ) ; dBodm = dval ; }
Input          sysg    : System in z-gradient (this)
pset    : A parameter set
Output               none    : Spin system field gradient
is set from parameter in pset
Note                           : Input units expected T/m
Input sysg : System in z - gradient ( this ) pset : A parameter set Output none : Spin system field gradient is set from parameter in pset Note : Input units expected T / m
// For # of sub-systems // For parameter name and statement // A pix into parameter list // Try and find parameter // Can't read BoGrad // No field gradient defined // Can't make system from pset // Get # of field gradient // Set # of field gradient