added const for zero and one
added dlange and slange lapack functions