Shuto Naruse / Mbed 2 deprecated Eurobot2012_Secondary

Eurobot2012_Secondary

Fork of Eurobot_2012_Secondary by Shuto Naruse

tvmet/xpr/VectorBinaryFunctions.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: VectorBinaryFunctions.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_VECTOR_BINARY_FUNCTIONS_H
narshu 1:cc2a9eb0bd55 25 #define TVMET_XPR_VECTOR_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 /*
narshu 1:cc2a9eb0bd55 36 * binary_function(XprVector<E1, Sz>, XprVector<E2, Sz>)
narshu 1:cc2a9eb0bd55 37 */
narshu 1:cc2a9eb0bd55 38 #define TVMET_DECLARE_MACRO(NAME) \
narshu 1:cc2a9eb0bd55 39 template<class E1, class E2, std::size_t Sz> \
narshu 1:cc2a9eb0bd55 40 inline \
narshu 1:cc2a9eb0bd55 41 XprVector< \
narshu 1:cc2a9eb0bd55 42 XprBinOp< \
narshu 1:cc2a9eb0bd55 43 Fcnl_##NAME<typename E1::value_type, typename E2::value_type>, \
narshu 1:cc2a9eb0bd55 44 XprVector<E1, Sz>, \
narshu 1:cc2a9eb0bd55 45 XprVector<E2, Sz> \
narshu 1:cc2a9eb0bd55 46 >, \
narshu 1:cc2a9eb0bd55 47 Sz \
narshu 1:cc2a9eb0bd55 48 > \
narshu 1:cc2a9eb0bd55 49 NAME(const XprVector<E1, Sz>& lhs, \
narshu 1:cc2a9eb0bd55 50 const XprVector<E2, Sz>& rhs) TVMET_CXX_ALWAYS_INLINE;
narshu 1:cc2a9eb0bd55 51
narshu 1:cc2a9eb0bd55 52 TVMET_DECLARE_MACRO(atan2)
narshu 1:cc2a9eb0bd55 53 TVMET_DECLARE_MACRO(drem)
narshu 1:cc2a9eb0bd55 54 TVMET_DECLARE_MACRO(fmod)
narshu 1:cc2a9eb0bd55 55 TVMET_DECLARE_MACRO(hypot)
narshu 1:cc2a9eb0bd55 56 TVMET_DECLARE_MACRO(jn)
narshu 1:cc2a9eb0bd55 57 TVMET_DECLARE_MACRO(yn)
narshu 1:cc2a9eb0bd55 58 TVMET_DECLARE_MACRO(pow)
narshu 1:cc2a9eb0bd55 59 #if defined(TVMET_HAVE_COMPLEX)
narshu 1:cc2a9eb0bd55 60 TVMET_DECLARE_MACRO(polar)
narshu 1:cc2a9eb0bd55 61 #endif
narshu 1:cc2a9eb0bd55 62
narshu 1:cc2a9eb0bd55 63 #undef TVMET_DECLARE_MACRO
narshu 1:cc2a9eb0bd55 64
narshu 1:cc2a9eb0bd55 65
narshu 1:cc2a9eb0bd55 66 /*
narshu 1:cc2a9eb0bd55 67 * binary_function(XprVector<E, Sz>, POD)
narshu 1:cc2a9eb0bd55 68 */
narshu 1:cc2a9eb0bd55 69 #define TVMET_DECLARE_MACRO(NAME, TP) \
narshu 1:cc2a9eb0bd55 70 template<class E, std::size_t Sz> \
narshu 1:cc2a9eb0bd55 71 inline \
narshu 1:cc2a9eb0bd55 72 XprVector< \
narshu 1:cc2a9eb0bd55 73 XprBinOp< \
narshu 1:cc2a9eb0bd55 74 Fcnl_##NAME<typename E::value_type, TP >, \
narshu 1:cc2a9eb0bd55 75 XprVector<E, Sz>, \
narshu 1:cc2a9eb0bd55 76 XprLiteral< TP > \
narshu 1:cc2a9eb0bd55 77 >, \
narshu 1:cc2a9eb0bd55 78 Sz \
narshu 1:cc2a9eb0bd55 79 > \
narshu 1:cc2a9eb0bd55 80 NAME(const XprVector<E, Sz>& lhs, \
narshu 1:cc2a9eb0bd55 81 TP rhs) TVMET_CXX_ALWAYS_INLINE;
narshu 1:cc2a9eb0bd55 82
narshu 1:cc2a9eb0bd55 83 TVMET_DECLARE_MACRO(atan2, int)
narshu 1:cc2a9eb0bd55 84 TVMET_DECLARE_MACRO(drem, int)
narshu 1:cc2a9eb0bd55 85 TVMET_DECLARE_MACRO(fmod, int)
narshu 1:cc2a9eb0bd55 86 TVMET_DECLARE_MACRO(hypot, int)
narshu 1:cc2a9eb0bd55 87 TVMET_DECLARE_MACRO(jn, int)
narshu 1:cc2a9eb0bd55 88 TVMET_DECLARE_MACRO(yn, int)
narshu 1:cc2a9eb0bd55 89 TVMET_DECLARE_MACRO(pow, int)
narshu 1:cc2a9eb0bd55 90
narshu 1:cc2a9eb0bd55 91 #if defined(TVMET_HAVE_LONG_LONG)
narshu 1:cc2a9eb0bd55 92 TVMET_DECLARE_MACRO(atan2, long long int)
narshu 1:cc2a9eb0bd55 93 TVMET_DECLARE_MACRO(drem, long long int)
narshu 1:cc2a9eb0bd55 94 TVMET_DECLARE_MACRO(fmod, long long int)
narshu 1:cc2a9eb0bd55 95 TVMET_DECLARE_MACRO(hypot, long long int)
narshu 1:cc2a9eb0bd55 96 TVMET_DECLARE_MACRO(jn, long long int)
narshu 1:cc2a9eb0bd55 97 TVMET_DECLARE_MACRO(yn, long long int)
narshu 1:cc2a9eb0bd55 98 TVMET_DECLARE_MACRO(pow, long long int)
narshu 1:cc2a9eb0bd55 99 #endif // defined(TVMET_HAVE_LONG_LONG)
narshu 1:cc2a9eb0bd55 100
narshu 1:cc2a9eb0bd55 101 TVMET_DECLARE_MACRO(atan2, float)
narshu 1:cc2a9eb0bd55 102 TVMET_DECLARE_MACRO(drem, float)
narshu 1:cc2a9eb0bd55 103 TVMET_DECLARE_MACRO(fmod, float)
narshu 1:cc2a9eb0bd55 104 TVMET_DECLARE_MACRO(hypot, float)
narshu 1:cc2a9eb0bd55 105 TVMET_DECLARE_MACRO(jn, float)
narshu 1:cc2a9eb0bd55 106 TVMET_DECLARE_MACRO(yn, float)
narshu 1:cc2a9eb0bd55 107 TVMET_DECLARE_MACRO(pow, float)
narshu 1:cc2a9eb0bd55 108
narshu 1:cc2a9eb0bd55 109 TVMET_DECLARE_MACRO(atan2, double)
narshu 1:cc2a9eb0bd55 110 TVMET_DECLARE_MACRO(drem, double)
narshu 1:cc2a9eb0bd55 111 TVMET_DECLARE_MACRO(fmod, double)
narshu 1:cc2a9eb0bd55 112 TVMET_DECLARE_MACRO(hypot, double)
narshu 1:cc2a9eb0bd55 113 TVMET_DECLARE_MACRO(jn, double)
narshu 1:cc2a9eb0bd55 114 TVMET_DECLARE_MACRO(yn, double)
narshu 1:cc2a9eb0bd55 115 TVMET_DECLARE_MACRO(pow, double)
narshu 1:cc2a9eb0bd55 116
narshu 1:cc2a9eb0bd55 117 #if defined(TVMET_HAVE_LONG_DOUBLE)
narshu 1:cc2a9eb0bd55 118 TVMET_DECLARE_MACRO(atan2, long double)
narshu 1:cc2a9eb0bd55 119 TVMET_DECLARE_MACRO(drem, long double)
narshu 1:cc2a9eb0bd55 120 TVMET_DECLARE_MACRO(fmod, long double)
narshu 1:cc2a9eb0bd55 121 TVMET_DECLARE_MACRO(hypot, long double)
narshu 1:cc2a9eb0bd55 122 TVMET_DECLARE_MACRO(jn, long double)
narshu 1:cc2a9eb0bd55 123 TVMET_DECLARE_MACRO(yn, long double)
narshu 1:cc2a9eb0bd55 124 TVMET_DECLARE_MACRO(pow, long double)
narshu 1:cc2a9eb0bd55 125 #endif // defined(TVMET_HAVE_LONG_DOUBLE)
narshu 1:cc2a9eb0bd55 126
narshu 1:cc2a9eb0bd55 127 #undef TVMET_DECLARE_MACRO
narshu 1:cc2a9eb0bd55 128
narshu 1:cc2a9eb0bd55 129
narshu 1:cc2a9eb0bd55 130 #if defined(TVMET_HAVE_COMPLEX)
narshu 1:cc2a9eb0bd55 131 /*
narshu 1:cc2a9eb0bd55 132 * binary_function(XprVector<E, Sz>, std::complex<>)
narshu 1:cc2a9eb0bd55 133 */
narshu 1:cc2a9eb0bd55 134 #define TVMET_DECLARE_MACRO(NAME) \
narshu 1:cc2a9eb0bd55 135 template<class E, std::size_t Sz, class T> \
narshu 1:cc2a9eb0bd55 136 inline \
narshu 1:cc2a9eb0bd55 137 XprVector< \
narshu 1:cc2a9eb0bd55 138 XprBinOp< \
narshu 1:cc2a9eb0bd55 139 Fcnl_##NAME<typename E::value_type, std::complex<T> >, \
narshu 1:cc2a9eb0bd55 140 XprVector<E, Sz>, \
narshu 1:cc2a9eb0bd55 141 XprLiteral< std::complex<T> > \
narshu 1:cc2a9eb0bd55 142 >, \
narshu 1:cc2a9eb0bd55 143 Sz \
narshu 1:cc2a9eb0bd55 144 > \
narshu 1:cc2a9eb0bd55 145 NAME(const XprVector<E, Sz>& lhs, \
narshu 1:cc2a9eb0bd55 146 const std::complex<T>& rhs) TVMET_CXX_ALWAYS_INLINE;
narshu 1:cc2a9eb0bd55 147
narshu 1:cc2a9eb0bd55 148 TVMET_DECLARE_MACRO(atan2)
narshu 1:cc2a9eb0bd55 149 TVMET_DECLARE_MACRO(drem)
narshu 1:cc2a9eb0bd55 150 TVMET_DECLARE_MACRO(fmod)
narshu 1:cc2a9eb0bd55 151 TVMET_DECLARE_MACRO(hypot)
narshu 1:cc2a9eb0bd55 152 TVMET_DECLARE_MACRO(jn)
narshu 1:cc2a9eb0bd55 153 TVMET_DECLARE_MACRO(yn)
narshu 1:cc2a9eb0bd55 154 TVMET_DECLARE_MACRO(pow)
narshu 1:cc2a9eb0bd55 155
narshu 1:cc2a9eb0bd55 156 #undef TVMET_DECLARE_MACRO
narshu 1:cc2a9eb0bd55 157
narshu 1:cc2a9eb0bd55 158 #endif // defined(TVMET_HAVE_COMPLEX)
narshu 1:cc2a9eb0bd55 159
narshu 1:cc2a9eb0bd55 160
narshu 1:cc2a9eb0bd55 161 /*********************************************************
narshu 1:cc2a9eb0bd55 162 * PART II: IMPLEMENTATION
narshu 1:cc2a9eb0bd55 163 *********************************************************/
narshu 1:cc2a9eb0bd55 164
narshu 1:cc2a9eb0bd55 165
narshu 1:cc2a9eb0bd55 166 /*
narshu 1:cc2a9eb0bd55 167 * binary_function(XprVector<E1, Sz>, XprVector<E2, Sz>)
narshu 1:cc2a9eb0bd55 168 */
narshu 1:cc2a9eb0bd55 169 #define TVMET_IMPLEMENT_MACRO(NAME) \
narshu 1:cc2a9eb0bd55 170 template<class E1, class E2, std::size_t Sz> \
narshu 1:cc2a9eb0bd55 171 inline \
narshu 1:cc2a9eb0bd55 172 XprVector< \
narshu 1:cc2a9eb0bd55 173 XprBinOp< \
narshu 1:cc2a9eb0bd55 174 Fcnl_##NAME<typename E1::value_type, typename E2::value_type>, \
narshu 1:cc2a9eb0bd55 175 XprVector<E1, Sz>, \
narshu 1:cc2a9eb0bd55 176 XprVector<E2, Sz> \
narshu 1:cc2a9eb0bd55 177 >, \
narshu 1:cc2a9eb0bd55 178 Sz \
narshu 1:cc2a9eb0bd55 179 > \
narshu 1:cc2a9eb0bd55 180 NAME(const XprVector<E1, Sz>& lhs, const XprVector<E2, Sz>& rhs) { \
narshu 1:cc2a9eb0bd55 181 typedef XprBinOp< \
narshu 1:cc2a9eb0bd55 182 Fcnl_##NAME<typename E1::value_type, typename E2::value_type>, \
narshu 1:cc2a9eb0bd55 183 XprVector<E1, Sz>, \
narshu 1:cc2a9eb0bd55 184 XprVector<E2, Sz> \
narshu 1:cc2a9eb0bd55 185 > expr_type; \
narshu 1:cc2a9eb0bd55 186 return XprVector<expr_type, Sz>( \
narshu 1:cc2a9eb0bd55 187 expr_type(lhs, rhs)); \
narshu 1:cc2a9eb0bd55 188 }
narshu 1:cc2a9eb0bd55 189
narshu 1:cc2a9eb0bd55 190 TVMET_IMPLEMENT_MACRO(atan2)
narshu 1:cc2a9eb0bd55 191 TVMET_IMPLEMENT_MACRO(drem)
narshu 1:cc2a9eb0bd55 192 TVMET_IMPLEMENT_MACRO(fmod)
narshu 1:cc2a9eb0bd55 193 TVMET_IMPLEMENT_MACRO(hypot)
narshu 1:cc2a9eb0bd55 194 TVMET_IMPLEMENT_MACRO(jn)
narshu 1:cc2a9eb0bd55 195 TVMET_IMPLEMENT_MACRO(yn)
narshu 1:cc2a9eb0bd55 196 TVMET_IMPLEMENT_MACRO(pow)
narshu 1:cc2a9eb0bd55 197 #if defined(TVMET_HAVE_COMPLEX)
narshu 1:cc2a9eb0bd55 198 TVMET_IMPLEMENT_MACRO(polar)
narshu 1:cc2a9eb0bd55 199 #endif
narshu 1:cc2a9eb0bd55 200
narshu 1:cc2a9eb0bd55 201 #undef TVMET_IMPLEMENT_MACRO
narshu 1:cc2a9eb0bd55 202
narshu 1:cc2a9eb0bd55 203
narshu 1:cc2a9eb0bd55 204 /*
narshu 1:cc2a9eb0bd55 205 * binary_function(XprVector<E, Sz>, POD)
narshu 1:cc2a9eb0bd55 206 */
narshu 1:cc2a9eb0bd55 207 #define TVMET_IMPLEMENT_MACRO(NAME, TP) \
narshu 1:cc2a9eb0bd55 208 template<class E, std::size_t Sz> \
narshu 1:cc2a9eb0bd55 209 inline \
narshu 1:cc2a9eb0bd55 210 XprVector< \
narshu 1:cc2a9eb0bd55 211 XprBinOp< \
narshu 1:cc2a9eb0bd55 212 Fcnl_##NAME<typename E::value_type, TP >, \
narshu 1:cc2a9eb0bd55 213 XprVector<E, Sz>, \
narshu 1:cc2a9eb0bd55 214 XprLiteral< TP > \
narshu 1:cc2a9eb0bd55 215 >, \
narshu 1:cc2a9eb0bd55 216 Sz \
narshu 1:cc2a9eb0bd55 217 > \
narshu 1:cc2a9eb0bd55 218 NAME(const XprVector<E, Sz>& lhs, TP rhs) { \
narshu 1:cc2a9eb0bd55 219 typedef XprBinOp< \
narshu 1:cc2a9eb0bd55 220 Fcnl_##NAME<typename E::value_type, TP >, \
narshu 1:cc2a9eb0bd55 221 XprVector<E, Sz>, \
narshu 1:cc2a9eb0bd55 222 XprLiteral< TP > \
narshu 1:cc2a9eb0bd55 223 > expr_type; \
narshu 1:cc2a9eb0bd55 224 return XprVector<expr_type, Sz>( \
narshu 1:cc2a9eb0bd55 225 expr_type(lhs, XprLiteral< TP >(rhs))); \
narshu 1:cc2a9eb0bd55 226 }
narshu 1:cc2a9eb0bd55 227
narshu 1:cc2a9eb0bd55 228 TVMET_IMPLEMENT_MACRO(atan2, int)
narshu 1:cc2a9eb0bd55 229 TVMET_IMPLEMENT_MACRO(drem, int)
narshu 1:cc2a9eb0bd55 230 TVMET_IMPLEMENT_MACRO(fmod, int)
narshu 1:cc2a9eb0bd55 231 TVMET_IMPLEMENT_MACRO(hypot, int)
narshu 1:cc2a9eb0bd55 232 TVMET_IMPLEMENT_MACRO(jn, int)
narshu 1:cc2a9eb0bd55 233 TVMET_IMPLEMENT_MACRO(yn, int)
narshu 1:cc2a9eb0bd55 234 TVMET_IMPLEMENT_MACRO(pow, int)
narshu 1:cc2a9eb0bd55 235
narshu 1:cc2a9eb0bd55 236 #if defined(TVMET_HAVE_LONG_LONG)
narshu 1:cc2a9eb0bd55 237 TVMET_IMPLEMENT_MACRO(atan2, long long int)
narshu 1:cc2a9eb0bd55 238 TVMET_IMPLEMENT_MACRO(drem, long long int)
narshu 1:cc2a9eb0bd55 239 TVMET_IMPLEMENT_MACRO(fmod, long long int)
narshu 1:cc2a9eb0bd55 240 TVMET_IMPLEMENT_MACRO(hypot, long long int)
narshu 1:cc2a9eb0bd55 241 TVMET_IMPLEMENT_MACRO(jn, long long int)
narshu 1:cc2a9eb0bd55 242 TVMET_IMPLEMENT_MACRO(yn, long long int)
narshu 1:cc2a9eb0bd55 243 TVMET_IMPLEMENT_MACRO(pow, long long int)
narshu 1:cc2a9eb0bd55 244 #endif // defined(TVMET_HAVE_LONG_LONG)
narshu 1:cc2a9eb0bd55 245
narshu 1:cc2a9eb0bd55 246 TVMET_IMPLEMENT_MACRO(atan2, float)
narshu 1:cc2a9eb0bd55 247 TVMET_IMPLEMENT_MACRO(drem, float)
narshu 1:cc2a9eb0bd55 248 TVMET_IMPLEMENT_MACRO(fmod, float)
narshu 1:cc2a9eb0bd55 249 TVMET_IMPLEMENT_MACRO(hypot, float)
narshu 1:cc2a9eb0bd55 250 TVMET_IMPLEMENT_MACRO(jn, float)
narshu 1:cc2a9eb0bd55 251 TVMET_IMPLEMENT_MACRO(yn, float)
narshu 1:cc2a9eb0bd55 252 TVMET_IMPLEMENT_MACRO(pow, float)
narshu 1:cc2a9eb0bd55 253
narshu 1:cc2a9eb0bd55 254 TVMET_IMPLEMENT_MACRO(atan2, double)
narshu 1:cc2a9eb0bd55 255 TVMET_IMPLEMENT_MACRO(drem, double)
narshu 1:cc2a9eb0bd55 256 TVMET_IMPLEMENT_MACRO(fmod, double)
narshu 1:cc2a9eb0bd55 257 TVMET_IMPLEMENT_MACRO(hypot, double)
narshu 1:cc2a9eb0bd55 258 TVMET_IMPLEMENT_MACRO(jn, double)
narshu 1:cc2a9eb0bd55 259 TVMET_IMPLEMENT_MACRO(yn, double)
narshu 1:cc2a9eb0bd55 260 TVMET_IMPLEMENT_MACRO(pow, double)
narshu 1:cc2a9eb0bd55 261
narshu 1:cc2a9eb0bd55 262 #if defined(TVMET_HAVE_LONG_DOUBLE)
narshu 1:cc2a9eb0bd55 263 TVMET_IMPLEMENT_MACRO(atan2, long double)
narshu 1:cc2a9eb0bd55 264 TVMET_IMPLEMENT_MACRO(drem, long double)
narshu 1:cc2a9eb0bd55 265 TVMET_IMPLEMENT_MACRO(fmod, long double)
narshu 1:cc2a9eb0bd55 266 TVMET_IMPLEMENT_MACRO(hypot, long double)
narshu 1:cc2a9eb0bd55 267 TVMET_IMPLEMENT_MACRO(jn, long double)
narshu 1:cc2a9eb0bd55 268 TVMET_IMPLEMENT_MACRO(yn, long double)
narshu 1:cc2a9eb0bd55 269 TVMET_IMPLEMENT_MACRO(pow, long double)
narshu 1:cc2a9eb0bd55 270 #endif // defined(TVMET_HAVE_LONG_DOUBLE)
narshu 1:cc2a9eb0bd55 271
narshu 1:cc2a9eb0bd55 272 #undef TVMET_IMPLEMENT_MACRO
narshu 1:cc2a9eb0bd55 273
narshu 1:cc2a9eb0bd55 274
narshu 1:cc2a9eb0bd55 275 #if defined(TVMET_HAVE_COMPLEX)
narshu 1:cc2a9eb0bd55 276 /*
narshu 1:cc2a9eb0bd55 277 * binary_function(XprVector<E, Sz>, std::complex<>)
narshu 1:cc2a9eb0bd55 278 */
narshu 1:cc2a9eb0bd55 279 #define TVMET_IMPLEMENT_MACRO(NAME) \
narshu 1:cc2a9eb0bd55 280 template<class E, std::size_t Sz, class T> \
narshu 1:cc2a9eb0bd55 281 inline \
narshu 1:cc2a9eb0bd55 282 XprVector< \
narshu 1:cc2a9eb0bd55 283 XprBinOp< \
narshu 1:cc2a9eb0bd55 284 Fcnl_##NAME<typename E::value_type, std::complex<T> >, \
narshu 1:cc2a9eb0bd55 285 XprVector<E, Sz>, \
narshu 1:cc2a9eb0bd55 286 XprLiteral< std::complex<T> > \
narshu 1:cc2a9eb0bd55 287 >, \
narshu 1:cc2a9eb0bd55 288 Sz \
narshu 1:cc2a9eb0bd55 289 > \
narshu 1:cc2a9eb0bd55 290 NAME(const XprVector<E, Sz>& lhs, const std::complex<T>& rhs) { \
narshu 1:cc2a9eb0bd55 291 typedef XprBinOp< \
narshu 1:cc2a9eb0bd55 292 Fcnl_##NAME<typename E::value_type, std::complex<T> >, \
narshu 1:cc2a9eb0bd55 293 XprVector<E, Sz>, \
narshu 1:cc2a9eb0bd55 294 XprLiteral< std::complex<T> > \
narshu 1:cc2a9eb0bd55 295 > expr_type; \
narshu 1:cc2a9eb0bd55 296 return XprVector<expr_type, Sz>( \
narshu 1:cc2a9eb0bd55 297 expr_type(lhs, XprLiteral< std::complex<T> >(rhs))); \
narshu 1:cc2a9eb0bd55 298 }
narshu 1:cc2a9eb0bd55 299
narshu 1:cc2a9eb0bd55 300 TVMET_IMPLEMENT_MACRO(atan2)
narshu 1:cc2a9eb0bd55 301 TVMET_IMPLEMENT_MACRO(drem)
narshu 1:cc2a9eb0bd55 302 TVMET_IMPLEMENT_MACRO(fmod)
narshu 1:cc2a9eb0bd55 303 TVMET_IMPLEMENT_MACRO(hypot)
narshu 1:cc2a9eb0bd55 304 TVMET_IMPLEMENT_MACRO(jn)
narshu 1:cc2a9eb0bd55 305 TVMET_IMPLEMENT_MACRO(yn)
narshu 1:cc2a9eb0bd55 306 TVMET_IMPLEMENT_MACRO(pow)
narshu 1:cc2a9eb0bd55 307
narshu 1:cc2a9eb0bd55 308 #undef TVMET_IMPLEMENT_MACRO
narshu 1:cc2a9eb0bd55 309
narshu 1:cc2a9eb0bd55 310 #endif // defined(TVMET_HAVE_COMPLEX)
narshu 1:cc2a9eb0bd55 311
narshu 1:cc2a9eb0bd55 312
narshu 1:cc2a9eb0bd55 313 } // namespace tvmet
narshu 1:cc2a9eb0bd55 314
narshu 1:cc2a9eb0bd55 315 #endif // TVMET_XPR_VECTOR_BINARY_FUNCTIONS_H
narshu 1:cc2a9eb0bd55 316
narshu 1:cc2a9eb0bd55 317 // Local Variables:
narshu 1:cc2a9eb0bd55 318 // mode:C++
narshu 1:cc2a9eb0bd55 319 // tab-width:8
narshu 1:cc2a9eb0bd55 320 // End: