Works! updated to double precision lapack routine, compile with -r8