From b42020e950c26f7c2b53cbac29be84ebb3444310 Mon Sep 17 00:00:00 2001 From: Salvatore Filippone Date: Wed, 9 Jan 2008 17:41:29 +0000 Subject: [PATCH] Fix typo. --- mlprec/mld_dmlprec_aply.f90 | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/mlprec/mld_dmlprec_aply.f90 b/mlprec/mld_dmlprec_aply.f90 index d4c8b720..760eb132 100644 --- a/mlprec/mld_dmlprec_aply.f90 +++ b/mlprec/mld_dmlprec_aply.f90 @@ -126,7 +126,7 @@ ! baseprecv(ilev)%nlaggr - integer, dimension(:), allocatable. ! The number of aggregates (rows of A(ilev)) on the ! various processes. -! baseprecv(ilev)%base_a - type(psb_zspmat_type), pointer. +! baseprecv(ilev)%base_a - type(psb_dspmat_type), pointer. ! Pointer (really a pointer!) to the base matrix of ! the current level, i.e. the local part of A(ilev); ! so we have a unified treatment of residuals. We