qp2/src/cipsi/run_selection_slave.irp.f

6 lines
127 B
Fortran

subroutine provide_for_selection_slave
PROVIDE psi_det_sorted_order
PROVIDE psi_selectors_coef_transp psi_det_sorted
end