lapack example working