diff --git a/base/modules/serial/psb_c_vect_mod.F90 b/base/modules/serial/psb_c_vect_mod.F90
index c9a66f88..0edb7245 100644
--- a/base/modules/serial/psb_c_vect_mod.F90
+++ b/base/modules/serial/psb_c_vect_mod.F90
@@ -1033,6 +1033,7 @@ contains
     ! Temp vectors
     type(psb_c_vect_type) :: wtemp
 
+    info = 0
     if( allocated(w%v) ) then
       if (.not.present(aux)) then
         allocate(wtemp%v, mold=w%v)
@@ -1080,6 +1081,7 @@ contains
     ! Temp vectors
     type(psb_c_vect_type) :: wtemp
 
+    info = 0 
     if( allocated(w%v) ) then
       if (.not.present(aux)) then
         allocate(wtemp%v, mold=w%v)
diff --git a/base/modules/serial/psb_d_vect_mod.F90 b/base/modules/serial/psb_d_vect_mod.F90
index 2f68fe3d..ec928584 100644
--- a/base/modules/serial/psb_d_vect_mod.F90
+++ b/base/modules/serial/psb_d_vect_mod.F90
@@ -1040,6 +1040,7 @@ contains
     ! Temp vectors
     type(psb_d_vect_type) :: wtemp
 
+    info = 0
     if( allocated(w%v) ) then
       if (.not.present(aux)) then
         allocate(wtemp%v, mold=w%v)
@@ -1087,6 +1088,7 @@ contains
     ! Temp vectors
     type(psb_d_vect_type) :: wtemp
 
+    info = 0 
     if( allocated(w%v) ) then
       if (.not.present(aux)) then
         allocate(wtemp%v, mold=w%v)
diff --git a/base/modules/serial/psb_s_vect_mod.F90 b/base/modules/serial/psb_s_vect_mod.F90
index ca889268..8f378c6d 100644
--- a/base/modules/serial/psb_s_vect_mod.F90
+++ b/base/modules/serial/psb_s_vect_mod.F90
@@ -1040,6 +1040,7 @@ contains
     ! Temp vectors
     type(psb_s_vect_type) :: wtemp
 
+    info = 0
     if( allocated(w%v) ) then
       if (.not.present(aux)) then
         allocate(wtemp%v, mold=w%v)
@@ -1087,6 +1088,7 @@ contains
     ! Temp vectors
     type(psb_s_vect_type) :: wtemp
 
+    info = 0 
     if( allocated(w%v) ) then
       if (.not.present(aux)) then
         allocate(wtemp%v, mold=w%v)
diff --git a/base/modules/serial/psb_z_vect_mod.F90 b/base/modules/serial/psb_z_vect_mod.F90
index e387e510..60c5b6f0 100644
--- a/base/modules/serial/psb_z_vect_mod.F90
+++ b/base/modules/serial/psb_z_vect_mod.F90
@@ -1033,6 +1033,7 @@ contains
     ! Temp vectors
     type(psb_z_vect_type) :: wtemp
 
+    info = 0
     if( allocated(w%v) ) then
       if (.not.present(aux)) then
         allocate(wtemp%v, mold=w%v)
@@ -1080,6 +1081,7 @@ contains
     ! Temp vectors
     type(psb_z_vect_type) :: wtemp
 
+    info = 0 
     if( allocated(w%v) ) then
       if (.not.present(aux)) then
         allocate(wtemp%v, mold=w%v)
diff --git a/prec/psb_s_base_prec_mod.mod0 b/prec/psb_s_base_prec_mod.mod0
deleted file mode 100644
index 6bddfb54..00000000
Binary files a/prec/psb_s_base_prec_mod.mod0 and /dev/null differ