Print Pade parameter reset instead of warning

cp2k · Jun 29, 2020 · adf97b5 · adf97b5
1 parent 4a622d8
commit adf97b5
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/src/rpa_gw.F b/src/rpa_gw.F
@@ -377,8 +377,8 @@ SUBROUTINE allocate_matrices_gw(vec_Sigma_c_gw, color_rpa_group, dimen_nm_gw, &
 
       IF (mp2_env%ri_g0w0%analytic_continuation == gw_pade_approx) THEN
          IF (mp2_env%ri_g0w0%nparam_pade > num_fit_points) THEN
-            IF (unit_nr > 0) &
-               CPWARN("Pade approximation: more parameters than data points. Reset # of parameters.")
+            IF (unit_nr > 0) WRITE (UNIT=unit_nr, FMT="(T3,A)") &
+               "Pade approximation: more parameters than data points. Reset # of parameters."
             mp2_env%ri_g0w0%nparam_pade = num_fit_points
             IF (unit_nr > 0) WRITE (UNIT=unit_nr, FMT="(T3,A,T74,I7)") &
                "Number of pade parameters:", mp2_env%ri_g0w0%nparam_pade