Searched refs:color_sub_kp (Results 1 – 2 of 2) sorted by relevance
/dports/science/cp2k/cp2k-2e995eec7fd208c8a72d9544807bd8b8ba8cd1cc/src/ |
H A D | rpa_util.F | 980 … INTEGER :: color_sub_kp, comm_sub_kp, handle, ikp, & local 995 color_sub_kp = MOD(para_env%mepos/num_proc_per_kp, nkp) 996 CALL mp_comm_split_direct(para_env%group, comm_sub_kp, color_sub_kp) 1014 IF (nkp > para_env%num_pe .OR. do_kpoints_cubic_RPA .OR. ikp == color_sub_kp + 1) THEN
|
/dports/science/cp2k-data/cp2k-7.1.0/src/ |
H A D | rpa_util.F | 1722 … INTEGER :: color_sub_kp, comm_sub_kp, handle, ikp, & local 1737 color_sub_kp = MOD(para_env%mepos/num_proc_per_kp, nkp) 1738 CALL mp_comm_split_direct(para_env%group, comm_sub_kp, color_sub_kp) 1756 IF (nkp > para_env%num_pe .OR. do_kpoints_cubic_RPA .OR. ikp == color_sub_kp + 1) THEN
|