c
c paw common
c
      integer i_paw_ini
      parameter (i_paw_ini = 2000000)
c
      real hmemor(i_paw_ini)
      common /pawc/ hmemor