← Back to branch summary

~siesta-poisson/siesta/poisson

« back to all changes in this revision

Viewing changes to Src/basis_types.f

  • Committer: Peter Koval
  • Date: 2016-11-24 01:16:16 UTC
  • Revision ID: koval.peter@gmail.com-20161124011616-gvtukwe5xdqrpyfq
splitgauss_new option works indeed

Show diffs side-by-side

added added

removed removed

Lines of Context:
Src/basis_types.f
169
169
      real(dp)     ,save, public, pointer :: rco(:,:,:,:)
170
170
      integer      ,save, public, pointer :: iz(:)
171
171
      real(dp)     ,save, public, pointer :: smass(:)
172
 
      character(len=10), save, public, pointer :: basistype(:)
 
172
      character(len=20), save, public, pointer :: basistype(:)
173
173
      character(len=20), save, public, pointer :: atm_label(:)
174
174
 
175
175
!-----------------------------------------------------------------------