Work from today. I think that I em entering wring aprameters in the
lapack function.