c
c
c     ############################################################
c     ##  COPYRIGHT (C) 2018 by Joshua Rackers & Jay W. Ponder  ##
c     ##                   All Rights Reserved                  ##
c     ############################################################
c
c     ##################################################################
c     ##                                                              ##
c     ##  module chgpen  --  charge penetration in current structure  ##
c     ##                                                              ##
c     ##################################################################
c
c
c     ncp       total number of charge penetration sites in system
c     pcore     number of core electrons assigned to each atom
c     pval      number of valence electrons assigned to each atom
c     pval0     original number of valence electrons for charge flux
c     palpha    charge penetration damping value at each atom
c
c
      module chgpen
      implicit none
      integer ncp
      real*8, allocatable :: pcore(:)
      real*8, allocatable :: pval(:)
      real*8, allocatable :: pval0(:)
      real*8, allocatable :: palpha(:)
      save
      end