10
0
mirror of https://github.com/QuantumPackage/qp2.git synced 2024-06-26 15:12:19 +02:00
This commit is contained in:
Kevin Gasperich 2020-03-26 11:46:32 -05:00
parent 9fa523fe66
commit 437846e4d2

View File

@ -434,7 +434,7 @@ BEGIN_PROVIDER [ integer(bit_kind), kpts_bitmask , (N_int,kpt_num) ]
enddo
call list_to_bitstring( kpts_bitmask(1,k), tmp_mo_list, mo_num_per_kpt, N_int)
!debugging
print*,'k'
print*,'k = ',k
call debug_single_spindet(kpts_bitmask(1,k),N_int)
enddo
END_PROVIDER