13 calls from
SGEBAL

ISAMAX  2
LSAME   3
SHR_KIND_MOD  1
SLAMCH  2
SSCAL   2
SSWAP   2
XERBLA  1