Shuto Naruse / Mbed 2 deprecated Eurobot2012_Secondary

Eurobot2012_Secondary

Fork of Eurobot_2012_Secondary by Shuto Naruse

tvmet/xpr/MatrixBinaryFunctions.h@1:cc2a9eb0bd55, 2012-10-17 (annotated)

Committer:
narshu
Date:
Wed Oct 17 22:25:31 2012 +0000
Revision:
1:cc2a9eb0bd55
Commit before publishing

Who changed what in which revision?

UserRevisionLine numberNew contents of line
narshu 1:cc2a9eb0bd55 1 /*
narshu 1:cc2a9eb0bd55 2 * Tiny Vector Matrix Library
narshu 1:cc2a9eb0bd55 3 * Dense Vector Matrix Libary of Tiny size using Expression Templates
narshu 1:cc2a9eb0bd55 4 *
narshu 1:cc2a9eb0bd55 5 * Copyright (C) 2001 - 2007 Olaf Petzold <opetzold@users.sourceforge.net>
narshu 1:cc2a9eb0bd55 6 *
narshu 1:cc2a9eb0bd55 7 * This library is free software; you can redistribute it and/or
narshu 1:cc2a9eb0bd55 8 * modify it under the terms of the GNU lesser General Public
narshu 1:cc2a9eb0bd55 9 * License as published by the Free Software Foundation; either
narshu 1:cc2a9eb0bd55 10 * version 2.1 of the License, or (at your option) any later version.
narshu 1:cc2a9eb0bd55 11 *
narshu 1:cc2a9eb0bd55 12 * This library is distributed in the hope that it will be useful,
narshu 1:cc2a9eb0bd55 13 * but WITHOUT ANY WARRANTY; without even the implied warranty of
narshu 1:cc2a9eb0bd55 14 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
narshu 1:cc2a9eb0bd55 15 * lesser General Public License for more details.
narshu 1:cc2a9eb0bd55 16 *
narshu 1:cc2a9eb0bd55 17 * You should have received a copy of the GNU lesser General Public
narshu 1:cc2a9eb0bd55 18 * License along with this library; if not, write to the Free Software
narshu 1:cc2a9eb0bd55 19 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
narshu 1:cc2a9eb0bd55 20 *
narshu 1:cc2a9eb0bd55 21 * $Id: MatrixBinaryFunctions.h,v 1.12 2007-06-23 15:59:00 opetzold Exp $
narshu 1:cc2a9eb0bd55 22 */
narshu 1:cc2a9eb0bd55 23
narshu 1:cc2a9eb0bd55 24 #ifndef TVMET_XPR_MATRIX_BINARY_FUNCTIONS_H
narshu 1:cc2a9eb0bd55 25 #define TVMET_XPR_MATRIX_BINARY_FUNCTIONS_H
narshu 1:cc2a9eb0bd55 26
narshu 1:cc2a9eb0bd55 27 namespace tvmet {
narshu 1:cc2a9eb0bd55 28
narshu 1:cc2a9eb0bd55 29
narshu 1:cc2a9eb0bd55 30 /*********************************************************
narshu 1:cc2a9eb0bd55 31 * PART I: DECLARATION
narshu 1:cc2a9eb0bd55 32 *********************************************************/
narshu 1:cc2a9eb0bd55 33
narshu 1:cc2a9eb0bd55 34 /*
narshu 1:cc2a9eb0bd55 35 * binary_function(XprMatrix<E1, Rows, Cols>, XprMatrix<E2, Rows, Cols>)
narshu 1:cc2a9eb0bd55 36 */
narshu 1:cc2a9eb0bd55 37 #define TVMET_DECLARE_MACRO(NAME) \
narshu 1:cc2a9eb0bd55 38 template<class E1, std::size_t Rows, std::size_t Cols, class E2> \
narshu 1:cc2a9eb0bd55 39 XprMatrix< \
narshu 1:cc2a9eb0bd55 40 XprBinOp< \
narshu 1:cc2a9eb0bd55 41 Fcnl_##NAME<typename E1::value_type, typename E2::value_type>, \
narshu 1:cc2a9eb0bd55 42 XprMatrix<E1, Rows, Cols>, \
narshu 1:cc2a9eb0bd55 43 XprMatrix<E2, Rows, Cols> \
narshu 1:cc2a9eb0bd55 44 >, \
narshu 1:cc2a9eb0bd55 45 Rows, Cols \
narshu 1:cc2a9eb0bd55 46 > \
narshu 1:cc2a9eb0bd55 47 NAME(const XprMatrix<E1, Rows, Cols>& lhs, \
narshu 1:cc2a9eb0bd55 48 const XprMatrix<E2, Rows, Cols>& rhs) TVMET_CXX_ALWAYS_INLINE;
narshu 1:cc2a9eb0bd55 49
narshu 1:cc2a9eb0bd55 50 TVMET_DECLARE_MACRO(atan2)
narshu 1:cc2a9eb0bd55 51 TVMET_DECLARE_MACRO(drem)
narshu 1:cc2a9eb0bd55 52 TVMET_DECLARE_MACRO(fmod)
narshu 1:cc2a9eb0bd55 53 TVMET_DECLARE_MACRO(hypot)
narshu 1:cc2a9eb0bd55 54 TVMET_DECLARE_MACRO(jn)
narshu 1:cc2a9eb0bd55 55 TVMET_DECLARE_MACRO(yn)
narshu 1:cc2a9eb0bd55 56 TVMET_DECLARE_MACRO(pow)
narshu 1:cc2a9eb0bd55 57 #if defined(TVMET_HAVE_COMPLEX)
narshu 1:cc2a9eb0bd55 58 //TVMET_DECLARE_MACRO(polar)
narshu 1:cc2a9eb0bd55 59 #endif
narshu 1:cc2a9eb0bd55 60
narshu 1:cc2a9eb0bd55 61 #undef TVMET_DECLARE_MACRO
narshu 1:cc2a9eb0bd55 62
narshu 1:cc2a9eb0bd55 63
narshu 1:cc2a9eb0bd55 64 /*
narshu 1:cc2a9eb0bd55 65 * binary_function(XprMatrix<E, Rows, Cols>, POD)
narshu 1:cc2a9eb0bd55 66 */
narshu 1:cc2a9eb0bd55 67 #define TVMET_DECLARE_MACRO(NAME, TP) \
narshu 1:cc2a9eb0bd55 68 template<class E, std::size_t Rows, std::size_t Cols> \
narshu 1:cc2a9eb0bd55 69 XprMatrix< \
narshu 1:cc2a9eb0bd55 70 XprBinOp< \
narshu 1:cc2a9eb0bd55 71 Fcnl_##NAME<typename E::value_type, TP >, \
narshu 1:cc2a9eb0bd55 72 XprMatrix<E, Rows, Cols>, \
narshu 1:cc2a9eb0bd55 73 XprLiteral< TP > \
narshu 1:cc2a9eb0bd55 74 >, \
narshu 1:cc2a9eb0bd55 75 Rows, Cols \
narshu 1:cc2a9eb0bd55 76 > \
narshu 1:cc2a9eb0bd55 77 NAME(const XprMatrix<E, Rows, Cols>& lhs, \
narshu 1:cc2a9eb0bd55 78 TP rhs) TVMET_CXX_ALWAYS_INLINE;
narshu 1:cc2a9eb0bd55 79
narshu 1:cc2a9eb0bd55 80 TVMET_DECLARE_MACRO(atan2, int)
narshu 1:cc2a9eb0bd55 81 TVMET_DECLARE_MACRO(drem, int)
narshu 1:cc2a9eb0bd55 82 TVMET_DECLARE_MACRO(fmod, int)
narshu 1:cc2a9eb0bd55 83 TVMET_DECLARE_MACRO(hypot, int)
narshu 1:cc2a9eb0bd55 84 TVMET_DECLARE_MACRO(jn, int)
narshu 1:cc2a9eb0bd55 85 TVMET_DECLARE_MACRO(yn, int)
narshu 1:cc2a9eb0bd55 86 TVMET_DECLARE_MACRO(pow, int)
narshu 1:cc2a9eb0bd55 87
narshu 1:cc2a9eb0bd55 88 #if defined(TVMET_HAVE_LONG_LONG)
narshu 1:cc2a9eb0bd55 89 TVMET_DECLARE_MACRO(atan2, long long int)
narshu 1:cc2a9eb0bd55 90 TVMET_DECLARE_MACRO(drem, long long int)
narshu 1:cc2a9eb0bd55 91 TVMET_DECLARE_MACRO(fmod, long long int)
narshu 1:cc2a9eb0bd55 92 TVMET_DECLARE_MACRO(hypot, long long int)
narshu 1:cc2a9eb0bd55 93 TVMET_DECLARE_MACRO(jn, long long int)
narshu 1:cc2a9eb0bd55 94 TVMET_DECLARE_MACRO(yn,long long int)
narshu 1:cc2a9eb0bd55 95 TVMET_DECLARE_MACRO(pow, long long int)
narshu 1:cc2a9eb0bd55 96 #endif // defined(TVMET_HAVE_LONG_LONG)
narshu 1:cc2a9eb0bd55 97
narshu 1:cc2a9eb0bd55 98 TVMET_DECLARE_MACRO(atan2, float)
narshu 1:cc2a9eb0bd55 99 TVMET_DECLARE_MACRO(drem, float)
narshu 1:cc2a9eb0bd55 100 TVMET_DECLARE_MACRO(fmod, float)
narshu 1:cc2a9eb0bd55 101 TVMET_DECLARE_MACRO(hypot, float)
narshu 1:cc2a9eb0bd55 102 TVMET_DECLARE_MACRO(jn, float)
narshu 1:cc2a9eb0bd55 103 TVMET_DECLARE_MACRO(yn, float)
narshu 1:cc2a9eb0bd55 104 TVMET_DECLARE_MACRO(pow, float)
narshu 1:cc2a9eb0bd55 105
narshu 1:cc2a9eb0bd55 106 TVMET_DECLARE_MACRO(atan2, double)
narshu 1:cc2a9eb0bd55 107 TVMET_DECLARE_MACRO(drem, double)
narshu 1:cc2a9eb0bd55 108 TVMET_DECLARE_MACRO(fmod, double)
narshu 1:cc2a9eb0bd55 109 TVMET_DECLARE_MACRO(hypot,double)
narshu 1:cc2a9eb0bd55 110 TVMET_DECLARE_MACRO(jn, double)
narshu 1:cc2a9eb0bd55 111 TVMET_DECLARE_MACRO(yn, double)
narshu 1:cc2a9eb0bd55 112 TVMET_DECLARE_MACRO(pow, double)
narshu 1:cc2a9eb0bd55 113
narshu 1:cc2a9eb0bd55 114 #if defined(TVMET_HAVE_LONG_DOUBLE)
narshu 1:cc2a9eb0bd55 115 TVMET_DECLARE_MACRO(atan2, long double)
narshu 1:cc2a9eb0bd55 116 TVMET_DECLARE_MACRO(drem, long double)
narshu 1:cc2a9eb0bd55 117 TVMET_DECLARE_MACRO(fmod, long double)
narshu 1:cc2a9eb0bd55 118 TVMET_DECLARE_MACRO(hypot, long double)
narshu 1:cc2a9eb0bd55 119 TVMET_DECLARE_MACRO(jn, long double)
narshu 1:cc2a9eb0bd55 120 TVMET_DECLARE_MACRO(yn, long double)
narshu 1:cc2a9eb0bd55 121 TVMET_DECLARE_MACRO(pow, long double)
narshu 1:cc2a9eb0bd55 122 #endif // defined(TVMET_HAVE_LONG_DOUBLE)
narshu 1:cc2a9eb0bd55 123
narshu 1:cc2a9eb0bd55 124 #undef TVMET_DECLARE_MACRO
narshu 1:cc2a9eb0bd55 125
narshu 1:cc2a9eb0bd55 126
narshu 1:cc2a9eb0bd55 127 #if defined(TVMET_HAVE_COMPLEX)
narshu 1:cc2a9eb0bd55 128 /*
narshu 1:cc2a9eb0bd55 129 * binary_function(XprMatrix<E, Rows, Cols>, std::complex<>)
narshu 1:cc2a9eb0bd55 130 */
narshu 1:cc2a9eb0bd55 131 #define TVMET_DECLARE_MACRO(NAME) \
narshu 1:cc2a9eb0bd55 132 template<class E, std::size_t Rows, std::size_t Cols, class T> \
narshu 1:cc2a9eb0bd55 133 XprMatrix< \
narshu 1:cc2a9eb0bd55 134 XprBinOp< \
narshu 1:cc2a9eb0bd55 135 Fcnl_##NAME<typename E::value_type, std::complex<T> >, \
narshu 1:cc2a9eb0bd55 136 XprMatrix<E, Rows, Cols>, \
narshu 1:cc2a9eb0bd55 137 XprLiteral< std::complex<T> > \
narshu 1:cc2a9eb0bd55 138 >, \
narshu 1:cc2a9eb0bd55 139 Rows, Cols \
narshu 1:cc2a9eb0bd55 140 > \
narshu 1:cc2a9eb0bd55 141 NAME(const XprMatrix<E, Rows, Cols>& lhs, \
narshu 1:cc2a9eb0bd55 142 const std::complex<T>& rhs) TVMET_CXX_ALWAYS_INLINE;
narshu 1:cc2a9eb0bd55 143
narshu 1:cc2a9eb0bd55 144 TVMET_DECLARE_MACRO(pow)
narshu 1:cc2a9eb0bd55 145
narshu 1:cc2a9eb0bd55 146 TVMET_DECLARE_MACRO(atan2)
narshu 1:cc2a9eb0bd55 147 TVMET_DECLARE_MACRO(drem)
narshu 1:cc2a9eb0bd55 148 TVMET_DECLARE_MACRO(fmod)
narshu 1:cc2a9eb0bd55 149 TVMET_DECLARE_MACRO(hypot)
narshu 1:cc2a9eb0bd55 150 TVMET_DECLARE_MACRO(jn)
narshu 1:cc2a9eb0bd55 151 TVMET_DECLARE_MACRO(yn)
narshu 1:cc2a9eb0bd55 152
narshu 1:cc2a9eb0bd55 153 #undef TVMET_DECLARE_MACRO
narshu 1:cc2a9eb0bd55 154
narshu 1:cc2a9eb0bd55 155 #endif // defined(TVMET_HAVE_COMPLEX)
narshu 1:cc2a9eb0bd55 156
narshu 1:cc2a9eb0bd55 157
narshu 1:cc2a9eb0bd55 158 /*********************************************************
narshu 1:cc2a9eb0bd55 159 * PART II: IMPLEMENTATION
narshu 1:cc2a9eb0bd55 160 *********************************************************/
narshu 1:cc2a9eb0bd55 161
narshu 1:cc2a9eb0bd55 162
narshu 1:cc2a9eb0bd55 163 /*
narshu 1:cc2a9eb0bd55 164 * binary_function(XprMatrix<E1, Rows, Cols>, XprMatrix<E2, Rows, Cols>)
narshu 1:cc2a9eb0bd55 165 */
narshu 1:cc2a9eb0bd55 166 #define TVMET_IMPLEMENT_MACRO(NAME) \
narshu 1:cc2a9eb0bd55 167 template<class E1, std::size_t Rows, std::size_t Cols, class E2> \
narshu 1:cc2a9eb0bd55 168 inline \
narshu 1:cc2a9eb0bd55 169 XprMatrix< \
narshu 1:cc2a9eb0bd55 170 XprBinOp< \
narshu 1:cc2a9eb0bd55 171 Fcnl_##NAME<typename E1::value_type, typename E2::value_type>, \
narshu 1:cc2a9eb0bd55 172 XprMatrix<E1, Rows, Cols>, \
narshu 1:cc2a9eb0bd55 173 XprMatrix<E2, Rows, Cols> \
narshu 1:cc2a9eb0bd55 174 >, \
narshu 1:cc2a9eb0bd55 175 Rows, Cols \
narshu 1:cc2a9eb0bd55 176 > \
narshu 1:cc2a9eb0bd55 177 NAME(const XprMatrix<E1, Rows, Cols>& lhs, const XprMatrix<E2, Rows, Cols>& rhs) { \
narshu 1:cc2a9eb0bd55 178 typedef XprBinOp< \
narshu 1:cc2a9eb0bd55 179 Fcnl_##NAME<typename E1::value_type, typename E2::value_type>, \
narshu 1:cc2a9eb0bd55 180 XprMatrix<E1, Rows, Cols>, \
narshu 1:cc2a9eb0bd55 181 XprMatrix<E2, Rows, Cols> \
narshu 1:cc2a9eb0bd55 182 > expr_type; \
narshu 1:cc2a9eb0bd55 183 return XprMatrix<expr_type, Rows, Cols>( \
narshu 1:cc2a9eb0bd55 184 expr_type(lhs, rhs)); \
narshu 1:cc2a9eb0bd55 185 }
narshu 1:cc2a9eb0bd55 186
narshu 1:cc2a9eb0bd55 187 TVMET_IMPLEMENT_MACRO(atan2)
narshu 1:cc2a9eb0bd55 188 TVMET_IMPLEMENT_MACRO(drem)
narshu 1:cc2a9eb0bd55 189 TVMET_IMPLEMENT_MACRO(fmod)
narshu 1:cc2a9eb0bd55 190 TVMET_IMPLEMENT_MACRO(hypot)
narshu 1:cc2a9eb0bd55 191 TVMET_IMPLEMENT_MACRO(jn)
narshu 1:cc2a9eb0bd55 192 TVMET_IMPLEMENT_MACRO(yn)
narshu 1:cc2a9eb0bd55 193 TVMET_IMPLEMENT_MACRO(pow)
narshu 1:cc2a9eb0bd55 194 #if defined(TVMET_HAVE_COMPLEX)
narshu 1:cc2a9eb0bd55 195 //TVMET_IMPLEMENT_MACRO(polar)
narshu 1:cc2a9eb0bd55 196 #endif
narshu 1:cc2a9eb0bd55 197
narshu 1:cc2a9eb0bd55 198 #undef TVMET_IMPLEMENT_MACRO
narshu 1:cc2a9eb0bd55 199
narshu 1:cc2a9eb0bd55 200
narshu 1:cc2a9eb0bd55 201 /*
narshu 1:cc2a9eb0bd55 202 * binary_function(XprMatrix<E, Rows, Cols>, POD)
narshu 1:cc2a9eb0bd55 203 */
narshu 1:cc2a9eb0bd55 204 #define TVMET_IMPLEMENT_MACRO(NAME, TP) \
narshu 1:cc2a9eb0bd55 205 template<class E, std::size_t Rows, std::size_t Cols> \
narshu 1:cc2a9eb0bd55 206 inline \
narshu 1:cc2a9eb0bd55 207 XprMatrix< \
narshu 1:cc2a9eb0bd55 208 XprBinOp< \
narshu 1:cc2a9eb0bd55 209 Fcnl_##NAME<typename E::value_type, TP >, \
narshu 1:cc2a9eb0bd55 210 XprMatrix<E, Rows, Cols>, \
narshu 1:cc2a9eb0bd55 211 XprLiteral< TP > \
narshu 1:cc2a9eb0bd55 212 >, \
narshu 1:cc2a9eb0bd55 213 Rows, Cols \
narshu 1:cc2a9eb0bd55 214 > \
narshu 1:cc2a9eb0bd55 215 NAME(const XprMatrix<E, Rows, Cols>& lhs, TP rhs) { \
narshu 1:cc2a9eb0bd55 216 typedef XprBinOp< \
narshu 1:cc2a9eb0bd55 217 Fcnl_##NAME<typename E::value_type, TP >, \
narshu 1:cc2a9eb0bd55 218 XprMatrix<E, Rows, Cols>, \
narshu 1:cc2a9eb0bd55 219 XprLiteral< TP > \
narshu 1:cc2a9eb0bd55 220 > expr_type; \
narshu 1:cc2a9eb0bd55 221 return XprMatrix<expr_type, Rows, Cols>( \
narshu 1:cc2a9eb0bd55 222 expr_type(lhs, XprLiteral< TP >(rhs))); \
narshu 1:cc2a9eb0bd55 223 }
narshu 1:cc2a9eb0bd55 224
narshu 1:cc2a9eb0bd55 225 TVMET_IMPLEMENT_MACRO(atan2, int)
narshu 1:cc2a9eb0bd55 226 TVMET_IMPLEMENT_MACRO(drem, int)
narshu 1:cc2a9eb0bd55 227 TVMET_IMPLEMENT_MACRO(fmod, int)
narshu 1:cc2a9eb0bd55 228 TVMET_IMPLEMENT_MACRO(hypot, int)
narshu 1:cc2a9eb0bd55 229 TVMET_IMPLEMENT_MACRO(jn, int)
narshu 1:cc2a9eb0bd55 230 TVMET_IMPLEMENT_MACRO(yn, int)
narshu 1:cc2a9eb0bd55 231 TVMET_IMPLEMENT_MACRO(pow, int)
narshu 1:cc2a9eb0bd55 232
narshu 1:cc2a9eb0bd55 233 #if defined(TVMET_HAVE_LONG_LONG)
narshu 1:cc2a9eb0bd55 234 TVMET_IMPLEMENT_MACRO(atan2, long long int)
narshu 1:cc2a9eb0bd55 235 TVMET_IMPLEMENT_MACRO(drem, long long int)
narshu 1:cc2a9eb0bd55 236 TVMET_IMPLEMENT_MACRO(fmod, long long int)
narshu 1:cc2a9eb0bd55 237 TVMET_IMPLEMENT_MACRO(hypot, long long int)
narshu 1:cc2a9eb0bd55 238 TVMET_IMPLEMENT_MACRO(jn, long long int)
narshu 1:cc2a9eb0bd55 239 TVMET_IMPLEMENT_MACRO(yn,long long int)
narshu 1:cc2a9eb0bd55 240 TVMET_IMPLEMENT_MACRO(pow, long long int)
narshu 1:cc2a9eb0bd55 241 #endif // defined(TVMET_HAVE_LONG_LONG)
narshu 1:cc2a9eb0bd55 242
narshu 1:cc2a9eb0bd55 243 TVMET_IMPLEMENT_MACRO(atan2, float)
narshu 1:cc2a9eb0bd55 244 TVMET_IMPLEMENT_MACRO(drem, float)
narshu 1:cc2a9eb0bd55 245 TVMET_IMPLEMENT_MACRO(fmod, float)
narshu 1:cc2a9eb0bd55 246 TVMET_IMPLEMENT_MACRO(hypot, float)
narshu 1:cc2a9eb0bd55 247 TVMET_IMPLEMENT_MACRO(jn, float)
narshu 1:cc2a9eb0bd55 248 TVMET_IMPLEMENT_MACRO(yn, float)
narshu 1:cc2a9eb0bd55 249 TVMET_IMPLEMENT_MACRO(pow, float)
narshu 1:cc2a9eb0bd55 250
narshu 1:cc2a9eb0bd55 251 TVMET_IMPLEMENT_MACRO(atan2, double)
narshu 1:cc2a9eb0bd55 252 TVMET_IMPLEMENT_MACRO(drem, double)
narshu 1:cc2a9eb0bd55 253 TVMET_IMPLEMENT_MACRO(fmod, double)
narshu 1:cc2a9eb0bd55 254 TVMET_IMPLEMENT_MACRO(hypot,double)
narshu 1:cc2a9eb0bd55 255 TVMET_IMPLEMENT_MACRO(jn, double)
narshu 1:cc2a9eb0bd55 256 TVMET_IMPLEMENT_MACRO(yn, double)
narshu 1:cc2a9eb0bd55 257 TVMET_IMPLEMENT_MACRO(pow, double)
narshu 1:cc2a9eb0bd55 258
narshu 1:cc2a9eb0bd55 259 #if defined(TVMET_HAVE_LONG_DOUBLE)
narshu 1:cc2a9eb0bd55 260 TVMET_IMPLEMENT_MACRO(atan2, long double)
narshu 1:cc2a9eb0bd55 261 TVMET_IMPLEMENT_MACRO(drem, long double)
narshu 1:cc2a9eb0bd55 262 TVMET_IMPLEMENT_MACRO(fmod, long double)
narshu 1:cc2a9eb0bd55 263 TVMET_IMPLEMENT_MACRO(hypot, long double)
narshu 1:cc2a9eb0bd55 264 TVMET_IMPLEMENT_MACRO(jn, long double)
narshu 1:cc2a9eb0bd55 265 TVMET_IMPLEMENT_MACRO(yn, long double)
narshu 1:cc2a9eb0bd55 266 TVMET_IMPLEMENT_MACRO(pow, long double)
narshu 1:cc2a9eb0bd55 267 #endif // defined(TVMET_HAVE_LONG_DOUBLE)
narshu 1:cc2a9eb0bd55 268
narshu 1:cc2a9eb0bd55 269 #undef TVMET_IMPLEMENT_MACRO
narshu 1:cc2a9eb0bd55 270
narshu 1:cc2a9eb0bd55 271
narshu 1:cc2a9eb0bd55 272 #if defined(TVMET_HAVE_COMPLEX)
narshu 1:cc2a9eb0bd55 273 /*
narshu 1:cc2a9eb0bd55 274 * binary_function(XprMatrix<E, Rows, Cols>, std::complex<>)
narshu 1:cc2a9eb0bd55 275 */
narshu 1:cc2a9eb0bd55 276 #define TVMET_IMPLEMENT_MACRO(NAME) \
narshu 1:cc2a9eb0bd55 277 template<class E, std::size_t Rows, std::size_t Cols, class T> \
narshu 1:cc2a9eb0bd55 278 inline \
narshu 1:cc2a9eb0bd55 279 XprMatrix< \
narshu 1:cc2a9eb0bd55 280 XprBinOp< \
narshu 1:cc2a9eb0bd55 281 Fcnl_##NAME<typename E::value_type, std::complex<T> >, \
narshu 1:cc2a9eb0bd55 282 XprMatrix<E, Rows, Cols>, \
narshu 1:cc2a9eb0bd55 283 XprLiteral< std::complex<T> > \
narshu 1:cc2a9eb0bd55 284 >, \
narshu 1:cc2a9eb0bd55 285 Rows, Cols \
narshu 1:cc2a9eb0bd55 286 > \
narshu 1:cc2a9eb0bd55 287 NAME(const XprMatrix<E, Rows, Cols>& lhs, const std::complex<T>& rhs) { \
narshu 1:cc2a9eb0bd55 288 typedef XprBinOp< \
narshu 1:cc2a9eb0bd55 289 Fcnl_##NAME<typename E::value_type, std::complex<T> >, \
narshu 1:cc2a9eb0bd55 290 XprMatrix<E, Rows, Cols>, \
narshu 1:cc2a9eb0bd55 291 XprLiteral< std::complex<T> > \
narshu 1:cc2a9eb0bd55 292 > expr_type; \
narshu 1:cc2a9eb0bd55 293 return XprMatrix<expr_type, Rows, Cols>( \
narshu 1:cc2a9eb0bd55 294 expr_type(lhs, XprLiteral< std::complex<T> >(rhs))); \
narshu 1:cc2a9eb0bd55 295 }
narshu 1:cc2a9eb0bd55 296
narshu 1:cc2a9eb0bd55 297 TVMET_IMPLEMENT_MACRO(pow)
narshu 1:cc2a9eb0bd55 298
narshu 1:cc2a9eb0bd55 299 TVMET_IMPLEMENT_MACRO(atan2)
narshu 1:cc2a9eb0bd55 300 TVMET_IMPLEMENT_MACRO(drem)
narshu 1:cc2a9eb0bd55 301 TVMET_IMPLEMENT_MACRO(fmod)
narshu 1:cc2a9eb0bd55 302 TVMET_IMPLEMENT_MACRO(hypot)
narshu 1:cc2a9eb0bd55 303 TVMET_IMPLEMENT_MACRO(jn)
narshu 1:cc2a9eb0bd55 304 TVMET_IMPLEMENT_MACRO(yn)
narshu 1:cc2a9eb0bd55 305
narshu 1:cc2a9eb0bd55 306 #undef TVMET_IMPLEMENT_MACRO
narshu 1:cc2a9eb0bd55 307
narshu 1:cc2a9eb0bd55 308 #endif // defined(TVMET_HAVE_COMPLEX)
narshu 1:cc2a9eb0bd55 309
narshu 1:cc2a9eb0bd55 310
narshu 1:cc2a9eb0bd55 311 } // namespace tvmet
narshu 1:cc2a9eb0bd55 312
narshu 1:cc2a9eb0bd55 313 #endif // TVMET_XPR_MATRIX_BINARY_FUNCTIONS_H
narshu 1:cc2a9eb0bd55 314
narshu 1:cc2a9eb0bd55 315 // Local Variables:
narshu 1:cc2a9eb0bd55 316 // mode:C++
narshu 1:cc2a9eb0bd55 317 // tab-width:8
narshu 1:cc2a9eb0bd55 318 // End: