From c9aeb3d60565abe09b8e4f31eb0da8fe41d9bf8d Mon Sep 17 00:00:00 2001 From: Salvatore Filippone Date: Wed, 14 Feb 2007 12:11:51 +0000 Subject: [PATCH] Fix wrong error message. --- base/modules/psb_check_mod.f90 | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/base/modules/psb_check_mod.f90 b/base/modules/psb_check_mod.f90 index f63128d5..ad078eae 100644 --- a/base/modules/psb_check_mod.f90 +++ b/base/modules/psb_check_mod.f90 @@ -243,7 +243,7 @@ contains int_err(2) = lldx int_err(3) = 6 int_err(4) = psb_n_col_ - int_err(5) = psb_cd_get_local_cols(desc_dec) + int_err(5) = psb_cd_get_global_rows(desc_dec) else if (psb_cd_get_global_cols(desc_dec) < m) then info=60 int_err(1) = 1