5 calls to
SSWAP

DGEDI
SGEBAK
SGEBAK
SGEBAL
SGEBAL