| /dports/science/cp2k/cp2k-2e995eec7fd208c8a72d9544807bd8b8ba8cd1cc/src/ |
| H A D | kpoint_types.F | 154 para_env_kp => Null(), & component
209 NULLIFY (kpoint%para_env_full, kpoint%para_env_kp, kpoint%para_env_inter_kp)
257 CALL cp_para_env_release(kpoint%para_env_kp)
319 … para_env, blacs_env_all, cart, para_env_full, para_env_kp, para_env_inter_kp, blacs_env, & argument
336 TYPE(cp_para_env_type), OPTIONAL, POINTER :: para_env_full, para_env_kp, & local
371 IF (PRESENT(para_env_kp)) para_env_kp => kpoint%para_env_kp
425 … para_env, blacs_env_all, cart, para_env_full, para_env_kp, para_env_inter_kp, blacs_env, & argument
442 TYPE(cp_para_env_type), OPTIONAL, POINTER :: para_env_full, para_env_kp, & local
477 IF (PRESENT(para_env_kp)) kpoint%para_env_kp => para_env_kp
|
| H A D | kpoint_methods.F | 282 para_env_inter_kp, para_env_kp local
317 kpoint%para_env_kp => para_env
353 NULLIFY (cart, para_env_full, para_env_kp, para_env_inter_kp)
362 CALL cp_para_env_create(para_env_kp, comm_kp, owns_group=.TRUE.)
371 CALL mp_sum(niogrp, para_env_kp%group)
377 kpoint%para_env_kp => para_env_kp
484 CALL cp_blacs_env_create(blacs_env=blacs_env, para_env=kpoint%para_env_kp)
498 blacs_env=blacs_env, para_env=kpoint%para_env_kp)
|
| H A D | negf_env_types.F | 1009 TYPE(cp_para_env_type), POINTER :: para_env, para_env_kp local
1021 CALL get_kpoint_info(kpoints, kp_env=kp_env, kp_range=kp_range, para_env_kp=para_env_kp)
1024 … IF (para_env_kp%mepos == 0 .AND. kp_range(1) <= gamma_point .AND. kp_range(2) >= gamma_point) THEN
|
| /dports/science/cp2k-data/cp2k-7.1.0/src/ |
| H A D | kpoint_types.F | 154 para_env_kp => Null(), & component
209 NULLIFY (kpoint%para_env_full, kpoint%para_env_kp, kpoint%para_env_inter_kp)
257 CALL cp_para_env_release(kpoint%para_env_kp)
319 … para_env, blacs_env_all, cart, para_env_full, para_env_kp, para_env_inter_kp, blacs_env, & argument
336 TYPE(cp_para_env_type), OPTIONAL, POINTER :: para_env_full, para_env_kp, & local
371 IF (PRESENT(para_env_kp)) para_env_kp => kpoint%para_env_kp
425 … para_env, blacs_env_all, cart, para_env_full, para_env_kp, para_env_inter_kp, blacs_env, & argument
442 TYPE(cp_para_env_type), OPTIONAL, POINTER :: para_env_full, para_env_kp, & local
477 IF (PRESENT(para_env_kp)) kpoint%para_env_kp => para_env_kp
|
| H A D | kpoint_methods.F | 282 para_env_inter_kp, para_env_kp local
317 kpoint%para_env_kp => para_env
353 NULLIFY (cart, para_env_full, para_env_kp, para_env_inter_kp)
362 CALL cp_para_env_create(para_env_kp, comm_kp, owns_group=.TRUE.)
371 CALL mp_sum(niogrp, para_env_kp%group)
377 kpoint%para_env_kp => para_env_kp
484 CALL cp_blacs_env_create(blacs_env=blacs_env, para_env=kpoint%para_env_kp)
498 blacs_env=blacs_env, para_env=kpoint%para_env_kp)
|
| H A D | negf_env_types.F | 1009 TYPE(cp_para_env_type), POINTER :: para_env, para_env_kp local
1021 CALL get_kpoint_info(kpoints, kp_env=kp_env, kp_range=kp_range, para_env_kp=para_env_kp)
1024 … IF (para_env_kp%mepos == 0 .AND. kp_range(1) <= gamma_point .AND. kp_range(2) >= gamma_point) THEN
|