6 calls from
SLARF
LSAME
1
SGEMV
2
SGER
2
SHR_KIND_MOD
1