Fixed a check where SR_lambda_Rp is ignored.

francesco086 · Oct 4, 2017 · e640468 · e640468
1 parent 571b4d6
commit e640468
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/source/module_variational_opt.f90 b/source/module_variational_opt.f90
@@ -1648,7 +1648,7 @@ SUBROUTINE stochastic_reconfiguration(p0,N,auto_stop,AV_accu)
          !parte relativa al lambda
 
          !regolo lambda a seconda di come sono stati gli ultimi spostamenti variazionali
-         IF (SR_lambda) THEN
+         IF (SR_lambda .OR. SR_lambda_Rp) THEN
 
 			   IF ((SR_lambda).AND.(contatore>2).AND.(N-num_coord_Rp>0)) THEN       !parametri variazionali wf
 			   	flambda=(1.d0+0.1d0*DOT_PRODUCT(vec_app(1:N-num_coord_Rp),vec_app_old(1:N-num_coord_Rp)))