diff --git a/src/cipsi/stochastic_cipsi.irp.f b/src/cipsi/stochastic_cipsi.irp.f index 3cda76e3..157479d9 100644 --- a/src/cipsi/stochastic_cipsi.irp.f +++ b/src/cipsi/stochastic_cipsi.irp.f @@ -70,7 +70,7 @@ subroutine run_stochastic_cipsi write(*,'(A)') '--------------------------------------------------------------------------------' - to_select = N_det + to_select = N_det*int(sqrt(dble(N_states))) to_select = max(N_states_diag, to_select) pt2 = 0.d0