Changed assumed size into assumed shape for internal

subroutines. Seems now not to be critical on Ix86, but was a real hit
on SP.

mld_dilu_fct.f90

@@ -136,8 +136,8 @@ contains
 
     type(psb_dspmat_type)          :: a,b
     integer                        :: m,ma,mb,l1,l2,info
-    integer, dimension(*)          :: lia1,lia2,uia1,uia2
-    real(kind(1.d0)), dimension(*) :: laspk,uaspk,d
+    integer, dimension(:)          :: lia1,lia2,uia1,uia2
+    real(kind(1.d0)), dimension(:) :: laspk,uaspk,d
 
     integer :: i,j,k,l,low1,low2,kk,jj,ll, irb, ktrw,err_act
     real(kind(1.d0)) :: dia,temp

mld_zilu_fct.f90

@@ -132,8 +132,8 @@ contains
 
     type(psb_zspmat_type)          :: a,b
     integer                        :: m,ma,mb,l1,l2,info
-    integer, dimension(*)          :: lia1,lia2,uia1,uia2
-    complex(kind(1.d0)), dimension(*) :: laspk,uaspk,d
+    integer, dimension(:)          :: lia1,lia2,uia1,uia2
+    complex(kind(1.d0)), dimension(:) :: laspk,uaspk,d
 
     integer :: i,j,k,l,low1,low2,kk,jj,ll, irb, ktrw,err_act
     complex(kind(1.d0)) :: dia,temp