mirror of
https://github.com/QuantumPackage/qp2.git
synced 2025-02-22 09:29:01 +01:00
Added del orbs in reorder_casscf
This commit is contained in:
parent
d04232bb7b
commit
d20ac13c4f
@ -26,6 +26,11 @@ subroutine reorder_orbitals_for_casscf
|
||||
array(iorb) = 3 * mo_num + i
|
||||
enddo
|
||||
|
||||
do i = 1, n_del_orb
|
||||
iorb = list_del(i)
|
||||
array(iorb) = 4 * mo_num + i
|
||||
enddo
|
||||
|
||||
do i = 1, mo_num
|
||||
iorder(i) = i
|
||||
enddo
|
||||
|
Loading…
x
Reference in New Issue
Block a user