Copy-Paste this Fortran text into some file named globals.inc

      real x, y
      dimension x(14)
      common /cc/x,y