aselimov/CACmb
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Fix to problem with read-CAC due to changes in add_atom and add_element methods)

Browse Source
This commit is contained in:
Alex Selimov 2020-06-30 11:00:02 -04:00
parent 2fda952d3f
commit a0ecc7da90
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
src/io.f90
View File

@ -1067,11 +1067,11 @@ module io
call lattice_map(in_basis, in_basis_types, 8, in_lapa, lat_type)
!Now add the element
call add_element(in_lattice_type, esize, lat_type, sub_box_num, r_in(:,1:max_basisnum,1:max_ng_node))
call add_element(0,in_lattice_type, esize, lat_type, sub_box_num, r_in(:,1:max_basisnum,1:max_ng_node))
case('Atom')
read(11, *) inod, ibasis, in_basis_types(ibasis), r_in(:,1,1)
call add_atom(in_basis_types(ibasis), sub_box_num, r_in(:,1,1))
call add_atom(0,in_basis_types(ibasis), sub_box_num, r_in(:,1,1))
end select
end do