ADC(4) full matrix version

Author: pfloos

src/ADC/R_ADC.f90

@@ -76,7 +76,7 @@ subroutine R_ADC(dotest,                                               &
 
   double precision              :: start_ADC,end_ADC,t_ADC
   logical                       :: do_IPEA,do_EE
-  double precision,parameter    :: flow = 1d6
+  double precision,parameter    :: flow = 500d0
 
   logical                       :: do_hierarchy_GW = .false.
   logical                       :: do_1h1p,do_1h,do_diag

src/ADC/R_ADC3x_G3W2.f90

@@ -635,7 +635,6 @@ subroutine R_ADC3x_G3W2(dotest,sig_inf,TDA_W,flow,nBas,nOrb,nC,nO,nV,nR,nS,ENuc,
 
   end if
 
-
   call wall_time(end_time)
 
   time = end_time - start_time