LCPQ/qp2
9
1
Fork 0
mirror of https://github.com/QuantumPackage/qp2.git synced 2024-11-18 11:23:38 +01:00
Code Releases Activity

printing

Browse Source
This commit is contained in:
Kevin Gasperich 2020-03-26 11:46:32 -05:00
parent 9fa523fe66
commit 437846e4d2
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
src/bitmask/core_inact_act_virt.irp.f
View File

@ -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