diff --git a/base/internals/psi_bld_tmphalo.f90 b/base/internals/psi_bld_tmphalo.f90
index 158a0893..fd9b7c38 100644
--- a/base/internals/psi_bld_tmphalo.f90
+++ b/base/internals/psi_bld_tmphalo.f90
@@ -56,7 +56,8 @@ subroutine psi_bld_tmphalo(desc,info)
   type(psb_desc_type), intent(inout) :: desc
   integer(psb_ipk_), intent(out) :: info
 
-  integer(psb_ipk_),allocatable :: helem(:),hproc(:)
+  integer(psb_lpk_),allocatable :: helem(:)
+  integer(psb_ipk_),allocatable :: hproc(:)
   integer(psb_ipk_),allocatable :: tmphl(:)
 
   integer(psb_ipk_) ::  i,j,np,me,lhalo,nhalo,&
diff --git a/base/internals/psi_crea_index.f90 b/base/internals/psi_crea_index.f90
index f059358c..b426852c 100644
--- a/base/internals/psi_crea_index.f90
+++ b/base/internals/psi_crea_index.f90
@@ -63,7 +63,7 @@ subroutine psi_i_crea_index(desc_a,index_in,index_out,glob_idx,nxch,nsnd,nrcv,in
 
   type(psb_desc_type), intent(in)     :: desc_a
   integer(psb_ipk_), intent(out)                :: info,nxch,nsnd,nrcv
-  integer(psb_ipk_), intent(in)                 :: index_in(:)
+  integer(psb_lpk_), intent(in)                 :: index_in(:)
   integer(psb_ipk_), allocatable, intent(inout) :: index_out(:)
   logical                             :: glob_idx
 
diff --git a/base/internals/psi_extrct_dl.F90 b/base/internals/psi_extrct_dl.F90
index a8fe6509..c6125115 100644
--- a/base/internals/psi_extrct_dl.F90
+++ b/base/internals/psi_extrct_dl.F90
@@ -136,7 +136,8 @@ subroutine psi_i_extract_dep_list(ictxt,is_bld,is_upd,desc_str,dep_list,&
   integer(psb_ipk_) :: np,dl_lda,mode, info
 
   !     ....array parameters....
-  integer(psb_ipk_) ::  desc_str(*),dep_list(dl_lda,0:np),length_dl(0:np)
+  integer(psb_lpk_) :: desc_str(*)
+  integer(psb_ipk_) :: dep_list(dl_lda,0:np),length_dl(0:np)
   integer(psb_ipk_), allocatable :: itmp(:)
   !     .....local arrays....
   integer(psb_ipk_) :: int_err(5)
diff --git a/base/modules/Makefile b/base/modules/Makefile
index 957c44ab..bf79025d 100644
--- a/base/modules/Makefile
+++ b/base/modules/Makefile
@@ -125,7 +125,7 @@ psb_realloc_mod.o \
 	auxil/psb_z_realloc_mod.o:   psb_error_mod.o
 $(UTIL_MODS): $(BASIC_MODS)
 
-penv/psi_penv_mod.o: penv/psi_comm_buffers_mod.o 
+penv/psi_penv_mod.o: penv/psi_comm_buffers_mod.o serial/psb_vect_mod.o  serial/psb_mat_mod.o 
 penv/psi_collective_mod.o penv/psi_p2p_mod.o: penv/psi_penv_mod.o	
 
 psb_realloc_mod.o: auxil/psb_m_realloc_mod.o \
@@ -326,7 +326,7 @@ psblas/psb_s_psblas_mod.o psblas/psb_c_psblas_mod.o psblas/psb_d_psblas_mod.o ps
 
 psb_base_mod.o: $(MODULES)
 
-psi_penv_mod.o: psi_penv_mod.F90 $(BASIC_MODS) 	serial/psb_vect_mod.o  serial/psb_mat_mod.o 
+penv/psi_penv_mod.o: penv/psi_penv_mod.F90 $(BASIC_MODS) serial/psb_vect_mod.o  serial/psb_mat_mod.o 
 	$(FC)   $(FINCLUDES) $(FDEFINES) $(FCOPT) $(EXTRA_OPT) -c $< -o $@
 
 psb_penv_mod.o: psb_penv_mod.F90 $(COMMINT) $(BASIC_MODS)
diff --git a/base/modules/psi_i_mod.F90 b/base/modules/psi_i_mod.F90
index 8225afb1..d2e1069d 100644
--- a/base/modules/psi_i_mod.F90
+++ b/base/modules/psi_i_mod.F90
@@ -116,7 +116,8 @@ module psi_i_mod
       logical :: is_bld, is_upd
       integer(psb_ipk_) :: ictxt
       integer(psb_ipk_) :: dl_lda,mode
-      integer(psb_ipk_) :: desc_str(*),dep_list(dl_lda,0:np),length_dl(0:np)
+      integer(psb_lpk_) :: desc_str(*)
+      integer(psb_ipk_) :: dep_list(dl_lda,0:np),length_dl(0:np)
       integer(psb_mpk_) :: np
       integer(psb_ipk_) :: info
     end subroutine psi_i_extract_dep_list
diff --git a/base/modules/serial/psb_vect_mod.f90 b/base/modules/serial/psb_vect_mod.f90
index 362381d9..64a33832 100644
--- a/base/modules/serial/psb_vect_mod.f90
+++ b/base/modules/serial/psb_vect_mod.f90
@@ -21,12 +21,14 @@ contains
     !
 
     type(psb_i_base_vect_type)  :: ivetdef
+    type(psb_l_base_vect_type)  :: lvetdef
     type(psb_s_base_vect_type)  :: svetdef
     type(psb_d_base_vect_type)  :: dvetdef
     type(psb_c_base_vect_type)  :: cvetdef
     type(psb_z_base_vect_type)  :: zvetdef
 
     call psb_set_vect_default(ivetdef)
+    call psb_set_vect_default(lvetdef)
     call psb_set_vect_default(svetdef)
     call psb_set_vect_default(dvetdef)
     call psb_set_vect_default(cvetdef)