src/Pulses/PulWALTZ.cc
// ____________________________________________________________________________
// ii                CLASS WALTZ PARAMETER SET FUNCTIONS
// ____________________________________________________________________________
ii                CLASS WALTZ PARAMETER SET FUNCTIONS
ii CLASS WALTZ PARAMETER SET FUNCTIONS
void WALTZ::SetPhase(const ParameterSet& pset, int idx)
  {
  double phiin;
  string pstate;				
  string pname = string("WALTZphi");		
  string SI = string("(") + Gdec(idx)            
            + string(")");
  if(idx >= 0) pname += SI;			
  std::list<SinglePar>::const_iterator item;         
  item = pset.seek(pname);			
  if(item != pset.end())			
    {
    (*item).parse(pname,phiin,pstate); 		
    phi= phiin;					
    }
  else phi = 0;					
  }
void WALTZ :: SetPhase ( const ParameterSet & pset , int idx ) { double phiin ; string pstate ; string pname = string ( " " ) ; string SI = string ( " " ) + Gdec ( idx ) + string ( " " ) ; if ( idx >= 0 ) pname += SI ; std :: list < SinglePar > :: const_iterator item ; item = pset . seek ( pname ) ; if ( item != pset . end ( ) ) { ( * item ) . parse ( pname , phiin , pstate ) ; phi = phiin ; } else phi = 0 ; }
____________________________________________________________________________
ii                CLASS WALTZ PARAMETER SET FUNCTIONS
____________________________________________________________________________
____________________________________________________________________________ ii CLASS WALTZ PARAMETER SET FUNCTIONS ____________________________________________________________________________
// Intput		DT	: WALTZ parameters //                      pset    : Parameter set //                      idx     : WALTZ index // Output               none    : WALTZ pulse phase read in //                                from parameter in pset //                                with index idx // Dummy string variable // WALTZ phase angle // Name adjustment if indexed // Adjust name if indexed // A pix into parameter list // Parameter for WALTZphi // If parameter found // 	Get WALTZ phase // 	Set WALTZ phase // If not found set to 0