pub unsafe extern "C" fn sgemv_(
transa: *const f77_char,
m: *const f77_int,
n: *const f77_int,
alpha: *const f32,
a: *const f32,
lda: *const f77_int,
x: *const f32,
incx: *const f77_int,
beta: *const f32,
y: *mut f32,
incy: *const f77_int,
)