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

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

/// BLAS LP64 interface for LAK [swap()]
///
/// safety: uses `from_raw_parts`/`from_raw_parts_mut` with the given pointers and buffer lengths.
pub unsafe fn swap_lp64<T>(n: i32, x: *mut T, incx: i32, y: *mut T, incy: i32) {
    unsafe {
        let x = ptr_2_vecmut(n, x, incx);
        let y = ptr_2_vecmut(n, y, incy);
        swap(x, y);
    }
}

/// BLAS ILP64 interface for LAK [swap()]
///
/// safety: uses `from_raw_parts`/`from_raw_parts_mut` with the given pointers and buffer lengths.
pub unsafe fn swap_ilp64<T>(n: i64, x: *mut T, incx: i64, y: *mut T, incy: i64) {
    unsafe {
        let x = ptr_2_vecmut(n, x, incx);
        let y = ptr_2_vecmut(n, y, incy);
        swap(x, y);
    }
}