C
C     INCLUDE 'raycb.inc'
C     ------------------------------------------------------------------
      REAL YLRC(6),YYRC(5),DELT11,DELT13,DELT33,E(9)
      INTEGER IYRC(13)
      COMMON/RAYC/YLRC,YYRC,IYRC,DELT11,DELT13,DELT33,E
C     ------------------------------------------------------------------
C     YLRC,YYRC,IYRC... Working copies of the arrays YL,YY,YI.
C     DELT11,DELT13,DELT33... Deviations (in absolute values of the two
C             computed basis vectors of the ray-centred coordinate
C             system from the conditions of orthonormality, see
C             C.R.T.5.8.2d
C     E...    Components of the eigenvectors of the Christoffel matrix:
C             E(1:3),E(4:6): S-wave eigenvectors.
C             E(7:9): P-wave eigenvector.
C
C     Common block /RAYC/ is included in FORTRAN 77 source code files
C     'raycb.for'.
C     It is intended for communication between RAYCB, FCT, and OUTP.
C
C Version: 7.00
C Date: 2013, February 19
C Coded by Ludek Klimes
C
C=======================================================================
C