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
 31
 32
 33
 34
 35
 36
 37
 38
 39
 40
 41
 42
 43
 44
 45
 46
 47
 48
 49
 50
 51
 52
 53
 54
 55
 56
 57
 58
 59
 60
 61
 62
 63
 64
 65
 66
 67
 68
 69
 70
 71
 72
 73
 74
 75
 76
 77
 78
 79
 80
 81
 82
 83
 84
 85
 86
 87
 88
 89
 90
 91
 92
 93
 94
 95
 96
 97
 98
 99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
// Copyright 2018-2020 argmin developers
//
// Licensed under the Apache License, Version 2.0 <LICENSE-APACHE or
// http://apache.org/licenses/LICENSE-2.0> or the MIT license <LICENSE-MIT or
// http://opensource.org/licenses/MIT>, at your option. This file may not be
// copied, modified, or distributed except according to those terms.

// Note: This is not really the preferred way I think. Maybe this should also be implemented for
// ArrayViews, which would probably make it more efficient.

use crate::core::math::ArgminTranspose;
use num_complex::Complex;

macro_rules! make_transpose {
    ($t:ty) => {
        impl ArgminTranspose<Vec<Vec<$t>>> for Vec<Vec<$t>> {
            fn t(self) -> Self {
                let n1 = self.len();
                let n2 = self[0].len();
                // let mut out: Vec<Vec<$t>> = vec![vec![0; n1]; n2];
                let mut v = Vec::with_capacity(n1);
                unsafe {
                    v.set_len(n1);
                }
                let mut out = vec![v; n2];
                for i in 0..n1 {
                    for j in 0..n2 {
                        out[j][i] = self[i][j];
                    }
                }
                out
            }
        }
    };
}

make_transpose!(isize);
make_transpose!(usize);
make_transpose!(i8);
make_transpose!(u8);
make_transpose!(i16);
make_transpose!(u16);
make_transpose!(i32);
make_transpose!(u32);
make_transpose!(i64);
make_transpose!(u64);
make_transpose!(f32);
make_transpose!(f64);
make_transpose!(Complex<isize>);
make_transpose!(Complex<usize>);
make_transpose!(Complex<i8>);
make_transpose!(Complex<u8>);
make_transpose!(Complex<i16>);
make_transpose!(Complex<u16>);
make_transpose!(Complex<i32>);
make_transpose!(Complex<u32>);
make_transpose!(Complex<i64>);
make_transpose!(Complex<u64>);
make_transpose!(Complex<f32>);
make_transpose!(Complex<f64>);

#[cfg(test)]
mod tests {
    use super::*;
    use paste::item;

    macro_rules! make_test {
        ($t:ty) => {
            item! {
                #[test]
                fn [<test_transpose_2d_1_ $t>]() {
                    let a = vec![
                        vec![1 as $t, 4 as $t],
                        vec![8 as $t, 7 as $t]
                    ];
                    let target = vec![
                        vec![1 as $t, 8 as $t],
                        vec![4 as $t, 7 as $t]
                    ];
                    let res = a.t();
                    for i in 0..2 {
                        for j in 0..2 {
                            assert!(((target[i][j] - res[i][j]) as f64).abs() < std::f64::EPSILON);
                        }
                    }
                }
            }

            item! {
                #[test]
                fn [<test_transpose_2d_2_ $t>]() {
                    let a = vec![
                        vec![1 as $t, 4 as $t],
                        vec![8 as $t, 7 as $t],
                        vec![3 as $t, 6 as $t]
                    ];
                    let target = vec![
                        vec![1 as $t, 8 as $t, 3 as $t],
                        vec![4 as $t, 7 as $t, 6 as $t]
                    ];
                    let res = a.t();
                    for i in 0..2 {
                        for j in 0..3 {
                            assert!(((target[i][j] - res[i][j]) as f64).abs() < std::f64::EPSILON);
                        }
                    }
                }
            }
        };
    }

    make_test!(isize);
    make_test!(usize);
    make_test!(i8);
    make_test!(u8);
    make_test!(i16);
    make_test!(u16);
    make_test!(i32);
    make_test!(u32);
    make_test!(i64);
    make_test!(u64);
    make_test!(f32);
    make_test!(f64);
}