This is the Tiny Vector Matrix Expression Templates library found at http://tvmet.sourceforge.net. It is the fastest and most compact matrix lib out there (for < 10x10 matricies). I have done some minor tweaks to make it compile for mbed. For examples and hints on how to use, see: http://tvmet.sourceforge.net/usage.html

Dependents:   Eurobot_2012_Secondary

Committer:
madcowswe
Date:
Wed Mar 28 15:53:45 2012 +0000
Revision:
0:feb4117d16d8

        

Who changed what in which revision?

UserRevisionLine numberNew contents of line
madcowswe 0:feb4117d16d8 1 /*
madcowswe 0:feb4117d16d8 2 * Tiny Vector Matrix Library
madcowswe 0:feb4117d16d8 3 * Dense Vector Matrix Libary of Tiny size using Expression Templates
madcowswe 0:feb4117d16d8 4 *
madcowswe 0:feb4117d16d8 5 * Copyright (C) 2001 - 2007 Olaf Petzold <opetzold@users.sourceforge.net>
madcowswe 0:feb4117d16d8 6 *
madcowswe 0:feb4117d16d8 7 * This library is free software; you can redistribute it and/or
madcowswe 0:feb4117d16d8 8 * modify it under the terms of the GNU Lesser General Public
madcowswe 0:feb4117d16d8 9 * License as published by the Free Software Foundation; either
madcowswe 0:feb4117d16d8 10 * version 2.1 of the License, or (at your option) any later version.
madcowswe 0:feb4117d16d8 11 *
madcowswe 0:feb4117d16d8 12 * This library is distributed in the hope that it will be useful,
madcowswe 0:feb4117d16d8 13 * but WITHOUT ANY WARRANTY; without even the implied warranty of
madcowswe 0:feb4117d16d8 14 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
madcowswe 0:feb4117d16d8 15 * Lesser General Public License for more details.
madcowswe 0:feb4117d16d8 16 *
madcowswe 0:feb4117d16d8 17 * You should have received a copy of the GNU Lesser General Public
madcowswe 0:feb4117d16d8 18 * License along with this library; if not, write to the Free Software
madcowswe 0:feb4117d16d8 19 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
madcowswe 0:feb4117d16d8 20 *
madcowswe 0:feb4117d16d8 21 * $Id: VectorBinaryFunctions.h,v 1.17 2007-06-23 15:58:58 opetzold Exp $
madcowswe 0:feb4117d16d8 22 */
madcowswe 0:feb4117d16d8 23
madcowswe 0:feb4117d16d8 24 #ifndef TVMET_VECTOR_BINARY_FUNCTIONS_H
madcowswe 0:feb4117d16d8 25 #define TVMET_VECTOR_BINARY_FUNCTIONS_H
madcowswe 0:feb4117d16d8 26
madcowswe 0:feb4117d16d8 27 #include <tvmet/NumericTraits.h>
madcowswe 0:feb4117d16d8 28 #include <tvmet/Extremum.h>
madcowswe 0:feb4117d16d8 29
madcowswe 0:feb4117d16d8 30 namespace tvmet {
madcowswe 0:feb4117d16d8 31
madcowswe 0:feb4117d16d8 32
madcowswe 0:feb4117d16d8 33 /*********************************************************
madcowswe 0:feb4117d16d8 34 * PART I: DECLARATION
madcowswe 0:feb4117d16d8 35 *********************************************************/
madcowswe 0:feb4117d16d8 36
madcowswe 0:feb4117d16d8 37 /*
madcowswe 0:feb4117d16d8 38 * binary_function(Vector<T1, Sz>, Vector<T1, Sz>)
madcowswe 0:feb4117d16d8 39 * binary_function(Vector<T, Sz>, XprVector<E>)
madcowswe 0:feb4117d16d8 40 * binary_function(XprVector<E>, Vector<T, Sz>)
madcowswe 0:feb4117d16d8 41 */
madcowswe 0:feb4117d16d8 42 #define TVMET_DECLARE_MACRO(NAME) \
madcowswe 0:feb4117d16d8 43 template<class T1, class T2, std::size_t Sz> \
madcowswe 0:feb4117d16d8 44 inline \
madcowswe 0:feb4117d16d8 45 XprVector< \
madcowswe 0:feb4117d16d8 46 XprBinOp< \
madcowswe 0:feb4117d16d8 47 Fcnl_##NAME<T1, T2>, \
madcowswe 0:feb4117d16d8 48 VectorConstReference<T1, Sz>, \
madcowswe 0:feb4117d16d8 49 VectorConstReference<T2, Sz> \
madcowswe 0:feb4117d16d8 50 >, \
madcowswe 0:feb4117d16d8 51 Sz \
madcowswe 0:feb4117d16d8 52 > \
madcowswe 0:feb4117d16d8 53 NAME(const Vector<T1, Sz>& lhs, \
madcowswe 0:feb4117d16d8 54 const Vector<T2, Sz>& rhs) TVMET_CXX_ALWAYS_INLINE; \
madcowswe 0:feb4117d16d8 55 \
madcowswe 0:feb4117d16d8 56 template<class E, class T, std::size_t Sz> \
madcowswe 0:feb4117d16d8 57 inline \
madcowswe 0:feb4117d16d8 58 XprVector< \
madcowswe 0:feb4117d16d8 59 XprBinOp< \
madcowswe 0:feb4117d16d8 60 Fcnl_##NAME<typename E::value_type, T>, \
madcowswe 0:feb4117d16d8 61 VectorConstReference<T, Sz>, \
madcowswe 0:feb4117d16d8 62 XprVector<E, Sz> \
madcowswe 0:feb4117d16d8 63 >, \
madcowswe 0:feb4117d16d8 64 Sz \
madcowswe 0:feb4117d16d8 65 > \
madcowswe 0:feb4117d16d8 66 NAME(const XprVector<E, Sz>& lhs, \
madcowswe 0:feb4117d16d8 67 const Vector<T, Sz>& rhs) TVMET_CXX_ALWAYS_INLINE; \
madcowswe 0:feb4117d16d8 68 \
madcowswe 0:feb4117d16d8 69 template<class E, class T, std::size_t Sz> \
madcowswe 0:feb4117d16d8 70 inline \
madcowswe 0:feb4117d16d8 71 XprVector< \
madcowswe 0:feb4117d16d8 72 XprBinOp< \
madcowswe 0:feb4117d16d8 73 Fcnl_##NAME<T, typename E::value_type>, \
madcowswe 0:feb4117d16d8 74 VectorConstReference<T, Sz>, \
madcowswe 0:feb4117d16d8 75 XprVector<E, Sz> \
madcowswe 0:feb4117d16d8 76 >, \
madcowswe 0:feb4117d16d8 77 Sz \
madcowswe 0:feb4117d16d8 78 > \
madcowswe 0:feb4117d16d8 79 NAME(const Vector<T, Sz>& lhs, \
madcowswe 0:feb4117d16d8 80 const XprVector<E, Sz>& rhs) TVMET_CXX_ALWAYS_INLINE;
madcowswe 0:feb4117d16d8 81
madcowswe 0:feb4117d16d8 82 TVMET_DECLARE_MACRO(atan2)
madcowswe 0:feb4117d16d8 83 TVMET_DECLARE_MACRO(drem)
madcowswe 0:feb4117d16d8 84 TVMET_DECLARE_MACRO(fmod)
madcowswe 0:feb4117d16d8 85 TVMET_DECLARE_MACRO(hypot)
madcowswe 0:feb4117d16d8 86 TVMET_DECLARE_MACRO(jn)
madcowswe 0:feb4117d16d8 87 TVMET_DECLARE_MACRO(yn)
madcowswe 0:feb4117d16d8 88 TVMET_DECLARE_MACRO(pow)
madcowswe 0:feb4117d16d8 89 #if defined(TVMET_HAVE_COMPLEX)
madcowswe 0:feb4117d16d8 90 TVMET_DECLARE_MACRO(polar)
madcowswe 0:feb4117d16d8 91 #endif
madcowswe 0:feb4117d16d8 92
madcowswe 0:feb4117d16d8 93 #undef TVMET_DECLARE_MACRO
madcowswe 0:feb4117d16d8 94
madcowswe 0:feb4117d16d8 95
madcowswe 0:feb4117d16d8 96 /*
madcowswe 0:feb4117d16d8 97 * binary_function(Vector<T, Sz>, POD)
madcowswe 0:feb4117d16d8 98 */
madcowswe 0:feb4117d16d8 99 #define TVMET_DECLARE_MACRO(NAME, TP) \
madcowswe 0:feb4117d16d8 100 template<class T, std::size_t Sz> \
madcowswe 0:feb4117d16d8 101 inline \
madcowswe 0:feb4117d16d8 102 XprVector< \
madcowswe 0:feb4117d16d8 103 XprBinOp< \
madcowswe 0:feb4117d16d8 104 Fcnl_##NAME<T, TP >, \
madcowswe 0:feb4117d16d8 105 VectorConstReference<T, Sz>, \
madcowswe 0:feb4117d16d8 106 XprLiteral< TP > \
madcowswe 0:feb4117d16d8 107 >, \
madcowswe 0:feb4117d16d8 108 Sz \
madcowswe 0:feb4117d16d8 109 > \
madcowswe 0:feb4117d16d8 110 NAME(const Vector<T, Sz>& lhs, TP rhs) TVMET_CXX_ALWAYS_INLINE;
madcowswe 0:feb4117d16d8 111
madcowswe 0:feb4117d16d8 112 TVMET_DECLARE_MACRO(atan2, int)
madcowswe 0:feb4117d16d8 113 TVMET_DECLARE_MACRO(drem, int)
madcowswe 0:feb4117d16d8 114 TVMET_DECLARE_MACRO(fmod, int)
madcowswe 0:feb4117d16d8 115 TVMET_DECLARE_MACRO(hypot, int)
madcowswe 0:feb4117d16d8 116 TVMET_DECLARE_MACRO(jn, int)
madcowswe 0:feb4117d16d8 117 TVMET_DECLARE_MACRO(yn, int)
madcowswe 0:feb4117d16d8 118 TVMET_DECLARE_MACRO(pow, int)
madcowswe 0:feb4117d16d8 119
madcowswe 0:feb4117d16d8 120 #if defined(TVMET_HAVE_LONG_LONG)
madcowswe 0:feb4117d16d8 121 TVMET_DECLARE_MACRO(atan2, long long int)
madcowswe 0:feb4117d16d8 122 TVMET_DECLARE_MACRO(drem, long long int)
madcowswe 0:feb4117d16d8 123 TVMET_DECLARE_MACRO(fmod, long long int)
madcowswe 0:feb4117d16d8 124 TVMET_DECLARE_MACRO(hypot, long long int)
madcowswe 0:feb4117d16d8 125 TVMET_DECLARE_MACRO(jn, long long int)
madcowswe 0:feb4117d16d8 126 TVMET_DECLARE_MACRO(yn, long long int)
madcowswe 0:feb4117d16d8 127 TVMET_DECLARE_MACRO(pow, long long int)
madcowswe 0:feb4117d16d8 128 #endif // defined(TVMET_HAVE_LONG_LONG)
madcowswe 0:feb4117d16d8 129
madcowswe 0:feb4117d16d8 130 TVMET_DECLARE_MACRO(atan2, float)
madcowswe 0:feb4117d16d8 131 TVMET_DECLARE_MACRO(drem, float)
madcowswe 0:feb4117d16d8 132 TVMET_DECLARE_MACRO(fmod, float)
madcowswe 0:feb4117d16d8 133 TVMET_DECLARE_MACRO(hypot, float)
madcowswe 0:feb4117d16d8 134 TVMET_DECLARE_MACRO(jn, float)
madcowswe 0:feb4117d16d8 135 TVMET_DECLARE_MACRO(yn, float)
madcowswe 0:feb4117d16d8 136 TVMET_DECLARE_MACRO(pow, float)
madcowswe 0:feb4117d16d8 137
madcowswe 0:feb4117d16d8 138 TVMET_DECLARE_MACRO(atan2, double)
madcowswe 0:feb4117d16d8 139 TVMET_DECLARE_MACRO(drem, double)
madcowswe 0:feb4117d16d8 140 TVMET_DECLARE_MACRO(fmod, double)
madcowswe 0:feb4117d16d8 141 TVMET_DECLARE_MACRO(hypot, double)
madcowswe 0:feb4117d16d8 142 TVMET_DECLARE_MACRO(jn, double)
madcowswe 0:feb4117d16d8 143 TVMET_DECLARE_MACRO(yn, double)
madcowswe 0:feb4117d16d8 144 TVMET_DECLARE_MACRO(pow, double)
madcowswe 0:feb4117d16d8 145
madcowswe 0:feb4117d16d8 146 #if defined(TVMET_HAVE_LONG_DOUBLE)
madcowswe 0:feb4117d16d8 147 TVMET_DECLARE_MACRO(atan2, long double)
madcowswe 0:feb4117d16d8 148 TVMET_DECLARE_MACRO(drem, long double)
madcowswe 0:feb4117d16d8 149 TVMET_DECLARE_MACRO(fmod, long double)
madcowswe 0:feb4117d16d8 150 TVMET_DECLARE_MACRO(hypot, long double)
madcowswe 0:feb4117d16d8 151 TVMET_DECLARE_MACRO(jn, long double)
madcowswe 0:feb4117d16d8 152 TVMET_DECLARE_MACRO(yn, long double)
madcowswe 0:feb4117d16d8 153 TVMET_DECLARE_MACRO(pow, long double)
madcowswe 0:feb4117d16d8 154 #endif // defined(TVMET_HAVE_LONG_DOUBLE)
madcowswe 0:feb4117d16d8 155
madcowswe 0:feb4117d16d8 156 #undef TVMET_DECLARE_MACRO
madcowswe 0:feb4117d16d8 157
madcowswe 0:feb4117d16d8 158
madcowswe 0:feb4117d16d8 159 /*
madcowswe 0:feb4117d16d8 160 * complex support
madcowswe 0:feb4117d16d8 161 */
madcowswe 0:feb4117d16d8 162
madcowswe 0:feb4117d16d8 163 #if defined(TVMET_HAVE_COMPLEX) && defined(TVMET_HAVE_COMPLEX_MATH1)
madcowswe 0:feb4117d16d8 164 template<class T, std::size_t Sz>
madcowswe 0:feb4117d16d8 165 XprVector<
madcowswe 0:feb4117d16d8 166 XprBinOp<
madcowswe 0:feb4117d16d8 167 Fcnl_pow<T, std::complex<T> >,
madcowswe 0:feb4117d16d8 168 VectorConstReference<T, Sz>,
madcowswe 0:feb4117d16d8 169 XprLiteral< std::complex<T> >
madcowswe 0:feb4117d16d8 170 >,
madcowswe 0:feb4117d16d8 171 Sz
madcowswe 0:feb4117d16d8 172 >
madcowswe 0:feb4117d16d8 173 pow(const Vector<T, Sz>& lhs,
madcowswe 0:feb4117d16d8 174 const std::complex<T>& rhs) TVMET_CXX_ALWAYS_INLINE;
madcowswe 0:feb4117d16d8 175
madcowswe 0:feb4117d16d8 176
madcowswe 0:feb4117d16d8 177 template<class T, std::size_t Sz>
madcowswe 0:feb4117d16d8 178 XprVector<
madcowswe 0:feb4117d16d8 179 XprBinOp<
madcowswe 0:feb4117d16d8 180 Fcnl_pow<std::complex<T>, std::complex<T> >,
madcowswe 0:feb4117d16d8 181 VectorConstReference<std::complex<T>, Sz>,
madcowswe 0:feb4117d16d8 182 XprLiteral< std::complex<T> >
madcowswe 0:feb4117d16d8 183 >,
madcowswe 0:feb4117d16d8 184 Sz
madcowswe 0:feb4117d16d8 185 >
madcowswe 0:feb4117d16d8 186 pow(const Vector<std::complex<T>, Sz>& lhs,
madcowswe 0:feb4117d16d8 187 const std::complex<T>& rhs) TVMET_CXX_ALWAYS_INLINE;
madcowswe 0:feb4117d16d8 188
madcowswe 0:feb4117d16d8 189
madcowswe 0:feb4117d16d8 190 template<class T, std::size_t Sz>
madcowswe 0:feb4117d16d8 191 XprVector<
madcowswe 0:feb4117d16d8 192 XprBinOp<
madcowswe 0:feb4117d16d8 193 Fcnl_pow<std::complex<T>, T>,
madcowswe 0:feb4117d16d8 194 VectorConstReference<std::complex<T>, Sz>,
madcowswe 0:feb4117d16d8 195 XprLiteral<T>
madcowswe 0:feb4117d16d8 196 >,
madcowswe 0:feb4117d16d8 197 Sz
madcowswe 0:feb4117d16d8 198 >
madcowswe 0:feb4117d16d8 199 pow(const Vector<std::complex<T>, Sz>& lhs,
madcowswe 0:feb4117d16d8 200 const T& rhs) TVMET_CXX_ALWAYS_INLINE;
madcowswe 0:feb4117d16d8 201
madcowswe 0:feb4117d16d8 202
madcowswe 0:feb4117d16d8 203 template<class T, std::size_t Sz>
madcowswe 0:feb4117d16d8 204 XprVector<
madcowswe 0:feb4117d16d8 205 XprBinOp<
madcowswe 0:feb4117d16d8 206 Fcnl_pow<std::complex<T>, int>,
madcowswe 0:feb4117d16d8 207 VectorConstReference<std::complex<T>, Sz>,
madcowswe 0:feb4117d16d8 208 XprLiteral<int>
madcowswe 0:feb4117d16d8 209 >,
madcowswe 0:feb4117d16d8 210 Sz
madcowswe 0:feb4117d16d8 211 >
madcowswe 0:feb4117d16d8 212 pow(const Vector<std::complex<T>, Sz>& lhs,
madcowswe 0:feb4117d16d8 213 int rhs) TVMET_CXX_ALWAYS_INLINE;
madcowswe 0:feb4117d16d8 214
madcowswe 0:feb4117d16d8 215
madcowswe 0:feb4117d16d8 216 template<class T, std::size_t Sz>
madcowswe 0:feb4117d16d8 217 XprVector<
madcowswe 0:feb4117d16d8 218 XprBinOp<
madcowswe 0:feb4117d16d8 219 Fcnl_polar<T, T>,
madcowswe 0:feb4117d16d8 220 VectorConstReference<T, Sz>,
madcowswe 0:feb4117d16d8 221 XprLiteral<T>
madcowswe 0:feb4117d16d8 222 >,
madcowswe 0:feb4117d16d8 223 Sz
madcowswe 0:feb4117d16d8 224 >
madcowswe 0:feb4117d16d8 225 polar(const Vector<T, Sz>& lhs, const T& rhs) TVMET_CXX_ALWAYS_INLINE;
madcowswe 0:feb4117d16d8 226
madcowswe 0:feb4117d16d8 227 #endif // defined(TVMET_HAVE_COMPLEX) && defined(TVMET_HAVE_COMPLEX_MATH1)
madcowswe 0:feb4117d16d8 228
madcowswe 0:feb4117d16d8 229 #if defined(TVMET_HAVE_COMPLEX) && defined(TVMET_HAVE_COMPLEX_MATH2)
madcowswe 0:feb4117d16d8 230 // to be written (atan2)
madcowswe 0:feb4117d16d8 231 #endif // defined(TVMET_HAVE_COMPLEX) && defined(TVMET_HAVE_COMPLEX_MATH2)
madcowswe 0:feb4117d16d8 232
madcowswe 0:feb4117d16d8 233
madcowswe 0:feb4117d16d8 234 /*********************************************************
madcowswe 0:feb4117d16d8 235 * PART II: IMPLEMENTATION
madcowswe 0:feb4117d16d8 236 *********************************************************/
madcowswe 0:feb4117d16d8 237
madcowswe 0:feb4117d16d8 238 /*
madcowswe 0:feb4117d16d8 239 * binary_function(Vector<T1, Sz>, Vector<T1, Sz>)
madcowswe 0:feb4117d16d8 240 * binary_function(Vector<T, Sz>, XprVector<E>)
madcowswe 0:feb4117d16d8 241 * binary_function(XprVector<E>, Vector<T, Sz>)
madcowswe 0:feb4117d16d8 242 */
madcowswe 0:feb4117d16d8 243 #define TVMET_IMPLEMENT_MACRO(NAME) \
madcowswe 0:feb4117d16d8 244 template<class T1, class T2, std::size_t Sz> \
madcowswe 0:feb4117d16d8 245 inline \
madcowswe 0:feb4117d16d8 246 XprVector< \
madcowswe 0:feb4117d16d8 247 XprBinOp< \
madcowswe 0:feb4117d16d8 248 Fcnl_##NAME<T1, T2>, \
madcowswe 0:feb4117d16d8 249 VectorConstReference<T1, Sz>, \
madcowswe 0:feb4117d16d8 250 VectorConstReference<T2, Sz> \
madcowswe 0:feb4117d16d8 251 >, \
madcowswe 0:feb4117d16d8 252 Sz \
madcowswe 0:feb4117d16d8 253 > \
madcowswe 0:feb4117d16d8 254 NAME(const Vector<T1, Sz>& lhs, const Vector<T2, Sz>& rhs) { \
madcowswe 0:feb4117d16d8 255 typedef XprBinOp < \
madcowswe 0:feb4117d16d8 256 Fcnl_##NAME<T1, T2>, \
madcowswe 0:feb4117d16d8 257 VectorConstReference<T1, Sz>, \
madcowswe 0:feb4117d16d8 258 VectorConstReference<T2, Sz> \
madcowswe 0:feb4117d16d8 259 > expr_type; \
madcowswe 0:feb4117d16d8 260 return XprVector<expr_type, Sz>( \
madcowswe 0:feb4117d16d8 261 expr_type(lhs.const_ref(), rhs.const_ref())); \
madcowswe 0:feb4117d16d8 262 } \
madcowswe 0:feb4117d16d8 263 \
madcowswe 0:feb4117d16d8 264 template<class E, class T, std::size_t Sz> \
madcowswe 0:feb4117d16d8 265 inline \
madcowswe 0:feb4117d16d8 266 XprVector< \
madcowswe 0:feb4117d16d8 267 XprBinOp< \
madcowswe 0:feb4117d16d8 268 Fcnl_##NAME<typename E::value_type, T>, \
madcowswe 0:feb4117d16d8 269 VectorConstReference<T, Sz>, \
madcowswe 0:feb4117d16d8 270 XprVector<E, Sz> \
madcowswe 0:feb4117d16d8 271 >, \
madcowswe 0:feb4117d16d8 272 Sz \
madcowswe 0:feb4117d16d8 273 > \
madcowswe 0:feb4117d16d8 274 NAME(const XprVector<E, Sz>& lhs, const Vector<T, Sz>& rhs) { \
madcowswe 0:feb4117d16d8 275 typedef XprBinOp< \
madcowswe 0:feb4117d16d8 276 Fcnl_##NAME<typename E::value_type, T>, \
madcowswe 0:feb4117d16d8 277 XprVector<E, Sz>, \
madcowswe 0:feb4117d16d8 278 VectorConstReference<T, Sz> \
madcowswe 0:feb4117d16d8 279 > expr_type; \
madcowswe 0:feb4117d16d8 280 return XprVector<expr_type, Sz>( \
madcowswe 0:feb4117d16d8 281 expr_type(lhs, rhs.const_ref())); \
madcowswe 0:feb4117d16d8 282 } \
madcowswe 0:feb4117d16d8 283 \
madcowswe 0:feb4117d16d8 284 template<class E, class T, std::size_t Sz> \
madcowswe 0:feb4117d16d8 285 inline \
madcowswe 0:feb4117d16d8 286 XprVector< \
madcowswe 0:feb4117d16d8 287 XprBinOp< \
madcowswe 0:feb4117d16d8 288 Fcnl_##NAME<T, typename E::value_type>, \
madcowswe 0:feb4117d16d8 289 VectorConstReference<T, Sz>, \
madcowswe 0:feb4117d16d8 290 XprVector<E, Sz> \
madcowswe 0:feb4117d16d8 291 >, \
madcowswe 0:feb4117d16d8 292 Sz \
madcowswe 0:feb4117d16d8 293 > \
madcowswe 0:feb4117d16d8 294 NAME(const Vector<T, Sz>& lhs, const XprVector<E, Sz>& rhs) { \
madcowswe 0:feb4117d16d8 295 typedef XprBinOp< \
madcowswe 0:feb4117d16d8 296 Fcnl_##NAME<T, typename E::value_type>, \
madcowswe 0:feb4117d16d8 297 VectorConstReference<T, Sz>, \
madcowswe 0:feb4117d16d8 298 XprVector<E, Sz> \
madcowswe 0:feb4117d16d8 299 > expr_type; \
madcowswe 0:feb4117d16d8 300 return XprVector<expr_type, Sz>( \
madcowswe 0:feb4117d16d8 301 expr_type(lhs.const_ref(), rhs)); \
madcowswe 0:feb4117d16d8 302 }
madcowswe 0:feb4117d16d8 303
madcowswe 0:feb4117d16d8 304 TVMET_IMPLEMENT_MACRO(atan2)
madcowswe 0:feb4117d16d8 305 TVMET_IMPLEMENT_MACRO(drem)
madcowswe 0:feb4117d16d8 306 TVMET_IMPLEMENT_MACRO(fmod)
madcowswe 0:feb4117d16d8 307 TVMET_IMPLEMENT_MACRO(hypot)
madcowswe 0:feb4117d16d8 308 TVMET_IMPLEMENT_MACRO(jn)
madcowswe 0:feb4117d16d8 309 TVMET_IMPLEMENT_MACRO(yn)
madcowswe 0:feb4117d16d8 310 TVMET_IMPLEMENT_MACRO(pow)
madcowswe 0:feb4117d16d8 311 #if defined(TVMET_HAVE_COMPLEX)
madcowswe 0:feb4117d16d8 312 TVMET_IMPLEMENT_MACRO(polar)
madcowswe 0:feb4117d16d8 313 #endif
madcowswe 0:feb4117d16d8 314
madcowswe 0:feb4117d16d8 315 #undef TVMET_IMPLEMENT_MACRO
madcowswe 0:feb4117d16d8 316
madcowswe 0:feb4117d16d8 317
madcowswe 0:feb4117d16d8 318 /*
madcowswe 0:feb4117d16d8 319 * binary_function(Vector<T, Sz>, POD)
madcowswe 0:feb4117d16d8 320 */
madcowswe 0:feb4117d16d8 321 #define TVMET_IMPLEMENT_MACRO(NAME, TP) \
madcowswe 0:feb4117d16d8 322 template<class T, std::size_t Sz> \
madcowswe 0:feb4117d16d8 323 inline \
madcowswe 0:feb4117d16d8 324 XprVector< \
madcowswe 0:feb4117d16d8 325 XprBinOp< \
madcowswe 0:feb4117d16d8 326 Fcnl_##NAME<T, TP >, \
madcowswe 0:feb4117d16d8 327 VectorConstReference<T, Sz>, \
madcowswe 0:feb4117d16d8 328 XprLiteral< TP > \
madcowswe 0:feb4117d16d8 329 >, \
madcowswe 0:feb4117d16d8 330 Sz \
madcowswe 0:feb4117d16d8 331 > \
madcowswe 0:feb4117d16d8 332 NAME(const Vector<T, Sz>& lhs, TP rhs) { \
madcowswe 0:feb4117d16d8 333 typedef XprBinOp< \
madcowswe 0:feb4117d16d8 334 Fcnl_##NAME<T, TP >, \
madcowswe 0:feb4117d16d8 335 VectorConstReference<T, Sz>, \
madcowswe 0:feb4117d16d8 336 XprLiteral< TP > \
madcowswe 0:feb4117d16d8 337 > expr_type; \
madcowswe 0:feb4117d16d8 338 return XprVector<expr_type, Sz>( \
madcowswe 0:feb4117d16d8 339 expr_type(lhs.const_ref(), XprLiteral< TP >(rhs))); \
madcowswe 0:feb4117d16d8 340 }
madcowswe 0:feb4117d16d8 341
madcowswe 0:feb4117d16d8 342 TVMET_IMPLEMENT_MACRO(atan2, int)
madcowswe 0:feb4117d16d8 343 TVMET_IMPLEMENT_MACRO(drem, int)
madcowswe 0:feb4117d16d8 344 TVMET_IMPLEMENT_MACRO(fmod, int)
madcowswe 0:feb4117d16d8 345 TVMET_IMPLEMENT_MACRO(hypot, int)
madcowswe 0:feb4117d16d8 346 TVMET_IMPLEMENT_MACRO(jn, int)
madcowswe 0:feb4117d16d8 347 TVMET_IMPLEMENT_MACRO(yn, int)
madcowswe 0:feb4117d16d8 348 TVMET_IMPLEMENT_MACRO(pow, int)
madcowswe 0:feb4117d16d8 349
madcowswe 0:feb4117d16d8 350 #if defined(TVMET_HAVE_LONG_LONG)
madcowswe 0:feb4117d16d8 351 TVMET_IMPLEMENT_MACRO(atan2, long long int)
madcowswe 0:feb4117d16d8 352 TVMET_IMPLEMENT_MACRO(drem, long long int)
madcowswe 0:feb4117d16d8 353 TVMET_IMPLEMENT_MACRO(fmod, long long int)
madcowswe 0:feb4117d16d8 354 TVMET_IMPLEMENT_MACRO(hypot, long long int)
madcowswe 0:feb4117d16d8 355 TVMET_IMPLEMENT_MACRO(jn, long long int)
madcowswe 0:feb4117d16d8 356 TVMET_IMPLEMENT_MACRO(yn, long long int)
madcowswe 0:feb4117d16d8 357 TVMET_IMPLEMENT_MACRO(pow, long long int)
madcowswe 0:feb4117d16d8 358 #endif // defined(TVMET_HAVE_LONG_LONG)
madcowswe 0:feb4117d16d8 359
madcowswe 0:feb4117d16d8 360 TVMET_IMPLEMENT_MACRO(atan2, float)
madcowswe 0:feb4117d16d8 361 TVMET_IMPLEMENT_MACRO(drem, float)
madcowswe 0:feb4117d16d8 362 TVMET_IMPLEMENT_MACRO(fmod, float)
madcowswe 0:feb4117d16d8 363 TVMET_IMPLEMENT_MACRO(hypot, float)
madcowswe 0:feb4117d16d8 364 TVMET_IMPLEMENT_MACRO(jn, float)
madcowswe 0:feb4117d16d8 365 TVMET_IMPLEMENT_MACRO(yn, float)
madcowswe 0:feb4117d16d8 366 TVMET_IMPLEMENT_MACRO(pow, float)
madcowswe 0:feb4117d16d8 367
madcowswe 0:feb4117d16d8 368 TVMET_IMPLEMENT_MACRO(atan2, double)
madcowswe 0:feb4117d16d8 369 TVMET_IMPLEMENT_MACRO(drem, double)
madcowswe 0:feb4117d16d8 370 TVMET_IMPLEMENT_MACRO(fmod, double)
madcowswe 0:feb4117d16d8 371 TVMET_IMPLEMENT_MACRO(hypot, double)
madcowswe 0:feb4117d16d8 372 TVMET_IMPLEMENT_MACRO(jn, double)
madcowswe 0:feb4117d16d8 373 TVMET_IMPLEMENT_MACRO(yn, double)
madcowswe 0:feb4117d16d8 374 TVMET_IMPLEMENT_MACRO(pow, double)
madcowswe 0:feb4117d16d8 375
madcowswe 0:feb4117d16d8 376 #if defined(TVMET_HAVE_LONG_DOUBLE)
madcowswe 0:feb4117d16d8 377 TVMET_IMPLEMENT_MACRO(atan2, long double)
madcowswe 0:feb4117d16d8 378 TVMET_IMPLEMENT_MACRO(drem, long double)
madcowswe 0:feb4117d16d8 379 TVMET_IMPLEMENT_MACRO(fmod, long double)
madcowswe 0:feb4117d16d8 380 TVMET_IMPLEMENT_MACRO(hypot, long double)
madcowswe 0:feb4117d16d8 381 TVMET_IMPLEMENT_MACRO(jn, long double)
madcowswe 0:feb4117d16d8 382 TVMET_IMPLEMENT_MACRO(yn, long double)
madcowswe 0:feb4117d16d8 383 TVMET_IMPLEMENT_MACRO(pow, long double)
madcowswe 0:feb4117d16d8 384 #endif // defined(TVMET_HAVE_LONG_DOUBLE)
madcowswe 0:feb4117d16d8 385
madcowswe 0:feb4117d16d8 386 #undef TVMET_IMPLEMENT_MACRO
madcowswe 0:feb4117d16d8 387
madcowswe 0:feb4117d16d8 388
madcowswe 0:feb4117d16d8 389 /*
madcowswe 0:feb4117d16d8 390 * complex support
madcowswe 0:feb4117d16d8 391 */
madcowswe 0:feb4117d16d8 392
madcowswe 0:feb4117d16d8 393 #if defined(TVMET_HAVE_COMPLEX) && defined(TVMET_HAVE_COMPLEX_MATH1)
madcowswe 0:feb4117d16d8 394 /**
madcowswe 0:feb4117d16d8 395 * \fn pow(const Vector<T, Sz>& lhs, const std::complex<T>& rhs)
madcowswe 0:feb4117d16d8 396 * \ingroup _binary_function
madcowswe 0:feb4117d16d8 397 */
madcowswe 0:feb4117d16d8 398 template<class T, std::size_t Sz>
madcowswe 0:feb4117d16d8 399 inline
madcowswe 0:feb4117d16d8 400 XprVector<
madcowswe 0:feb4117d16d8 401 XprBinOp<
madcowswe 0:feb4117d16d8 402 Fcnl_pow<T, std::complex<T> >,
madcowswe 0:feb4117d16d8 403 VectorConstReference<T, Sz>,
madcowswe 0:feb4117d16d8 404 XprLiteral< std::complex<T> >
madcowswe 0:feb4117d16d8 405 >,
madcowswe 0:feb4117d16d8 406 Sz
madcowswe 0:feb4117d16d8 407 >
madcowswe 0:feb4117d16d8 408 pow(const Vector<T, Sz>& lhs, const std::complex<T>& rhs) {
madcowswe 0:feb4117d16d8 409 typedef XprBinOp<
madcowswe 0:feb4117d16d8 410 Fcnl_pow<T, std::complex<T> >,
madcowswe 0:feb4117d16d8 411 VectorConstReference<T, Sz>,
madcowswe 0:feb4117d16d8 412 XprLiteral< std::complex<T> >
madcowswe 0:feb4117d16d8 413 > expr_type;
madcowswe 0:feb4117d16d8 414 return XprVector<expr_type, Sz>(
madcowswe 0:feb4117d16d8 415 expr_type(lhs.const_ref(), XprLiteral< std::complex<T> >(rhs)));
madcowswe 0:feb4117d16d8 416 }
madcowswe 0:feb4117d16d8 417
madcowswe 0:feb4117d16d8 418
madcowswe 0:feb4117d16d8 419 /**
madcowswe 0:feb4117d16d8 420 * \fn pow(const Vector<std::complex<T>, Sz>& lhs, const std::complex<T>& rhs)
madcowswe 0:feb4117d16d8 421 * \ingroup _binary_function
madcowswe 0:feb4117d16d8 422 */
madcowswe 0:feb4117d16d8 423 template<class T, std::size_t Sz>
madcowswe 0:feb4117d16d8 424 inline
madcowswe 0:feb4117d16d8 425 XprVector<
madcowswe 0:feb4117d16d8 426 XprBinOp<
madcowswe 0:feb4117d16d8 427 Fcnl_pow<std::complex<T>, std::complex<T> >,
madcowswe 0:feb4117d16d8 428 VectorConstReference<std::complex<T>, Sz>,
madcowswe 0:feb4117d16d8 429 XprLiteral< std::complex<T> >
madcowswe 0:feb4117d16d8 430 >,
madcowswe 0:feb4117d16d8 431 Sz
madcowswe 0:feb4117d16d8 432 >
madcowswe 0:feb4117d16d8 433 pow(const Vector<std::complex<T>, Sz>& lhs, const std::complex<T>& rhs) {
madcowswe 0:feb4117d16d8 434 typedef XprBinOp<
madcowswe 0:feb4117d16d8 435 Fcnl_pow<std::complex<T>, std::complex<T> >,
madcowswe 0:feb4117d16d8 436 VectorConstReference<std::complex<T>, Sz>,
madcowswe 0:feb4117d16d8 437 XprLiteral< std::complex<T> >
madcowswe 0:feb4117d16d8 438 > expr_type;
madcowswe 0:feb4117d16d8 439 return XprVector<expr_type, Sz>(
madcowswe 0:feb4117d16d8 440 expr_type(lhs.const_ref(), XprLiteral< std::complex<T> >(rhs)));
madcowswe 0:feb4117d16d8 441 }
madcowswe 0:feb4117d16d8 442
madcowswe 0:feb4117d16d8 443
madcowswe 0:feb4117d16d8 444 /**
madcowswe 0:feb4117d16d8 445 * \fn pow(const Vector<std::complex<T>, Sz>& lhs, const T& rhs)
madcowswe 0:feb4117d16d8 446 * \ingroup _binary_function
madcowswe 0:feb4117d16d8 447 */
madcowswe 0:feb4117d16d8 448 template<class T, std::size_t Sz>
madcowswe 0:feb4117d16d8 449 inline
madcowswe 0:feb4117d16d8 450 XprVector<
madcowswe 0:feb4117d16d8 451 XprBinOp<
madcowswe 0:feb4117d16d8 452 Fcnl_pow<std::complex<T>, T>,
madcowswe 0:feb4117d16d8 453 VectorConstReference<std::complex<T>, Sz>,
madcowswe 0:feb4117d16d8 454 XprLiteral<T>
madcowswe 0:feb4117d16d8 455 >,
madcowswe 0:feb4117d16d8 456 Sz
madcowswe 0:feb4117d16d8 457 >
madcowswe 0:feb4117d16d8 458 pow(const Vector<std::complex<T>, Sz>& lhs, const T& rhs) {
madcowswe 0:feb4117d16d8 459 typedef XprBinOp<
madcowswe 0:feb4117d16d8 460 Fcnl_pow<std::complex<T>, T>,
madcowswe 0:feb4117d16d8 461 VectorConstReference<std::complex<T>, Sz>,
madcowswe 0:feb4117d16d8 462 XprLiteral<T>
madcowswe 0:feb4117d16d8 463 > expr_type;
madcowswe 0:feb4117d16d8 464 return XprVector<expr_type, Sz>(
madcowswe 0:feb4117d16d8 465 expr_type(lhs.const_ref(), XprLiteral<T>(rhs)));
madcowswe 0:feb4117d16d8 466 }
madcowswe 0:feb4117d16d8 467
madcowswe 0:feb4117d16d8 468
madcowswe 0:feb4117d16d8 469 /**
madcowswe 0:feb4117d16d8 470 * \fn pow(const Vector<std::complex<T>, Sz>& lhs, int rhs)
madcowswe 0:feb4117d16d8 471 * \ingroup _binary_function
madcowswe 0:feb4117d16d8 472 */
madcowswe 0:feb4117d16d8 473 template<class T, std::size_t Sz>
madcowswe 0:feb4117d16d8 474 inline
madcowswe 0:feb4117d16d8 475 XprVector<
madcowswe 0:feb4117d16d8 476 XprBinOp<
madcowswe 0:feb4117d16d8 477 Fcnl_pow<std::complex<T>, int>,
madcowswe 0:feb4117d16d8 478 VectorConstReference<std::complex<T>, Sz>,
madcowswe 0:feb4117d16d8 479 XprLiteral<int>
madcowswe 0:feb4117d16d8 480 >,
madcowswe 0:feb4117d16d8 481 Sz
madcowswe 0:feb4117d16d8 482 >
madcowswe 0:feb4117d16d8 483 pow(const Vector<std::complex<T>, Sz>& lhs, int rhs) {
madcowswe 0:feb4117d16d8 484 typedef XprBinOp<
madcowswe 0:feb4117d16d8 485 Fcnl_pow<std::complex<T>, int>,
madcowswe 0:feb4117d16d8 486 VectorConstReference<std::complex<T>, Sz>,
madcowswe 0:feb4117d16d8 487 XprLiteral<int>
madcowswe 0:feb4117d16d8 488 > expr_type;
madcowswe 0:feb4117d16d8 489 return XprVector<expr_type, Sz>(
madcowswe 0:feb4117d16d8 490 expr_type(lhs.const_ref(), XprLiteral<int>(rhs)));
madcowswe 0:feb4117d16d8 491 }
madcowswe 0:feb4117d16d8 492
madcowswe 0:feb4117d16d8 493
madcowswe 0:feb4117d16d8 494 /**
madcowswe 0:feb4117d16d8 495 * \fn polar(const Vector<T, Sz>& lhs, const T& rhs)
madcowswe 0:feb4117d16d8 496 * \ingroup _binary_function
madcowswe 0:feb4117d16d8 497 */
madcowswe 0:feb4117d16d8 498 template<class T, std::size_t Sz>
madcowswe 0:feb4117d16d8 499 inline
madcowswe 0:feb4117d16d8 500 XprVector<
madcowswe 0:feb4117d16d8 501 XprBinOp<
madcowswe 0:feb4117d16d8 502 Fcnl_polar<T, T>,
madcowswe 0:feb4117d16d8 503 VectorConstReference<T, Sz>,
madcowswe 0:feb4117d16d8 504 XprLiteral<T>
madcowswe 0:feb4117d16d8 505 >,
madcowswe 0:feb4117d16d8 506 Sz
madcowswe 0:feb4117d16d8 507 >
madcowswe 0:feb4117d16d8 508 polar(const Vector<T, Sz>& lhs, const T& rhs) {
madcowswe 0:feb4117d16d8 509 typedef XprBinOp<
madcowswe 0:feb4117d16d8 510 Fcnl_polar<T, T>,
madcowswe 0:feb4117d16d8 511 VectorConstReference<T, Sz>,
madcowswe 0:feb4117d16d8 512 XprLiteral<T>
madcowswe 0:feb4117d16d8 513 > expr_type;
madcowswe 0:feb4117d16d8 514 return XprVector<expr_type, Sz>(
madcowswe 0:feb4117d16d8 515 expr_type(lhs.const_ref(), XprLiteral<T>(rhs)));
madcowswe 0:feb4117d16d8 516 }
madcowswe 0:feb4117d16d8 517 #endif // defined(TVMET_HAVE_COMPLEX) && defined(TVMET_HAVE_COMPLEX_MATH1)
madcowswe 0:feb4117d16d8 518
madcowswe 0:feb4117d16d8 519 #if defined(TVMET_HAVE_COMPLEX) && defined(TVMET_HAVE_COMPLEX_MATH2)
madcowswe 0:feb4117d16d8 520 // to be written (atan2)
madcowswe 0:feb4117d16d8 521 #endif // defined(TVMET_HAVE_COMPLEX) && defined(TVMET_HAVE_COMPLEX_MATH2)
madcowswe 0:feb4117d16d8 522
madcowswe 0:feb4117d16d8 523
madcowswe 0:feb4117d16d8 524 } // namespace tvmet
madcowswe 0:feb4117d16d8 525
madcowswe 0:feb4117d16d8 526 #endif // TVMET_VECTOR_BINARY_FUNCTIONS_H
madcowswe 0:feb4117d16d8 527
madcowswe 0:feb4117d16d8 528 // Local Variables:
madcowswe 0:feb4117d16d8 529 // mode:C++
madcowswe 0:feb4117d16d8 530 // tab-width:8
madcowswe 0:feb4117d16d8 531 // End: