mirror of https://gitlab.com/QEF/q-e.git
changed rab(mesh) into rab(ndm) in variable declaration
(mesh is not yet known) G.F. git-svn-id: http://qeforge.qe-forge.org/svn/q-e/trunk/espresso@2272 c92efa57-630b-4861-b058-cf58834340f0
This commit is contained in:
parent
d5a72cf887
commit
b2078cd14a
|
@ -15,7 +15,7 @@
|
|||
implicit none
|
||||
integer:: ibound, ndm, mesh, i
|
||||
real(DP) :: zmesh, xmin, xmax, x, dx, rmax, &
|
||||
r(ndm), r2(ndm), rab(mesh), sqr(ndm)
|
||||
r(ndm), r2(ndm), rab(ndm), sqr(ndm)
|
||||
!
|
||||
xmax=log(rmax*zmesh)
|
||||
mesh=(xmax-xmin)/dx+1
|
||||
|
|
Loading…
Reference in New Issue