1 // SPDX-License-Identifier: Apache-2.0
2 //
3 // Copyright 2008-2016 Conrad Sanderson (http://conradsanderson.id.au)
4 // Copyright 2008-2016 National ICT Australia (NICTA)
5 //
6 // Licensed under the Apache License, Version 2.0 (the "License");
7 // you may not use this file except in compliance with the License.
8 // You may obtain a copy of the License at
9 // http://www.apache.org/licenses/LICENSE-2.0
10 //
11 // Unless required by applicable law or agreed to in writing, software
12 // distributed under the License is distributed on an "AS IS" BASIS,
13 // WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
14 // See the License for the specific language governing permissions and
15 // limitations under the License.
16 // ------------------------------------------------------------------------
17
18
19 //! \addtogroup fn_intersect
20 //! @{
21
22
23
24 template<typename T1, typename T2>
25 arma_warn_unused
26 inline
27 typename
28 enable_if2
29 <
30 ( is_arma_type<T1>::value && is_arma_type<T2>::value && is_same_type<typename T1::elem_type, typename T2::elem_type>::value ),
31 const Glue<T1, T2, glue_intersect>
32 >::result
intersect(const T1 & A,const T2 & B)33 intersect
34 (
35 const T1& A,
36 const T2& B
37 )
38 {
39 arma_extra_debug_sigprint();
40
41 return Glue<T1, T2, glue_intersect>(A, B);
42 }
43
44
45
46 template<typename T1, typename T2>
47 inline
48 void
intersect(Mat<typename T1::elem_type> & C,uvec & iA,uvec & iB,const Base<typename T1::elem_type,T1> & A,const Base<typename T1::elem_type,T2> & B)49 intersect
50 (
51 Mat<typename T1::elem_type>& C,
52 uvec& iA,
53 uvec& iB,
54 const Base<typename T1::elem_type,T1>& A,
55 const Base<typename T1::elem_type,T2>& B
56 )
57 {
58 arma_extra_debug_sigprint();
59
60 glue_intersect::apply(C, iA, iB, A.get_ref(), B.get_ref(), true);
61 }
62
63
64
65 //! @}
66