pub unsafe extern "C" fn dsfrk_(
transr: *const c_char,
uplo: *const c_char,
trans: *const c_char,
n: *const lapack_int,
k: *const lapack_int,
alpha: *const c_double,
a: *const c_double,
lda: *const lapack_int,
beta: *const c_double,
c: *mut c_double,
)