lak-kernels 0.1.0

BLAS-like linear algebra kernels in fully-safe Rust.
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30

use std::ops::{Mul, MulAssign};

use crate::blas::helpers::ptr_2_vecmut;
use crate::l1::scal;

/// BLAS LP64 interface for LAK [scal()]
///
/// safety: uses `from_raw_parts`/`from_raw_parts_mut` with the given pointer and buffer length.
pub unsafe fn scal_lp64<T>(n: i32, alpha: T, x: *mut T, incx: i32)
where
    T: Mul<Output = T> + Copy + MulAssign,
{
    unsafe {
        let x = ptr_2_vecmut(n, x, incx);
        scal(alpha, x);
    }
}

/// BLAS ILP64 interface for LAK [scal()]
///
/// safety: uses `from_raw_parts`/`from_raw_parts_mut` with the given pointer and buffer length.
pub unsafe fn scal_ilp64<T>(n: i64, alpha: T, x: *mut T, incx: i64)
where
    T: Mul<Output = T> + Copy + MulAssign,
{
    unsafe {
        let x = ptr_2_vecmut(n, x, incx);
        scal(alpha, x);
    }
}