c
c
c     ###################################################
c     ##  COPYRIGHT (C)  2012  by  Jay William Ponder  ##
c     ##              All Rights Reserved              ##
c     ###################################################
c
c     #################################################################
c     ##                                                             ##
c     ##  module ptable  --  symbols and info for chemical elements  ##
c     ##                                                             ##
c     #################################################################
c
c
c     maxele   maximum number of elements from periodic table
c
c     atmass   standard atomic weight for each chemical element
c     vdwrad   van der Waals radius for each chemical element
c     covrad   covalent radius for each chemical element
c     elemnt   atomic symbol for each chemical element
c
c
      module ptable
      implicit none
      integer maxele
      parameter (maxele=118)
      real*8 atmass(maxele)
      real*8 vdwrad(maxele)
      real*8 covrad(maxele)
      character*3 elemnt(maxele)
      save
      end