4 calls to
DLAPY2

DSTEQR
DSTEQR
DSTERF
DSTERF