SUBROUTINE LA_GBSV( AB, B, KL=kl, IPIV=ipiv, INFO=info )
type(wp), INTENT(INOUT) :: AB(:,:), rhs
INTEGER, INTENT(IN), OPTIONAL :: KL
INTEGER, INTENT(OUT), OPTIONAL :: IPIV(:)
INTEGER, INTENT(OUT), OPTIONAL :: INFO
where
type ::= REALCOMPLEX
wp ::= KIND(1.0)KIND(1.0D0)
rhs ::= B(:,:)B(:)