Searched defs:param_get_atoms (Results 1 – 1 of 1) sorted by relevance
| /dports/science/wannier90/wannier90-3.1.0/src/ |
| H A D | parameters.F90 | 4569 subroutine param_get_atoms(lunits) subroutine
4581 logical, intent(in) :: lunits
4586 character(len=20) :: keyword
4587 integer :: in, ins, ine, loop, i, line_e, line_s, counter
4588 integer :: i_temp, loop2, max_sites, ierr, ic
4589 logical :: found_e, found_s, found, frac
4590 character(len=maxlen) :: dummy, end_st, start_st
4591 character(len=maxlen) :: ctemp(num_atoms)
4592 character(len=maxlen) :: atoms_label_tmp(num_atoms)
4593 logical :: lconvert
[all …]
|