From b7d9b380d539faf253f70e2462f882e2524147b6 Mon Sep 17 00:00:00 2001
From: Salvatore Filippone <salvatore.filippone@cranfield.ac.uk>
Date: Mon, 2 Jun 2008 13:53:08 +0000
Subject: [PATCH] mld2p4:   mlprec/mld_prec_type.f90

Fixed bad parameter declaration.
---
 mlprec/mld_prec_type.f90 | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/mlprec/mld_prec_type.f90 b/mlprec/mld_prec_type.f90
index a1c37d29..367cbdc4 100644
--- a/mlprec/mld_prec_type.f90
+++ b/mlprec/mld_prec_type.f90
@@ -285,7 +285,7 @@ module mld_prec_type
   ! Legal values for entry: mld_ml_type_
   !
   integer, parameter :: mld_no_ml_=0, mld_add_ml_=1, mld_mult_ml_=2
-  integer, parameter :: mld_new_ml_prec_=3, mld_max_ml_type_=mld_new_ml_prec_
+  integer, parameter :: mld_new_ml_prec_=3, mld_max_ml_type_=mld_mult_ml_
   !
   ! Legal values for entry: mld_smooth_pos_
   !