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
development
Alex Selimov 4 years ago
parent 2fda952d3f
commit a0ecc7da90
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File

4
src/io.f90
Unescape View File

@ -1067,11 +1067,11 @@ module io
call lattice_map(in_basis, in_basis_types, 8, in_lapa, lat_type) call lattice_map(in_basis, in_basis_types, 8, in_lapa, lat_type)
!Now add the element !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') case('Atom')
read(11, *) inod, ibasis, in_basis_types(ibasis), r_in(:,1,1) 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 select
end do end do

Write Preview
Loading…
Cancel
Save