Commit 66b86d61 authored by Frank Freimuth's avatar Frank Freimuth

Update wannier.F90

parent 88fed841
......@@ -1442,8 +1442,8 @@ CONTAINS
stars%mx1,stars%mx2,stars%mx3,&
stars%ng3,vacuum%nvac,stars%ig,vacuum%nmz,vacuum%delz,&
stars%ig2,cell%area,cell%bmat,&
cell%bbmat,enpara%evac0(:,jspin),lapw%bkpt,vz(:,:,jspin2),&
nslibd,jspin,lapw%k1,lapw%k2,lapw%k3,wannierspin,DIMENSION%nvd,&
cell%bbmat,enpara%evac0(:,jspin2),lapw%bkpt,vz(:,:,jspin2),&
nslibd,jspin2,lapw%k1,lapw%k2,lapw%k3,wannierspin,DIMENSION%nvd,&
DIMENSION%nbasfcn,DIMENSION%neigd,zMat,lapw%nv,cell%omtil,&
mmn(:,:,ikpt))
ELSEIF (oneD%odi%d1) THEN
......
Markdown is supported
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