*
*     Common to store the roataion matrix numbers 
*
      INTEGER RZ90,RX90,RZ90X180,RZ180,RZ180X180,
     +     RZ270,RY90,RY270,RY180,RX180
      COMMON /GPROT/RZ90,RX90,RZ90X180,RZ180,RZ180X180,
     +     RZ270,RY90,RY270,RY180,RX180