mirror of
https://github.com/QuantumPackage/qp2.git
synced 2024-12-22 19:43:32 +01:00
printing
This commit is contained in:
parent
9fa523fe66
commit
437846e4d2
@ -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
|
||||
|
Loading…
Reference in New Issue
Block a user