**** Sequence /coscom from PAM geanh321 ****
      COMMON/COSCOM/AA,BB,CC,DD,RR
C