C code for the Francis (implicit QR) algorithm