Fixed stupid interface bug in mld_zslu_bld.

2026-10-06 22:55:12 +00:00 · 2008-05-06 16:09:51 +00:00
parent 51a5c24713
commit df016d8b60
1 changed files with 1 additions and 1 deletions
@@ -77,7 +77,7 @@ subroutine mld_zslu_bld(a,desc_a,p,info)
  implicit none 

  ! Arguments
-  type(psb_dspmat_type), intent(inout)   :: a
+  type(psb_zspmat_type), intent(inout)   :: a
  type(psb_desc_type), intent(in)        :: desc_a
  type(mld_zbaseprc_type), intent(inout) :: p
  integer, intent(out)                   :: info