From ed7d11bf04b4980a557ef836ebe7048bc06a3bb9 Mon Sep 17 00:00:00 2001 From: Anthony Scemama Date: Tue, 28 Jul 2015 19:00:26 +0200 Subject: [PATCH] Fixed Davdison broken in previous commit --- src/Determinants/davidson.irp.f | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/Determinants/davidson.irp.f b/src/Determinants/davidson.irp.f index bd44284d..0c5610ae 100644 --- a/src/Determinants/davidson.irp.f +++ b/src/Determinants/davidson.irp.f @@ -12,7 +12,7 @@ BEGIN_PROVIDER [ integer, davidson_sze_max ] ! Max number of Davidson sizes END_DOC ASSERT (davidson_sze_max <= davidson_iter_max) - davidson_sze_max = min(8,2*N_states_diag) + davidson_sze_max = max(8,2*N_states_diag) END_PROVIDER subroutine davidson_diag(dets_in,u_in,energies,dim_in,sze,N_st,Nint,iunit)