Commit 0fc70f4e authored by Gregor Michalicek's avatar Gregor Michalicek
Browse files

Fixed a bug in the last commit

parent 4a3f4f96
......@@ -142,7 +142,8 @@ SUBROUTINE brzone2(rcmt,nsym,idrot,mface,nbsz,nv48,&
! loops over all neighboring lattice vectors. The size of the
! neigborhood is defined by nbszLocal.
planesDim = nbszLocal*nbszLocal*nbszLocal + nsym
planesDim = 2*nbszLocal+1
planesDim = planesDim*planesDim*planesDim + nsym
ALLOCATE(dvec(3,planesDim), ddist(planesDim))
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment