|
max@0
|
1 // Copyright (C) 2011 NICTA (www.nicta.com.au)
|
|
max@0
|
2 // Copyright (C) 2011 Conrad Sanderson
|
|
max@0
|
3 //
|
|
max@0
|
4 // This file is part of the Armadillo C++ library.
|
|
max@0
|
5 // It is provided without any warranty of fitness
|
|
max@0
|
6 // for any purpose. You can redistribute this file
|
|
max@0
|
7 // and/or modify it under the terms of the GNU
|
|
max@0
|
8 // Lesser General Public License (LGPL) as published
|
|
max@0
|
9 // by the Free Software Foundation, either version 3
|
|
max@0
|
10 // of the License or (at your option) any later version.
|
|
max@0
|
11 // (see http://www.opensource.org/licenses for more info)
|
|
max@0
|
12
|
|
max@0
|
13
|
|
max@0
|
14 //! \addtogroup fn_strans
|
|
max@0
|
15 //! @{
|
|
max@0
|
16
|
|
max@0
|
17
|
|
max@0
|
18
|
|
max@0
|
19 template<typename T1>
|
|
max@0
|
20 arma_inline
|
|
max@0
|
21 const Op<T1, op_strans>
|
|
max@0
|
22 strans(const Base<typename T1::elem_type,T1>& X, const typename arma_cx_only<typename T1::elem_type>::result* junk = 0)
|
|
max@0
|
23 {
|
|
max@0
|
24 arma_extra_debug_sigprint();
|
|
max@0
|
25 arma_ignore(junk);
|
|
max@0
|
26
|
|
max@0
|
27 return Op<T1, op_strans>(X.get_ref());
|
|
max@0
|
28 }
|
|
max@0
|
29
|
|
max@0
|
30
|
|
max@0
|
31
|
|
max@0
|
32 template<typename T1>
|
|
max@0
|
33 arma_inline
|
|
max@0
|
34 const Op<T1, op_htrans>
|
|
max@0
|
35 strans(const Base<typename T1::elem_type,T1>& X, const typename arma_not_cx<typename T1::elem_type>::result* junk = 0)
|
|
max@0
|
36 {
|
|
max@0
|
37 arma_extra_debug_sigprint();
|
|
max@0
|
38 arma_ignore(junk);
|
|
max@0
|
39
|
|
max@0
|
40 return Op<T1, op_htrans>(X.get_ref());
|
|
max@0
|
41 }
|
|
max@0
|
42
|
|
max@0
|
43
|
|
max@0
|
44
|
|
max@0
|
45 //! two consecutive transpose operations cancel each other
|
|
max@0
|
46 template<typename T1>
|
|
max@0
|
47 arma_inline
|
|
max@0
|
48 const T1&
|
|
max@0
|
49 strans(const Op<T1, op_strans>& X)
|
|
max@0
|
50 {
|
|
max@0
|
51 arma_extra_debug_sigprint();
|
|
max@0
|
52 arma_extra_debug_print("strans(): removing op_strans");
|
|
max@0
|
53
|
|
max@0
|
54 return X.m;
|
|
max@0
|
55 }
|
|
max@0
|
56
|
|
max@0
|
57
|
|
max@0
|
58
|
|
max@0
|
59 //! @}
|
