balance function

Balance a Square Matrix via LAPACK's DGEBAL