mirror of
https://github.com/QuantumPackage/qp2.git
synced 2024-12-23 03:53:29 +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
|
enddo
|
||||||
call list_to_bitstring( kpts_bitmask(1,k), tmp_mo_list, mo_num_per_kpt, N_int)
|
call list_to_bitstring( kpts_bitmask(1,k), tmp_mo_list, mo_num_per_kpt, N_int)
|
||||||
!debugging
|
!debugging
|
||||||
print*,'k'
|
print*,'k = ',k
|
||||||
call debug_single_spindet(kpts_bitmask(1,k),N_int)
|
call debug_single_spindet(kpts_bitmask(1,k),N_int)
|
||||||
enddo
|
enddo
|
||||||
END_PROVIDER
|
END_PROVIDER
|
||||||
|
Loading…
Reference in New Issue
Block a user