Home
last modified time | relevance | path

Searched refs:my_default_index (Results 1 – 4 of 4) sorted by relevance

/dports/science/cp2k/cp2k-2e995eec7fd208c8a72d9544807bd8b8ba8cd1cc/src/
H A Dtopology_xyz.F57 CHARACTER(LEN=default_string_length) :: my_default_index, strtmp local
130 WRITE (my_default_index, '(I0)') j
131 …tom_info%id_molname(j) = str2id(s2s(TRIM(id2str(atom_info%id_atmname(j)))//TRIM(my_default_index)))
H A Datoms_input.F78 … CHARACTER(len=default_string_length) :: error_message, my_default_index, strtmp, & local
228 WRITE (my_default_index, '(I0)') iatom
229 …%id_molname(iatom) = str2id(s2s(TRIM(id2str(atom_info%id_atmname(iatom)))//TRIM(my_default_index)))
/dports/science/cp2k-data/cp2k-7.1.0/src/
H A Dtopology_xyz.F57 CHARACTER(LEN=default_string_length) :: my_default_index, strtmp local
130 WRITE (my_default_index, '(I0)') j
131 …tom_info%id_molname(j) = str2id(s2s(TRIM(id2str(atom_info%id_atmname(j)))//TRIM(my_default_index)))
H A Datoms_input.F78 … CHARACTER(len=default_string_length) :: error_message, my_default_index, strtmp, & local
228 WRITE (my_default_index, '(I0)') iatom
229 …%id_molname(iatom) = str2id(s2s(TRIM(id2str(atom_info%id_atmname(iatom)))//TRIM(my_default_index)))