Fix blank lines.

4 years ago · 43fd5268a1
parent 759a1502b2
commit 43fd5268a1
1 changed files with 1 additions and 0 deletions
--- a/mlprec/impl/aggregator/mld_daggrmat_nosmth_bld.f90
+++ b/mlprec/impl/aggregator/mld_daggrmat_nosmth_bld.f90
@ -193,5 +193,6 @@ contains
    write(0,*) me,string,nr,nc,&
         & minval(coo%ia(1:nz)),maxval(coo%ia(1:nz)),&
         & minval(coo%ja(1:nz)),maxval(coo%ja(1:nz))
+
  end subroutine check_coo
 end subroutine mld_daggrmat_nosmth_bld