Reduce line length

cp2k · Nov 26, 2019 · e40bddf · e40bddf
1 parent 1a46983
commit e40bddf
Showing 1 changed file with 2 additions and 1 deletion.
diff --git a/src/cp_control_utils.F b/src/cp_control_utils.F
@@ -543,8 +543,9 @@ SUBROUTINE read_mgrid_section(qs_control, dft_section)
 
          CALL section_vals_val_get(mgrid_section, "MULTIGRID_CUTOFF", r_vals=cutofflist)
          IF (ASSOCIATED(cutofflist)) THEN
-            IF (SIZE(cutofflist, 1) /= ngrid_level) &
+            IF (SIZE(cutofflist, 1) /= ngrid_level) THEN
                CPABORT("Number of multi-grids (NGRIDS) requested and number of cutoff values do not match")
+            END IF
             DO igrid_level = 1, ngrid_level
                qs_control%e_cutoff(igrid_level) = cutofflist(igrid_level)
             END DO