C
C     Common variables
C
      DOUBLE PRECISION    FB(0:NBP1,0:NBP1,2)
C
      COMMON / FORCEB /   FB
C