lapacke
pub unsafe fn dgttrf_work( n: i32, dl: &mut [f64], d: &mut [f64], du: &mut [f64], du2: &mut [f64], ipiv: &mut [i32]) -> i32