pub unsafe extern "C" fn dgemm_(
transa: *const f77_char,
transb: *const f77_char,
m: *const f77_int,
n: *const f77_int,
k: *const f77_int,
alpha: *const f64,
a: *const f64,
lda: *const f77_int,
b: *const f64,
ldb: *const f77_int,
beta: *const f64,
c: *mut f64,
ldc: *const f77_int,
)