From f1686fc0223390d622ffc3f5da63b00cfd6b5c51 Mon Sep 17 00:00:00 2001 From: Salvatore Filippone Date: Mon, 12 May 2008 11:11:18 +0000 Subject: [PATCH] *** empty log message *** --- base/modules/psb_spmat_type.f90 | 2 -- 1 file changed, 2 deletions(-) diff --git a/base/modules/psb_spmat_type.f90 b/base/modules/psb_spmat_type.f90 index 69b50f46..f4d475f1 100644 --- a/base/modules/psb_spmat_type.f90 +++ b/base/modules/psb_spmat_type.f90 @@ -767,7 +767,6 @@ contains i2 = size(a%ia2) ia = size(a%aspk) case default - info = -2 i1 = size(a%ia1) i2 = size(a%ia2) ia = size(a%aspk) @@ -1259,7 +1258,6 @@ contains i2 = size(a%ia2) ia = size(a%aspk) case default - info = -2 i1 = size(a%ia1) i2 = size(a%ia2) ia = size(a%aspk)