Searched refs:sum_sign_array (Results 1 – 2 of 2) sorted by relevance
| /dports/science/cp2k/cp2k-2e995eec7fd208c8a72d9544807bd8b8ba8cd1cc/src/ |
| H A D | qs_tddfpt2_utils.F | 233 sum_sign_array local
364 ALLOCATE (minrow_neg_array(nmo_occ), minrow_pos_array(nmo_occ), sum_sign_array(nmo_occ))
367 sum_sign_array(:) = 0
381 sum_sign_array(icol_global) = sum_sign_array(icol_global) + sign_int
394 CALL mp_sum(sum_sign_array, para_env%group)
399 IF (sum_sign_array(icol_local) > 0) THEN
402 ELSE IF (sum_sign_array(icol_local) < 0) THEN
418 DEALLOCATE (minrow_neg_array, minrow_pos_array, sum_sign_array)
|
| /dports/science/cp2k-data/cp2k-7.1.0/src/ |
| H A D | qs_tddfpt2_methods.F | 1119 sum_sign_array local
1250 ALLOCATE (minrow_neg_array(nmo_occ), minrow_pos_array(nmo_occ), sum_sign_array(nmo_occ))
1253 sum_sign_array(:) = 0
1267 sum_sign_array(icol_global) = sum_sign_array(icol_global) + sign_int
1280 CALL mp_sum(sum_sign_array, para_env%group)
1285 IF (sum_sign_array(icol_local) > 0) THEN
1288 ELSE IF (sum_sign_array(icol_local) < 0) THEN
1304 DEALLOCATE (minrow_neg_array, minrow_pos_array, sum_sign_array)
|