Added right hand rule check to orientation in mode_create

This commit is contained in:
Alex Selimov 2020-02-20 17:15:30 -05:00
parent 9702ec85e9
commit 1b82d98a4f
3 changed files with 52 additions and 8 deletions

View file

@ -21,8 +21,6 @@ module opt_delete
call parse_delete(arg_pos)
print *, atom_num
if (rc_off > 0.0_dp) call delete_overlap
end subroutine run_delete
@ -66,10 +64,6 @@ module opt_delete
allocate(which_cell(3,atom_num))
print *, atom_num
print *, for_delete(atom_num)
print *, which_cell(1,1)
!First pass the atom list and atom num to the algorithm which builds the cell list
call build_cell_list(atom_num, r_atom, rc_off, cell_num, num_in_cell, cell_list, which_cell)