==========================================================
 
      this routine computes all the second order moments
      from the beam (which has to be stored in the matrix
      XPAR see commons description).
      The output 'y' is a vector of one dimension and 10 components.
      These are the moments stored in 'y'.
 
      y(1)  = [x*x]
      y(2)  = [x*x']
      y(3)  = [x*y]
      y(4)  = [x*y']
      y(5)  = [x'*x']
      y(6)  = [x'*y]
      y(7)  = [x*y']
      y(8)  = [y*y]
      y(9)  = [y*y']
      y(10) = [y'*y']
 
      where [] means average.
 
      the units are in the MKS system.
 
 ===========================================================
 
subroutine moments(y)
 
COMMONS: 
common-initi.f
common-mml-lattice.f
common-2Dsc-beam.f
common-2Dsc-simulation.f
 
SUBROUTINES USED:
 
micromap-index
Mon Jul 17 08:57:40 CEST 2017