src/Pulses/PulWALTZ.cc
/******************************************************************************

     A WALTZ-4 pulse cycle is given by
                     _ _    _   _  _ _ _ _
             U = R R R R = 123 123 123 123       R = 90 180  270
                                                       x   -x   x

     Each R represents a pulse waveform and the bar indicates a
     180 degree phase shift.  A WALTZ4 pulse train will employ R = WALTZ-R
 
******************************************************************************/


Each R represents a pulse waveform and the bar indicates a
180 degree phase shift.  A WALTZ4 pulse train will employ R = WALTZ-R
Each R represents a pulse waveform and the bar indicates a 180 degree phase shift . A WALTZ4 pulse train will employ R = WALTZ - R
row_vector CYC_WALTZ4(double phi)
  {
  double phibar = phi+180.0;			
  row_vector PTCsteps(4);			
  PTCsteps.put(phi,    0);			
  PTCsteps.put(phi,    1);
  PTCsteps.put(phibar, 2);
  PTCsteps.put(phibar, 3);
  return PTCsteps;
  }
row_vector CYC_WALTZ4 ( double phi ) { double phibar = phi + 180.0 ; row_vector PTCsteps ( 4 ) ; PTCsteps . put ( phi , 0 ) ; PTCsteps . put ( phi , 1 ) ; PTCsteps . put ( phibar , 2 ) ; PTCsteps . put ( phibar , 3 ) ; return PTCsteps ; }
A WALTZ-4 pulse cycle is given by
_ _    _   _  _ _ _ _
U = R R R R = 123 123 123 123       R = 90 180  270
x   -x   x
A WALTZ - 4 pulse cycle is given by _ _ _ _ _ _ _ _ U = R R R R = 123 123 123 123 R = 90 180 270 x - x x
// Input        void    : None //              phi     : Phase angle (degrees) // Output       PCyc    : WALTZ-4 pulse cycle // Phase of "barred" steps // Cycle vector{ phi } // Set cycle phase values