quick fix to bug to write pycac format

5 years ago · f80045058f
parent b0059a34a1
commit f80045058f
1 changed files with 1 additions and 1 deletions
--- a/src/io.f90
+++ b/src/io.f90
@ -684,7 +684,7 @@ module io
                    (ng_node(i) == ng_node(j))) then 
                    !Now check the basis  level variables
                    do ibasis =1, basisnum(i)
-                        if(basis_type(ibasis,i) /= basis_type(ibasis,j)) then 
+                        if(basis_type(ibasis,lattice_types+i) /= basis_type(ibasis,j)) then 
                            cycle old_loop
                        end if
                    end do