C
C     Common variables
C
      DOUBLE PRECISION    PEN
C
      COMMON / DIFFN  /   PEN
C