mld2p4-2:

mlprec/mld_c_prec_type.f90
 mlprec/mld_cprecaply.f90
 mlprec/mld_d_prec_type.f90
 mlprec/mld_s_prec_type.f90
 mlprec/mld_z_prec_type.f90

Inconsistent interface in precaply.

mlprec/mld_c_prec_type.f90

@@ -133,7 +133,7 @@ module mld_c_prec_type
       import mld_cprec_type
       type(psb_desc_type),intent(in)   :: desc_data
       type(mld_cprec_type), intent(in) :: prec
-      complex(psb_spk_),intent(in)        :: x(:)
+      complex(psb_spk_),intent(inout)     :: x(:)
       complex(psb_spk_),intent(inout)     :: y(:)
       integer, intent(out)             :: info
       character(len=1), optional       :: trans

mlprec/mld_d_prec_type.f90

@@ -133,7 +133,7 @@ module mld_d_prec_type
       import mld_dprec_type
       type(psb_desc_type),intent(in)   :: desc_data
       type(mld_dprec_type), intent(in) :: prec
-      real(psb_dpk_),intent(in)        :: x(:)
+      real(psb_dpk_),intent(inout)     :: x(:)
       real(psb_dpk_),intent(inout)     :: y(:)
       integer, intent(out)             :: info
       character(len=1), optional       :: trans

mlprec/mld_s_prec_type.f90

@@ -133,7 +133,7 @@ module mld_s_prec_type
       import mld_sprec_type
       type(psb_desc_type),intent(in)   :: desc_data
       type(mld_sprec_type), intent(in) :: prec
-      real(psb_spk_),intent(in)        :: x(:)
+      real(psb_spk_),intent(inout)     :: x(:)
       real(psb_spk_),intent(inout)     :: y(:)
       integer, intent(out)             :: info
       character(len=1), optional       :: trans

mlprec/mld_z_prec_type.f90

@@ -133,7 +133,7 @@ module mld_z_prec_type
       import mld_zprec_type
       type(psb_desc_type),intent(in)   :: desc_data
       type(mld_zprec_type), intent(in) :: prec
-      complex(psb_dpk_),intent(in)        :: x(:)
+      complex(psb_dpk_),intent(inout)     :: x(:)
       complex(psb_dpk_),intent(inout)     :: y(:)
       integer, intent(out)             :: info
       character(len=1), optional       :: trans