Home
last modified time | relevance | path

Searched refs:jatom8 (Results 1 – 3 of 3) sorted by relevance

/dports/science/cp2k/cp2k-2e995eec7fd208c8a72d9544807bd8b8ba8cd1cc/src/
H A Dqs_fb_com_tasks_types.F849 INTEGER(KIND=int_8) :: iatom8, jatom8, natoms8 local
853 jatom8 = INT(jatom, int_8)
855 ind = (iatom8 - 1_int_8)*natoms8 + (jatom8 - 1_int_8)
875 INTEGER(KIND=int_8) :: iatom8, jatom8, natoms8 local
879 jatom8 = MOD(ind, natoms8) + 1_int_8
881 jatom = INT(jatom8, int_4)
/dports/science/cp2k-data/cp2k-7.1.0/src/
H A Dqs_fb_com_tasks_types.F849 INTEGER(KIND=int_8) :: iatom8, jatom8, natoms8 local
853 jatom8 = INT(jatom, int_8)
855 ind = (iatom8 - 1_int_8)*natoms8 + (jatom8 - 1_int_8)
875 INTEGER(KIND=int_8) :: iatom8, jatom8, natoms8 local
879 jatom8 = MOD(ind, natoms8) + 1_int_8
881 jatom = INT(jatom8, int_4)
H A Dtask_list_methods.F865 INTEGER(KIND=int_8) :: iatom8, ijatom, ijset, img, ipgf8, iset8, jatom8, jpgf8, jset8, & local
881 jatom8 = MOD(ijatom, natom8) + 1
891 iatom = INT(iatom8); jatom = INT(jatom8); iset = INT(iset8); jset = INT(jset8)