10 years ago · 46fe7af14c
parent daa1f91c8e
commit 46fe7af14c
1 changed files with 2 additions and 1 deletions
--- a/base/modules/psb_d_vect_mod.F90
+++ b/base/modules/psb_d_vect_mod.F90
@ -672,7 +672,7 @@ module psb_d_multivect_mod
  use psb_d_base_multivect_mod
  use psb_const_mod

-  private
+  !private

  type psb_d_multivect_type
    class(psb_d_base_multivect_type), allocatable :: v 
@ -725,6 +725,7 @@ module psb_d_multivect_mod
  public  :: psb_d_multivect, psb_d_multivect_type,&
       & psb_set_multivect_default, psb_get_multivect_default

+  private
  interface psb_d_multivect
    module procedure constructor, size_const
  end interface