pub unsafe extern "C" fn LAPACKE_dsfrk_work(
matrix_layout: c_int,
transr: c_char,
uplo: c_char,
trans: c_char,
n: lapack_int,
k: lapack_int,
alpha: f64,
a: *const f64,
lda: lapack_int,
beta: f64,
c: *mut f64,
) -> lapack_int