C
C     Common variables
C
      DOUBLE PRECISION    K0
C
      COMMON / STIFF  /   K0
C