      integer nsymbolic_constants
      parameter (nsymbolic_constants = 56)
      integer symbolic_constant_table
      common /symbolic_constants/
     *       symbolic_constant_table(nsymbolic_constants)
