| [658] | 1 | /***************************************************************************
 | 
|---|
 | 2 |  * blitz/arrayuops.cc   Expression templates for arrays, unary functions
 | 
|---|
 | 3 |  *
 | 
|---|
 | 4 |  * $Id: uops.cc,v 1.1.1.1 1999-11-26 16:37:07 ansari Exp $
 | 
|---|
 | 5 |  *
 | 
|---|
 | 6 |  * This program is free software; you can redistribute it and/or
 | 
|---|
 | 7 |  * modify it under the terms of the GNU General Public License
 | 
|---|
 | 8 |  * as published by the Free Software Foundation; either version 2
 | 
|---|
 | 9 |  * of the License, or (at your option) any later version.
 | 
|---|
 | 10 |  *
 | 
|---|
 | 11 |  * This program is distributed in the hope that it will be useful,
 | 
|---|
 | 12 |  * but WITHOUT ANY WARRANTY; without even the implied warranty of
 | 
|---|
 | 13 |  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 | 
|---|
 | 14 |  * GNU General Public License for more details.
 | 
|---|
 | 15 |  *
 | 
|---|
 | 16 |  * Suggestions:          blitz-suggest@cybervision.com
 | 
|---|
 | 17 |  * Bugs:                 blitz-bugs@cybervision.com
 | 
|---|
 | 18 |  *
 | 
|---|
 | 19 |  * For more information, please see the Blitz++ Home Page:
 | 
|---|
 | 20 |  *    http://seurat.uwaterloo.ca/blitz/
 | 
|---|
 | 21 |  *
 | 
|---|
 | 22 |  ***************************************************************************
 | 
|---|
 | 23 |  * $Log: not supported by cvs2svn $
 | 
|---|
 | 24 | // Revision 1.1.1.1  1999/04/09  17:59:04  ansari
 | 
|---|
 | 25 | // Creation module DPC/Blitz (blitz 0.4) Reza 09/04/99
 | 
|---|
 | 26 | //
 | 
|---|
 | 27 |  */ 
 | 
|---|
 | 28 | 
 | 
|---|
 | 29 | // Generated source file.  Do not edit. 
 | 
|---|
 | 30 | // genarruops.cpp Jun 10 1998 16:02:18
 | 
|---|
 | 31 | 
 | 
|---|
 | 32 | #ifndef BZ_ARRAYUOPS_CC
 | 
|---|
 | 33 | #define BZ_ARRAYUOPS_CC
 | 
|---|
 | 34 | 
 | 
|---|
 | 35 | #ifndef BZ_ARRAYEXPR_H
 | 
|---|
 | 36 |  #error <blitz/array/uops.cc> must be included after <blitz/arrayexpr.h>
 | 
|---|
 | 37 | #endif // BZ_ARRAYEXPR_H
 | 
|---|
 | 38 | 
 | 
|---|
 | 39 | BZ_NAMESPACE(blitz)
 | 
|---|
 | 40 | 
 | 
|---|
 | 41 | /****************************************************************************
 | 
|---|
 | 42 |  * abs
 | 
|---|
 | 43 |  ****************************************************************************/
 | 
|---|
 | 44 | 
 | 
|---|
 | 45 | template<class T_numtype1, int N_rank1>
 | 
|---|
 | 46 | inline
 | 
|---|
 | 47 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<ArrayIterator<T_numtype1, N_rank1>,
 | 
|---|
 | 48 |     _bz_abs<T_numtype1> > >
 | 
|---|
 | 49 | abs(const Array<T_numtype1, N_rank1>& d1)
 | 
|---|
 | 50 | {
 | 
|---|
 | 51 |     return _bz_ArrayExprUnaryOp<ArrayIterator<T_numtype1, N_rank1>,
 | 
|---|
 | 52 |     _bz_abs<T_numtype1> >(d1.begin());
 | 
|---|
 | 53 | }
 | 
|---|
 | 54 | 
 | 
|---|
 | 55 | template<class P_expr1>
 | 
|---|
 | 56 | inline
 | 
|---|
 | 57 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<_bz_ArrayExpr<P_expr1>,
 | 
|---|
 | 58 |     _bz_abs<_bz_typename P_expr1::T_numtype> > >
 | 
|---|
 | 59 | abs(_bz_ArrayExpr<P_expr1> d1)
 | 
|---|
 | 60 | {
 | 
|---|
 | 61 |     return _bz_ArrayExprUnaryOp<_bz_ArrayExpr<P_expr1>,
 | 
|---|
 | 62 |     _bz_abs<_bz_typename P_expr1::T_numtype> >(d1);
 | 
|---|
 | 63 | }
 | 
|---|
 | 64 | 
 | 
|---|
 | 65 | template<int N_index1>
 | 
|---|
 | 66 | inline
 | 
|---|
 | 67 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<IndexPlaceholder<N_index1>,
 | 
|---|
 | 68 |     _bz_abs<int> > >
 | 
|---|
 | 69 | abs(IndexPlaceholder<N_index1> d1)
 | 
|---|
 | 70 | {
 | 
|---|
 | 71 |     return _bz_ArrayExprUnaryOp<IndexPlaceholder<N_index1>,
 | 
|---|
 | 72 |     _bz_abs<int> >(d1);
 | 
|---|
 | 73 | }
 | 
|---|
 | 74 | 
 | 
|---|
 | 75 | 
 | 
|---|
 | 76 | /****************************************************************************
 | 
|---|
 | 77 |  * acos
 | 
|---|
 | 78 |  ****************************************************************************/
 | 
|---|
 | 79 | 
 | 
|---|
 | 80 | template<class T_numtype1, int N_rank1>
 | 
|---|
 | 81 | inline
 | 
|---|
 | 82 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<ArrayIterator<T_numtype1, N_rank1>,
 | 
|---|
 | 83 |     _bz_acos<T_numtype1> > >
 | 
|---|
 | 84 | acos(const Array<T_numtype1, N_rank1>& d1)
 | 
|---|
 | 85 | {
 | 
|---|
 | 86 |     return _bz_ArrayExprUnaryOp<ArrayIterator<T_numtype1, N_rank1>,
 | 
|---|
 | 87 |     _bz_acos<T_numtype1> >(d1.begin());
 | 
|---|
 | 88 | }
 | 
|---|
 | 89 | 
 | 
|---|
 | 90 | template<class P_expr1>
 | 
|---|
 | 91 | inline
 | 
|---|
 | 92 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<_bz_ArrayExpr<P_expr1>,
 | 
|---|
 | 93 |     _bz_acos<_bz_typename P_expr1::T_numtype> > >
 | 
|---|
 | 94 | acos(_bz_ArrayExpr<P_expr1> d1)
 | 
|---|
 | 95 | {
 | 
|---|
 | 96 |     return _bz_ArrayExprUnaryOp<_bz_ArrayExpr<P_expr1>,
 | 
|---|
 | 97 |     _bz_acos<_bz_typename P_expr1::T_numtype> >(d1);
 | 
|---|
 | 98 | }
 | 
|---|
 | 99 | 
 | 
|---|
 | 100 | template<int N_index1>
 | 
|---|
 | 101 | inline
 | 
|---|
 | 102 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<IndexPlaceholder<N_index1>,
 | 
|---|
 | 103 |     _bz_acos<int> > >
 | 
|---|
 | 104 | acos(IndexPlaceholder<N_index1> d1)
 | 
|---|
 | 105 | {
 | 
|---|
 | 106 |     return _bz_ArrayExprUnaryOp<IndexPlaceholder<N_index1>,
 | 
|---|
 | 107 |     _bz_acos<int> >(d1);
 | 
|---|
 | 108 | }
 | 
|---|
 | 109 | 
 | 
|---|
 | 110 | 
 | 
|---|
 | 111 | /****************************************************************************
 | 
|---|
 | 112 |  * acosh
 | 
|---|
 | 113 |  ****************************************************************************/
 | 
|---|
 | 114 | 
 | 
|---|
 | 115 | #ifdef BZ_HAVE_IEEE_MATH
 | 
|---|
 | 116 | template<class T_numtype1, int N_rank1>
 | 
|---|
 | 117 | inline
 | 
|---|
 | 118 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<ArrayIterator<T_numtype1, N_rank1>,
 | 
|---|
 | 119 |     _bz_acosh<T_numtype1> > >
 | 
|---|
 | 120 | acosh(const Array<T_numtype1, N_rank1>& d1)
 | 
|---|
 | 121 | {
 | 
|---|
 | 122 |     return _bz_ArrayExprUnaryOp<ArrayIterator<T_numtype1, N_rank1>,
 | 
|---|
 | 123 |     _bz_acosh<T_numtype1> >(d1.begin());
 | 
|---|
 | 124 | }
 | 
|---|
 | 125 | 
 | 
|---|
 | 126 | template<class P_expr1>
 | 
|---|
 | 127 | inline
 | 
|---|
 | 128 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<_bz_ArrayExpr<P_expr1>,
 | 
|---|
 | 129 |     _bz_acosh<_bz_typename P_expr1::T_numtype> > >
 | 
|---|
 | 130 | acosh(_bz_ArrayExpr<P_expr1> d1)
 | 
|---|
 | 131 | {
 | 
|---|
 | 132 |     return _bz_ArrayExprUnaryOp<_bz_ArrayExpr<P_expr1>,
 | 
|---|
 | 133 |     _bz_acosh<_bz_typename P_expr1::T_numtype> >(d1);
 | 
|---|
 | 134 | }
 | 
|---|
 | 135 | 
 | 
|---|
 | 136 | template<int N_index1>
 | 
|---|
 | 137 | inline
 | 
|---|
 | 138 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<IndexPlaceholder<N_index1>,
 | 
|---|
 | 139 |     _bz_acosh<int> > >
 | 
|---|
 | 140 | acosh(IndexPlaceholder<N_index1> d1)
 | 
|---|
 | 141 | {
 | 
|---|
 | 142 |     return _bz_ArrayExprUnaryOp<IndexPlaceholder<N_index1>,
 | 
|---|
 | 143 |     _bz_acosh<int> >(d1);
 | 
|---|
 | 144 | }
 | 
|---|
 | 145 | 
 | 
|---|
 | 146 | #endif
 | 
|---|
 | 147 | 
 | 
|---|
 | 148 | /****************************************************************************
 | 
|---|
 | 149 |  * asin
 | 
|---|
 | 150 |  ****************************************************************************/
 | 
|---|
 | 151 | 
 | 
|---|
 | 152 | template<class T_numtype1, int N_rank1>
 | 
|---|
 | 153 | inline
 | 
|---|
 | 154 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<ArrayIterator<T_numtype1, N_rank1>,
 | 
|---|
 | 155 |     _bz_asin<T_numtype1> > >
 | 
|---|
 | 156 | asin(const Array<T_numtype1, N_rank1>& d1)
 | 
|---|
 | 157 | {
 | 
|---|
 | 158 |     return _bz_ArrayExprUnaryOp<ArrayIterator<T_numtype1, N_rank1>,
 | 
|---|
 | 159 |     _bz_asin<T_numtype1> >(d1.begin());
 | 
|---|
 | 160 | }
 | 
|---|
 | 161 | 
 | 
|---|
 | 162 | template<class P_expr1>
 | 
|---|
 | 163 | inline
 | 
|---|
 | 164 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<_bz_ArrayExpr<P_expr1>,
 | 
|---|
 | 165 |     _bz_asin<_bz_typename P_expr1::T_numtype> > >
 | 
|---|
 | 166 | asin(_bz_ArrayExpr<P_expr1> d1)
 | 
|---|
 | 167 | {
 | 
|---|
 | 168 |     return _bz_ArrayExprUnaryOp<_bz_ArrayExpr<P_expr1>,
 | 
|---|
 | 169 |     _bz_asin<_bz_typename P_expr1::T_numtype> >(d1);
 | 
|---|
 | 170 | }
 | 
|---|
 | 171 | 
 | 
|---|
 | 172 | template<int N_index1>
 | 
|---|
 | 173 | inline
 | 
|---|
 | 174 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<IndexPlaceholder<N_index1>,
 | 
|---|
 | 175 |     _bz_asin<int> > >
 | 
|---|
 | 176 | asin(IndexPlaceholder<N_index1> d1)
 | 
|---|
 | 177 | {
 | 
|---|
 | 178 |     return _bz_ArrayExprUnaryOp<IndexPlaceholder<N_index1>,
 | 
|---|
 | 179 |     _bz_asin<int> >(d1);
 | 
|---|
 | 180 | }
 | 
|---|
 | 181 | 
 | 
|---|
 | 182 | 
 | 
|---|
 | 183 | /****************************************************************************
 | 
|---|
 | 184 |  * asinh
 | 
|---|
 | 185 |  ****************************************************************************/
 | 
|---|
 | 186 | 
 | 
|---|
 | 187 | #ifdef BZ_HAVE_IEEE_MATH
 | 
|---|
 | 188 | template<class T_numtype1, int N_rank1>
 | 
|---|
 | 189 | inline
 | 
|---|
 | 190 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<ArrayIterator<T_numtype1, N_rank1>,
 | 
|---|
 | 191 |     _bz_asinh<T_numtype1> > >
 | 
|---|
 | 192 | asinh(const Array<T_numtype1, N_rank1>& d1)
 | 
|---|
 | 193 | {
 | 
|---|
 | 194 |     return _bz_ArrayExprUnaryOp<ArrayIterator<T_numtype1, N_rank1>,
 | 
|---|
 | 195 |     _bz_asinh<T_numtype1> >(d1.begin());
 | 
|---|
 | 196 | }
 | 
|---|
 | 197 | 
 | 
|---|
 | 198 | template<class P_expr1>
 | 
|---|
 | 199 | inline
 | 
|---|
 | 200 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<_bz_ArrayExpr<P_expr1>,
 | 
|---|
 | 201 |     _bz_asinh<_bz_typename P_expr1::T_numtype> > >
 | 
|---|
 | 202 | asinh(_bz_ArrayExpr<P_expr1> d1)
 | 
|---|
 | 203 | {
 | 
|---|
 | 204 |     return _bz_ArrayExprUnaryOp<_bz_ArrayExpr<P_expr1>,
 | 
|---|
 | 205 |     _bz_asinh<_bz_typename P_expr1::T_numtype> >(d1);
 | 
|---|
 | 206 | }
 | 
|---|
 | 207 | 
 | 
|---|
 | 208 | template<int N_index1>
 | 
|---|
 | 209 | inline
 | 
|---|
 | 210 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<IndexPlaceholder<N_index1>,
 | 
|---|
 | 211 |     _bz_asinh<int> > >
 | 
|---|
 | 212 | asinh(IndexPlaceholder<N_index1> d1)
 | 
|---|
 | 213 | {
 | 
|---|
 | 214 |     return _bz_ArrayExprUnaryOp<IndexPlaceholder<N_index1>,
 | 
|---|
 | 215 |     _bz_asinh<int> >(d1);
 | 
|---|
 | 216 | }
 | 
|---|
 | 217 | 
 | 
|---|
 | 218 | #endif
 | 
|---|
 | 219 | 
 | 
|---|
 | 220 | /****************************************************************************
 | 
|---|
 | 221 |  * atan
 | 
|---|
 | 222 |  ****************************************************************************/
 | 
|---|
 | 223 | 
 | 
|---|
 | 224 | template<class T_numtype1, int N_rank1>
 | 
|---|
 | 225 | inline
 | 
|---|
 | 226 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<ArrayIterator<T_numtype1, N_rank1>,
 | 
|---|
 | 227 |     _bz_atan<T_numtype1> > >
 | 
|---|
 | 228 | atan(const Array<T_numtype1, N_rank1>& d1)
 | 
|---|
 | 229 | {
 | 
|---|
 | 230 |     return _bz_ArrayExprUnaryOp<ArrayIterator<T_numtype1, N_rank1>,
 | 
|---|
 | 231 |     _bz_atan<T_numtype1> >(d1.begin());
 | 
|---|
 | 232 | }
 | 
|---|
 | 233 | 
 | 
|---|
 | 234 | template<class P_expr1>
 | 
|---|
 | 235 | inline
 | 
|---|
 | 236 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<_bz_ArrayExpr<P_expr1>,
 | 
|---|
 | 237 |     _bz_atan<_bz_typename P_expr1::T_numtype> > >
 | 
|---|
 | 238 | atan(_bz_ArrayExpr<P_expr1> d1)
 | 
|---|
 | 239 | {
 | 
|---|
 | 240 |     return _bz_ArrayExprUnaryOp<_bz_ArrayExpr<P_expr1>,
 | 
|---|
 | 241 |     _bz_atan<_bz_typename P_expr1::T_numtype> >(d1);
 | 
|---|
 | 242 | }
 | 
|---|
 | 243 | 
 | 
|---|
 | 244 | template<int N_index1>
 | 
|---|
 | 245 | inline
 | 
|---|
 | 246 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<IndexPlaceholder<N_index1>,
 | 
|---|
 | 247 |     _bz_atan<int> > >
 | 
|---|
 | 248 | atan(IndexPlaceholder<N_index1> d1)
 | 
|---|
 | 249 | {
 | 
|---|
 | 250 |     return _bz_ArrayExprUnaryOp<IndexPlaceholder<N_index1>,
 | 
|---|
 | 251 |     _bz_atan<int> >(d1);
 | 
|---|
 | 252 | }
 | 
|---|
 | 253 | 
 | 
|---|
 | 254 | 
 | 
|---|
 | 255 | /****************************************************************************
 | 
|---|
 | 256 |  * atanh
 | 
|---|
 | 257 |  ****************************************************************************/
 | 
|---|
 | 258 | 
 | 
|---|
 | 259 | #ifdef BZ_HAVE_IEEE_MATH
 | 
|---|
 | 260 | template<class T_numtype1, int N_rank1>
 | 
|---|
 | 261 | inline
 | 
|---|
 | 262 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<ArrayIterator<T_numtype1, N_rank1>,
 | 
|---|
 | 263 |     _bz_atanh<T_numtype1> > >
 | 
|---|
 | 264 | atanh(const Array<T_numtype1, N_rank1>& d1)
 | 
|---|
 | 265 | {
 | 
|---|
 | 266 |     return _bz_ArrayExprUnaryOp<ArrayIterator<T_numtype1, N_rank1>,
 | 
|---|
 | 267 |     _bz_atanh<T_numtype1> >(d1.begin());
 | 
|---|
 | 268 | }
 | 
|---|
 | 269 | 
 | 
|---|
 | 270 | template<class P_expr1>
 | 
|---|
 | 271 | inline
 | 
|---|
 | 272 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<_bz_ArrayExpr<P_expr1>,
 | 
|---|
 | 273 |     _bz_atanh<_bz_typename P_expr1::T_numtype> > >
 | 
|---|
 | 274 | atanh(_bz_ArrayExpr<P_expr1> d1)
 | 
|---|
 | 275 | {
 | 
|---|
 | 276 |     return _bz_ArrayExprUnaryOp<_bz_ArrayExpr<P_expr1>,
 | 
|---|
 | 277 |     _bz_atanh<_bz_typename P_expr1::T_numtype> >(d1);
 | 
|---|
 | 278 | }
 | 
|---|
 | 279 | 
 | 
|---|
 | 280 | template<int N_index1>
 | 
|---|
 | 281 | inline
 | 
|---|
 | 282 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<IndexPlaceholder<N_index1>,
 | 
|---|
 | 283 |     _bz_atanh<int> > >
 | 
|---|
 | 284 | atanh(IndexPlaceholder<N_index1> d1)
 | 
|---|
 | 285 | {
 | 
|---|
 | 286 |     return _bz_ArrayExprUnaryOp<IndexPlaceholder<N_index1>,
 | 
|---|
 | 287 |     _bz_atanh<int> >(d1);
 | 
|---|
 | 288 | }
 | 
|---|
 | 289 | 
 | 
|---|
 | 290 | #endif
 | 
|---|
 | 291 | 
 | 
|---|
 | 292 | /****************************************************************************
 | 
|---|
 | 293 |  * atan2
 | 
|---|
 | 294 |  ****************************************************************************/
 | 
|---|
 | 295 | 
 | 
|---|
 | 296 | template<class T_numtype1, int N_rank1, class T_numtype2, int N_rank2>
 | 
|---|
 | 297 | inline
 | 
|---|
 | 298 | _bz_ArrayExpr<_bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 299 |     _bz_atan2<T_numtype1,T_numtype2> > >
 | 
|---|
 | 300 | atan2(const Array<T_numtype1, N_rank1>& d1, const Array<T_numtype2, N_rank2>& d2)
 | 
|---|
 | 301 | {
 | 
|---|
 | 302 |     return _bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 303 |     _bz_atan2<T_numtype1,T_numtype2> >(d1.begin(), d2.begin());
 | 
|---|
 | 304 | }
 | 
|---|
 | 305 | 
 | 
|---|
 | 306 | template<class T_numtype1, int N_rank1, class P_expr2>
 | 
|---|
 | 307 | inline
 | 
|---|
 | 308 | _bz_ArrayExpr<_bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 309 |     _bz_atan2<T_numtype1,_bz_typename P_expr2::T_numtype> > >
 | 
|---|
 | 310 | atan2(const Array<T_numtype1, N_rank1>& d1, _bz_ArrayExpr<P_expr2> d2)
 | 
|---|
 | 311 | {
 | 
|---|
 | 312 |     return _bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 313 |     _bz_atan2<T_numtype1,_bz_typename P_expr2::T_numtype> >(d1.begin(), d2);
 | 
|---|
 | 314 | }
 | 
|---|
 | 315 | 
 | 
|---|
 | 316 | template<class T_numtype1, int N_rank1, int N_index2>
 | 
|---|
 | 317 | inline
 | 
|---|
 | 318 | _bz_ArrayExpr<_bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, IndexPlaceholder<N_index2>,
 | 
|---|
 | 319 |     _bz_atan2<T_numtype1,int> > >
 | 
|---|
 | 320 | atan2(const Array<T_numtype1, N_rank1>& d1, IndexPlaceholder<N_index2> d2)
 | 
|---|
 | 321 | {
 | 
|---|
 | 322 |     return _bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, IndexPlaceholder<N_index2>,
 | 
|---|
 | 323 |     _bz_atan2<T_numtype1,int> >(d1.begin(), d2);
 | 
|---|
 | 324 | }
 | 
|---|
 | 325 | 
 | 
|---|
 | 326 | template<class T_numtype1, int N_rank1>
 | 
|---|
 | 327 | inline
 | 
|---|
 | 328 | _bz_ArrayExpr<_bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, _bz_ArrayExprConstant<float>,
 | 
|---|
 | 329 |     _bz_atan2<T_numtype1,float> > >
 | 
|---|
 | 330 | atan2(const Array<T_numtype1, N_rank1>& d1, float d2)
 | 
|---|
 | 331 | {
 | 
|---|
 | 332 |     return _bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, _bz_ArrayExprConstant<float>,
 | 
|---|
 | 333 |     _bz_atan2<T_numtype1,float> >(d1.begin(), _bz_ArrayExprConstant<float>(d2));
 | 
|---|
 | 334 | }
 | 
|---|
 | 335 | 
 | 
|---|
 | 336 | template<class T_numtype1, int N_rank1>
 | 
|---|
 | 337 | inline
 | 
|---|
 | 338 | _bz_ArrayExpr<_bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, _bz_ArrayExprConstant<double>,
 | 
|---|
 | 339 |     _bz_atan2<T_numtype1,double> > >
 | 
|---|
 | 340 | atan2(const Array<T_numtype1, N_rank1>& d1, double d2)
 | 
|---|
 | 341 | {
 | 
|---|
 | 342 |     return _bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, _bz_ArrayExprConstant<double>,
 | 
|---|
 | 343 |     _bz_atan2<T_numtype1,double> >(d1.begin(), _bz_ArrayExprConstant<double>(d2));
 | 
|---|
 | 344 | }
 | 
|---|
 | 345 | 
 | 
|---|
 | 346 | template<class T_numtype1, int N_rank1>
 | 
|---|
 | 347 | inline
 | 
|---|
 | 348 | _bz_ArrayExpr<_bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, _bz_ArrayExprConstant<long double>,
 | 
|---|
 | 349 |     _bz_atan2<T_numtype1,long double> > >
 | 
|---|
 | 350 | atan2(const Array<T_numtype1, N_rank1>& d1, long double d2)
 | 
|---|
 | 351 | {
 | 
|---|
 | 352 |     return _bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, _bz_ArrayExprConstant<long double>,
 | 
|---|
 | 353 |     _bz_atan2<T_numtype1,long double> >(d1.begin(), _bz_ArrayExprConstant<long double>(d2));
 | 
|---|
 | 354 | }
 | 
|---|
 | 355 | 
 | 
|---|
 | 356 | #ifdef BZ_HAVE_COMPLEX
 | 
|---|
 | 357 | template<class T_numtype1, int N_rank1, class T2>
 | 
|---|
 | 358 | inline
 | 
|---|
 | 359 | _bz_ArrayExpr<_bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, _bz_ArrayExprConstant<complex<T2> > ,
 | 
|---|
 | 360 |     _bz_atan2<T_numtype1,complex<T2> > > >
 | 
|---|
 | 361 | atan2(const Array<T_numtype1, N_rank1>& d1, complex<T2> d2)
 | 
|---|
 | 362 | {
 | 
|---|
 | 363 |     return _bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, _bz_ArrayExprConstant<complex<T2> > ,
 | 
|---|
 | 364 |     _bz_atan2<T_numtype1,complex<T2> > >(d1.begin(), _bz_ArrayExprConstant<complex<T2> > (d2));
 | 
|---|
 | 365 | }
 | 
|---|
 | 366 | 
 | 
|---|
 | 367 | #endif // BZ_HAVE_COMPLEX
 | 
|---|
 | 368 | 
 | 
|---|
 | 369 | template<class P_expr1, class T_numtype2, int N_rank2>
 | 
|---|
 | 370 | inline
 | 
|---|
 | 371 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 372 |     _bz_atan2<_bz_typename P_expr1::T_numtype,T_numtype2> > >
 | 
|---|
 | 373 | atan2(_bz_ArrayExpr<P_expr1> d1, const Array<T_numtype2, N_rank2>& d2)
 | 
|---|
 | 374 | {
 | 
|---|
 | 375 |     return _bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 376 |     _bz_atan2<_bz_typename P_expr1::T_numtype,T_numtype2> >(d1, d2.begin());
 | 
|---|
 | 377 | }
 | 
|---|
 | 378 | 
 | 
|---|
 | 379 | template<class P_expr1, class P_expr2>
 | 
|---|
 | 380 | inline
 | 
|---|
 | 381 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 382 |     _bz_atan2<_bz_typename P_expr1::T_numtype,_bz_typename P_expr2::T_numtype> > >
 | 
|---|
 | 383 | atan2(_bz_ArrayExpr<P_expr1> d1, _bz_ArrayExpr<P_expr2> d2)
 | 
|---|
 | 384 | {
 | 
|---|
 | 385 |     return _bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 386 |     _bz_atan2<_bz_typename P_expr1::T_numtype,_bz_typename P_expr2::T_numtype> >(d1, d2);
 | 
|---|
 | 387 | }
 | 
|---|
 | 388 | 
 | 
|---|
 | 389 | template<class P_expr1, int N_index2>
 | 
|---|
 | 390 | inline
 | 
|---|
 | 391 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, IndexPlaceholder<N_index2>,
 | 
|---|
 | 392 |     _bz_atan2<_bz_typename P_expr1::T_numtype,int> > >
 | 
|---|
 | 393 | atan2(_bz_ArrayExpr<P_expr1> d1, IndexPlaceholder<N_index2> d2)
 | 
|---|
 | 394 | {
 | 
|---|
 | 395 |     return _bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, IndexPlaceholder<N_index2>,
 | 
|---|
 | 396 |     _bz_atan2<_bz_typename P_expr1::T_numtype,int> >(d1, d2);
 | 
|---|
 | 397 | }
 | 
|---|
 | 398 | 
 | 
|---|
 | 399 | template<class P_expr1>
 | 
|---|
 | 400 | inline
 | 
|---|
 | 401 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, _bz_ArrayExprConstant<float>,
 | 
|---|
 | 402 |     _bz_atan2<_bz_typename P_expr1::T_numtype,float> > >
 | 
|---|
 | 403 | atan2(_bz_ArrayExpr<P_expr1> d1, float d2)
 | 
|---|
 | 404 | {
 | 
|---|
 | 405 |     return _bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, _bz_ArrayExprConstant<float>,
 | 
|---|
 | 406 |     _bz_atan2<_bz_typename P_expr1::T_numtype,float> >(d1, _bz_ArrayExprConstant<float>(d2));
 | 
|---|
 | 407 | }
 | 
|---|
 | 408 | 
 | 
|---|
 | 409 | template<class P_expr1>
 | 
|---|
 | 410 | inline
 | 
|---|
 | 411 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, _bz_ArrayExprConstant<double>,
 | 
|---|
 | 412 |     _bz_atan2<_bz_typename P_expr1::T_numtype,double> > >
 | 
|---|
 | 413 | atan2(_bz_ArrayExpr<P_expr1> d1, double d2)
 | 
|---|
 | 414 | {
 | 
|---|
 | 415 |     return _bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, _bz_ArrayExprConstant<double>,
 | 
|---|
 | 416 |     _bz_atan2<_bz_typename P_expr1::T_numtype,double> >(d1, _bz_ArrayExprConstant<double>(d2));
 | 
|---|
 | 417 | }
 | 
|---|
 | 418 | 
 | 
|---|
 | 419 | template<class P_expr1>
 | 
|---|
 | 420 | inline
 | 
|---|
 | 421 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, _bz_ArrayExprConstant<long double>,
 | 
|---|
 | 422 |     _bz_atan2<_bz_typename P_expr1::T_numtype,long double> > >
 | 
|---|
 | 423 | atan2(_bz_ArrayExpr<P_expr1> d1, long double d2)
 | 
|---|
 | 424 | {
 | 
|---|
 | 425 |     return _bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, _bz_ArrayExprConstant<long double>,
 | 
|---|
 | 426 |     _bz_atan2<_bz_typename P_expr1::T_numtype,long double> >(d1, _bz_ArrayExprConstant<long double>(d2));
 | 
|---|
 | 427 | }
 | 
|---|
 | 428 | 
 | 
|---|
 | 429 | #ifdef BZ_HAVE_COMPLEX
 | 
|---|
 | 430 | template<class P_expr1, class T2>
 | 
|---|
 | 431 | inline
 | 
|---|
 | 432 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, _bz_ArrayExprConstant<complex<T2> > ,
 | 
|---|
 | 433 |     _bz_atan2<_bz_typename P_expr1::T_numtype,complex<T2> > > >
 | 
|---|
 | 434 | atan2(_bz_ArrayExpr<P_expr1> d1, complex<T2> d2)
 | 
|---|
 | 435 | {
 | 
|---|
 | 436 |     return _bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, _bz_ArrayExprConstant<complex<T2> > ,
 | 
|---|
 | 437 |     _bz_atan2<_bz_typename P_expr1::T_numtype,complex<T2> > >(d1, _bz_ArrayExprConstant<complex<T2> > (d2));
 | 
|---|
 | 438 | }
 | 
|---|
 | 439 | 
 | 
|---|
 | 440 | #endif // BZ_HAVE_COMPLEX
 | 
|---|
 | 441 | 
 | 
|---|
 | 442 | template<int N_index1, class T_numtype2, int N_rank2>
 | 
|---|
 | 443 | inline
 | 
|---|
 | 444 | _bz_ArrayExpr<_bz_ArrayExprOp<IndexPlaceholder<N_index1>, ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 445 |     _bz_atan2<int,T_numtype2> > >
 | 
|---|
 | 446 | atan2(IndexPlaceholder<N_index1> d1, const Array<T_numtype2, N_rank2>& d2)
 | 
|---|
 | 447 | {
 | 
|---|
 | 448 |     return _bz_ArrayExprOp<IndexPlaceholder<N_index1>, ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 449 |     _bz_atan2<int,T_numtype2> >(d1, d2.begin());
 | 
|---|
 | 450 | }
 | 
|---|
 | 451 | 
 | 
|---|
 | 452 | template<int N_index1, class P_expr2>
 | 
|---|
 | 453 | inline
 | 
|---|
 | 454 | _bz_ArrayExpr<_bz_ArrayExprOp<IndexPlaceholder<N_index1>, _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 455 |     _bz_atan2<int,_bz_typename P_expr2::T_numtype> > >
 | 
|---|
 | 456 | atan2(IndexPlaceholder<N_index1> d1, _bz_ArrayExpr<P_expr2> d2)
 | 
|---|
 | 457 | {
 | 
|---|
 | 458 |     return _bz_ArrayExprOp<IndexPlaceholder<N_index1>, _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 459 |     _bz_atan2<int,_bz_typename P_expr2::T_numtype> >(d1, d2);
 | 
|---|
 | 460 | }
 | 
|---|
 | 461 | 
 | 
|---|
 | 462 | template<int N_index1, int N_index2>
 | 
|---|
 | 463 | inline
 | 
|---|
 | 464 | _bz_ArrayExpr<_bz_ArrayExprOp<IndexPlaceholder<N_index1>, IndexPlaceholder<N_index2>,
 | 
|---|
 | 465 |     _bz_atan2<int,int> > >
 | 
|---|
 | 466 | atan2(IndexPlaceholder<N_index1> d1, IndexPlaceholder<N_index2> d2)
 | 
|---|
 | 467 | {
 | 
|---|
 | 468 |     return _bz_ArrayExprOp<IndexPlaceholder<N_index1>, IndexPlaceholder<N_index2>,
 | 
|---|
 | 469 |     _bz_atan2<int,int> >(d1, d2);
 | 
|---|
 | 470 | }
 | 
|---|
 | 471 | 
 | 
|---|
 | 472 | template<int N_index1>
 | 
|---|
 | 473 | inline
 | 
|---|
 | 474 | _bz_ArrayExpr<_bz_ArrayExprOp<IndexPlaceholder<N_index1>, _bz_ArrayExprConstant<float>,
 | 
|---|
 | 475 |     _bz_atan2<int,float> > >
 | 
|---|
 | 476 | atan2(IndexPlaceholder<N_index1> d1, float d2)
 | 
|---|
 | 477 | {
 | 
|---|
 | 478 |     return _bz_ArrayExprOp<IndexPlaceholder<N_index1>, _bz_ArrayExprConstant<float>,
 | 
|---|
 | 479 |     _bz_atan2<int,float> >(d1, _bz_ArrayExprConstant<float>(d2));
 | 
|---|
 | 480 | }
 | 
|---|
 | 481 | 
 | 
|---|
 | 482 | template<int N_index1>
 | 
|---|
 | 483 | inline
 | 
|---|
 | 484 | _bz_ArrayExpr<_bz_ArrayExprOp<IndexPlaceholder<N_index1>, _bz_ArrayExprConstant<double>,
 | 
|---|
 | 485 |     _bz_atan2<int,double> > >
 | 
|---|
 | 486 | atan2(IndexPlaceholder<N_index1> d1, double d2)
 | 
|---|
 | 487 | {
 | 
|---|
 | 488 |     return _bz_ArrayExprOp<IndexPlaceholder<N_index1>, _bz_ArrayExprConstant<double>,
 | 
|---|
 | 489 |     _bz_atan2<int,double> >(d1, _bz_ArrayExprConstant<double>(d2));
 | 
|---|
 | 490 | }
 | 
|---|
 | 491 | 
 | 
|---|
 | 492 | template<int N_index1>
 | 
|---|
 | 493 | inline
 | 
|---|
 | 494 | _bz_ArrayExpr<_bz_ArrayExprOp<IndexPlaceholder<N_index1>, _bz_ArrayExprConstant<long double>,
 | 
|---|
 | 495 |     _bz_atan2<int,long double> > >
 | 
|---|
 | 496 | atan2(IndexPlaceholder<N_index1> d1, long double d2)
 | 
|---|
 | 497 | {
 | 
|---|
 | 498 |     return _bz_ArrayExprOp<IndexPlaceholder<N_index1>, _bz_ArrayExprConstant<long double>,
 | 
|---|
 | 499 |     _bz_atan2<int,long double> >(d1, _bz_ArrayExprConstant<long double>(d2));
 | 
|---|
 | 500 | }
 | 
|---|
 | 501 | 
 | 
|---|
 | 502 | #ifdef BZ_HAVE_COMPLEX
 | 
|---|
 | 503 | template<int N_index1, class T2>
 | 
|---|
 | 504 | inline
 | 
|---|
 | 505 | _bz_ArrayExpr<_bz_ArrayExprOp<IndexPlaceholder<N_index1>, _bz_ArrayExprConstant<complex<T2> > ,
 | 
|---|
 | 506 |     _bz_atan2<int,complex<T2> > > >
 | 
|---|
 | 507 | atan2(IndexPlaceholder<N_index1> d1, complex<T2> d2)
 | 
|---|
 | 508 | {
 | 
|---|
 | 509 |     return _bz_ArrayExprOp<IndexPlaceholder<N_index1>, _bz_ArrayExprConstant<complex<T2> > ,
 | 
|---|
 | 510 |     _bz_atan2<int,complex<T2> > >(d1, _bz_ArrayExprConstant<complex<T2> > (d2));
 | 
|---|
 | 511 | }
 | 
|---|
 | 512 | 
 | 
|---|
 | 513 | #endif // BZ_HAVE_COMPLEX
 | 
|---|
 | 514 | 
 | 
|---|
 | 515 | template<class T_numtype2, int N_rank2>
 | 
|---|
 | 516 | inline
 | 
|---|
 | 517 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExprConstant<float>, ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 518 |     _bz_atan2<float,T_numtype2> > >
 | 
|---|
 | 519 | atan2(float d1, const Array<T_numtype2, N_rank2>& d2)
 | 
|---|
 | 520 | {
 | 
|---|
 | 521 |     return _bz_ArrayExprOp<_bz_ArrayExprConstant<float>, ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 522 |     _bz_atan2<float,T_numtype2> >(_bz_ArrayExprConstant<float>(d1), d2.begin());
 | 
|---|
 | 523 | }
 | 
|---|
 | 524 | 
 | 
|---|
 | 525 | template<class P_expr2>
 | 
|---|
 | 526 | inline
 | 
|---|
 | 527 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExprConstant<float>, _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 528 |     _bz_atan2<float,_bz_typename P_expr2::T_numtype> > >
 | 
|---|
 | 529 | atan2(float d1, _bz_ArrayExpr<P_expr2> d2)
 | 
|---|
 | 530 | {
 | 
|---|
 | 531 |     return _bz_ArrayExprOp<_bz_ArrayExprConstant<float>, _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 532 |     _bz_atan2<float,_bz_typename P_expr2::T_numtype> >(_bz_ArrayExprConstant<float>(d1), d2);
 | 
|---|
 | 533 | }
 | 
|---|
 | 534 | 
 | 
|---|
 | 535 | template<int N_index2>
 | 
|---|
 | 536 | inline
 | 
|---|
 | 537 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExprConstant<float>, IndexPlaceholder<N_index2>,
 | 
|---|
 | 538 |     _bz_atan2<float,int> > >
 | 
|---|
 | 539 | atan2(float d1, IndexPlaceholder<N_index2> d2)
 | 
|---|
 | 540 | {
 | 
|---|
 | 541 |     return _bz_ArrayExprOp<_bz_ArrayExprConstant<float>, IndexPlaceholder<N_index2>,
 | 
|---|
 | 542 |     _bz_atan2<float,int> >(_bz_ArrayExprConstant<float>(d1), d2);
 | 
|---|
 | 543 | }
 | 
|---|
 | 544 | 
 | 
|---|
 | 545 | template<class T_numtype2, int N_rank2>
 | 
|---|
 | 546 | inline
 | 
|---|
 | 547 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExprConstant<double>, ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 548 |     _bz_atan2<double,T_numtype2> > >
 | 
|---|
 | 549 | atan2(double d1, const Array<T_numtype2, N_rank2>& d2)
 | 
|---|
 | 550 | {
 | 
|---|
 | 551 |     return _bz_ArrayExprOp<_bz_ArrayExprConstant<double>, ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 552 |     _bz_atan2<double,T_numtype2> >(_bz_ArrayExprConstant<double>(d1), d2.begin());
 | 
|---|
 | 553 | }
 | 
|---|
 | 554 | 
 | 
|---|
 | 555 | template<class P_expr2>
 | 
|---|
 | 556 | inline
 | 
|---|
 | 557 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExprConstant<double>, _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 558 |     _bz_atan2<double,_bz_typename P_expr2::T_numtype> > >
 | 
|---|
 | 559 | atan2(double d1, _bz_ArrayExpr<P_expr2> d2)
 | 
|---|
 | 560 | {
 | 
|---|
 | 561 |     return _bz_ArrayExprOp<_bz_ArrayExprConstant<double>, _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 562 |     _bz_atan2<double,_bz_typename P_expr2::T_numtype> >(_bz_ArrayExprConstant<double>(d1), d2);
 | 
|---|
 | 563 | }
 | 
|---|
 | 564 | 
 | 
|---|
 | 565 | template<int N_index2>
 | 
|---|
 | 566 | inline
 | 
|---|
 | 567 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExprConstant<double>, IndexPlaceholder<N_index2>,
 | 
|---|
 | 568 |     _bz_atan2<double,int> > >
 | 
|---|
 | 569 | atan2(double d1, IndexPlaceholder<N_index2> d2)
 | 
|---|
 | 570 | {
 | 
|---|
 | 571 |     return _bz_ArrayExprOp<_bz_ArrayExprConstant<double>, IndexPlaceholder<N_index2>,
 | 
|---|
 | 572 |     _bz_atan2<double,int> >(_bz_ArrayExprConstant<double>(d1), d2);
 | 
|---|
 | 573 | }
 | 
|---|
 | 574 | 
 | 
|---|
 | 575 | template<class T_numtype2, int N_rank2>
 | 
|---|
 | 576 | inline
 | 
|---|
 | 577 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExprConstant<long double>, ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 578 |     _bz_atan2<long double,T_numtype2> > >
 | 
|---|
 | 579 | atan2(long double d1, const Array<T_numtype2, N_rank2>& d2)
 | 
|---|
 | 580 | {
 | 
|---|
 | 581 |     return _bz_ArrayExprOp<_bz_ArrayExprConstant<long double>, ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 582 |     _bz_atan2<long double,T_numtype2> >(_bz_ArrayExprConstant<long double>(d1), d2.begin());
 | 
|---|
 | 583 | }
 | 
|---|
 | 584 | 
 | 
|---|
 | 585 | template<class P_expr2>
 | 
|---|
 | 586 | inline
 | 
|---|
 | 587 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExprConstant<long double>, _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 588 |     _bz_atan2<long double,_bz_typename P_expr2::T_numtype> > >
 | 
|---|
 | 589 | atan2(long double d1, _bz_ArrayExpr<P_expr2> d2)
 | 
|---|
 | 590 | {
 | 
|---|
 | 591 |     return _bz_ArrayExprOp<_bz_ArrayExprConstant<long double>, _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 592 |     _bz_atan2<long double,_bz_typename P_expr2::T_numtype> >(_bz_ArrayExprConstant<long double>(d1), d2);
 | 
|---|
 | 593 | }
 | 
|---|
 | 594 | 
 | 
|---|
 | 595 | template<int N_index2>
 | 
|---|
 | 596 | inline
 | 
|---|
 | 597 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExprConstant<long double>, IndexPlaceholder<N_index2>,
 | 
|---|
 | 598 |     _bz_atan2<long double,int> > >
 | 
|---|
 | 599 | atan2(long double d1, IndexPlaceholder<N_index2> d2)
 | 
|---|
 | 600 | {
 | 
|---|
 | 601 |     return _bz_ArrayExprOp<_bz_ArrayExprConstant<long double>, IndexPlaceholder<N_index2>,
 | 
|---|
 | 602 |     _bz_atan2<long double,int> >(_bz_ArrayExprConstant<long double>(d1), d2);
 | 
|---|
 | 603 | }
 | 
|---|
 | 604 | 
 | 
|---|
 | 605 | #ifdef BZ_HAVE_COMPLEX
 | 
|---|
 | 606 | template<class T1, class T_numtype2, int N_rank2>
 | 
|---|
 | 607 | inline
 | 
|---|
 | 608 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExprConstant<complex<T1> > , ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 609 |     _bz_atan2<complex<T1> ,T_numtype2> > >
 | 
|---|
 | 610 | atan2(complex<T1> d1, const Array<T_numtype2, N_rank2>& d2)
 | 
|---|
 | 611 | {
 | 
|---|
 | 612 |     return _bz_ArrayExprOp<_bz_ArrayExprConstant<complex<T1> > , ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 613 |     _bz_atan2<complex<T1> ,T_numtype2> >(_bz_ArrayExprConstant<complex<T1> > (d1), d2.begin());
 | 
|---|
 | 614 | }
 | 
|---|
 | 615 | 
 | 
|---|
 | 616 | #endif // BZ_HAVE_COMPLEX
 | 
|---|
 | 617 | 
 | 
|---|
 | 618 | #ifdef BZ_HAVE_COMPLEX
 | 
|---|
 | 619 | template<class T1, class P_expr2>
 | 
|---|
 | 620 | inline
 | 
|---|
 | 621 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExprConstant<complex<T1> > , _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 622 |     _bz_atan2<complex<T1> ,_bz_typename P_expr2::T_numtype> > >
 | 
|---|
 | 623 | atan2(complex<T1> d1, _bz_ArrayExpr<P_expr2> d2)
 | 
|---|
 | 624 | {
 | 
|---|
 | 625 |     return _bz_ArrayExprOp<_bz_ArrayExprConstant<complex<T1> > , _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 626 |     _bz_atan2<complex<T1> ,_bz_typename P_expr2::T_numtype> >(_bz_ArrayExprConstant<complex<T1> > (d1), d2);
 | 
|---|
 | 627 | }
 | 
|---|
 | 628 | 
 | 
|---|
 | 629 | #endif // BZ_HAVE_COMPLEX
 | 
|---|
 | 630 | 
 | 
|---|
 | 631 | #ifdef BZ_HAVE_COMPLEX
 | 
|---|
 | 632 | template<class T1, int N_index2>
 | 
|---|
 | 633 | inline
 | 
|---|
 | 634 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExprConstant<complex<T1> > , IndexPlaceholder<N_index2>,
 | 
|---|
 | 635 |     _bz_atan2<complex<T1> ,int> > >
 | 
|---|
 | 636 | atan2(complex<T1> d1, IndexPlaceholder<N_index2> d2)
 | 
|---|
 | 637 | {
 | 
|---|
 | 638 |     return _bz_ArrayExprOp<_bz_ArrayExprConstant<complex<T1> > , IndexPlaceholder<N_index2>,
 | 
|---|
 | 639 |     _bz_atan2<complex<T1> ,int> >(_bz_ArrayExprConstant<complex<T1> > (d1), d2);
 | 
|---|
 | 640 | }
 | 
|---|
 | 641 | 
 | 
|---|
 | 642 | #endif // BZ_HAVE_COMPLEX
 | 
|---|
 | 643 | 
 | 
|---|
 | 644 | 
 | 
|---|
 | 645 | /****************************************************************************
 | 
|---|
 | 646 |  * _class
 | 
|---|
 | 647 |  ****************************************************************************/
 | 
|---|
 | 648 | 
 | 
|---|
 | 649 | #ifdef BZ_HAVE_SYSTEM_V_MATH
 | 
|---|
 | 650 | template<class T_numtype1, int N_rank1>
 | 
|---|
 | 651 | inline
 | 
|---|
 | 652 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<ArrayIterator<T_numtype1, N_rank1>,
 | 
|---|
 | 653 |     _bz__class<T_numtype1> > >
 | 
|---|
 | 654 | _class(const Array<T_numtype1, N_rank1>& d1)
 | 
|---|
 | 655 | {
 | 
|---|
 | 656 |     return _bz_ArrayExprUnaryOp<ArrayIterator<T_numtype1, N_rank1>,
 | 
|---|
 | 657 |     _bz__class<T_numtype1> >(d1.begin());
 | 
|---|
 | 658 | }
 | 
|---|
 | 659 | 
 | 
|---|
 | 660 | template<class P_expr1>
 | 
|---|
 | 661 | inline
 | 
|---|
 | 662 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<_bz_ArrayExpr<P_expr1>,
 | 
|---|
 | 663 |     _bz__class<_bz_typename P_expr1::T_numtype> > >
 | 
|---|
 | 664 | _class(_bz_ArrayExpr<P_expr1> d1)
 | 
|---|
 | 665 | {
 | 
|---|
 | 666 |     return _bz_ArrayExprUnaryOp<_bz_ArrayExpr<P_expr1>,
 | 
|---|
 | 667 |     _bz__class<_bz_typename P_expr1::T_numtype> >(d1);
 | 
|---|
 | 668 | }
 | 
|---|
 | 669 | 
 | 
|---|
 | 670 | template<int N_index1>
 | 
|---|
 | 671 | inline
 | 
|---|
 | 672 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<IndexPlaceholder<N_index1>,
 | 
|---|
 | 673 |     _bz__class<int> > >
 | 
|---|
 | 674 | _class(IndexPlaceholder<N_index1> d1)
 | 
|---|
 | 675 | {
 | 
|---|
 | 676 |     return _bz_ArrayExprUnaryOp<IndexPlaceholder<N_index1>,
 | 
|---|
 | 677 |     _bz__class<int> >(d1);
 | 
|---|
 | 678 | }
 | 
|---|
 | 679 | 
 | 
|---|
 | 680 | #endif
 | 
|---|
 | 681 | 
 | 
|---|
 | 682 | /****************************************************************************
 | 
|---|
 | 683 |  * cbrt
 | 
|---|
 | 684 |  ****************************************************************************/
 | 
|---|
 | 685 | 
 | 
|---|
 | 686 | #ifdef BZ_HAVE_IEEE_MATH
 | 
|---|
 | 687 | template<class T_numtype1, int N_rank1>
 | 
|---|
 | 688 | inline
 | 
|---|
 | 689 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<ArrayIterator<T_numtype1, N_rank1>,
 | 
|---|
 | 690 |     _bz_cbrt<T_numtype1> > >
 | 
|---|
 | 691 | cbrt(const Array<T_numtype1, N_rank1>& d1)
 | 
|---|
 | 692 | {
 | 
|---|
 | 693 |     return _bz_ArrayExprUnaryOp<ArrayIterator<T_numtype1, N_rank1>,
 | 
|---|
 | 694 |     _bz_cbrt<T_numtype1> >(d1.begin());
 | 
|---|
 | 695 | }
 | 
|---|
 | 696 | 
 | 
|---|
 | 697 | template<class P_expr1>
 | 
|---|
 | 698 | inline
 | 
|---|
 | 699 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<_bz_ArrayExpr<P_expr1>,
 | 
|---|
 | 700 |     _bz_cbrt<_bz_typename P_expr1::T_numtype> > >
 | 
|---|
 | 701 | cbrt(_bz_ArrayExpr<P_expr1> d1)
 | 
|---|
 | 702 | {
 | 
|---|
 | 703 |     return _bz_ArrayExprUnaryOp<_bz_ArrayExpr<P_expr1>,
 | 
|---|
 | 704 |     _bz_cbrt<_bz_typename P_expr1::T_numtype> >(d1);
 | 
|---|
 | 705 | }
 | 
|---|
 | 706 | 
 | 
|---|
 | 707 | template<int N_index1>
 | 
|---|
 | 708 | inline
 | 
|---|
 | 709 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<IndexPlaceholder<N_index1>,
 | 
|---|
 | 710 |     _bz_cbrt<int> > >
 | 
|---|
 | 711 | cbrt(IndexPlaceholder<N_index1> d1)
 | 
|---|
 | 712 | {
 | 
|---|
 | 713 |     return _bz_ArrayExprUnaryOp<IndexPlaceholder<N_index1>,
 | 
|---|
 | 714 |     _bz_cbrt<int> >(d1);
 | 
|---|
 | 715 | }
 | 
|---|
 | 716 | 
 | 
|---|
 | 717 | #endif
 | 
|---|
 | 718 | 
 | 
|---|
 | 719 | /****************************************************************************
 | 
|---|
 | 720 |  * ceil
 | 
|---|
 | 721 |  ****************************************************************************/
 | 
|---|
 | 722 | 
 | 
|---|
 | 723 | template<class T_numtype1, int N_rank1>
 | 
|---|
 | 724 | inline
 | 
|---|
 | 725 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<ArrayIterator<T_numtype1, N_rank1>,
 | 
|---|
 | 726 |     _bz_ceil<T_numtype1> > >
 | 
|---|
 | 727 | ceil(const Array<T_numtype1, N_rank1>& d1)
 | 
|---|
 | 728 | {
 | 
|---|
 | 729 |     return _bz_ArrayExprUnaryOp<ArrayIterator<T_numtype1, N_rank1>,
 | 
|---|
 | 730 |     _bz_ceil<T_numtype1> >(d1.begin());
 | 
|---|
 | 731 | }
 | 
|---|
 | 732 | 
 | 
|---|
 | 733 | template<class P_expr1>
 | 
|---|
 | 734 | inline
 | 
|---|
 | 735 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<_bz_ArrayExpr<P_expr1>,
 | 
|---|
 | 736 |     _bz_ceil<_bz_typename P_expr1::T_numtype> > >
 | 
|---|
 | 737 | ceil(_bz_ArrayExpr<P_expr1> d1)
 | 
|---|
 | 738 | {
 | 
|---|
 | 739 |     return _bz_ArrayExprUnaryOp<_bz_ArrayExpr<P_expr1>,
 | 
|---|
 | 740 |     _bz_ceil<_bz_typename P_expr1::T_numtype> >(d1);
 | 
|---|
 | 741 | }
 | 
|---|
 | 742 | 
 | 
|---|
 | 743 | template<int N_index1>
 | 
|---|
 | 744 | inline
 | 
|---|
 | 745 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<IndexPlaceholder<N_index1>,
 | 
|---|
 | 746 |     _bz_ceil<int> > >
 | 
|---|
 | 747 | ceil(IndexPlaceholder<N_index1> d1)
 | 
|---|
 | 748 | {
 | 
|---|
 | 749 |     return _bz_ArrayExprUnaryOp<IndexPlaceholder<N_index1>,
 | 
|---|
 | 750 |     _bz_ceil<int> >(d1);
 | 
|---|
 | 751 | }
 | 
|---|
 | 752 | 
 | 
|---|
 | 753 | 
 | 
|---|
 | 754 | /****************************************************************************
 | 
|---|
 | 755 |  * cexp
 | 
|---|
 | 756 |  ****************************************************************************/
 | 
|---|
 | 757 | 
 | 
|---|
 | 758 | template<class T_numtype1, int N_rank1>
 | 
|---|
 | 759 | inline
 | 
|---|
 | 760 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<ArrayIterator<T_numtype1, N_rank1>,
 | 
|---|
 | 761 |     _bz_cexp<T_numtype1> > >
 | 
|---|
 | 762 | cexp(const Array<T_numtype1, N_rank1>& d1)
 | 
|---|
 | 763 | {
 | 
|---|
 | 764 |     return _bz_ArrayExprUnaryOp<ArrayIterator<T_numtype1, N_rank1>,
 | 
|---|
 | 765 |     _bz_cexp<T_numtype1> >(d1.begin());
 | 
|---|
 | 766 | }
 | 
|---|
 | 767 | 
 | 
|---|
 | 768 | template<class P_expr1>
 | 
|---|
 | 769 | inline
 | 
|---|
 | 770 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<_bz_ArrayExpr<P_expr1>,
 | 
|---|
 | 771 |     _bz_cexp<_bz_typename P_expr1::T_numtype> > >
 | 
|---|
 | 772 | cexp(_bz_ArrayExpr<P_expr1> d1)
 | 
|---|
 | 773 | {
 | 
|---|
 | 774 |     return _bz_ArrayExprUnaryOp<_bz_ArrayExpr<P_expr1>,
 | 
|---|
 | 775 |     _bz_cexp<_bz_typename P_expr1::T_numtype> >(d1);
 | 
|---|
 | 776 | }
 | 
|---|
 | 777 | 
 | 
|---|
 | 778 | template<int N_index1>
 | 
|---|
 | 779 | inline
 | 
|---|
 | 780 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<IndexPlaceholder<N_index1>,
 | 
|---|
 | 781 |     _bz_cexp<int> > >
 | 
|---|
 | 782 | cexp(IndexPlaceholder<N_index1> d1)
 | 
|---|
 | 783 | {
 | 
|---|
 | 784 |     return _bz_ArrayExprUnaryOp<IndexPlaceholder<N_index1>,
 | 
|---|
 | 785 |     _bz_cexp<int> >(d1);
 | 
|---|
 | 786 | }
 | 
|---|
 | 787 | 
 | 
|---|
 | 788 | 
 | 
|---|
 | 789 | /****************************************************************************
 | 
|---|
 | 790 |  * cos
 | 
|---|
 | 791 |  ****************************************************************************/
 | 
|---|
 | 792 | 
 | 
|---|
 | 793 | template<class T_numtype1, int N_rank1>
 | 
|---|
 | 794 | inline
 | 
|---|
 | 795 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<ArrayIterator<T_numtype1, N_rank1>,
 | 
|---|
 | 796 |     _bz_cos<T_numtype1> > >
 | 
|---|
 | 797 | cos(const Array<T_numtype1, N_rank1>& d1)
 | 
|---|
 | 798 | {
 | 
|---|
 | 799 |     return _bz_ArrayExprUnaryOp<ArrayIterator<T_numtype1, N_rank1>,
 | 
|---|
 | 800 |     _bz_cos<T_numtype1> >(d1.begin());
 | 
|---|
 | 801 | }
 | 
|---|
 | 802 | 
 | 
|---|
 | 803 | template<class P_expr1>
 | 
|---|
 | 804 | inline
 | 
|---|
 | 805 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<_bz_ArrayExpr<P_expr1>,
 | 
|---|
 | 806 |     _bz_cos<_bz_typename P_expr1::T_numtype> > >
 | 
|---|
 | 807 | cos(_bz_ArrayExpr<P_expr1> d1)
 | 
|---|
 | 808 | {
 | 
|---|
 | 809 |     return _bz_ArrayExprUnaryOp<_bz_ArrayExpr<P_expr1>,
 | 
|---|
 | 810 |     _bz_cos<_bz_typename P_expr1::T_numtype> >(d1);
 | 
|---|
 | 811 | }
 | 
|---|
 | 812 | 
 | 
|---|
 | 813 | template<int N_index1>
 | 
|---|
 | 814 | inline
 | 
|---|
 | 815 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<IndexPlaceholder<N_index1>,
 | 
|---|
 | 816 |     _bz_cos<int> > >
 | 
|---|
 | 817 | cos(IndexPlaceholder<N_index1> d1)
 | 
|---|
 | 818 | {
 | 
|---|
 | 819 |     return _bz_ArrayExprUnaryOp<IndexPlaceholder<N_index1>,
 | 
|---|
 | 820 |     _bz_cos<int> >(d1);
 | 
|---|
 | 821 | }
 | 
|---|
 | 822 | 
 | 
|---|
 | 823 | 
 | 
|---|
 | 824 | /****************************************************************************
 | 
|---|
 | 825 |  * cosh
 | 
|---|
 | 826 |  ****************************************************************************/
 | 
|---|
 | 827 | 
 | 
|---|
 | 828 | template<class T_numtype1, int N_rank1>
 | 
|---|
 | 829 | inline
 | 
|---|
 | 830 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<ArrayIterator<T_numtype1, N_rank1>,
 | 
|---|
 | 831 |     _bz_cosh<T_numtype1> > >
 | 
|---|
 | 832 | cosh(const Array<T_numtype1, N_rank1>& d1)
 | 
|---|
 | 833 | {
 | 
|---|
 | 834 |     return _bz_ArrayExprUnaryOp<ArrayIterator<T_numtype1, N_rank1>,
 | 
|---|
 | 835 |     _bz_cosh<T_numtype1> >(d1.begin());
 | 
|---|
 | 836 | }
 | 
|---|
 | 837 | 
 | 
|---|
 | 838 | template<class P_expr1>
 | 
|---|
 | 839 | inline
 | 
|---|
 | 840 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<_bz_ArrayExpr<P_expr1>,
 | 
|---|
 | 841 |     _bz_cosh<_bz_typename P_expr1::T_numtype> > >
 | 
|---|
 | 842 | cosh(_bz_ArrayExpr<P_expr1> d1)
 | 
|---|
 | 843 | {
 | 
|---|
 | 844 |     return _bz_ArrayExprUnaryOp<_bz_ArrayExpr<P_expr1>,
 | 
|---|
 | 845 |     _bz_cosh<_bz_typename P_expr1::T_numtype> >(d1);
 | 
|---|
 | 846 | }
 | 
|---|
 | 847 | 
 | 
|---|
 | 848 | template<int N_index1>
 | 
|---|
 | 849 | inline
 | 
|---|
 | 850 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<IndexPlaceholder<N_index1>,
 | 
|---|
 | 851 |     _bz_cosh<int> > >
 | 
|---|
 | 852 | cosh(IndexPlaceholder<N_index1> d1)
 | 
|---|
 | 853 | {
 | 
|---|
 | 854 |     return _bz_ArrayExprUnaryOp<IndexPlaceholder<N_index1>,
 | 
|---|
 | 855 |     _bz_cosh<int> >(d1);
 | 
|---|
 | 856 | }
 | 
|---|
 | 857 | 
 | 
|---|
 | 858 | 
 | 
|---|
 | 859 | /****************************************************************************
 | 
|---|
 | 860 |  * copysign
 | 
|---|
 | 861 |  ****************************************************************************/
 | 
|---|
 | 862 | 
 | 
|---|
 | 863 | #ifdef BZ_HAVE_SYSTEM_V_MATH
 | 
|---|
 | 864 | template<class T_numtype1, int N_rank1, class T_numtype2, int N_rank2>
 | 
|---|
 | 865 | inline
 | 
|---|
 | 866 | _bz_ArrayExpr<_bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 867 |     _bz_copysign<T_numtype1,T_numtype2> > >
 | 
|---|
 | 868 | copysign(const Array<T_numtype1, N_rank1>& d1, const Array<T_numtype2, N_rank2>& d2)
 | 
|---|
 | 869 | {
 | 
|---|
 | 870 |     return _bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 871 |     _bz_copysign<T_numtype1,T_numtype2> >(d1.begin(), d2.begin());
 | 
|---|
 | 872 | }
 | 
|---|
 | 873 | 
 | 
|---|
 | 874 | template<class T_numtype1, int N_rank1, class P_expr2>
 | 
|---|
 | 875 | inline
 | 
|---|
 | 876 | _bz_ArrayExpr<_bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 877 |     _bz_copysign<T_numtype1,_bz_typename P_expr2::T_numtype> > >
 | 
|---|
 | 878 | copysign(const Array<T_numtype1, N_rank1>& d1, _bz_ArrayExpr<P_expr2> d2)
 | 
|---|
 | 879 | {
 | 
|---|
 | 880 |     return _bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 881 |     _bz_copysign<T_numtype1,_bz_typename P_expr2::T_numtype> >(d1.begin(), d2);
 | 
|---|
 | 882 | }
 | 
|---|
 | 883 | 
 | 
|---|
 | 884 | template<class T_numtype1, int N_rank1, int N_index2>
 | 
|---|
 | 885 | inline
 | 
|---|
 | 886 | _bz_ArrayExpr<_bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, IndexPlaceholder<N_index2>,
 | 
|---|
 | 887 |     _bz_copysign<T_numtype1,int> > >
 | 
|---|
 | 888 | copysign(const Array<T_numtype1, N_rank1>& d1, IndexPlaceholder<N_index2> d2)
 | 
|---|
 | 889 | {
 | 
|---|
 | 890 |     return _bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, IndexPlaceholder<N_index2>,
 | 
|---|
 | 891 |     _bz_copysign<T_numtype1,int> >(d1.begin(), d2);
 | 
|---|
 | 892 | }
 | 
|---|
 | 893 | 
 | 
|---|
 | 894 | template<class T_numtype1, int N_rank1>
 | 
|---|
 | 895 | inline
 | 
|---|
 | 896 | _bz_ArrayExpr<_bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, _bz_ArrayExprConstant<float>,
 | 
|---|
 | 897 |     _bz_copysign<T_numtype1,float> > >
 | 
|---|
 | 898 | copysign(const Array<T_numtype1, N_rank1>& d1, float d2)
 | 
|---|
 | 899 | {
 | 
|---|
 | 900 |     return _bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, _bz_ArrayExprConstant<float>,
 | 
|---|
 | 901 |     _bz_copysign<T_numtype1,float> >(d1.begin(), _bz_ArrayExprConstant<float>(d2));
 | 
|---|
 | 902 | }
 | 
|---|
 | 903 | 
 | 
|---|
 | 904 | template<class T_numtype1, int N_rank1>
 | 
|---|
 | 905 | inline
 | 
|---|
 | 906 | _bz_ArrayExpr<_bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, _bz_ArrayExprConstant<double>,
 | 
|---|
 | 907 |     _bz_copysign<T_numtype1,double> > >
 | 
|---|
 | 908 | copysign(const Array<T_numtype1, N_rank1>& d1, double d2)
 | 
|---|
 | 909 | {
 | 
|---|
 | 910 |     return _bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, _bz_ArrayExprConstant<double>,
 | 
|---|
 | 911 |     _bz_copysign<T_numtype1,double> >(d1.begin(), _bz_ArrayExprConstant<double>(d2));
 | 
|---|
 | 912 | }
 | 
|---|
 | 913 | 
 | 
|---|
 | 914 | template<class T_numtype1, int N_rank1>
 | 
|---|
 | 915 | inline
 | 
|---|
 | 916 | _bz_ArrayExpr<_bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, _bz_ArrayExprConstant<long double>,
 | 
|---|
 | 917 |     _bz_copysign<T_numtype1,long double> > >
 | 
|---|
 | 918 | copysign(const Array<T_numtype1, N_rank1>& d1, long double d2)
 | 
|---|
 | 919 | {
 | 
|---|
 | 920 |     return _bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, _bz_ArrayExprConstant<long double>,
 | 
|---|
 | 921 |     _bz_copysign<T_numtype1,long double> >(d1.begin(), _bz_ArrayExprConstant<long double>(d2));
 | 
|---|
 | 922 | }
 | 
|---|
 | 923 | 
 | 
|---|
 | 924 | #ifdef BZ_HAVE_COMPLEX
 | 
|---|
 | 925 | template<class T_numtype1, int N_rank1, class T2>
 | 
|---|
 | 926 | inline
 | 
|---|
 | 927 | _bz_ArrayExpr<_bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, _bz_ArrayExprConstant<complex<T2> > ,
 | 
|---|
 | 928 |     _bz_copysign<T_numtype1,complex<T2> > > >
 | 
|---|
 | 929 | copysign(const Array<T_numtype1, N_rank1>& d1, complex<T2> d2)
 | 
|---|
 | 930 | {
 | 
|---|
 | 931 |     return _bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, _bz_ArrayExprConstant<complex<T2> > ,
 | 
|---|
 | 932 |     _bz_copysign<T_numtype1,complex<T2> > >(d1.begin(), _bz_ArrayExprConstant<complex<T2> > (d2));
 | 
|---|
 | 933 | }
 | 
|---|
 | 934 | 
 | 
|---|
 | 935 | #endif // BZ_HAVE_COMPLEX
 | 
|---|
 | 936 | 
 | 
|---|
 | 937 | template<class P_expr1, class T_numtype2, int N_rank2>
 | 
|---|
 | 938 | inline
 | 
|---|
 | 939 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 940 |     _bz_copysign<_bz_typename P_expr1::T_numtype,T_numtype2> > >
 | 
|---|
 | 941 | copysign(_bz_ArrayExpr<P_expr1> d1, const Array<T_numtype2, N_rank2>& d2)
 | 
|---|
 | 942 | {
 | 
|---|
 | 943 |     return _bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 944 |     _bz_copysign<_bz_typename P_expr1::T_numtype,T_numtype2> >(d1, d2.begin());
 | 
|---|
 | 945 | }
 | 
|---|
 | 946 | 
 | 
|---|
 | 947 | template<class P_expr1, class P_expr2>
 | 
|---|
 | 948 | inline
 | 
|---|
 | 949 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 950 |     _bz_copysign<_bz_typename P_expr1::T_numtype,_bz_typename P_expr2::T_numtype> > >
 | 
|---|
 | 951 | copysign(_bz_ArrayExpr<P_expr1> d1, _bz_ArrayExpr<P_expr2> d2)
 | 
|---|
 | 952 | {
 | 
|---|
 | 953 |     return _bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 954 |     _bz_copysign<_bz_typename P_expr1::T_numtype,_bz_typename P_expr2::T_numtype> >(d1, d2);
 | 
|---|
 | 955 | }
 | 
|---|
 | 956 | 
 | 
|---|
 | 957 | template<class P_expr1, int N_index2>
 | 
|---|
 | 958 | inline
 | 
|---|
 | 959 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, IndexPlaceholder<N_index2>,
 | 
|---|
 | 960 |     _bz_copysign<_bz_typename P_expr1::T_numtype,int> > >
 | 
|---|
 | 961 | copysign(_bz_ArrayExpr<P_expr1> d1, IndexPlaceholder<N_index2> d2)
 | 
|---|
 | 962 | {
 | 
|---|
 | 963 |     return _bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, IndexPlaceholder<N_index2>,
 | 
|---|
 | 964 |     _bz_copysign<_bz_typename P_expr1::T_numtype,int> >(d1, d2);
 | 
|---|
 | 965 | }
 | 
|---|
 | 966 | 
 | 
|---|
 | 967 | template<class P_expr1>
 | 
|---|
 | 968 | inline
 | 
|---|
 | 969 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, _bz_ArrayExprConstant<float>,
 | 
|---|
 | 970 |     _bz_copysign<_bz_typename P_expr1::T_numtype,float> > >
 | 
|---|
 | 971 | copysign(_bz_ArrayExpr<P_expr1> d1, float d2)
 | 
|---|
 | 972 | {
 | 
|---|
 | 973 |     return _bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, _bz_ArrayExprConstant<float>,
 | 
|---|
 | 974 |     _bz_copysign<_bz_typename P_expr1::T_numtype,float> >(d1, _bz_ArrayExprConstant<float>(d2));
 | 
|---|
 | 975 | }
 | 
|---|
 | 976 | 
 | 
|---|
 | 977 | template<class P_expr1>
 | 
|---|
 | 978 | inline
 | 
|---|
 | 979 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, _bz_ArrayExprConstant<double>,
 | 
|---|
 | 980 |     _bz_copysign<_bz_typename P_expr1::T_numtype,double> > >
 | 
|---|
 | 981 | copysign(_bz_ArrayExpr<P_expr1> d1, double d2)
 | 
|---|
 | 982 | {
 | 
|---|
 | 983 |     return _bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, _bz_ArrayExprConstant<double>,
 | 
|---|
 | 984 |     _bz_copysign<_bz_typename P_expr1::T_numtype,double> >(d1, _bz_ArrayExprConstant<double>(d2));
 | 
|---|
 | 985 | }
 | 
|---|
 | 986 | 
 | 
|---|
 | 987 | template<class P_expr1>
 | 
|---|
 | 988 | inline
 | 
|---|
 | 989 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, _bz_ArrayExprConstant<long double>,
 | 
|---|
 | 990 |     _bz_copysign<_bz_typename P_expr1::T_numtype,long double> > >
 | 
|---|
 | 991 | copysign(_bz_ArrayExpr<P_expr1> d1, long double d2)
 | 
|---|
 | 992 | {
 | 
|---|
 | 993 |     return _bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, _bz_ArrayExprConstant<long double>,
 | 
|---|
 | 994 |     _bz_copysign<_bz_typename P_expr1::T_numtype,long double> >(d1, _bz_ArrayExprConstant<long double>(d2));
 | 
|---|
 | 995 | }
 | 
|---|
 | 996 | 
 | 
|---|
 | 997 | #ifdef BZ_HAVE_COMPLEX
 | 
|---|
 | 998 | template<class P_expr1, class T2>
 | 
|---|
 | 999 | inline
 | 
|---|
 | 1000 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, _bz_ArrayExprConstant<complex<T2> > ,
 | 
|---|
 | 1001 |     _bz_copysign<_bz_typename P_expr1::T_numtype,complex<T2> > > >
 | 
|---|
 | 1002 | copysign(_bz_ArrayExpr<P_expr1> d1, complex<T2> d2)
 | 
|---|
 | 1003 | {
 | 
|---|
 | 1004 |     return _bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, _bz_ArrayExprConstant<complex<T2> > ,
 | 
|---|
 | 1005 |     _bz_copysign<_bz_typename P_expr1::T_numtype,complex<T2> > >(d1, _bz_ArrayExprConstant<complex<T2> > (d2));
 | 
|---|
 | 1006 | }
 | 
|---|
 | 1007 | 
 | 
|---|
 | 1008 | #endif // BZ_HAVE_COMPLEX
 | 
|---|
 | 1009 | 
 | 
|---|
 | 1010 | template<int N_index1, class T_numtype2, int N_rank2>
 | 
|---|
 | 1011 | inline
 | 
|---|
 | 1012 | _bz_ArrayExpr<_bz_ArrayExprOp<IndexPlaceholder<N_index1>, ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 1013 |     _bz_copysign<int,T_numtype2> > >
 | 
|---|
 | 1014 | copysign(IndexPlaceholder<N_index1> d1, const Array<T_numtype2, N_rank2>& d2)
 | 
|---|
 | 1015 | {
 | 
|---|
 | 1016 |     return _bz_ArrayExprOp<IndexPlaceholder<N_index1>, ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 1017 |     _bz_copysign<int,T_numtype2> >(d1, d2.begin());
 | 
|---|
 | 1018 | }
 | 
|---|
 | 1019 | 
 | 
|---|
 | 1020 | template<int N_index1, class P_expr2>
 | 
|---|
 | 1021 | inline
 | 
|---|
 | 1022 | _bz_ArrayExpr<_bz_ArrayExprOp<IndexPlaceholder<N_index1>, _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 1023 |     _bz_copysign<int,_bz_typename P_expr2::T_numtype> > >
 | 
|---|
 | 1024 | copysign(IndexPlaceholder<N_index1> d1, _bz_ArrayExpr<P_expr2> d2)
 | 
|---|
 | 1025 | {
 | 
|---|
 | 1026 |     return _bz_ArrayExprOp<IndexPlaceholder<N_index1>, _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 1027 |     _bz_copysign<int,_bz_typename P_expr2::T_numtype> >(d1, d2);
 | 
|---|
 | 1028 | }
 | 
|---|
 | 1029 | 
 | 
|---|
 | 1030 | template<int N_index1, int N_index2>
 | 
|---|
 | 1031 | inline
 | 
|---|
 | 1032 | _bz_ArrayExpr<_bz_ArrayExprOp<IndexPlaceholder<N_index1>, IndexPlaceholder<N_index2>,
 | 
|---|
 | 1033 |     _bz_copysign<int,int> > >
 | 
|---|
 | 1034 | copysign(IndexPlaceholder<N_index1> d1, IndexPlaceholder<N_index2> d2)
 | 
|---|
 | 1035 | {
 | 
|---|
 | 1036 |     return _bz_ArrayExprOp<IndexPlaceholder<N_index1>, IndexPlaceholder<N_index2>,
 | 
|---|
 | 1037 |     _bz_copysign<int,int> >(d1, d2);
 | 
|---|
 | 1038 | }
 | 
|---|
 | 1039 | 
 | 
|---|
 | 1040 | template<int N_index1>
 | 
|---|
 | 1041 | inline
 | 
|---|
 | 1042 | _bz_ArrayExpr<_bz_ArrayExprOp<IndexPlaceholder<N_index1>, _bz_ArrayExprConstant<float>,
 | 
|---|
 | 1043 |     _bz_copysign<int,float> > >
 | 
|---|
 | 1044 | copysign(IndexPlaceholder<N_index1> d1, float d2)
 | 
|---|
 | 1045 | {
 | 
|---|
 | 1046 |     return _bz_ArrayExprOp<IndexPlaceholder<N_index1>, _bz_ArrayExprConstant<float>,
 | 
|---|
 | 1047 |     _bz_copysign<int,float> >(d1, _bz_ArrayExprConstant<float>(d2));
 | 
|---|
 | 1048 | }
 | 
|---|
 | 1049 | 
 | 
|---|
 | 1050 | template<int N_index1>
 | 
|---|
 | 1051 | inline
 | 
|---|
 | 1052 | _bz_ArrayExpr<_bz_ArrayExprOp<IndexPlaceholder<N_index1>, _bz_ArrayExprConstant<double>,
 | 
|---|
 | 1053 |     _bz_copysign<int,double> > >
 | 
|---|
 | 1054 | copysign(IndexPlaceholder<N_index1> d1, double d2)
 | 
|---|
 | 1055 | {
 | 
|---|
 | 1056 |     return _bz_ArrayExprOp<IndexPlaceholder<N_index1>, _bz_ArrayExprConstant<double>,
 | 
|---|
 | 1057 |     _bz_copysign<int,double> >(d1, _bz_ArrayExprConstant<double>(d2));
 | 
|---|
 | 1058 | }
 | 
|---|
 | 1059 | 
 | 
|---|
 | 1060 | template<int N_index1>
 | 
|---|
 | 1061 | inline
 | 
|---|
 | 1062 | _bz_ArrayExpr<_bz_ArrayExprOp<IndexPlaceholder<N_index1>, _bz_ArrayExprConstant<long double>,
 | 
|---|
 | 1063 |     _bz_copysign<int,long double> > >
 | 
|---|
 | 1064 | copysign(IndexPlaceholder<N_index1> d1, long double d2)
 | 
|---|
 | 1065 | {
 | 
|---|
 | 1066 |     return _bz_ArrayExprOp<IndexPlaceholder<N_index1>, _bz_ArrayExprConstant<long double>,
 | 
|---|
 | 1067 |     _bz_copysign<int,long double> >(d1, _bz_ArrayExprConstant<long double>(d2));
 | 
|---|
 | 1068 | }
 | 
|---|
 | 1069 | 
 | 
|---|
 | 1070 | #ifdef BZ_HAVE_COMPLEX
 | 
|---|
 | 1071 | template<int N_index1, class T2>
 | 
|---|
 | 1072 | inline
 | 
|---|
 | 1073 | _bz_ArrayExpr<_bz_ArrayExprOp<IndexPlaceholder<N_index1>, _bz_ArrayExprConstant<complex<T2> > ,
 | 
|---|
 | 1074 |     _bz_copysign<int,complex<T2> > > >
 | 
|---|
 | 1075 | copysign(IndexPlaceholder<N_index1> d1, complex<T2> d2)
 | 
|---|
 | 1076 | {
 | 
|---|
 | 1077 |     return _bz_ArrayExprOp<IndexPlaceholder<N_index1>, _bz_ArrayExprConstant<complex<T2> > ,
 | 
|---|
 | 1078 |     _bz_copysign<int,complex<T2> > >(d1, _bz_ArrayExprConstant<complex<T2> > (d2));
 | 
|---|
 | 1079 | }
 | 
|---|
 | 1080 | 
 | 
|---|
 | 1081 | #endif // BZ_HAVE_COMPLEX
 | 
|---|
 | 1082 | 
 | 
|---|
 | 1083 | template<class T_numtype2, int N_rank2>
 | 
|---|
 | 1084 | inline
 | 
|---|
 | 1085 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExprConstant<float>, ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 1086 |     _bz_copysign<float,T_numtype2> > >
 | 
|---|
 | 1087 | copysign(float d1, const Array<T_numtype2, N_rank2>& d2)
 | 
|---|
 | 1088 | {
 | 
|---|
 | 1089 |     return _bz_ArrayExprOp<_bz_ArrayExprConstant<float>, ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 1090 |     _bz_copysign<float,T_numtype2> >(_bz_ArrayExprConstant<float>(d1), d2.begin());
 | 
|---|
 | 1091 | }
 | 
|---|
 | 1092 | 
 | 
|---|
 | 1093 | template<class P_expr2>
 | 
|---|
 | 1094 | inline
 | 
|---|
 | 1095 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExprConstant<float>, _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 1096 |     _bz_copysign<float,_bz_typename P_expr2::T_numtype> > >
 | 
|---|
 | 1097 | copysign(float d1, _bz_ArrayExpr<P_expr2> d2)
 | 
|---|
 | 1098 | {
 | 
|---|
 | 1099 |     return _bz_ArrayExprOp<_bz_ArrayExprConstant<float>, _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 1100 |     _bz_copysign<float,_bz_typename P_expr2::T_numtype> >(_bz_ArrayExprConstant<float>(d1), d2);
 | 
|---|
 | 1101 | }
 | 
|---|
 | 1102 | 
 | 
|---|
 | 1103 | template<int N_index2>
 | 
|---|
 | 1104 | inline
 | 
|---|
 | 1105 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExprConstant<float>, IndexPlaceholder<N_index2>,
 | 
|---|
 | 1106 |     _bz_copysign<float,int> > >
 | 
|---|
 | 1107 | copysign(float d1, IndexPlaceholder<N_index2> d2)
 | 
|---|
 | 1108 | {
 | 
|---|
 | 1109 |     return _bz_ArrayExprOp<_bz_ArrayExprConstant<float>, IndexPlaceholder<N_index2>,
 | 
|---|
 | 1110 |     _bz_copysign<float,int> >(_bz_ArrayExprConstant<float>(d1), d2);
 | 
|---|
 | 1111 | }
 | 
|---|
 | 1112 | 
 | 
|---|
 | 1113 | template<class T_numtype2, int N_rank2>
 | 
|---|
 | 1114 | inline
 | 
|---|
 | 1115 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExprConstant<double>, ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 1116 |     _bz_copysign<double,T_numtype2> > >
 | 
|---|
 | 1117 | copysign(double d1, const Array<T_numtype2, N_rank2>& d2)
 | 
|---|
 | 1118 | {
 | 
|---|
 | 1119 |     return _bz_ArrayExprOp<_bz_ArrayExprConstant<double>, ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 1120 |     _bz_copysign<double,T_numtype2> >(_bz_ArrayExprConstant<double>(d1), d2.begin());
 | 
|---|
 | 1121 | }
 | 
|---|
 | 1122 | 
 | 
|---|
 | 1123 | template<class P_expr2>
 | 
|---|
 | 1124 | inline
 | 
|---|
 | 1125 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExprConstant<double>, _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 1126 |     _bz_copysign<double,_bz_typename P_expr2::T_numtype> > >
 | 
|---|
 | 1127 | copysign(double d1, _bz_ArrayExpr<P_expr2> d2)
 | 
|---|
 | 1128 | {
 | 
|---|
 | 1129 |     return _bz_ArrayExprOp<_bz_ArrayExprConstant<double>, _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 1130 |     _bz_copysign<double,_bz_typename P_expr2::T_numtype> >(_bz_ArrayExprConstant<double>(d1), d2);
 | 
|---|
 | 1131 | }
 | 
|---|
 | 1132 | 
 | 
|---|
 | 1133 | template<int N_index2>
 | 
|---|
 | 1134 | inline
 | 
|---|
 | 1135 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExprConstant<double>, IndexPlaceholder<N_index2>,
 | 
|---|
 | 1136 |     _bz_copysign<double,int> > >
 | 
|---|
 | 1137 | copysign(double d1, IndexPlaceholder<N_index2> d2)
 | 
|---|
 | 1138 | {
 | 
|---|
 | 1139 |     return _bz_ArrayExprOp<_bz_ArrayExprConstant<double>, IndexPlaceholder<N_index2>,
 | 
|---|
 | 1140 |     _bz_copysign<double,int> >(_bz_ArrayExprConstant<double>(d1), d2);
 | 
|---|
 | 1141 | }
 | 
|---|
 | 1142 | 
 | 
|---|
 | 1143 | template<class T_numtype2, int N_rank2>
 | 
|---|
 | 1144 | inline
 | 
|---|
 | 1145 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExprConstant<long double>, ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 1146 |     _bz_copysign<long double,T_numtype2> > >
 | 
|---|
 | 1147 | copysign(long double d1, const Array<T_numtype2, N_rank2>& d2)
 | 
|---|
 | 1148 | {
 | 
|---|
 | 1149 |     return _bz_ArrayExprOp<_bz_ArrayExprConstant<long double>, ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 1150 |     _bz_copysign<long double,T_numtype2> >(_bz_ArrayExprConstant<long double>(d1), d2.begin());
 | 
|---|
 | 1151 | }
 | 
|---|
 | 1152 | 
 | 
|---|
 | 1153 | template<class P_expr2>
 | 
|---|
 | 1154 | inline
 | 
|---|
 | 1155 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExprConstant<long double>, _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 1156 |     _bz_copysign<long double,_bz_typename P_expr2::T_numtype> > >
 | 
|---|
 | 1157 | copysign(long double d1, _bz_ArrayExpr<P_expr2> d2)
 | 
|---|
 | 1158 | {
 | 
|---|
 | 1159 |     return _bz_ArrayExprOp<_bz_ArrayExprConstant<long double>, _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 1160 |     _bz_copysign<long double,_bz_typename P_expr2::T_numtype> >(_bz_ArrayExprConstant<long double>(d1), d2);
 | 
|---|
 | 1161 | }
 | 
|---|
 | 1162 | 
 | 
|---|
 | 1163 | template<int N_index2>
 | 
|---|
 | 1164 | inline
 | 
|---|
 | 1165 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExprConstant<long double>, IndexPlaceholder<N_index2>,
 | 
|---|
 | 1166 |     _bz_copysign<long double,int> > >
 | 
|---|
 | 1167 | copysign(long double d1, IndexPlaceholder<N_index2> d2)
 | 
|---|
 | 1168 | {
 | 
|---|
 | 1169 |     return _bz_ArrayExprOp<_bz_ArrayExprConstant<long double>, IndexPlaceholder<N_index2>,
 | 
|---|
 | 1170 |     _bz_copysign<long double,int> >(_bz_ArrayExprConstant<long double>(d1), d2);
 | 
|---|
 | 1171 | }
 | 
|---|
 | 1172 | 
 | 
|---|
 | 1173 | #ifdef BZ_HAVE_COMPLEX
 | 
|---|
 | 1174 | template<class T1, class T_numtype2, int N_rank2>
 | 
|---|
 | 1175 | inline
 | 
|---|
 | 1176 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExprConstant<complex<T1> > , ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 1177 |     _bz_copysign<complex<T1> ,T_numtype2> > >
 | 
|---|
 | 1178 | copysign(complex<T1> d1, const Array<T_numtype2, N_rank2>& d2)
 | 
|---|
 | 1179 | {
 | 
|---|
 | 1180 |     return _bz_ArrayExprOp<_bz_ArrayExprConstant<complex<T1> > , ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 1181 |     _bz_copysign<complex<T1> ,T_numtype2> >(_bz_ArrayExprConstant<complex<T1> > (d1), d2.begin());
 | 
|---|
 | 1182 | }
 | 
|---|
 | 1183 | 
 | 
|---|
 | 1184 | #endif // BZ_HAVE_COMPLEX
 | 
|---|
 | 1185 | 
 | 
|---|
 | 1186 | #ifdef BZ_HAVE_COMPLEX
 | 
|---|
 | 1187 | template<class T1, class P_expr2>
 | 
|---|
 | 1188 | inline
 | 
|---|
 | 1189 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExprConstant<complex<T1> > , _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 1190 |     _bz_copysign<complex<T1> ,_bz_typename P_expr2::T_numtype> > >
 | 
|---|
 | 1191 | copysign(complex<T1> d1, _bz_ArrayExpr<P_expr2> d2)
 | 
|---|
 | 1192 | {
 | 
|---|
 | 1193 |     return _bz_ArrayExprOp<_bz_ArrayExprConstant<complex<T1> > , _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 1194 |     _bz_copysign<complex<T1> ,_bz_typename P_expr2::T_numtype> >(_bz_ArrayExprConstant<complex<T1> > (d1), d2);
 | 
|---|
 | 1195 | }
 | 
|---|
 | 1196 | 
 | 
|---|
 | 1197 | #endif // BZ_HAVE_COMPLEX
 | 
|---|
 | 1198 | 
 | 
|---|
 | 1199 | #ifdef BZ_HAVE_COMPLEX
 | 
|---|
 | 1200 | template<class T1, int N_index2>
 | 
|---|
 | 1201 | inline
 | 
|---|
 | 1202 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExprConstant<complex<T1> > , IndexPlaceholder<N_index2>,
 | 
|---|
 | 1203 |     _bz_copysign<complex<T1> ,int> > >
 | 
|---|
 | 1204 | copysign(complex<T1> d1, IndexPlaceholder<N_index2> d2)
 | 
|---|
 | 1205 | {
 | 
|---|
 | 1206 |     return _bz_ArrayExprOp<_bz_ArrayExprConstant<complex<T1> > , IndexPlaceholder<N_index2>,
 | 
|---|
 | 1207 |     _bz_copysign<complex<T1> ,int> >(_bz_ArrayExprConstant<complex<T1> > (d1), d2);
 | 
|---|
 | 1208 | }
 | 
|---|
 | 1209 | 
 | 
|---|
 | 1210 | #endif // BZ_HAVE_COMPLEX
 | 
|---|
 | 1211 | 
 | 
|---|
 | 1212 | #endif
 | 
|---|
 | 1213 | 
 | 
|---|
 | 1214 | /****************************************************************************
 | 
|---|
 | 1215 |  * csqrt
 | 
|---|
 | 1216 |  ****************************************************************************/
 | 
|---|
 | 1217 | 
 | 
|---|
 | 1218 | template<class T_numtype1, int N_rank1>
 | 
|---|
 | 1219 | inline
 | 
|---|
 | 1220 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<ArrayIterator<T_numtype1, N_rank1>,
 | 
|---|
 | 1221 |     _bz_csqrt<T_numtype1> > >
 | 
|---|
 | 1222 | csqrt(const Array<T_numtype1, N_rank1>& d1)
 | 
|---|
 | 1223 | {
 | 
|---|
 | 1224 |     return _bz_ArrayExprUnaryOp<ArrayIterator<T_numtype1, N_rank1>,
 | 
|---|
 | 1225 |     _bz_csqrt<T_numtype1> >(d1.begin());
 | 
|---|
 | 1226 | }
 | 
|---|
 | 1227 | 
 | 
|---|
 | 1228 | template<class P_expr1>
 | 
|---|
 | 1229 | inline
 | 
|---|
 | 1230 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<_bz_ArrayExpr<P_expr1>,
 | 
|---|
 | 1231 |     _bz_csqrt<_bz_typename P_expr1::T_numtype> > >
 | 
|---|
 | 1232 | csqrt(_bz_ArrayExpr<P_expr1> d1)
 | 
|---|
 | 1233 | {
 | 
|---|
 | 1234 |     return _bz_ArrayExprUnaryOp<_bz_ArrayExpr<P_expr1>,
 | 
|---|
 | 1235 |     _bz_csqrt<_bz_typename P_expr1::T_numtype> >(d1);
 | 
|---|
 | 1236 | }
 | 
|---|
 | 1237 | 
 | 
|---|
 | 1238 | template<int N_index1>
 | 
|---|
 | 1239 | inline
 | 
|---|
 | 1240 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<IndexPlaceholder<N_index1>,
 | 
|---|
 | 1241 |     _bz_csqrt<int> > >
 | 
|---|
 | 1242 | csqrt(IndexPlaceholder<N_index1> d1)
 | 
|---|
 | 1243 | {
 | 
|---|
 | 1244 |     return _bz_ArrayExprUnaryOp<IndexPlaceholder<N_index1>,
 | 
|---|
 | 1245 |     _bz_csqrt<int> >(d1);
 | 
|---|
 | 1246 | }
 | 
|---|
 | 1247 | 
 | 
|---|
 | 1248 | 
 | 
|---|
 | 1249 | /****************************************************************************
 | 
|---|
 | 1250 |  * drem
 | 
|---|
 | 1251 |  ****************************************************************************/
 | 
|---|
 | 1252 | 
 | 
|---|
 | 1253 | #ifdef BZ_HAVE_SYSTEM_V_MATH
 | 
|---|
 | 1254 | template<class T_numtype1, int N_rank1, class T_numtype2, int N_rank2>
 | 
|---|
 | 1255 | inline
 | 
|---|
 | 1256 | _bz_ArrayExpr<_bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 1257 |     _bz_drem<T_numtype1,T_numtype2> > >
 | 
|---|
 | 1258 | drem(const Array<T_numtype1, N_rank1>& d1, const Array<T_numtype2, N_rank2>& d2)
 | 
|---|
 | 1259 | {
 | 
|---|
 | 1260 |     return _bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 1261 |     _bz_drem<T_numtype1,T_numtype2> >(d1.begin(), d2.begin());
 | 
|---|
 | 1262 | }
 | 
|---|
 | 1263 | 
 | 
|---|
 | 1264 | template<class T_numtype1, int N_rank1, class P_expr2>
 | 
|---|
 | 1265 | inline
 | 
|---|
 | 1266 | _bz_ArrayExpr<_bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 1267 |     _bz_drem<T_numtype1,_bz_typename P_expr2::T_numtype> > >
 | 
|---|
 | 1268 | drem(const Array<T_numtype1, N_rank1>& d1, _bz_ArrayExpr<P_expr2> d2)
 | 
|---|
 | 1269 | {
 | 
|---|
 | 1270 |     return _bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 1271 |     _bz_drem<T_numtype1,_bz_typename P_expr2::T_numtype> >(d1.begin(), d2);
 | 
|---|
 | 1272 | }
 | 
|---|
 | 1273 | 
 | 
|---|
 | 1274 | template<class T_numtype1, int N_rank1, int N_index2>
 | 
|---|
 | 1275 | inline
 | 
|---|
 | 1276 | _bz_ArrayExpr<_bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, IndexPlaceholder<N_index2>,
 | 
|---|
 | 1277 |     _bz_drem<T_numtype1,int> > >
 | 
|---|
 | 1278 | drem(const Array<T_numtype1, N_rank1>& d1, IndexPlaceholder<N_index2> d2)
 | 
|---|
 | 1279 | {
 | 
|---|
 | 1280 |     return _bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, IndexPlaceholder<N_index2>,
 | 
|---|
 | 1281 |     _bz_drem<T_numtype1,int> >(d1.begin(), d2);
 | 
|---|
 | 1282 | }
 | 
|---|
 | 1283 | 
 | 
|---|
 | 1284 | template<class T_numtype1, int N_rank1>
 | 
|---|
 | 1285 | inline
 | 
|---|
 | 1286 | _bz_ArrayExpr<_bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, _bz_ArrayExprConstant<float>,
 | 
|---|
 | 1287 |     _bz_drem<T_numtype1,float> > >
 | 
|---|
 | 1288 | drem(const Array<T_numtype1, N_rank1>& d1, float d2)
 | 
|---|
 | 1289 | {
 | 
|---|
 | 1290 |     return _bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, _bz_ArrayExprConstant<float>,
 | 
|---|
 | 1291 |     _bz_drem<T_numtype1,float> >(d1.begin(), _bz_ArrayExprConstant<float>(d2));
 | 
|---|
 | 1292 | }
 | 
|---|
 | 1293 | 
 | 
|---|
 | 1294 | template<class T_numtype1, int N_rank1>
 | 
|---|
 | 1295 | inline
 | 
|---|
 | 1296 | _bz_ArrayExpr<_bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, _bz_ArrayExprConstant<double>,
 | 
|---|
 | 1297 |     _bz_drem<T_numtype1,double> > >
 | 
|---|
 | 1298 | drem(const Array<T_numtype1, N_rank1>& d1, double d2)
 | 
|---|
 | 1299 | {
 | 
|---|
 | 1300 |     return _bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, _bz_ArrayExprConstant<double>,
 | 
|---|
 | 1301 |     _bz_drem<T_numtype1,double> >(d1.begin(), _bz_ArrayExprConstant<double>(d2));
 | 
|---|
 | 1302 | }
 | 
|---|
 | 1303 | 
 | 
|---|
 | 1304 | template<class T_numtype1, int N_rank1>
 | 
|---|
 | 1305 | inline
 | 
|---|
 | 1306 | _bz_ArrayExpr<_bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, _bz_ArrayExprConstant<long double>,
 | 
|---|
 | 1307 |     _bz_drem<T_numtype1,long double> > >
 | 
|---|
 | 1308 | drem(const Array<T_numtype1, N_rank1>& d1, long double d2)
 | 
|---|
 | 1309 | {
 | 
|---|
 | 1310 |     return _bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, _bz_ArrayExprConstant<long double>,
 | 
|---|
 | 1311 |     _bz_drem<T_numtype1,long double> >(d1.begin(), _bz_ArrayExprConstant<long double>(d2));
 | 
|---|
 | 1312 | }
 | 
|---|
 | 1313 | 
 | 
|---|
 | 1314 | #ifdef BZ_HAVE_COMPLEX
 | 
|---|
 | 1315 | template<class T_numtype1, int N_rank1, class T2>
 | 
|---|
 | 1316 | inline
 | 
|---|
 | 1317 | _bz_ArrayExpr<_bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, _bz_ArrayExprConstant<complex<T2> > ,
 | 
|---|
 | 1318 |     _bz_drem<T_numtype1,complex<T2> > > >
 | 
|---|
 | 1319 | drem(const Array<T_numtype1, N_rank1>& d1, complex<T2> d2)
 | 
|---|
 | 1320 | {
 | 
|---|
 | 1321 |     return _bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, _bz_ArrayExprConstant<complex<T2> > ,
 | 
|---|
 | 1322 |     _bz_drem<T_numtype1,complex<T2> > >(d1.begin(), _bz_ArrayExprConstant<complex<T2> > (d2));
 | 
|---|
 | 1323 | }
 | 
|---|
 | 1324 | 
 | 
|---|
 | 1325 | #endif // BZ_HAVE_COMPLEX
 | 
|---|
 | 1326 | 
 | 
|---|
 | 1327 | template<class P_expr1, class T_numtype2, int N_rank2>
 | 
|---|
 | 1328 | inline
 | 
|---|
 | 1329 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 1330 |     _bz_drem<_bz_typename P_expr1::T_numtype,T_numtype2> > >
 | 
|---|
 | 1331 | drem(_bz_ArrayExpr<P_expr1> d1, const Array<T_numtype2, N_rank2>& d2)
 | 
|---|
 | 1332 | {
 | 
|---|
 | 1333 |     return _bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 1334 |     _bz_drem<_bz_typename P_expr1::T_numtype,T_numtype2> >(d1, d2.begin());
 | 
|---|
 | 1335 | }
 | 
|---|
 | 1336 | 
 | 
|---|
 | 1337 | template<class P_expr1, class P_expr2>
 | 
|---|
 | 1338 | inline
 | 
|---|
 | 1339 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 1340 |     _bz_drem<_bz_typename P_expr1::T_numtype,_bz_typename P_expr2::T_numtype> > >
 | 
|---|
 | 1341 | drem(_bz_ArrayExpr<P_expr1> d1, _bz_ArrayExpr<P_expr2> d2)
 | 
|---|
 | 1342 | {
 | 
|---|
 | 1343 |     return _bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 1344 |     _bz_drem<_bz_typename P_expr1::T_numtype,_bz_typename P_expr2::T_numtype> >(d1, d2);
 | 
|---|
 | 1345 | }
 | 
|---|
 | 1346 | 
 | 
|---|
 | 1347 | template<class P_expr1, int N_index2>
 | 
|---|
 | 1348 | inline
 | 
|---|
 | 1349 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, IndexPlaceholder<N_index2>,
 | 
|---|
 | 1350 |     _bz_drem<_bz_typename P_expr1::T_numtype,int> > >
 | 
|---|
 | 1351 | drem(_bz_ArrayExpr<P_expr1> d1, IndexPlaceholder<N_index2> d2)
 | 
|---|
 | 1352 | {
 | 
|---|
 | 1353 |     return _bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, IndexPlaceholder<N_index2>,
 | 
|---|
 | 1354 |     _bz_drem<_bz_typename P_expr1::T_numtype,int> >(d1, d2);
 | 
|---|
 | 1355 | }
 | 
|---|
 | 1356 | 
 | 
|---|
 | 1357 | template<class P_expr1>
 | 
|---|
 | 1358 | inline
 | 
|---|
 | 1359 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, _bz_ArrayExprConstant<float>,
 | 
|---|
 | 1360 |     _bz_drem<_bz_typename P_expr1::T_numtype,float> > >
 | 
|---|
 | 1361 | drem(_bz_ArrayExpr<P_expr1> d1, float d2)
 | 
|---|
 | 1362 | {
 | 
|---|
 | 1363 |     return _bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, _bz_ArrayExprConstant<float>,
 | 
|---|
 | 1364 |     _bz_drem<_bz_typename P_expr1::T_numtype,float> >(d1, _bz_ArrayExprConstant<float>(d2));
 | 
|---|
 | 1365 | }
 | 
|---|
 | 1366 | 
 | 
|---|
 | 1367 | template<class P_expr1>
 | 
|---|
 | 1368 | inline
 | 
|---|
 | 1369 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, _bz_ArrayExprConstant<double>,
 | 
|---|
 | 1370 |     _bz_drem<_bz_typename P_expr1::T_numtype,double> > >
 | 
|---|
 | 1371 | drem(_bz_ArrayExpr<P_expr1> d1, double d2)
 | 
|---|
 | 1372 | {
 | 
|---|
 | 1373 |     return _bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, _bz_ArrayExprConstant<double>,
 | 
|---|
 | 1374 |     _bz_drem<_bz_typename P_expr1::T_numtype,double> >(d1, _bz_ArrayExprConstant<double>(d2));
 | 
|---|
 | 1375 | }
 | 
|---|
 | 1376 | 
 | 
|---|
 | 1377 | template<class P_expr1>
 | 
|---|
 | 1378 | inline
 | 
|---|
 | 1379 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, _bz_ArrayExprConstant<long double>,
 | 
|---|
 | 1380 |     _bz_drem<_bz_typename P_expr1::T_numtype,long double> > >
 | 
|---|
 | 1381 | drem(_bz_ArrayExpr<P_expr1> d1, long double d2)
 | 
|---|
 | 1382 | {
 | 
|---|
 | 1383 |     return _bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, _bz_ArrayExprConstant<long double>,
 | 
|---|
 | 1384 |     _bz_drem<_bz_typename P_expr1::T_numtype,long double> >(d1, _bz_ArrayExprConstant<long double>(d2));
 | 
|---|
 | 1385 | }
 | 
|---|
 | 1386 | 
 | 
|---|
 | 1387 | #ifdef BZ_HAVE_COMPLEX
 | 
|---|
 | 1388 | template<class P_expr1, class T2>
 | 
|---|
 | 1389 | inline
 | 
|---|
 | 1390 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, _bz_ArrayExprConstant<complex<T2> > ,
 | 
|---|
 | 1391 |     _bz_drem<_bz_typename P_expr1::T_numtype,complex<T2> > > >
 | 
|---|
 | 1392 | drem(_bz_ArrayExpr<P_expr1> d1, complex<T2> d2)
 | 
|---|
 | 1393 | {
 | 
|---|
 | 1394 |     return _bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, _bz_ArrayExprConstant<complex<T2> > ,
 | 
|---|
 | 1395 |     _bz_drem<_bz_typename P_expr1::T_numtype,complex<T2> > >(d1, _bz_ArrayExprConstant<complex<T2> > (d2));
 | 
|---|
 | 1396 | }
 | 
|---|
 | 1397 | 
 | 
|---|
 | 1398 | #endif // BZ_HAVE_COMPLEX
 | 
|---|
 | 1399 | 
 | 
|---|
 | 1400 | template<int N_index1, class T_numtype2, int N_rank2>
 | 
|---|
 | 1401 | inline
 | 
|---|
 | 1402 | _bz_ArrayExpr<_bz_ArrayExprOp<IndexPlaceholder<N_index1>, ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 1403 |     _bz_drem<int,T_numtype2> > >
 | 
|---|
 | 1404 | drem(IndexPlaceholder<N_index1> d1, const Array<T_numtype2, N_rank2>& d2)
 | 
|---|
 | 1405 | {
 | 
|---|
 | 1406 |     return _bz_ArrayExprOp<IndexPlaceholder<N_index1>, ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 1407 |     _bz_drem<int,T_numtype2> >(d1, d2.begin());
 | 
|---|
 | 1408 | }
 | 
|---|
 | 1409 | 
 | 
|---|
 | 1410 | template<int N_index1, class P_expr2>
 | 
|---|
 | 1411 | inline
 | 
|---|
 | 1412 | _bz_ArrayExpr<_bz_ArrayExprOp<IndexPlaceholder<N_index1>, _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 1413 |     _bz_drem<int,_bz_typename P_expr2::T_numtype> > >
 | 
|---|
 | 1414 | drem(IndexPlaceholder<N_index1> d1, _bz_ArrayExpr<P_expr2> d2)
 | 
|---|
 | 1415 | {
 | 
|---|
 | 1416 |     return _bz_ArrayExprOp<IndexPlaceholder<N_index1>, _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 1417 |     _bz_drem<int,_bz_typename P_expr2::T_numtype> >(d1, d2);
 | 
|---|
 | 1418 | }
 | 
|---|
 | 1419 | 
 | 
|---|
 | 1420 | template<int N_index1, int N_index2>
 | 
|---|
 | 1421 | inline
 | 
|---|
 | 1422 | _bz_ArrayExpr<_bz_ArrayExprOp<IndexPlaceholder<N_index1>, IndexPlaceholder<N_index2>,
 | 
|---|
 | 1423 |     _bz_drem<int,int> > >
 | 
|---|
 | 1424 | drem(IndexPlaceholder<N_index1> d1, IndexPlaceholder<N_index2> d2)
 | 
|---|
 | 1425 | {
 | 
|---|
 | 1426 |     return _bz_ArrayExprOp<IndexPlaceholder<N_index1>, IndexPlaceholder<N_index2>,
 | 
|---|
 | 1427 |     _bz_drem<int,int> >(d1, d2);
 | 
|---|
 | 1428 | }
 | 
|---|
 | 1429 | 
 | 
|---|
 | 1430 | template<int N_index1>
 | 
|---|
 | 1431 | inline
 | 
|---|
 | 1432 | _bz_ArrayExpr<_bz_ArrayExprOp<IndexPlaceholder<N_index1>, _bz_ArrayExprConstant<float>,
 | 
|---|
 | 1433 |     _bz_drem<int,float> > >
 | 
|---|
 | 1434 | drem(IndexPlaceholder<N_index1> d1, float d2)
 | 
|---|
 | 1435 | {
 | 
|---|
 | 1436 |     return _bz_ArrayExprOp<IndexPlaceholder<N_index1>, _bz_ArrayExprConstant<float>,
 | 
|---|
 | 1437 |     _bz_drem<int,float> >(d1, _bz_ArrayExprConstant<float>(d2));
 | 
|---|
 | 1438 | }
 | 
|---|
 | 1439 | 
 | 
|---|
 | 1440 | template<int N_index1>
 | 
|---|
 | 1441 | inline
 | 
|---|
 | 1442 | _bz_ArrayExpr<_bz_ArrayExprOp<IndexPlaceholder<N_index1>, _bz_ArrayExprConstant<double>,
 | 
|---|
 | 1443 |     _bz_drem<int,double> > >
 | 
|---|
 | 1444 | drem(IndexPlaceholder<N_index1> d1, double d2)
 | 
|---|
 | 1445 | {
 | 
|---|
 | 1446 |     return _bz_ArrayExprOp<IndexPlaceholder<N_index1>, _bz_ArrayExprConstant<double>,
 | 
|---|
 | 1447 |     _bz_drem<int,double> >(d1, _bz_ArrayExprConstant<double>(d2));
 | 
|---|
 | 1448 | }
 | 
|---|
 | 1449 | 
 | 
|---|
 | 1450 | template<int N_index1>
 | 
|---|
 | 1451 | inline
 | 
|---|
 | 1452 | _bz_ArrayExpr<_bz_ArrayExprOp<IndexPlaceholder<N_index1>, _bz_ArrayExprConstant<long double>,
 | 
|---|
 | 1453 |     _bz_drem<int,long double> > >
 | 
|---|
 | 1454 | drem(IndexPlaceholder<N_index1> d1, long double d2)
 | 
|---|
 | 1455 | {
 | 
|---|
 | 1456 |     return _bz_ArrayExprOp<IndexPlaceholder<N_index1>, _bz_ArrayExprConstant<long double>,
 | 
|---|
 | 1457 |     _bz_drem<int,long double> >(d1, _bz_ArrayExprConstant<long double>(d2));
 | 
|---|
 | 1458 | }
 | 
|---|
 | 1459 | 
 | 
|---|
 | 1460 | #ifdef BZ_HAVE_COMPLEX
 | 
|---|
 | 1461 | template<int N_index1, class T2>
 | 
|---|
 | 1462 | inline
 | 
|---|
 | 1463 | _bz_ArrayExpr<_bz_ArrayExprOp<IndexPlaceholder<N_index1>, _bz_ArrayExprConstant<complex<T2> > ,
 | 
|---|
 | 1464 |     _bz_drem<int,complex<T2> > > >
 | 
|---|
 | 1465 | drem(IndexPlaceholder<N_index1> d1, complex<T2> d2)
 | 
|---|
 | 1466 | {
 | 
|---|
 | 1467 |     return _bz_ArrayExprOp<IndexPlaceholder<N_index1>, _bz_ArrayExprConstant<complex<T2> > ,
 | 
|---|
 | 1468 |     _bz_drem<int,complex<T2> > >(d1, _bz_ArrayExprConstant<complex<T2> > (d2));
 | 
|---|
 | 1469 | }
 | 
|---|
 | 1470 | 
 | 
|---|
 | 1471 | #endif // BZ_HAVE_COMPLEX
 | 
|---|
 | 1472 | 
 | 
|---|
 | 1473 | template<class T_numtype2, int N_rank2>
 | 
|---|
 | 1474 | inline
 | 
|---|
 | 1475 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExprConstant<float>, ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 1476 |     _bz_drem<float,T_numtype2> > >
 | 
|---|
 | 1477 | drem(float d1, const Array<T_numtype2, N_rank2>& d2)
 | 
|---|
 | 1478 | {
 | 
|---|
 | 1479 |     return _bz_ArrayExprOp<_bz_ArrayExprConstant<float>, ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 1480 |     _bz_drem<float,T_numtype2> >(_bz_ArrayExprConstant<float>(d1), d2.begin());
 | 
|---|
 | 1481 | }
 | 
|---|
 | 1482 | 
 | 
|---|
 | 1483 | template<class P_expr2>
 | 
|---|
 | 1484 | inline
 | 
|---|
 | 1485 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExprConstant<float>, _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 1486 |     _bz_drem<float,_bz_typename P_expr2::T_numtype> > >
 | 
|---|
 | 1487 | drem(float d1, _bz_ArrayExpr<P_expr2> d2)
 | 
|---|
 | 1488 | {
 | 
|---|
 | 1489 |     return _bz_ArrayExprOp<_bz_ArrayExprConstant<float>, _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 1490 |     _bz_drem<float,_bz_typename P_expr2::T_numtype> >(_bz_ArrayExprConstant<float>(d1), d2);
 | 
|---|
 | 1491 | }
 | 
|---|
 | 1492 | 
 | 
|---|
 | 1493 | template<int N_index2>
 | 
|---|
 | 1494 | inline
 | 
|---|
 | 1495 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExprConstant<float>, IndexPlaceholder<N_index2>,
 | 
|---|
 | 1496 |     _bz_drem<float,int> > >
 | 
|---|
 | 1497 | drem(float d1, IndexPlaceholder<N_index2> d2)
 | 
|---|
 | 1498 | {
 | 
|---|
 | 1499 |     return _bz_ArrayExprOp<_bz_ArrayExprConstant<float>, IndexPlaceholder<N_index2>,
 | 
|---|
 | 1500 |     _bz_drem<float,int> >(_bz_ArrayExprConstant<float>(d1), d2);
 | 
|---|
 | 1501 | }
 | 
|---|
 | 1502 | 
 | 
|---|
 | 1503 | template<class T_numtype2, int N_rank2>
 | 
|---|
 | 1504 | inline
 | 
|---|
 | 1505 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExprConstant<double>, ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 1506 |     _bz_drem<double,T_numtype2> > >
 | 
|---|
 | 1507 | drem(double d1, const Array<T_numtype2, N_rank2>& d2)
 | 
|---|
 | 1508 | {
 | 
|---|
 | 1509 |     return _bz_ArrayExprOp<_bz_ArrayExprConstant<double>, ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 1510 |     _bz_drem<double,T_numtype2> >(_bz_ArrayExprConstant<double>(d1), d2.begin());
 | 
|---|
 | 1511 | }
 | 
|---|
 | 1512 | 
 | 
|---|
 | 1513 | template<class P_expr2>
 | 
|---|
 | 1514 | inline
 | 
|---|
 | 1515 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExprConstant<double>, _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 1516 |     _bz_drem<double,_bz_typename P_expr2::T_numtype> > >
 | 
|---|
 | 1517 | drem(double d1, _bz_ArrayExpr<P_expr2> d2)
 | 
|---|
 | 1518 | {
 | 
|---|
 | 1519 |     return _bz_ArrayExprOp<_bz_ArrayExprConstant<double>, _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 1520 |     _bz_drem<double,_bz_typename P_expr2::T_numtype> >(_bz_ArrayExprConstant<double>(d1), d2);
 | 
|---|
 | 1521 | }
 | 
|---|
 | 1522 | 
 | 
|---|
 | 1523 | template<int N_index2>
 | 
|---|
 | 1524 | inline
 | 
|---|
 | 1525 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExprConstant<double>, IndexPlaceholder<N_index2>,
 | 
|---|
 | 1526 |     _bz_drem<double,int> > >
 | 
|---|
 | 1527 | drem(double d1, IndexPlaceholder<N_index2> d2)
 | 
|---|
 | 1528 | {
 | 
|---|
 | 1529 |     return _bz_ArrayExprOp<_bz_ArrayExprConstant<double>, IndexPlaceholder<N_index2>,
 | 
|---|
 | 1530 |     _bz_drem<double,int> >(_bz_ArrayExprConstant<double>(d1), d2);
 | 
|---|
 | 1531 | }
 | 
|---|
 | 1532 | 
 | 
|---|
 | 1533 | template<class T_numtype2, int N_rank2>
 | 
|---|
 | 1534 | inline
 | 
|---|
 | 1535 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExprConstant<long double>, ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 1536 |     _bz_drem<long double,T_numtype2> > >
 | 
|---|
 | 1537 | drem(long double d1, const Array<T_numtype2, N_rank2>& d2)
 | 
|---|
 | 1538 | {
 | 
|---|
 | 1539 |     return _bz_ArrayExprOp<_bz_ArrayExprConstant<long double>, ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 1540 |     _bz_drem<long double,T_numtype2> >(_bz_ArrayExprConstant<long double>(d1), d2.begin());
 | 
|---|
 | 1541 | }
 | 
|---|
 | 1542 | 
 | 
|---|
 | 1543 | template<class P_expr2>
 | 
|---|
 | 1544 | inline
 | 
|---|
 | 1545 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExprConstant<long double>, _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 1546 |     _bz_drem<long double,_bz_typename P_expr2::T_numtype> > >
 | 
|---|
 | 1547 | drem(long double d1, _bz_ArrayExpr<P_expr2> d2)
 | 
|---|
 | 1548 | {
 | 
|---|
 | 1549 |     return _bz_ArrayExprOp<_bz_ArrayExprConstant<long double>, _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 1550 |     _bz_drem<long double,_bz_typename P_expr2::T_numtype> >(_bz_ArrayExprConstant<long double>(d1), d2);
 | 
|---|
 | 1551 | }
 | 
|---|
 | 1552 | 
 | 
|---|
 | 1553 | template<int N_index2>
 | 
|---|
 | 1554 | inline
 | 
|---|
 | 1555 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExprConstant<long double>, IndexPlaceholder<N_index2>,
 | 
|---|
 | 1556 |     _bz_drem<long double,int> > >
 | 
|---|
 | 1557 | drem(long double d1, IndexPlaceholder<N_index2> d2)
 | 
|---|
 | 1558 | {
 | 
|---|
 | 1559 |     return _bz_ArrayExprOp<_bz_ArrayExprConstant<long double>, IndexPlaceholder<N_index2>,
 | 
|---|
 | 1560 |     _bz_drem<long double,int> >(_bz_ArrayExprConstant<long double>(d1), d2);
 | 
|---|
 | 1561 | }
 | 
|---|
 | 1562 | 
 | 
|---|
 | 1563 | #ifdef BZ_HAVE_COMPLEX
 | 
|---|
 | 1564 | template<class T1, class T_numtype2, int N_rank2>
 | 
|---|
 | 1565 | inline
 | 
|---|
 | 1566 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExprConstant<complex<T1> > , ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 1567 |     _bz_drem<complex<T1> ,T_numtype2> > >
 | 
|---|
 | 1568 | drem(complex<T1> d1, const Array<T_numtype2, N_rank2>& d2)
 | 
|---|
 | 1569 | {
 | 
|---|
 | 1570 |     return _bz_ArrayExprOp<_bz_ArrayExprConstant<complex<T1> > , ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 1571 |     _bz_drem<complex<T1> ,T_numtype2> >(_bz_ArrayExprConstant<complex<T1> > (d1), d2.begin());
 | 
|---|
 | 1572 | }
 | 
|---|
 | 1573 | 
 | 
|---|
 | 1574 | #endif // BZ_HAVE_COMPLEX
 | 
|---|
 | 1575 | 
 | 
|---|
 | 1576 | #ifdef BZ_HAVE_COMPLEX
 | 
|---|
 | 1577 | template<class T1, class P_expr2>
 | 
|---|
 | 1578 | inline
 | 
|---|
 | 1579 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExprConstant<complex<T1> > , _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 1580 |     _bz_drem<complex<T1> ,_bz_typename P_expr2::T_numtype> > >
 | 
|---|
 | 1581 | drem(complex<T1> d1, _bz_ArrayExpr<P_expr2> d2)
 | 
|---|
 | 1582 | {
 | 
|---|
 | 1583 |     return _bz_ArrayExprOp<_bz_ArrayExprConstant<complex<T1> > , _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 1584 |     _bz_drem<complex<T1> ,_bz_typename P_expr2::T_numtype> >(_bz_ArrayExprConstant<complex<T1> > (d1), d2);
 | 
|---|
 | 1585 | }
 | 
|---|
 | 1586 | 
 | 
|---|
 | 1587 | #endif // BZ_HAVE_COMPLEX
 | 
|---|
 | 1588 | 
 | 
|---|
 | 1589 | #ifdef BZ_HAVE_COMPLEX
 | 
|---|
 | 1590 | template<class T1, int N_index2>
 | 
|---|
 | 1591 | inline
 | 
|---|
 | 1592 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExprConstant<complex<T1> > , IndexPlaceholder<N_index2>,
 | 
|---|
 | 1593 |     _bz_drem<complex<T1> ,int> > >
 | 
|---|
 | 1594 | drem(complex<T1> d1, IndexPlaceholder<N_index2> d2)
 | 
|---|
 | 1595 | {
 | 
|---|
 | 1596 |     return _bz_ArrayExprOp<_bz_ArrayExprConstant<complex<T1> > , IndexPlaceholder<N_index2>,
 | 
|---|
 | 1597 |     _bz_drem<complex<T1> ,int> >(_bz_ArrayExprConstant<complex<T1> > (d1), d2);
 | 
|---|
 | 1598 | }
 | 
|---|
 | 1599 | 
 | 
|---|
 | 1600 | #endif // BZ_HAVE_COMPLEX
 | 
|---|
 | 1601 | 
 | 
|---|
 | 1602 | #endif
 | 
|---|
 | 1603 | 
 | 
|---|
 | 1604 | /****************************************************************************
 | 
|---|
 | 1605 |  * exp
 | 
|---|
 | 1606 |  ****************************************************************************/
 | 
|---|
 | 1607 | 
 | 
|---|
 | 1608 | template<class T_numtype1, int N_rank1>
 | 
|---|
 | 1609 | inline
 | 
|---|
 | 1610 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<ArrayIterator<T_numtype1, N_rank1>,
 | 
|---|
 | 1611 |     _bz_exp<T_numtype1> > >
 | 
|---|
 | 1612 | exp(const Array<T_numtype1, N_rank1>& d1)
 | 
|---|
 | 1613 | {
 | 
|---|
 | 1614 |     return _bz_ArrayExprUnaryOp<ArrayIterator<T_numtype1, N_rank1>,
 | 
|---|
 | 1615 |     _bz_exp<T_numtype1> >(d1.begin());
 | 
|---|
 | 1616 | }
 | 
|---|
 | 1617 | 
 | 
|---|
 | 1618 | template<class P_expr1>
 | 
|---|
 | 1619 | inline
 | 
|---|
 | 1620 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<_bz_ArrayExpr<P_expr1>,
 | 
|---|
 | 1621 |     _bz_exp<_bz_typename P_expr1::T_numtype> > >
 | 
|---|
 | 1622 | exp(_bz_ArrayExpr<P_expr1> d1)
 | 
|---|
 | 1623 | {
 | 
|---|
 | 1624 |     return _bz_ArrayExprUnaryOp<_bz_ArrayExpr<P_expr1>,
 | 
|---|
 | 1625 |     _bz_exp<_bz_typename P_expr1::T_numtype> >(d1);
 | 
|---|
 | 1626 | }
 | 
|---|
 | 1627 | 
 | 
|---|
 | 1628 | template<int N_index1>
 | 
|---|
 | 1629 | inline
 | 
|---|
 | 1630 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<IndexPlaceholder<N_index1>,
 | 
|---|
 | 1631 |     _bz_exp<int> > >
 | 
|---|
 | 1632 | exp(IndexPlaceholder<N_index1> d1)
 | 
|---|
 | 1633 | {
 | 
|---|
 | 1634 |     return _bz_ArrayExprUnaryOp<IndexPlaceholder<N_index1>,
 | 
|---|
 | 1635 |     _bz_exp<int> >(d1);
 | 
|---|
 | 1636 | }
 | 
|---|
 | 1637 | 
 | 
|---|
 | 1638 | 
 | 
|---|
 | 1639 | /****************************************************************************
 | 
|---|
 | 1640 |  * expm1
 | 
|---|
 | 1641 |  ****************************************************************************/
 | 
|---|
 | 1642 | 
 | 
|---|
 | 1643 | #ifdef BZ_HAVE_IEEE_MATH
 | 
|---|
 | 1644 | template<class T_numtype1, int N_rank1>
 | 
|---|
 | 1645 | inline
 | 
|---|
 | 1646 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<ArrayIterator<T_numtype1, N_rank1>,
 | 
|---|
 | 1647 |     _bz_expm1<T_numtype1> > >
 | 
|---|
 | 1648 | expm1(const Array<T_numtype1, N_rank1>& d1)
 | 
|---|
 | 1649 | {
 | 
|---|
 | 1650 |     return _bz_ArrayExprUnaryOp<ArrayIterator<T_numtype1, N_rank1>,
 | 
|---|
 | 1651 |     _bz_expm1<T_numtype1> >(d1.begin());
 | 
|---|
 | 1652 | }
 | 
|---|
 | 1653 | 
 | 
|---|
 | 1654 | template<class P_expr1>
 | 
|---|
 | 1655 | inline
 | 
|---|
 | 1656 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<_bz_ArrayExpr<P_expr1>,
 | 
|---|
 | 1657 |     _bz_expm1<_bz_typename P_expr1::T_numtype> > >
 | 
|---|
 | 1658 | expm1(_bz_ArrayExpr<P_expr1> d1)
 | 
|---|
 | 1659 | {
 | 
|---|
 | 1660 |     return _bz_ArrayExprUnaryOp<_bz_ArrayExpr<P_expr1>,
 | 
|---|
 | 1661 |     _bz_expm1<_bz_typename P_expr1::T_numtype> >(d1);
 | 
|---|
 | 1662 | }
 | 
|---|
 | 1663 | 
 | 
|---|
 | 1664 | template<int N_index1>
 | 
|---|
 | 1665 | inline
 | 
|---|
 | 1666 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<IndexPlaceholder<N_index1>,
 | 
|---|
 | 1667 |     _bz_expm1<int> > >
 | 
|---|
 | 1668 | expm1(IndexPlaceholder<N_index1> d1)
 | 
|---|
 | 1669 | {
 | 
|---|
 | 1670 |     return _bz_ArrayExprUnaryOp<IndexPlaceholder<N_index1>,
 | 
|---|
 | 1671 |     _bz_expm1<int> >(d1);
 | 
|---|
 | 1672 | }
 | 
|---|
 | 1673 | 
 | 
|---|
 | 1674 | #endif
 | 
|---|
 | 1675 | 
 | 
|---|
 | 1676 | /****************************************************************************
 | 
|---|
 | 1677 |  * erf
 | 
|---|
 | 1678 |  ****************************************************************************/
 | 
|---|
 | 1679 | 
 | 
|---|
 | 1680 | #ifdef BZ_HAVE_IEEE_MATH
 | 
|---|
 | 1681 | template<class T_numtype1, int N_rank1>
 | 
|---|
 | 1682 | inline
 | 
|---|
 | 1683 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<ArrayIterator<T_numtype1, N_rank1>,
 | 
|---|
 | 1684 |     _bz_erf<T_numtype1> > >
 | 
|---|
 | 1685 | erf(const Array<T_numtype1, N_rank1>& d1)
 | 
|---|
 | 1686 | {
 | 
|---|
 | 1687 |     return _bz_ArrayExprUnaryOp<ArrayIterator<T_numtype1, N_rank1>,
 | 
|---|
 | 1688 |     _bz_erf<T_numtype1> >(d1.begin());
 | 
|---|
 | 1689 | }
 | 
|---|
 | 1690 | 
 | 
|---|
 | 1691 | template<class P_expr1>
 | 
|---|
 | 1692 | inline
 | 
|---|
 | 1693 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<_bz_ArrayExpr<P_expr1>,
 | 
|---|
 | 1694 |     _bz_erf<_bz_typename P_expr1::T_numtype> > >
 | 
|---|
 | 1695 | erf(_bz_ArrayExpr<P_expr1> d1)
 | 
|---|
 | 1696 | {
 | 
|---|
 | 1697 |     return _bz_ArrayExprUnaryOp<_bz_ArrayExpr<P_expr1>,
 | 
|---|
 | 1698 |     _bz_erf<_bz_typename P_expr1::T_numtype> >(d1);
 | 
|---|
 | 1699 | }
 | 
|---|
 | 1700 | 
 | 
|---|
 | 1701 | template<int N_index1>
 | 
|---|
 | 1702 | inline
 | 
|---|
 | 1703 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<IndexPlaceholder<N_index1>,
 | 
|---|
 | 1704 |     _bz_erf<int> > >
 | 
|---|
 | 1705 | erf(IndexPlaceholder<N_index1> d1)
 | 
|---|
 | 1706 | {
 | 
|---|
 | 1707 |     return _bz_ArrayExprUnaryOp<IndexPlaceholder<N_index1>,
 | 
|---|
 | 1708 |     _bz_erf<int> >(d1);
 | 
|---|
 | 1709 | }
 | 
|---|
 | 1710 | 
 | 
|---|
 | 1711 | #endif
 | 
|---|
 | 1712 | 
 | 
|---|
 | 1713 | /****************************************************************************
 | 
|---|
 | 1714 |  * erfc
 | 
|---|
 | 1715 |  ****************************************************************************/
 | 
|---|
 | 1716 | 
 | 
|---|
 | 1717 | #ifdef BZ_HAVE_IEEE_MATH
 | 
|---|
 | 1718 | template<class T_numtype1, int N_rank1>
 | 
|---|
 | 1719 | inline
 | 
|---|
 | 1720 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<ArrayIterator<T_numtype1, N_rank1>,
 | 
|---|
 | 1721 |     _bz_erfc<T_numtype1> > >
 | 
|---|
 | 1722 | erfc(const Array<T_numtype1, N_rank1>& d1)
 | 
|---|
 | 1723 | {
 | 
|---|
 | 1724 |     return _bz_ArrayExprUnaryOp<ArrayIterator<T_numtype1, N_rank1>,
 | 
|---|
 | 1725 |     _bz_erfc<T_numtype1> >(d1.begin());
 | 
|---|
 | 1726 | }
 | 
|---|
 | 1727 | 
 | 
|---|
 | 1728 | template<class P_expr1>
 | 
|---|
 | 1729 | inline
 | 
|---|
 | 1730 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<_bz_ArrayExpr<P_expr1>,
 | 
|---|
 | 1731 |     _bz_erfc<_bz_typename P_expr1::T_numtype> > >
 | 
|---|
 | 1732 | erfc(_bz_ArrayExpr<P_expr1> d1)
 | 
|---|
 | 1733 | {
 | 
|---|
 | 1734 |     return _bz_ArrayExprUnaryOp<_bz_ArrayExpr<P_expr1>,
 | 
|---|
 | 1735 |     _bz_erfc<_bz_typename P_expr1::T_numtype> >(d1);
 | 
|---|
 | 1736 | }
 | 
|---|
 | 1737 | 
 | 
|---|
 | 1738 | template<int N_index1>
 | 
|---|
 | 1739 | inline
 | 
|---|
 | 1740 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<IndexPlaceholder<N_index1>,
 | 
|---|
 | 1741 |     _bz_erfc<int> > >
 | 
|---|
 | 1742 | erfc(IndexPlaceholder<N_index1> d1)
 | 
|---|
 | 1743 | {
 | 
|---|
 | 1744 |     return _bz_ArrayExprUnaryOp<IndexPlaceholder<N_index1>,
 | 
|---|
 | 1745 |     _bz_erfc<int> >(d1);
 | 
|---|
 | 1746 | }
 | 
|---|
 | 1747 | 
 | 
|---|
 | 1748 | #endif
 | 
|---|
 | 1749 | 
 | 
|---|
 | 1750 | /****************************************************************************
 | 
|---|
 | 1751 |  * fabs
 | 
|---|
 | 1752 |  ****************************************************************************/
 | 
|---|
 | 1753 | 
 | 
|---|
 | 1754 | template<class T_numtype1, int N_rank1>
 | 
|---|
 | 1755 | inline
 | 
|---|
 | 1756 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<ArrayIterator<T_numtype1, N_rank1>,
 | 
|---|
 | 1757 |     _bz_abs<T_numtype1> > >
 | 
|---|
 | 1758 | fabs(const Array<T_numtype1, N_rank1>& d1)
 | 
|---|
 | 1759 | {
 | 
|---|
 | 1760 |     return _bz_ArrayExprUnaryOp<ArrayIterator<T_numtype1, N_rank1>,
 | 
|---|
 | 1761 |     _bz_abs<T_numtype1> >(d1.begin());
 | 
|---|
 | 1762 | }
 | 
|---|
 | 1763 | 
 | 
|---|
 | 1764 | template<class P_expr1>
 | 
|---|
 | 1765 | inline
 | 
|---|
 | 1766 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<_bz_ArrayExpr<P_expr1>,
 | 
|---|
 | 1767 |     _bz_abs<_bz_typename P_expr1::T_numtype> > >
 | 
|---|
 | 1768 | fabs(_bz_ArrayExpr<P_expr1> d1)
 | 
|---|
 | 1769 | {
 | 
|---|
 | 1770 |     return _bz_ArrayExprUnaryOp<_bz_ArrayExpr<P_expr1>,
 | 
|---|
 | 1771 |     _bz_abs<_bz_typename P_expr1::T_numtype> >(d1);
 | 
|---|
 | 1772 | }
 | 
|---|
 | 1773 | 
 | 
|---|
 | 1774 | template<int N_index1>
 | 
|---|
 | 1775 | inline
 | 
|---|
 | 1776 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<IndexPlaceholder<N_index1>,
 | 
|---|
 | 1777 |     _bz_abs<int> > >
 | 
|---|
 | 1778 | fabs(IndexPlaceholder<N_index1> d1)
 | 
|---|
 | 1779 | {
 | 
|---|
 | 1780 |     return _bz_ArrayExprUnaryOp<IndexPlaceholder<N_index1>,
 | 
|---|
 | 1781 |     _bz_abs<int> >(d1);
 | 
|---|
 | 1782 | }
 | 
|---|
 | 1783 | 
 | 
|---|
 | 1784 | 
 | 
|---|
 | 1785 | /****************************************************************************
 | 
|---|
 | 1786 |  * finite
 | 
|---|
 | 1787 |  ****************************************************************************/
 | 
|---|
 | 1788 | 
 | 
|---|
 | 1789 | #ifdef BZ_HAVE_IEEE_MATH
 | 
|---|
 | 1790 | template<class T_numtype1, int N_rank1>
 | 
|---|
 | 1791 | inline
 | 
|---|
 | 1792 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<ArrayIterator<T_numtype1, N_rank1>,
 | 
|---|
 | 1793 |     _bz_finite<T_numtype1> > >
 | 
|---|
 | 1794 | finite(const Array<T_numtype1, N_rank1>& d1)
 | 
|---|
 | 1795 | {
 | 
|---|
 | 1796 |     return _bz_ArrayExprUnaryOp<ArrayIterator<T_numtype1, N_rank1>,
 | 
|---|
 | 1797 |     _bz_finite<T_numtype1> >(d1.begin());
 | 
|---|
 | 1798 | }
 | 
|---|
 | 1799 | 
 | 
|---|
 | 1800 | template<class P_expr1>
 | 
|---|
 | 1801 | inline
 | 
|---|
 | 1802 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<_bz_ArrayExpr<P_expr1>,
 | 
|---|
 | 1803 |     _bz_finite<_bz_typename P_expr1::T_numtype> > >
 | 
|---|
 | 1804 | finite(_bz_ArrayExpr<P_expr1> d1)
 | 
|---|
 | 1805 | {
 | 
|---|
 | 1806 |     return _bz_ArrayExprUnaryOp<_bz_ArrayExpr<P_expr1>,
 | 
|---|
 | 1807 |     _bz_finite<_bz_typename P_expr1::T_numtype> >(d1);
 | 
|---|
 | 1808 | }
 | 
|---|
 | 1809 | 
 | 
|---|
 | 1810 | template<int N_index1>
 | 
|---|
 | 1811 | inline
 | 
|---|
 | 1812 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<IndexPlaceholder<N_index1>,
 | 
|---|
 | 1813 |     _bz_finite<int> > >
 | 
|---|
 | 1814 | finite(IndexPlaceholder<N_index1> d1)
 | 
|---|
 | 1815 | {
 | 
|---|
 | 1816 |     return _bz_ArrayExprUnaryOp<IndexPlaceholder<N_index1>,
 | 
|---|
 | 1817 |     _bz_finite<int> >(d1);
 | 
|---|
 | 1818 | }
 | 
|---|
 | 1819 | 
 | 
|---|
 | 1820 | #endif
 | 
|---|
 | 1821 | 
 | 
|---|
 | 1822 | /****************************************************************************
 | 
|---|
 | 1823 |  * floor
 | 
|---|
 | 1824 |  ****************************************************************************/
 | 
|---|
 | 1825 | 
 | 
|---|
 | 1826 | template<class T_numtype1, int N_rank1>
 | 
|---|
 | 1827 | inline
 | 
|---|
 | 1828 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<ArrayIterator<T_numtype1, N_rank1>,
 | 
|---|
 | 1829 |     _bz_floor<T_numtype1> > >
 | 
|---|
 | 1830 | floor(const Array<T_numtype1, N_rank1>& d1)
 | 
|---|
 | 1831 | {
 | 
|---|
 | 1832 |     return _bz_ArrayExprUnaryOp<ArrayIterator<T_numtype1, N_rank1>,
 | 
|---|
 | 1833 |     _bz_floor<T_numtype1> >(d1.begin());
 | 
|---|
 | 1834 | }
 | 
|---|
 | 1835 | 
 | 
|---|
 | 1836 | template<class P_expr1>
 | 
|---|
 | 1837 | inline
 | 
|---|
 | 1838 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<_bz_ArrayExpr<P_expr1>,
 | 
|---|
 | 1839 |     _bz_floor<_bz_typename P_expr1::T_numtype> > >
 | 
|---|
 | 1840 | floor(_bz_ArrayExpr<P_expr1> d1)
 | 
|---|
 | 1841 | {
 | 
|---|
 | 1842 |     return _bz_ArrayExprUnaryOp<_bz_ArrayExpr<P_expr1>,
 | 
|---|
 | 1843 |     _bz_floor<_bz_typename P_expr1::T_numtype> >(d1);
 | 
|---|
 | 1844 | }
 | 
|---|
 | 1845 | 
 | 
|---|
 | 1846 | template<int N_index1>
 | 
|---|
 | 1847 | inline
 | 
|---|
 | 1848 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<IndexPlaceholder<N_index1>,
 | 
|---|
 | 1849 |     _bz_floor<int> > >
 | 
|---|
 | 1850 | floor(IndexPlaceholder<N_index1> d1)
 | 
|---|
 | 1851 | {
 | 
|---|
 | 1852 |     return _bz_ArrayExprUnaryOp<IndexPlaceholder<N_index1>,
 | 
|---|
 | 1853 |     _bz_floor<int> >(d1);
 | 
|---|
 | 1854 | }
 | 
|---|
 | 1855 | 
 | 
|---|
 | 1856 | 
 | 
|---|
 | 1857 | /****************************************************************************
 | 
|---|
 | 1858 |  * fmod
 | 
|---|
 | 1859 |  ****************************************************************************/
 | 
|---|
 | 1860 | 
 | 
|---|
 | 1861 | #ifdef BZ_HAVE_SYSTEM_V_MATH
 | 
|---|
 | 1862 | template<class T_numtype1, int N_rank1, class T_numtype2, int N_rank2>
 | 
|---|
 | 1863 | inline
 | 
|---|
 | 1864 | _bz_ArrayExpr<_bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 1865 |     _bz_fmod<T_numtype1,T_numtype2> > >
 | 
|---|
 | 1866 | fmod(const Array<T_numtype1, N_rank1>& d1, const Array<T_numtype2, N_rank2>& d2)
 | 
|---|
 | 1867 | {
 | 
|---|
 | 1868 |     return _bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 1869 |     _bz_fmod<T_numtype1,T_numtype2> >(d1.begin(), d2.begin());
 | 
|---|
 | 1870 | }
 | 
|---|
 | 1871 | 
 | 
|---|
 | 1872 | template<class T_numtype1, int N_rank1, class P_expr2>
 | 
|---|
 | 1873 | inline
 | 
|---|
 | 1874 | _bz_ArrayExpr<_bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 1875 |     _bz_fmod<T_numtype1,_bz_typename P_expr2::T_numtype> > >
 | 
|---|
 | 1876 | fmod(const Array<T_numtype1, N_rank1>& d1, _bz_ArrayExpr<P_expr2> d2)
 | 
|---|
 | 1877 | {
 | 
|---|
 | 1878 |     return _bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 1879 |     _bz_fmod<T_numtype1,_bz_typename P_expr2::T_numtype> >(d1.begin(), d2);
 | 
|---|
 | 1880 | }
 | 
|---|
 | 1881 | 
 | 
|---|
 | 1882 | template<class T_numtype1, int N_rank1, int N_index2>
 | 
|---|
 | 1883 | inline
 | 
|---|
 | 1884 | _bz_ArrayExpr<_bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, IndexPlaceholder<N_index2>,
 | 
|---|
 | 1885 |     _bz_fmod<T_numtype1,int> > >
 | 
|---|
 | 1886 | fmod(const Array<T_numtype1, N_rank1>& d1, IndexPlaceholder<N_index2> d2)
 | 
|---|
 | 1887 | {
 | 
|---|
 | 1888 |     return _bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, IndexPlaceholder<N_index2>,
 | 
|---|
 | 1889 |     _bz_fmod<T_numtype1,int> >(d1.begin(), d2);
 | 
|---|
 | 1890 | }
 | 
|---|
 | 1891 | 
 | 
|---|
 | 1892 | template<class T_numtype1, int N_rank1>
 | 
|---|
 | 1893 | inline
 | 
|---|
 | 1894 | _bz_ArrayExpr<_bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, _bz_ArrayExprConstant<float>,
 | 
|---|
 | 1895 |     _bz_fmod<T_numtype1,float> > >
 | 
|---|
 | 1896 | fmod(const Array<T_numtype1, N_rank1>& d1, float d2)
 | 
|---|
 | 1897 | {
 | 
|---|
 | 1898 |     return _bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, _bz_ArrayExprConstant<float>,
 | 
|---|
 | 1899 |     _bz_fmod<T_numtype1,float> >(d1.begin(), _bz_ArrayExprConstant<float>(d2));
 | 
|---|
 | 1900 | }
 | 
|---|
 | 1901 | 
 | 
|---|
 | 1902 | template<class T_numtype1, int N_rank1>
 | 
|---|
 | 1903 | inline
 | 
|---|
 | 1904 | _bz_ArrayExpr<_bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, _bz_ArrayExprConstant<double>,
 | 
|---|
 | 1905 |     _bz_fmod<T_numtype1,double> > >
 | 
|---|
 | 1906 | fmod(const Array<T_numtype1, N_rank1>& d1, double d2)
 | 
|---|
 | 1907 | {
 | 
|---|
 | 1908 |     return _bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, _bz_ArrayExprConstant<double>,
 | 
|---|
 | 1909 |     _bz_fmod<T_numtype1,double> >(d1.begin(), _bz_ArrayExprConstant<double>(d2));
 | 
|---|
 | 1910 | }
 | 
|---|
 | 1911 | 
 | 
|---|
 | 1912 | template<class T_numtype1, int N_rank1>
 | 
|---|
 | 1913 | inline
 | 
|---|
 | 1914 | _bz_ArrayExpr<_bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, _bz_ArrayExprConstant<long double>,
 | 
|---|
 | 1915 |     _bz_fmod<T_numtype1,long double> > >
 | 
|---|
 | 1916 | fmod(const Array<T_numtype1, N_rank1>& d1, long double d2)
 | 
|---|
 | 1917 | {
 | 
|---|
 | 1918 |     return _bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, _bz_ArrayExprConstant<long double>,
 | 
|---|
 | 1919 |     _bz_fmod<T_numtype1,long double> >(d1.begin(), _bz_ArrayExprConstant<long double>(d2));
 | 
|---|
 | 1920 | }
 | 
|---|
 | 1921 | 
 | 
|---|
 | 1922 | #ifdef BZ_HAVE_COMPLEX
 | 
|---|
 | 1923 | template<class T_numtype1, int N_rank1, class T2>
 | 
|---|
 | 1924 | inline
 | 
|---|
 | 1925 | _bz_ArrayExpr<_bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, _bz_ArrayExprConstant<complex<T2> > ,
 | 
|---|
 | 1926 |     _bz_fmod<T_numtype1,complex<T2> > > >
 | 
|---|
 | 1927 | fmod(const Array<T_numtype1, N_rank1>& d1, complex<T2> d2)
 | 
|---|
 | 1928 | {
 | 
|---|
 | 1929 |     return _bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, _bz_ArrayExprConstant<complex<T2> > ,
 | 
|---|
 | 1930 |     _bz_fmod<T_numtype1,complex<T2> > >(d1.begin(), _bz_ArrayExprConstant<complex<T2> > (d2));
 | 
|---|
 | 1931 | }
 | 
|---|
 | 1932 | 
 | 
|---|
 | 1933 | #endif // BZ_HAVE_COMPLEX
 | 
|---|
 | 1934 | 
 | 
|---|
 | 1935 | template<class P_expr1, class T_numtype2, int N_rank2>
 | 
|---|
 | 1936 | inline
 | 
|---|
 | 1937 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 1938 |     _bz_fmod<_bz_typename P_expr1::T_numtype,T_numtype2> > >
 | 
|---|
 | 1939 | fmod(_bz_ArrayExpr<P_expr1> d1, const Array<T_numtype2, N_rank2>& d2)
 | 
|---|
 | 1940 | {
 | 
|---|
 | 1941 |     return _bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 1942 |     _bz_fmod<_bz_typename P_expr1::T_numtype,T_numtype2> >(d1, d2.begin());
 | 
|---|
 | 1943 | }
 | 
|---|
 | 1944 | 
 | 
|---|
 | 1945 | template<class P_expr1, class P_expr2>
 | 
|---|
 | 1946 | inline
 | 
|---|
 | 1947 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 1948 |     _bz_fmod<_bz_typename P_expr1::T_numtype,_bz_typename P_expr2::T_numtype> > >
 | 
|---|
 | 1949 | fmod(_bz_ArrayExpr<P_expr1> d1, _bz_ArrayExpr<P_expr2> d2)
 | 
|---|
 | 1950 | {
 | 
|---|
 | 1951 |     return _bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 1952 |     _bz_fmod<_bz_typename P_expr1::T_numtype,_bz_typename P_expr2::T_numtype> >(d1, d2);
 | 
|---|
 | 1953 | }
 | 
|---|
 | 1954 | 
 | 
|---|
 | 1955 | template<class P_expr1, int N_index2>
 | 
|---|
 | 1956 | inline
 | 
|---|
 | 1957 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, IndexPlaceholder<N_index2>,
 | 
|---|
 | 1958 |     _bz_fmod<_bz_typename P_expr1::T_numtype,int> > >
 | 
|---|
 | 1959 | fmod(_bz_ArrayExpr<P_expr1> d1, IndexPlaceholder<N_index2> d2)
 | 
|---|
 | 1960 | {
 | 
|---|
 | 1961 |     return _bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, IndexPlaceholder<N_index2>,
 | 
|---|
 | 1962 |     _bz_fmod<_bz_typename P_expr1::T_numtype,int> >(d1, d2);
 | 
|---|
 | 1963 | }
 | 
|---|
 | 1964 | 
 | 
|---|
 | 1965 | template<class P_expr1>
 | 
|---|
 | 1966 | inline
 | 
|---|
 | 1967 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, _bz_ArrayExprConstant<float>,
 | 
|---|
 | 1968 |     _bz_fmod<_bz_typename P_expr1::T_numtype,float> > >
 | 
|---|
 | 1969 | fmod(_bz_ArrayExpr<P_expr1> d1, float d2)
 | 
|---|
 | 1970 | {
 | 
|---|
 | 1971 |     return _bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, _bz_ArrayExprConstant<float>,
 | 
|---|
 | 1972 |     _bz_fmod<_bz_typename P_expr1::T_numtype,float> >(d1, _bz_ArrayExprConstant<float>(d2));
 | 
|---|
 | 1973 | }
 | 
|---|
 | 1974 | 
 | 
|---|
 | 1975 | template<class P_expr1>
 | 
|---|
 | 1976 | inline
 | 
|---|
 | 1977 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, _bz_ArrayExprConstant<double>,
 | 
|---|
 | 1978 |     _bz_fmod<_bz_typename P_expr1::T_numtype,double> > >
 | 
|---|
 | 1979 | fmod(_bz_ArrayExpr<P_expr1> d1, double d2)
 | 
|---|
 | 1980 | {
 | 
|---|
 | 1981 |     return _bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, _bz_ArrayExprConstant<double>,
 | 
|---|
 | 1982 |     _bz_fmod<_bz_typename P_expr1::T_numtype,double> >(d1, _bz_ArrayExprConstant<double>(d2));
 | 
|---|
 | 1983 | }
 | 
|---|
 | 1984 | 
 | 
|---|
 | 1985 | template<class P_expr1>
 | 
|---|
 | 1986 | inline
 | 
|---|
 | 1987 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, _bz_ArrayExprConstant<long double>,
 | 
|---|
 | 1988 |     _bz_fmod<_bz_typename P_expr1::T_numtype,long double> > >
 | 
|---|
 | 1989 | fmod(_bz_ArrayExpr<P_expr1> d1, long double d2)
 | 
|---|
 | 1990 | {
 | 
|---|
 | 1991 |     return _bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, _bz_ArrayExprConstant<long double>,
 | 
|---|
 | 1992 |     _bz_fmod<_bz_typename P_expr1::T_numtype,long double> >(d1, _bz_ArrayExprConstant<long double>(d2));
 | 
|---|
 | 1993 | }
 | 
|---|
 | 1994 | 
 | 
|---|
 | 1995 | #ifdef BZ_HAVE_COMPLEX
 | 
|---|
 | 1996 | template<class P_expr1, class T2>
 | 
|---|
 | 1997 | inline
 | 
|---|
 | 1998 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, _bz_ArrayExprConstant<complex<T2> > ,
 | 
|---|
 | 1999 |     _bz_fmod<_bz_typename P_expr1::T_numtype,complex<T2> > > >
 | 
|---|
 | 2000 | fmod(_bz_ArrayExpr<P_expr1> d1, complex<T2> d2)
 | 
|---|
 | 2001 | {
 | 
|---|
 | 2002 |     return _bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, _bz_ArrayExprConstant<complex<T2> > ,
 | 
|---|
 | 2003 |     _bz_fmod<_bz_typename P_expr1::T_numtype,complex<T2> > >(d1, _bz_ArrayExprConstant<complex<T2> > (d2));
 | 
|---|
 | 2004 | }
 | 
|---|
 | 2005 | 
 | 
|---|
 | 2006 | #endif // BZ_HAVE_COMPLEX
 | 
|---|
 | 2007 | 
 | 
|---|
 | 2008 | template<int N_index1, class T_numtype2, int N_rank2>
 | 
|---|
 | 2009 | inline
 | 
|---|
 | 2010 | _bz_ArrayExpr<_bz_ArrayExprOp<IndexPlaceholder<N_index1>, ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 2011 |     _bz_fmod<int,T_numtype2> > >
 | 
|---|
 | 2012 | fmod(IndexPlaceholder<N_index1> d1, const Array<T_numtype2, N_rank2>& d2)
 | 
|---|
 | 2013 | {
 | 
|---|
 | 2014 |     return _bz_ArrayExprOp<IndexPlaceholder<N_index1>, ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 2015 |     _bz_fmod<int,T_numtype2> >(d1, d2.begin());
 | 
|---|
 | 2016 | }
 | 
|---|
 | 2017 | 
 | 
|---|
 | 2018 | template<int N_index1, class P_expr2>
 | 
|---|
 | 2019 | inline
 | 
|---|
 | 2020 | _bz_ArrayExpr<_bz_ArrayExprOp<IndexPlaceholder<N_index1>, _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 2021 |     _bz_fmod<int,_bz_typename P_expr2::T_numtype> > >
 | 
|---|
 | 2022 | fmod(IndexPlaceholder<N_index1> d1, _bz_ArrayExpr<P_expr2> d2)
 | 
|---|
 | 2023 | {
 | 
|---|
 | 2024 |     return _bz_ArrayExprOp<IndexPlaceholder<N_index1>, _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 2025 |     _bz_fmod<int,_bz_typename P_expr2::T_numtype> >(d1, d2);
 | 
|---|
 | 2026 | }
 | 
|---|
 | 2027 | 
 | 
|---|
 | 2028 | template<int N_index1, int N_index2>
 | 
|---|
 | 2029 | inline
 | 
|---|
 | 2030 | _bz_ArrayExpr<_bz_ArrayExprOp<IndexPlaceholder<N_index1>, IndexPlaceholder<N_index2>,
 | 
|---|
 | 2031 |     _bz_fmod<int,int> > >
 | 
|---|
 | 2032 | fmod(IndexPlaceholder<N_index1> d1, IndexPlaceholder<N_index2> d2)
 | 
|---|
 | 2033 | {
 | 
|---|
 | 2034 |     return _bz_ArrayExprOp<IndexPlaceholder<N_index1>, IndexPlaceholder<N_index2>,
 | 
|---|
 | 2035 |     _bz_fmod<int,int> >(d1, d2);
 | 
|---|
 | 2036 | }
 | 
|---|
 | 2037 | 
 | 
|---|
 | 2038 | template<int N_index1>
 | 
|---|
 | 2039 | inline
 | 
|---|
 | 2040 | _bz_ArrayExpr<_bz_ArrayExprOp<IndexPlaceholder<N_index1>, _bz_ArrayExprConstant<float>,
 | 
|---|
 | 2041 |     _bz_fmod<int,float> > >
 | 
|---|
 | 2042 | fmod(IndexPlaceholder<N_index1> d1, float d2)
 | 
|---|
 | 2043 | {
 | 
|---|
 | 2044 |     return _bz_ArrayExprOp<IndexPlaceholder<N_index1>, _bz_ArrayExprConstant<float>,
 | 
|---|
 | 2045 |     _bz_fmod<int,float> >(d1, _bz_ArrayExprConstant<float>(d2));
 | 
|---|
 | 2046 | }
 | 
|---|
 | 2047 | 
 | 
|---|
 | 2048 | template<int N_index1>
 | 
|---|
 | 2049 | inline
 | 
|---|
 | 2050 | _bz_ArrayExpr<_bz_ArrayExprOp<IndexPlaceholder<N_index1>, _bz_ArrayExprConstant<double>,
 | 
|---|
 | 2051 |     _bz_fmod<int,double> > >
 | 
|---|
 | 2052 | fmod(IndexPlaceholder<N_index1> d1, double d2)
 | 
|---|
 | 2053 | {
 | 
|---|
 | 2054 |     return _bz_ArrayExprOp<IndexPlaceholder<N_index1>, _bz_ArrayExprConstant<double>,
 | 
|---|
 | 2055 |     _bz_fmod<int,double> >(d1, _bz_ArrayExprConstant<double>(d2));
 | 
|---|
 | 2056 | }
 | 
|---|
 | 2057 | 
 | 
|---|
 | 2058 | template<int N_index1>
 | 
|---|
 | 2059 | inline
 | 
|---|
 | 2060 | _bz_ArrayExpr<_bz_ArrayExprOp<IndexPlaceholder<N_index1>, _bz_ArrayExprConstant<long double>,
 | 
|---|
 | 2061 |     _bz_fmod<int,long double> > >
 | 
|---|
 | 2062 | fmod(IndexPlaceholder<N_index1> d1, long double d2)
 | 
|---|
 | 2063 | {
 | 
|---|
 | 2064 |     return _bz_ArrayExprOp<IndexPlaceholder<N_index1>, _bz_ArrayExprConstant<long double>,
 | 
|---|
 | 2065 |     _bz_fmod<int,long double> >(d1, _bz_ArrayExprConstant<long double>(d2));
 | 
|---|
 | 2066 | }
 | 
|---|
 | 2067 | 
 | 
|---|
 | 2068 | #ifdef BZ_HAVE_COMPLEX
 | 
|---|
 | 2069 | template<int N_index1, class T2>
 | 
|---|
 | 2070 | inline
 | 
|---|
 | 2071 | _bz_ArrayExpr<_bz_ArrayExprOp<IndexPlaceholder<N_index1>, _bz_ArrayExprConstant<complex<T2> > ,
 | 
|---|
 | 2072 |     _bz_fmod<int,complex<T2> > > >
 | 
|---|
 | 2073 | fmod(IndexPlaceholder<N_index1> d1, complex<T2> d2)
 | 
|---|
 | 2074 | {
 | 
|---|
 | 2075 |     return _bz_ArrayExprOp<IndexPlaceholder<N_index1>, _bz_ArrayExprConstant<complex<T2> > ,
 | 
|---|
 | 2076 |     _bz_fmod<int,complex<T2> > >(d1, _bz_ArrayExprConstant<complex<T2> > (d2));
 | 
|---|
 | 2077 | }
 | 
|---|
 | 2078 | 
 | 
|---|
 | 2079 | #endif // BZ_HAVE_COMPLEX
 | 
|---|
 | 2080 | 
 | 
|---|
 | 2081 | template<class T_numtype2, int N_rank2>
 | 
|---|
 | 2082 | inline
 | 
|---|
 | 2083 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExprConstant<float>, ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 2084 |     _bz_fmod<float,T_numtype2> > >
 | 
|---|
 | 2085 | fmod(float d1, const Array<T_numtype2, N_rank2>& d2)
 | 
|---|
 | 2086 | {
 | 
|---|
 | 2087 |     return _bz_ArrayExprOp<_bz_ArrayExprConstant<float>, ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 2088 |     _bz_fmod<float,T_numtype2> >(_bz_ArrayExprConstant<float>(d1), d2.begin());
 | 
|---|
 | 2089 | }
 | 
|---|
 | 2090 | 
 | 
|---|
 | 2091 | template<class P_expr2>
 | 
|---|
 | 2092 | inline
 | 
|---|
 | 2093 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExprConstant<float>, _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 2094 |     _bz_fmod<float,_bz_typename P_expr2::T_numtype> > >
 | 
|---|
 | 2095 | fmod(float d1, _bz_ArrayExpr<P_expr2> d2)
 | 
|---|
 | 2096 | {
 | 
|---|
 | 2097 |     return _bz_ArrayExprOp<_bz_ArrayExprConstant<float>, _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 2098 |     _bz_fmod<float,_bz_typename P_expr2::T_numtype> >(_bz_ArrayExprConstant<float>(d1), d2);
 | 
|---|
 | 2099 | }
 | 
|---|
 | 2100 | 
 | 
|---|
 | 2101 | template<int N_index2>
 | 
|---|
 | 2102 | inline
 | 
|---|
 | 2103 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExprConstant<float>, IndexPlaceholder<N_index2>,
 | 
|---|
 | 2104 |     _bz_fmod<float,int> > >
 | 
|---|
 | 2105 | fmod(float d1, IndexPlaceholder<N_index2> d2)
 | 
|---|
 | 2106 | {
 | 
|---|
 | 2107 |     return _bz_ArrayExprOp<_bz_ArrayExprConstant<float>, IndexPlaceholder<N_index2>,
 | 
|---|
 | 2108 |     _bz_fmod<float,int> >(_bz_ArrayExprConstant<float>(d1), d2);
 | 
|---|
 | 2109 | }
 | 
|---|
 | 2110 | 
 | 
|---|
 | 2111 | template<class T_numtype2, int N_rank2>
 | 
|---|
 | 2112 | inline
 | 
|---|
 | 2113 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExprConstant<double>, ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 2114 |     _bz_fmod<double,T_numtype2> > >
 | 
|---|
 | 2115 | fmod(double d1, const Array<T_numtype2, N_rank2>& d2)
 | 
|---|
 | 2116 | {
 | 
|---|
 | 2117 |     return _bz_ArrayExprOp<_bz_ArrayExprConstant<double>, ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 2118 |     _bz_fmod<double,T_numtype2> >(_bz_ArrayExprConstant<double>(d1), d2.begin());
 | 
|---|
 | 2119 | }
 | 
|---|
 | 2120 | 
 | 
|---|
 | 2121 | template<class P_expr2>
 | 
|---|
 | 2122 | inline
 | 
|---|
 | 2123 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExprConstant<double>, _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 2124 |     _bz_fmod<double,_bz_typename P_expr2::T_numtype> > >
 | 
|---|
 | 2125 | fmod(double d1, _bz_ArrayExpr<P_expr2> d2)
 | 
|---|
 | 2126 | {
 | 
|---|
 | 2127 |     return _bz_ArrayExprOp<_bz_ArrayExprConstant<double>, _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 2128 |     _bz_fmod<double,_bz_typename P_expr2::T_numtype> >(_bz_ArrayExprConstant<double>(d1), d2);
 | 
|---|
 | 2129 | }
 | 
|---|
 | 2130 | 
 | 
|---|
 | 2131 | template<int N_index2>
 | 
|---|
 | 2132 | inline
 | 
|---|
 | 2133 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExprConstant<double>, IndexPlaceholder<N_index2>,
 | 
|---|
 | 2134 |     _bz_fmod<double,int> > >
 | 
|---|
 | 2135 | fmod(double d1, IndexPlaceholder<N_index2> d2)
 | 
|---|
 | 2136 | {
 | 
|---|
 | 2137 |     return _bz_ArrayExprOp<_bz_ArrayExprConstant<double>, IndexPlaceholder<N_index2>,
 | 
|---|
 | 2138 |     _bz_fmod<double,int> >(_bz_ArrayExprConstant<double>(d1), d2);
 | 
|---|
 | 2139 | }
 | 
|---|
 | 2140 | 
 | 
|---|
 | 2141 | template<class T_numtype2, int N_rank2>
 | 
|---|
 | 2142 | inline
 | 
|---|
 | 2143 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExprConstant<long double>, ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 2144 |     _bz_fmod<long double,T_numtype2> > >
 | 
|---|
 | 2145 | fmod(long double d1, const Array<T_numtype2, N_rank2>& d2)
 | 
|---|
 | 2146 | {
 | 
|---|
 | 2147 |     return _bz_ArrayExprOp<_bz_ArrayExprConstant<long double>, ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 2148 |     _bz_fmod<long double,T_numtype2> >(_bz_ArrayExprConstant<long double>(d1), d2.begin());
 | 
|---|
 | 2149 | }
 | 
|---|
 | 2150 | 
 | 
|---|
 | 2151 | template<class P_expr2>
 | 
|---|
 | 2152 | inline
 | 
|---|
 | 2153 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExprConstant<long double>, _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 2154 |     _bz_fmod<long double,_bz_typename P_expr2::T_numtype> > >
 | 
|---|
 | 2155 | fmod(long double d1, _bz_ArrayExpr<P_expr2> d2)
 | 
|---|
 | 2156 | {
 | 
|---|
 | 2157 |     return _bz_ArrayExprOp<_bz_ArrayExprConstant<long double>, _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 2158 |     _bz_fmod<long double,_bz_typename P_expr2::T_numtype> >(_bz_ArrayExprConstant<long double>(d1), d2);
 | 
|---|
 | 2159 | }
 | 
|---|
 | 2160 | 
 | 
|---|
 | 2161 | template<int N_index2>
 | 
|---|
 | 2162 | inline
 | 
|---|
 | 2163 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExprConstant<long double>, IndexPlaceholder<N_index2>,
 | 
|---|
 | 2164 |     _bz_fmod<long double,int> > >
 | 
|---|
 | 2165 | fmod(long double d1, IndexPlaceholder<N_index2> d2)
 | 
|---|
 | 2166 | {
 | 
|---|
 | 2167 |     return _bz_ArrayExprOp<_bz_ArrayExprConstant<long double>, IndexPlaceholder<N_index2>,
 | 
|---|
 | 2168 |     _bz_fmod<long double,int> >(_bz_ArrayExprConstant<long double>(d1), d2);
 | 
|---|
 | 2169 | }
 | 
|---|
 | 2170 | 
 | 
|---|
 | 2171 | #ifdef BZ_HAVE_COMPLEX
 | 
|---|
 | 2172 | template<class T1, class T_numtype2, int N_rank2>
 | 
|---|
 | 2173 | inline
 | 
|---|
 | 2174 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExprConstant<complex<T1> > , ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 2175 |     _bz_fmod<complex<T1> ,T_numtype2> > >
 | 
|---|
 | 2176 | fmod(complex<T1> d1, const Array<T_numtype2, N_rank2>& d2)
 | 
|---|
 | 2177 | {
 | 
|---|
 | 2178 |     return _bz_ArrayExprOp<_bz_ArrayExprConstant<complex<T1> > , ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 2179 |     _bz_fmod<complex<T1> ,T_numtype2> >(_bz_ArrayExprConstant<complex<T1> > (d1), d2.begin());
 | 
|---|
 | 2180 | }
 | 
|---|
 | 2181 | 
 | 
|---|
 | 2182 | #endif // BZ_HAVE_COMPLEX
 | 
|---|
 | 2183 | 
 | 
|---|
 | 2184 | #ifdef BZ_HAVE_COMPLEX
 | 
|---|
 | 2185 | template<class T1, class P_expr2>
 | 
|---|
 | 2186 | inline
 | 
|---|
 | 2187 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExprConstant<complex<T1> > , _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 2188 |     _bz_fmod<complex<T1> ,_bz_typename P_expr2::T_numtype> > >
 | 
|---|
 | 2189 | fmod(complex<T1> d1, _bz_ArrayExpr<P_expr2> d2)
 | 
|---|
 | 2190 | {
 | 
|---|
 | 2191 |     return _bz_ArrayExprOp<_bz_ArrayExprConstant<complex<T1> > , _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 2192 |     _bz_fmod<complex<T1> ,_bz_typename P_expr2::T_numtype> >(_bz_ArrayExprConstant<complex<T1> > (d1), d2);
 | 
|---|
 | 2193 | }
 | 
|---|
 | 2194 | 
 | 
|---|
 | 2195 | #endif // BZ_HAVE_COMPLEX
 | 
|---|
 | 2196 | 
 | 
|---|
 | 2197 | #ifdef BZ_HAVE_COMPLEX
 | 
|---|
 | 2198 | template<class T1, int N_index2>
 | 
|---|
 | 2199 | inline
 | 
|---|
 | 2200 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExprConstant<complex<T1> > , IndexPlaceholder<N_index2>,
 | 
|---|
 | 2201 |     _bz_fmod<complex<T1> ,int> > >
 | 
|---|
 | 2202 | fmod(complex<T1> d1, IndexPlaceholder<N_index2> d2)
 | 
|---|
 | 2203 | {
 | 
|---|
 | 2204 |     return _bz_ArrayExprOp<_bz_ArrayExprConstant<complex<T1> > , IndexPlaceholder<N_index2>,
 | 
|---|
 | 2205 |     _bz_fmod<complex<T1> ,int> >(_bz_ArrayExprConstant<complex<T1> > (d1), d2);
 | 
|---|
 | 2206 | }
 | 
|---|
 | 2207 | 
 | 
|---|
 | 2208 | #endif // BZ_HAVE_COMPLEX
 | 
|---|
 | 2209 | 
 | 
|---|
 | 2210 | #endif
 | 
|---|
 | 2211 | 
 | 
|---|
 | 2212 | /****************************************************************************
 | 
|---|
 | 2213 |  * hypot
 | 
|---|
 | 2214 |  ****************************************************************************/
 | 
|---|
 | 2215 | 
 | 
|---|
 | 2216 | #ifdef BZ_HAVE_SYSTEM_V_MATH
 | 
|---|
 | 2217 | template<class T_numtype1, int N_rank1, class T_numtype2, int N_rank2>
 | 
|---|
 | 2218 | inline
 | 
|---|
 | 2219 | _bz_ArrayExpr<_bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 2220 |     _bz_hypot<T_numtype1,T_numtype2> > >
 | 
|---|
 | 2221 | hypot(const Array<T_numtype1, N_rank1>& d1, const Array<T_numtype2, N_rank2>& d2)
 | 
|---|
 | 2222 | {
 | 
|---|
 | 2223 |     return _bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 2224 |     _bz_hypot<T_numtype1,T_numtype2> >(d1.begin(), d2.begin());
 | 
|---|
 | 2225 | }
 | 
|---|
 | 2226 | 
 | 
|---|
 | 2227 | template<class T_numtype1, int N_rank1, class P_expr2>
 | 
|---|
 | 2228 | inline
 | 
|---|
 | 2229 | _bz_ArrayExpr<_bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 2230 |     _bz_hypot<T_numtype1,_bz_typename P_expr2::T_numtype> > >
 | 
|---|
 | 2231 | hypot(const Array<T_numtype1, N_rank1>& d1, _bz_ArrayExpr<P_expr2> d2)
 | 
|---|
 | 2232 | {
 | 
|---|
 | 2233 |     return _bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 2234 |     _bz_hypot<T_numtype1,_bz_typename P_expr2::T_numtype> >(d1.begin(), d2);
 | 
|---|
 | 2235 | }
 | 
|---|
 | 2236 | 
 | 
|---|
 | 2237 | template<class T_numtype1, int N_rank1, int N_index2>
 | 
|---|
 | 2238 | inline
 | 
|---|
 | 2239 | _bz_ArrayExpr<_bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, IndexPlaceholder<N_index2>,
 | 
|---|
 | 2240 |     _bz_hypot<T_numtype1,int> > >
 | 
|---|
 | 2241 | hypot(const Array<T_numtype1, N_rank1>& d1, IndexPlaceholder<N_index2> d2)
 | 
|---|
 | 2242 | {
 | 
|---|
 | 2243 |     return _bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, IndexPlaceholder<N_index2>,
 | 
|---|
 | 2244 |     _bz_hypot<T_numtype1,int> >(d1.begin(), d2);
 | 
|---|
 | 2245 | }
 | 
|---|
 | 2246 | 
 | 
|---|
 | 2247 | template<class T_numtype1, int N_rank1>
 | 
|---|
 | 2248 | inline
 | 
|---|
 | 2249 | _bz_ArrayExpr<_bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, _bz_ArrayExprConstant<float>,
 | 
|---|
 | 2250 |     _bz_hypot<T_numtype1,float> > >
 | 
|---|
 | 2251 | hypot(const Array<T_numtype1, N_rank1>& d1, float d2)
 | 
|---|
 | 2252 | {
 | 
|---|
 | 2253 |     return _bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, _bz_ArrayExprConstant<float>,
 | 
|---|
 | 2254 |     _bz_hypot<T_numtype1,float> >(d1.begin(), _bz_ArrayExprConstant<float>(d2));
 | 
|---|
 | 2255 | }
 | 
|---|
 | 2256 | 
 | 
|---|
 | 2257 | template<class T_numtype1, int N_rank1>
 | 
|---|
 | 2258 | inline
 | 
|---|
 | 2259 | _bz_ArrayExpr<_bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, _bz_ArrayExprConstant<double>,
 | 
|---|
 | 2260 |     _bz_hypot<T_numtype1,double> > >
 | 
|---|
 | 2261 | hypot(const Array<T_numtype1, N_rank1>& d1, double d2)
 | 
|---|
 | 2262 | {
 | 
|---|
 | 2263 |     return _bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, _bz_ArrayExprConstant<double>,
 | 
|---|
 | 2264 |     _bz_hypot<T_numtype1,double> >(d1.begin(), _bz_ArrayExprConstant<double>(d2));
 | 
|---|
 | 2265 | }
 | 
|---|
 | 2266 | 
 | 
|---|
 | 2267 | template<class T_numtype1, int N_rank1>
 | 
|---|
 | 2268 | inline
 | 
|---|
 | 2269 | _bz_ArrayExpr<_bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, _bz_ArrayExprConstant<long double>,
 | 
|---|
 | 2270 |     _bz_hypot<T_numtype1,long double> > >
 | 
|---|
 | 2271 | hypot(const Array<T_numtype1, N_rank1>& d1, long double d2)
 | 
|---|
 | 2272 | {
 | 
|---|
 | 2273 |     return _bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, _bz_ArrayExprConstant<long double>,
 | 
|---|
 | 2274 |     _bz_hypot<T_numtype1,long double> >(d1.begin(), _bz_ArrayExprConstant<long double>(d2));
 | 
|---|
 | 2275 | }
 | 
|---|
 | 2276 | 
 | 
|---|
 | 2277 | #ifdef BZ_HAVE_COMPLEX
 | 
|---|
 | 2278 | template<class T_numtype1, int N_rank1, class T2>
 | 
|---|
 | 2279 | inline
 | 
|---|
 | 2280 | _bz_ArrayExpr<_bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, _bz_ArrayExprConstant<complex<T2> > ,
 | 
|---|
 | 2281 |     _bz_hypot<T_numtype1,complex<T2> > > >
 | 
|---|
 | 2282 | hypot(const Array<T_numtype1, N_rank1>& d1, complex<T2> d2)
 | 
|---|
 | 2283 | {
 | 
|---|
 | 2284 |     return _bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, _bz_ArrayExprConstant<complex<T2> > ,
 | 
|---|
 | 2285 |     _bz_hypot<T_numtype1,complex<T2> > >(d1.begin(), _bz_ArrayExprConstant<complex<T2> > (d2));
 | 
|---|
 | 2286 | }
 | 
|---|
 | 2287 | 
 | 
|---|
 | 2288 | #endif // BZ_HAVE_COMPLEX
 | 
|---|
 | 2289 | 
 | 
|---|
 | 2290 | template<class P_expr1, class T_numtype2, int N_rank2>
 | 
|---|
 | 2291 | inline
 | 
|---|
 | 2292 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 2293 |     _bz_hypot<_bz_typename P_expr1::T_numtype,T_numtype2> > >
 | 
|---|
 | 2294 | hypot(_bz_ArrayExpr<P_expr1> d1, const Array<T_numtype2, N_rank2>& d2)
 | 
|---|
 | 2295 | {
 | 
|---|
 | 2296 |     return _bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 2297 |     _bz_hypot<_bz_typename P_expr1::T_numtype,T_numtype2> >(d1, d2.begin());
 | 
|---|
 | 2298 | }
 | 
|---|
 | 2299 | 
 | 
|---|
 | 2300 | template<class P_expr1, class P_expr2>
 | 
|---|
 | 2301 | inline
 | 
|---|
 | 2302 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 2303 |     _bz_hypot<_bz_typename P_expr1::T_numtype,_bz_typename P_expr2::T_numtype> > >
 | 
|---|
 | 2304 | hypot(_bz_ArrayExpr<P_expr1> d1, _bz_ArrayExpr<P_expr2> d2)
 | 
|---|
 | 2305 | {
 | 
|---|
 | 2306 |     return _bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 2307 |     _bz_hypot<_bz_typename P_expr1::T_numtype,_bz_typename P_expr2::T_numtype> >(d1, d2);
 | 
|---|
 | 2308 | }
 | 
|---|
 | 2309 | 
 | 
|---|
 | 2310 | template<class P_expr1, int N_index2>
 | 
|---|
 | 2311 | inline
 | 
|---|
 | 2312 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, IndexPlaceholder<N_index2>,
 | 
|---|
 | 2313 |     _bz_hypot<_bz_typename P_expr1::T_numtype,int> > >
 | 
|---|
 | 2314 | hypot(_bz_ArrayExpr<P_expr1> d1, IndexPlaceholder<N_index2> d2)
 | 
|---|
 | 2315 | {
 | 
|---|
 | 2316 |     return _bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, IndexPlaceholder<N_index2>,
 | 
|---|
 | 2317 |     _bz_hypot<_bz_typename P_expr1::T_numtype,int> >(d1, d2);
 | 
|---|
 | 2318 | }
 | 
|---|
 | 2319 | 
 | 
|---|
 | 2320 | template<class P_expr1>
 | 
|---|
 | 2321 | inline
 | 
|---|
 | 2322 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, _bz_ArrayExprConstant<float>,
 | 
|---|
 | 2323 |     _bz_hypot<_bz_typename P_expr1::T_numtype,float> > >
 | 
|---|
 | 2324 | hypot(_bz_ArrayExpr<P_expr1> d1, float d2)
 | 
|---|
 | 2325 | {
 | 
|---|
 | 2326 |     return _bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, _bz_ArrayExprConstant<float>,
 | 
|---|
 | 2327 |     _bz_hypot<_bz_typename P_expr1::T_numtype,float> >(d1, _bz_ArrayExprConstant<float>(d2));
 | 
|---|
 | 2328 | }
 | 
|---|
 | 2329 | 
 | 
|---|
 | 2330 | template<class P_expr1>
 | 
|---|
 | 2331 | inline
 | 
|---|
 | 2332 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, _bz_ArrayExprConstant<double>,
 | 
|---|
 | 2333 |     _bz_hypot<_bz_typename P_expr1::T_numtype,double> > >
 | 
|---|
 | 2334 | hypot(_bz_ArrayExpr<P_expr1> d1, double d2)
 | 
|---|
 | 2335 | {
 | 
|---|
 | 2336 |     return _bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, _bz_ArrayExprConstant<double>,
 | 
|---|
 | 2337 |     _bz_hypot<_bz_typename P_expr1::T_numtype,double> >(d1, _bz_ArrayExprConstant<double>(d2));
 | 
|---|
 | 2338 | }
 | 
|---|
 | 2339 | 
 | 
|---|
 | 2340 | template<class P_expr1>
 | 
|---|
 | 2341 | inline
 | 
|---|
 | 2342 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, _bz_ArrayExprConstant<long double>,
 | 
|---|
 | 2343 |     _bz_hypot<_bz_typename P_expr1::T_numtype,long double> > >
 | 
|---|
 | 2344 | hypot(_bz_ArrayExpr<P_expr1> d1, long double d2)
 | 
|---|
 | 2345 | {
 | 
|---|
 | 2346 |     return _bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, _bz_ArrayExprConstant<long double>,
 | 
|---|
 | 2347 |     _bz_hypot<_bz_typename P_expr1::T_numtype,long double> >(d1, _bz_ArrayExprConstant<long double>(d2));
 | 
|---|
 | 2348 | }
 | 
|---|
 | 2349 | 
 | 
|---|
 | 2350 | #ifdef BZ_HAVE_COMPLEX
 | 
|---|
 | 2351 | template<class P_expr1, class T2>
 | 
|---|
 | 2352 | inline
 | 
|---|
 | 2353 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, _bz_ArrayExprConstant<complex<T2> > ,
 | 
|---|
 | 2354 |     _bz_hypot<_bz_typename P_expr1::T_numtype,complex<T2> > > >
 | 
|---|
 | 2355 | hypot(_bz_ArrayExpr<P_expr1> d1, complex<T2> d2)
 | 
|---|
 | 2356 | {
 | 
|---|
 | 2357 |     return _bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, _bz_ArrayExprConstant<complex<T2> > ,
 | 
|---|
 | 2358 |     _bz_hypot<_bz_typename P_expr1::T_numtype,complex<T2> > >(d1, _bz_ArrayExprConstant<complex<T2> > (d2));
 | 
|---|
 | 2359 | }
 | 
|---|
 | 2360 | 
 | 
|---|
 | 2361 | #endif // BZ_HAVE_COMPLEX
 | 
|---|
 | 2362 | 
 | 
|---|
 | 2363 | template<int N_index1, class T_numtype2, int N_rank2>
 | 
|---|
 | 2364 | inline
 | 
|---|
 | 2365 | _bz_ArrayExpr<_bz_ArrayExprOp<IndexPlaceholder<N_index1>, ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 2366 |     _bz_hypot<int,T_numtype2> > >
 | 
|---|
 | 2367 | hypot(IndexPlaceholder<N_index1> d1, const Array<T_numtype2, N_rank2>& d2)
 | 
|---|
 | 2368 | {
 | 
|---|
 | 2369 |     return _bz_ArrayExprOp<IndexPlaceholder<N_index1>, ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 2370 |     _bz_hypot<int,T_numtype2> >(d1, d2.begin());
 | 
|---|
 | 2371 | }
 | 
|---|
 | 2372 | 
 | 
|---|
 | 2373 | template<int N_index1, class P_expr2>
 | 
|---|
 | 2374 | inline
 | 
|---|
 | 2375 | _bz_ArrayExpr<_bz_ArrayExprOp<IndexPlaceholder<N_index1>, _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 2376 |     _bz_hypot<int,_bz_typename P_expr2::T_numtype> > >
 | 
|---|
 | 2377 | hypot(IndexPlaceholder<N_index1> d1, _bz_ArrayExpr<P_expr2> d2)
 | 
|---|
 | 2378 | {
 | 
|---|
 | 2379 |     return _bz_ArrayExprOp<IndexPlaceholder<N_index1>, _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 2380 |     _bz_hypot<int,_bz_typename P_expr2::T_numtype> >(d1, d2);
 | 
|---|
 | 2381 | }
 | 
|---|
 | 2382 | 
 | 
|---|
 | 2383 | template<int N_index1, int N_index2>
 | 
|---|
 | 2384 | inline
 | 
|---|
 | 2385 | _bz_ArrayExpr<_bz_ArrayExprOp<IndexPlaceholder<N_index1>, IndexPlaceholder<N_index2>,
 | 
|---|
 | 2386 |     _bz_hypot<int,int> > >
 | 
|---|
 | 2387 | hypot(IndexPlaceholder<N_index1> d1, IndexPlaceholder<N_index2> d2)
 | 
|---|
 | 2388 | {
 | 
|---|
 | 2389 |     return _bz_ArrayExprOp<IndexPlaceholder<N_index1>, IndexPlaceholder<N_index2>,
 | 
|---|
 | 2390 |     _bz_hypot<int,int> >(d1, d2);
 | 
|---|
 | 2391 | }
 | 
|---|
 | 2392 | 
 | 
|---|
 | 2393 | template<int N_index1>
 | 
|---|
 | 2394 | inline
 | 
|---|
 | 2395 | _bz_ArrayExpr<_bz_ArrayExprOp<IndexPlaceholder<N_index1>, _bz_ArrayExprConstant<float>,
 | 
|---|
 | 2396 |     _bz_hypot<int,float> > >
 | 
|---|
 | 2397 | hypot(IndexPlaceholder<N_index1> d1, float d2)
 | 
|---|
 | 2398 | {
 | 
|---|
 | 2399 |     return _bz_ArrayExprOp<IndexPlaceholder<N_index1>, _bz_ArrayExprConstant<float>,
 | 
|---|
 | 2400 |     _bz_hypot<int,float> >(d1, _bz_ArrayExprConstant<float>(d2));
 | 
|---|
 | 2401 | }
 | 
|---|
 | 2402 | 
 | 
|---|
 | 2403 | template<int N_index1>
 | 
|---|
 | 2404 | inline
 | 
|---|
 | 2405 | _bz_ArrayExpr<_bz_ArrayExprOp<IndexPlaceholder<N_index1>, _bz_ArrayExprConstant<double>,
 | 
|---|
 | 2406 |     _bz_hypot<int,double> > >
 | 
|---|
 | 2407 | hypot(IndexPlaceholder<N_index1> d1, double d2)
 | 
|---|
 | 2408 | {
 | 
|---|
 | 2409 |     return _bz_ArrayExprOp<IndexPlaceholder<N_index1>, _bz_ArrayExprConstant<double>,
 | 
|---|
 | 2410 |     _bz_hypot<int,double> >(d1, _bz_ArrayExprConstant<double>(d2));
 | 
|---|
 | 2411 | }
 | 
|---|
 | 2412 | 
 | 
|---|
 | 2413 | template<int N_index1>
 | 
|---|
 | 2414 | inline
 | 
|---|
 | 2415 | _bz_ArrayExpr<_bz_ArrayExprOp<IndexPlaceholder<N_index1>, _bz_ArrayExprConstant<long double>,
 | 
|---|
 | 2416 |     _bz_hypot<int,long double> > >
 | 
|---|
 | 2417 | hypot(IndexPlaceholder<N_index1> d1, long double d2)
 | 
|---|
 | 2418 | {
 | 
|---|
 | 2419 |     return _bz_ArrayExprOp<IndexPlaceholder<N_index1>, _bz_ArrayExprConstant<long double>,
 | 
|---|
 | 2420 |     _bz_hypot<int,long double> >(d1, _bz_ArrayExprConstant<long double>(d2));
 | 
|---|
 | 2421 | }
 | 
|---|
 | 2422 | 
 | 
|---|
 | 2423 | #ifdef BZ_HAVE_COMPLEX
 | 
|---|
 | 2424 | template<int N_index1, class T2>
 | 
|---|
 | 2425 | inline
 | 
|---|
 | 2426 | _bz_ArrayExpr<_bz_ArrayExprOp<IndexPlaceholder<N_index1>, _bz_ArrayExprConstant<complex<T2> > ,
 | 
|---|
 | 2427 |     _bz_hypot<int,complex<T2> > > >
 | 
|---|
 | 2428 | hypot(IndexPlaceholder<N_index1> d1, complex<T2> d2)
 | 
|---|
 | 2429 | {
 | 
|---|
 | 2430 |     return _bz_ArrayExprOp<IndexPlaceholder<N_index1>, _bz_ArrayExprConstant<complex<T2> > ,
 | 
|---|
 | 2431 |     _bz_hypot<int,complex<T2> > >(d1, _bz_ArrayExprConstant<complex<T2> > (d2));
 | 
|---|
 | 2432 | }
 | 
|---|
 | 2433 | 
 | 
|---|
 | 2434 | #endif // BZ_HAVE_COMPLEX
 | 
|---|
 | 2435 | 
 | 
|---|
 | 2436 | template<class T_numtype2, int N_rank2>
 | 
|---|
 | 2437 | inline
 | 
|---|
 | 2438 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExprConstant<float>, ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 2439 |     _bz_hypot<float,T_numtype2> > >
 | 
|---|
 | 2440 | hypot(float d1, const Array<T_numtype2, N_rank2>& d2)
 | 
|---|
 | 2441 | {
 | 
|---|
 | 2442 |     return _bz_ArrayExprOp<_bz_ArrayExprConstant<float>, ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 2443 |     _bz_hypot<float,T_numtype2> >(_bz_ArrayExprConstant<float>(d1), d2.begin());
 | 
|---|
 | 2444 | }
 | 
|---|
 | 2445 | 
 | 
|---|
 | 2446 | template<class P_expr2>
 | 
|---|
 | 2447 | inline
 | 
|---|
 | 2448 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExprConstant<float>, _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 2449 |     _bz_hypot<float,_bz_typename P_expr2::T_numtype> > >
 | 
|---|
 | 2450 | hypot(float d1, _bz_ArrayExpr<P_expr2> d2)
 | 
|---|
 | 2451 | {
 | 
|---|
 | 2452 |     return _bz_ArrayExprOp<_bz_ArrayExprConstant<float>, _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 2453 |     _bz_hypot<float,_bz_typename P_expr2::T_numtype> >(_bz_ArrayExprConstant<float>(d1), d2);
 | 
|---|
 | 2454 | }
 | 
|---|
 | 2455 | 
 | 
|---|
 | 2456 | template<int N_index2>
 | 
|---|
 | 2457 | inline
 | 
|---|
 | 2458 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExprConstant<float>, IndexPlaceholder<N_index2>,
 | 
|---|
 | 2459 |     _bz_hypot<float,int> > >
 | 
|---|
 | 2460 | hypot(float d1, IndexPlaceholder<N_index2> d2)
 | 
|---|
 | 2461 | {
 | 
|---|
 | 2462 |     return _bz_ArrayExprOp<_bz_ArrayExprConstant<float>, IndexPlaceholder<N_index2>,
 | 
|---|
 | 2463 |     _bz_hypot<float,int> >(_bz_ArrayExprConstant<float>(d1), d2);
 | 
|---|
 | 2464 | }
 | 
|---|
 | 2465 | 
 | 
|---|
 | 2466 | template<class T_numtype2, int N_rank2>
 | 
|---|
 | 2467 | inline
 | 
|---|
 | 2468 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExprConstant<double>, ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 2469 |     _bz_hypot<double,T_numtype2> > >
 | 
|---|
 | 2470 | hypot(double d1, const Array<T_numtype2, N_rank2>& d2)
 | 
|---|
 | 2471 | {
 | 
|---|
 | 2472 |     return _bz_ArrayExprOp<_bz_ArrayExprConstant<double>, ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 2473 |     _bz_hypot<double,T_numtype2> >(_bz_ArrayExprConstant<double>(d1), d2.begin());
 | 
|---|
 | 2474 | }
 | 
|---|
 | 2475 | 
 | 
|---|
 | 2476 | template<class P_expr2>
 | 
|---|
 | 2477 | inline
 | 
|---|
 | 2478 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExprConstant<double>, _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 2479 |     _bz_hypot<double,_bz_typename P_expr2::T_numtype> > >
 | 
|---|
 | 2480 | hypot(double d1, _bz_ArrayExpr<P_expr2> d2)
 | 
|---|
 | 2481 | {
 | 
|---|
 | 2482 |     return _bz_ArrayExprOp<_bz_ArrayExprConstant<double>, _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 2483 |     _bz_hypot<double,_bz_typename P_expr2::T_numtype> >(_bz_ArrayExprConstant<double>(d1), d2);
 | 
|---|
 | 2484 | }
 | 
|---|
 | 2485 | 
 | 
|---|
 | 2486 | template<int N_index2>
 | 
|---|
 | 2487 | inline
 | 
|---|
 | 2488 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExprConstant<double>, IndexPlaceholder<N_index2>,
 | 
|---|
 | 2489 |     _bz_hypot<double,int> > >
 | 
|---|
 | 2490 | hypot(double d1, IndexPlaceholder<N_index2> d2)
 | 
|---|
 | 2491 | {
 | 
|---|
 | 2492 |     return _bz_ArrayExprOp<_bz_ArrayExprConstant<double>, IndexPlaceholder<N_index2>,
 | 
|---|
 | 2493 |     _bz_hypot<double,int> >(_bz_ArrayExprConstant<double>(d1), d2);
 | 
|---|
 | 2494 | }
 | 
|---|
 | 2495 | 
 | 
|---|
 | 2496 | template<class T_numtype2, int N_rank2>
 | 
|---|
 | 2497 | inline
 | 
|---|
 | 2498 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExprConstant<long double>, ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 2499 |     _bz_hypot<long double,T_numtype2> > >
 | 
|---|
 | 2500 | hypot(long double d1, const Array<T_numtype2, N_rank2>& d2)
 | 
|---|
 | 2501 | {
 | 
|---|
 | 2502 |     return _bz_ArrayExprOp<_bz_ArrayExprConstant<long double>, ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 2503 |     _bz_hypot<long double,T_numtype2> >(_bz_ArrayExprConstant<long double>(d1), d2.begin());
 | 
|---|
 | 2504 | }
 | 
|---|
 | 2505 | 
 | 
|---|
 | 2506 | template<class P_expr2>
 | 
|---|
 | 2507 | inline
 | 
|---|
 | 2508 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExprConstant<long double>, _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 2509 |     _bz_hypot<long double,_bz_typename P_expr2::T_numtype> > >
 | 
|---|
 | 2510 | hypot(long double d1, _bz_ArrayExpr<P_expr2> d2)
 | 
|---|
 | 2511 | {
 | 
|---|
 | 2512 |     return _bz_ArrayExprOp<_bz_ArrayExprConstant<long double>, _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 2513 |     _bz_hypot<long double,_bz_typename P_expr2::T_numtype> >(_bz_ArrayExprConstant<long double>(d1), d2);
 | 
|---|
 | 2514 | }
 | 
|---|
 | 2515 | 
 | 
|---|
 | 2516 | template<int N_index2>
 | 
|---|
 | 2517 | inline
 | 
|---|
 | 2518 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExprConstant<long double>, IndexPlaceholder<N_index2>,
 | 
|---|
 | 2519 |     _bz_hypot<long double,int> > >
 | 
|---|
 | 2520 | hypot(long double d1, IndexPlaceholder<N_index2> d2)
 | 
|---|
 | 2521 | {
 | 
|---|
 | 2522 |     return _bz_ArrayExprOp<_bz_ArrayExprConstant<long double>, IndexPlaceholder<N_index2>,
 | 
|---|
 | 2523 |     _bz_hypot<long double,int> >(_bz_ArrayExprConstant<long double>(d1), d2);
 | 
|---|
 | 2524 | }
 | 
|---|
 | 2525 | 
 | 
|---|
 | 2526 | #ifdef BZ_HAVE_COMPLEX
 | 
|---|
 | 2527 | template<class T1, class T_numtype2, int N_rank2>
 | 
|---|
 | 2528 | inline
 | 
|---|
 | 2529 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExprConstant<complex<T1> > , ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 2530 |     _bz_hypot<complex<T1> ,T_numtype2> > >
 | 
|---|
 | 2531 | hypot(complex<T1> d1, const Array<T_numtype2, N_rank2>& d2)
 | 
|---|
 | 2532 | {
 | 
|---|
 | 2533 |     return _bz_ArrayExprOp<_bz_ArrayExprConstant<complex<T1> > , ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 2534 |     _bz_hypot<complex<T1> ,T_numtype2> >(_bz_ArrayExprConstant<complex<T1> > (d1), d2.begin());
 | 
|---|
 | 2535 | }
 | 
|---|
 | 2536 | 
 | 
|---|
 | 2537 | #endif // BZ_HAVE_COMPLEX
 | 
|---|
 | 2538 | 
 | 
|---|
 | 2539 | #ifdef BZ_HAVE_COMPLEX
 | 
|---|
 | 2540 | template<class T1, class P_expr2>
 | 
|---|
 | 2541 | inline
 | 
|---|
 | 2542 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExprConstant<complex<T1> > , _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 2543 |     _bz_hypot<complex<T1> ,_bz_typename P_expr2::T_numtype> > >
 | 
|---|
 | 2544 | hypot(complex<T1> d1, _bz_ArrayExpr<P_expr2> d2)
 | 
|---|
 | 2545 | {
 | 
|---|
 | 2546 |     return _bz_ArrayExprOp<_bz_ArrayExprConstant<complex<T1> > , _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 2547 |     _bz_hypot<complex<T1> ,_bz_typename P_expr2::T_numtype> >(_bz_ArrayExprConstant<complex<T1> > (d1), d2);
 | 
|---|
 | 2548 | }
 | 
|---|
 | 2549 | 
 | 
|---|
 | 2550 | #endif // BZ_HAVE_COMPLEX
 | 
|---|
 | 2551 | 
 | 
|---|
 | 2552 | #ifdef BZ_HAVE_COMPLEX
 | 
|---|
 | 2553 | template<class T1, int N_index2>
 | 
|---|
 | 2554 | inline
 | 
|---|
 | 2555 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExprConstant<complex<T1> > , IndexPlaceholder<N_index2>,
 | 
|---|
 | 2556 |     _bz_hypot<complex<T1> ,int> > >
 | 
|---|
 | 2557 | hypot(complex<T1> d1, IndexPlaceholder<N_index2> d2)
 | 
|---|
 | 2558 | {
 | 
|---|
 | 2559 |     return _bz_ArrayExprOp<_bz_ArrayExprConstant<complex<T1> > , IndexPlaceholder<N_index2>,
 | 
|---|
 | 2560 |     _bz_hypot<complex<T1> ,int> >(_bz_ArrayExprConstant<complex<T1> > (d1), d2);
 | 
|---|
 | 2561 | }
 | 
|---|
 | 2562 | 
 | 
|---|
 | 2563 | #endif // BZ_HAVE_COMPLEX
 | 
|---|
 | 2564 | 
 | 
|---|
 | 2565 | #endif
 | 
|---|
 | 2566 | 
 | 
|---|
 | 2567 | /****************************************************************************
 | 
|---|
 | 2568 |  * ilogb
 | 
|---|
 | 2569 |  ****************************************************************************/
 | 
|---|
 | 2570 | 
 | 
|---|
 | 2571 | #ifdef BZ_HAVE_SYSTEM_V_MATH
 | 
|---|
 | 2572 | template<class T_numtype1, int N_rank1>
 | 
|---|
 | 2573 | inline
 | 
|---|
 | 2574 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<ArrayIterator<T_numtype1, N_rank1>,
 | 
|---|
 | 2575 |     _bz_ilogb<T_numtype1> > >
 | 
|---|
 | 2576 | ilogb(const Array<T_numtype1, N_rank1>& d1)
 | 
|---|
 | 2577 | {
 | 
|---|
 | 2578 |     return _bz_ArrayExprUnaryOp<ArrayIterator<T_numtype1, N_rank1>,
 | 
|---|
 | 2579 |     _bz_ilogb<T_numtype1> >(d1.begin());
 | 
|---|
 | 2580 | }
 | 
|---|
 | 2581 | 
 | 
|---|
 | 2582 | template<class P_expr1>
 | 
|---|
 | 2583 | inline
 | 
|---|
 | 2584 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<_bz_ArrayExpr<P_expr1>,
 | 
|---|
 | 2585 |     _bz_ilogb<_bz_typename P_expr1::T_numtype> > >
 | 
|---|
 | 2586 | ilogb(_bz_ArrayExpr<P_expr1> d1)
 | 
|---|
 | 2587 | {
 | 
|---|
 | 2588 |     return _bz_ArrayExprUnaryOp<_bz_ArrayExpr<P_expr1>,
 | 
|---|
 | 2589 |     _bz_ilogb<_bz_typename P_expr1::T_numtype> >(d1);
 | 
|---|
 | 2590 | }
 | 
|---|
 | 2591 | 
 | 
|---|
 | 2592 | template<int N_index1>
 | 
|---|
 | 2593 | inline
 | 
|---|
 | 2594 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<IndexPlaceholder<N_index1>,
 | 
|---|
 | 2595 |     _bz_ilogb<int> > >
 | 
|---|
 | 2596 | ilogb(IndexPlaceholder<N_index1> d1)
 | 
|---|
 | 2597 | {
 | 
|---|
 | 2598 |     return _bz_ArrayExprUnaryOp<IndexPlaceholder<N_index1>,
 | 
|---|
 | 2599 |     _bz_ilogb<int> >(d1);
 | 
|---|
 | 2600 | }
 | 
|---|
 | 2601 | 
 | 
|---|
 | 2602 | #endif
 | 
|---|
 | 2603 | 
 | 
|---|
 | 2604 | /****************************************************************************
 | 
|---|
 | 2605 |  * isnan
 | 
|---|
 | 2606 |  ****************************************************************************/
 | 
|---|
 | 2607 | 
 | 
|---|
 | 2608 | #ifdef BZ_HAVE_IEEE_MATH
 | 
|---|
 | 2609 | template<class T_numtype1, int N_rank1>
 | 
|---|
 | 2610 | inline
 | 
|---|
 | 2611 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<ArrayIterator<T_numtype1, N_rank1>,
 | 
|---|
 | 2612 |     _bz_isnan<T_numtype1> > >
 | 
|---|
 | 2613 | isnan(const Array<T_numtype1, N_rank1>& d1)
 | 
|---|
 | 2614 | {
 | 
|---|
 | 2615 |     return _bz_ArrayExprUnaryOp<ArrayIterator<T_numtype1, N_rank1>,
 | 
|---|
 | 2616 |     _bz_isnan<T_numtype1> >(d1.begin());
 | 
|---|
 | 2617 | }
 | 
|---|
 | 2618 | 
 | 
|---|
 | 2619 | template<class P_expr1>
 | 
|---|
 | 2620 | inline
 | 
|---|
 | 2621 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<_bz_ArrayExpr<P_expr1>,
 | 
|---|
 | 2622 |     _bz_isnan<_bz_typename P_expr1::T_numtype> > >
 | 
|---|
 | 2623 | isnan(_bz_ArrayExpr<P_expr1> d1)
 | 
|---|
 | 2624 | {
 | 
|---|
 | 2625 |     return _bz_ArrayExprUnaryOp<_bz_ArrayExpr<P_expr1>,
 | 
|---|
 | 2626 |     _bz_isnan<_bz_typename P_expr1::T_numtype> >(d1);
 | 
|---|
 | 2627 | }
 | 
|---|
 | 2628 | 
 | 
|---|
 | 2629 | template<int N_index1>
 | 
|---|
 | 2630 | inline
 | 
|---|
 | 2631 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<IndexPlaceholder<N_index1>,
 | 
|---|
 | 2632 |     _bz_isnan<int> > >
 | 
|---|
 | 2633 | isnan(IndexPlaceholder<N_index1> d1)
 | 
|---|
 | 2634 | {
 | 
|---|
 | 2635 |     return _bz_ArrayExprUnaryOp<IndexPlaceholder<N_index1>,
 | 
|---|
 | 2636 |     _bz_isnan<int> >(d1);
 | 
|---|
 | 2637 | }
 | 
|---|
 | 2638 | 
 | 
|---|
 | 2639 | #endif
 | 
|---|
 | 2640 | 
 | 
|---|
 | 2641 | /****************************************************************************
 | 
|---|
 | 2642 |  * itrunc
 | 
|---|
 | 2643 |  ****************************************************************************/
 | 
|---|
 | 2644 | 
 | 
|---|
 | 2645 | #ifdef BZ_HAVE_SYSTEM_V_MATH
 | 
|---|
 | 2646 | template<class T_numtype1, int N_rank1>
 | 
|---|
 | 2647 | inline
 | 
|---|
 | 2648 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<ArrayIterator<T_numtype1, N_rank1>,
 | 
|---|
 | 2649 |     _bz_itrunc<T_numtype1> > >
 | 
|---|
 | 2650 | itrunc(const Array<T_numtype1, N_rank1>& d1)
 | 
|---|
 | 2651 | {
 | 
|---|
 | 2652 |     return _bz_ArrayExprUnaryOp<ArrayIterator<T_numtype1, N_rank1>,
 | 
|---|
 | 2653 |     _bz_itrunc<T_numtype1> >(d1.begin());
 | 
|---|
 | 2654 | }
 | 
|---|
 | 2655 | 
 | 
|---|
 | 2656 | template<class P_expr1>
 | 
|---|
 | 2657 | inline
 | 
|---|
 | 2658 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<_bz_ArrayExpr<P_expr1>,
 | 
|---|
 | 2659 |     _bz_itrunc<_bz_typename P_expr1::T_numtype> > >
 | 
|---|
 | 2660 | itrunc(_bz_ArrayExpr<P_expr1> d1)
 | 
|---|
 | 2661 | {
 | 
|---|
 | 2662 |     return _bz_ArrayExprUnaryOp<_bz_ArrayExpr<P_expr1>,
 | 
|---|
 | 2663 |     _bz_itrunc<_bz_typename P_expr1::T_numtype> >(d1);
 | 
|---|
 | 2664 | }
 | 
|---|
 | 2665 | 
 | 
|---|
 | 2666 | template<int N_index1>
 | 
|---|
 | 2667 | inline
 | 
|---|
 | 2668 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<IndexPlaceholder<N_index1>,
 | 
|---|
 | 2669 |     _bz_itrunc<int> > >
 | 
|---|
 | 2670 | itrunc(IndexPlaceholder<N_index1> d1)
 | 
|---|
 | 2671 | {
 | 
|---|
 | 2672 |     return _bz_ArrayExprUnaryOp<IndexPlaceholder<N_index1>,
 | 
|---|
 | 2673 |     _bz_itrunc<int> >(d1);
 | 
|---|
 | 2674 | }
 | 
|---|
 | 2675 | 
 | 
|---|
 | 2676 | #endif
 | 
|---|
 | 2677 | 
 | 
|---|
 | 2678 | /****************************************************************************
 | 
|---|
 | 2679 |  * j0
 | 
|---|
 | 2680 |  ****************************************************************************/
 | 
|---|
 | 2681 | 
 | 
|---|
 | 2682 | #ifdef BZ_HAVE_IEEE_MATH
 | 
|---|
 | 2683 | template<class T_numtype1, int N_rank1>
 | 
|---|
 | 2684 | inline
 | 
|---|
 | 2685 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<ArrayIterator<T_numtype1, N_rank1>,
 | 
|---|
 | 2686 |     _bz_j0<T_numtype1> > >
 | 
|---|
 | 2687 | j0(const Array<T_numtype1, N_rank1>& d1)
 | 
|---|
 | 2688 | {
 | 
|---|
 | 2689 |     return _bz_ArrayExprUnaryOp<ArrayIterator<T_numtype1, N_rank1>,
 | 
|---|
 | 2690 |     _bz_j0<T_numtype1> >(d1.begin());
 | 
|---|
 | 2691 | }
 | 
|---|
 | 2692 | 
 | 
|---|
 | 2693 | template<class P_expr1>
 | 
|---|
 | 2694 | inline
 | 
|---|
 | 2695 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<_bz_ArrayExpr<P_expr1>,
 | 
|---|
 | 2696 |     _bz_j0<_bz_typename P_expr1::T_numtype> > >
 | 
|---|
 | 2697 | j0(_bz_ArrayExpr<P_expr1> d1)
 | 
|---|
 | 2698 | {
 | 
|---|
 | 2699 |     return _bz_ArrayExprUnaryOp<_bz_ArrayExpr<P_expr1>,
 | 
|---|
 | 2700 |     _bz_j0<_bz_typename P_expr1::T_numtype> >(d1);
 | 
|---|
 | 2701 | }
 | 
|---|
 | 2702 | 
 | 
|---|
 | 2703 | template<int N_index1>
 | 
|---|
 | 2704 | inline
 | 
|---|
 | 2705 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<IndexPlaceholder<N_index1>,
 | 
|---|
 | 2706 |     _bz_j0<int> > >
 | 
|---|
 | 2707 | j0(IndexPlaceholder<N_index1> d1)
 | 
|---|
 | 2708 | {
 | 
|---|
 | 2709 |     return _bz_ArrayExprUnaryOp<IndexPlaceholder<N_index1>,
 | 
|---|
 | 2710 |     _bz_j0<int> >(d1);
 | 
|---|
 | 2711 | }
 | 
|---|
 | 2712 | 
 | 
|---|
 | 2713 | #endif
 | 
|---|
 | 2714 | 
 | 
|---|
 | 2715 | /****************************************************************************
 | 
|---|
 | 2716 |  * j1
 | 
|---|
 | 2717 |  ****************************************************************************/
 | 
|---|
 | 2718 | 
 | 
|---|
 | 2719 | #ifdef BZ_HAVE_IEEE_MATH
 | 
|---|
 | 2720 | template<class T_numtype1, int N_rank1>
 | 
|---|
 | 2721 | inline
 | 
|---|
 | 2722 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<ArrayIterator<T_numtype1, N_rank1>,
 | 
|---|
 | 2723 |     _bz_j1<T_numtype1> > >
 | 
|---|
 | 2724 | j1(const Array<T_numtype1, N_rank1>& d1)
 | 
|---|
 | 2725 | {
 | 
|---|
 | 2726 |     return _bz_ArrayExprUnaryOp<ArrayIterator<T_numtype1, N_rank1>,
 | 
|---|
 | 2727 |     _bz_j1<T_numtype1> >(d1.begin());
 | 
|---|
 | 2728 | }
 | 
|---|
 | 2729 | 
 | 
|---|
 | 2730 | template<class P_expr1>
 | 
|---|
 | 2731 | inline
 | 
|---|
 | 2732 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<_bz_ArrayExpr<P_expr1>,
 | 
|---|
 | 2733 |     _bz_j1<_bz_typename P_expr1::T_numtype> > >
 | 
|---|
 | 2734 | j1(_bz_ArrayExpr<P_expr1> d1)
 | 
|---|
 | 2735 | {
 | 
|---|
 | 2736 |     return _bz_ArrayExprUnaryOp<_bz_ArrayExpr<P_expr1>,
 | 
|---|
 | 2737 |     _bz_j1<_bz_typename P_expr1::T_numtype> >(d1);
 | 
|---|
 | 2738 | }
 | 
|---|
 | 2739 | 
 | 
|---|
 | 2740 | template<int N_index1>
 | 
|---|
 | 2741 | inline
 | 
|---|
 | 2742 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<IndexPlaceholder<N_index1>,
 | 
|---|
 | 2743 |     _bz_j1<int> > >
 | 
|---|
 | 2744 | j1(IndexPlaceholder<N_index1> d1)
 | 
|---|
 | 2745 | {
 | 
|---|
 | 2746 |     return _bz_ArrayExprUnaryOp<IndexPlaceholder<N_index1>,
 | 
|---|
 | 2747 |     _bz_j1<int> >(d1);
 | 
|---|
 | 2748 | }
 | 
|---|
 | 2749 | 
 | 
|---|
 | 2750 | #endif
 | 
|---|
 | 2751 | 
 | 
|---|
 | 2752 | /****************************************************************************
 | 
|---|
 | 2753 |  * lgamma
 | 
|---|
 | 2754 |  ****************************************************************************/
 | 
|---|
 | 2755 | 
 | 
|---|
 | 2756 | #ifdef BZ_HAVE_IEEE_MATH
 | 
|---|
 | 2757 | template<class T_numtype1, int N_rank1>
 | 
|---|
 | 2758 | inline
 | 
|---|
 | 2759 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<ArrayIterator<T_numtype1, N_rank1>,
 | 
|---|
 | 2760 |     _bz_lgamma<T_numtype1> > >
 | 
|---|
 | 2761 | lgamma(const Array<T_numtype1, N_rank1>& d1)
 | 
|---|
 | 2762 | {
 | 
|---|
 | 2763 |     return _bz_ArrayExprUnaryOp<ArrayIterator<T_numtype1, N_rank1>,
 | 
|---|
 | 2764 |     _bz_lgamma<T_numtype1> >(d1.begin());
 | 
|---|
 | 2765 | }
 | 
|---|
 | 2766 | 
 | 
|---|
 | 2767 | template<class P_expr1>
 | 
|---|
 | 2768 | inline
 | 
|---|
 | 2769 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<_bz_ArrayExpr<P_expr1>,
 | 
|---|
 | 2770 |     _bz_lgamma<_bz_typename P_expr1::T_numtype> > >
 | 
|---|
 | 2771 | lgamma(_bz_ArrayExpr<P_expr1> d1)
 | 
|---|
 | 2772 | {
 | 
|---|
 | 2773 |     return _bz_ArrayExprUnaryOp<_bz_ArrayExpr<P_expr1>,
 | 
|---|
 | 2774 |     _bz_lgamma<_bz_typename P_expr1::T_numtype> >(d1);
 | 
|---|
 | 2775 | }
 | 
|---|
 | 2776 | 
 | 
|---|
 | 2777 | template<int N_index1>
 | 
|---|
 | 2778 | inline
 | 
|---|
 | 2779 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<IndexPlaceholder<N_index1>,
 | 
|---|
 | 2780 |     _bz_lgamma<int> > >
 | 
|---|
 | 2781 | lgamma(IndexPlaceholder<N_index1> d1)
 | 
|---|
 | 2782 | {
 | 
|---|
 | 2783 |     return _bz_ArrayExprUnaryOp<IndexPlaceholder<N_index1>,
 | 
|---|
 | 2784 |     _bz_lgamma<int> >(d1);
 | 
|---|
 | 2785 | }
 | 
|---|
 | 2786 | 
 | 
|---|
 | 2787 | #endif
 | 
|---|
 | 2788 | 
 | 
|---|
 | 2789 | /****************************************************************************
 | 
|---|
 | 2790 |  * log
 | 
|---|
 | 2791 |  ****************************************************************************/
 | 
|---|
 | 2792 | 
 | 
|---|
 | 2793 | template<class T_numtype1, int N_rank1>
 | 
|---|
 | 2794 | inline
 | 
|---|
 | 2795 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<ArrayIterator<T_numtype1, N_rank1>,
 | 
|---|
 | 2796 |     _bz_log<T_numtype1> > >
 | 
|---|
 | 2797 | log(const Array<T_numtype1, N_rank1>& d1)
 | 
|---|
 | 2798 | {
 | 
|---|
 | 2799 |     return _bz_ArrayExprUnaryOp<ArrayIterator<T_numtype1, N_rank1>,
 | 
|---|
 | 2800 |     _bz_log<T_numtype1> >(d1.begin());
 | 
|---|
 | 2801 | }
 | 
|---|
 | 2802 | 
 | 
|---|
 | 2803 | template<class P_expr1>
 | 
|---|
 | 2804 | inline
 | 
|---|
 | 2805 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<_bz_ArrayExpr<P_expr1>,
 | 
|---|
 | 2806 |     _bz_log<_bz_typename P_expr1::T_numtype> > >
 | 
|---|
 | 2807 | log(_bz_ArrayExpr<P_expr1> d1)
 | 
|---|
 | 2808 | {
 | 
|---|
 | 2809 |     return _bz_ArrayExprUnaryOp<_bz_ArrayExpr<P_expr1>,
 | 
|---|
 | 2810 |     _bz_log<_bz_typename P_expr1::T_numtype> >(d1);
 | 
|---|
 | 2811 | }
 | 
|---|
 | 2812 | 
 | 
|---|
 | 2813 | template<int N_index1>
 | 
|---|
 | 2814 | inline
 | 
|---|
 | 2815 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<IndexPlaceholder<N_index1>,
 | 
|---|
 | 2816 |     _bz_log<int> > >
 | 
|---|
 | 2817 | log(IndexPlaceholder<N_index1> d1)
 | 
|---|
 | 2818 | {
 | 
|---|
 | 2819 |     return _bz_ArrayExprUnaryOp<IndexPlaceholder<N_index1>,
 | 
|---|
 | 2820 |     _bz_log<int> >(d1);
 | 
|---|
 | 2821 | }
 | 
|---|
 | 2822 | 
 | 
|---|
 | 2823 | 
 | 
|---|
 | 2824 | /****************************************************************************
 | 
|---|
 | 2825 |  * logb
 | 
|---|
 | 2826 |  ****************************************************************************/
 | 
|---|
 | 2827 | 
 | 
|---|
 | 2828 | #ifdef BZ_HAVE_IEEE_MATH
 | 
|---|
 | 2829 | template<class T_numtype1, int N_rank1>
 | 
|---|
 | 2830 | inline
 | 
|---|
 | 2831 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<ArrayIterator<T_numtype1, N_rank1>,
 | 
|---|
 | 2832 |     _bz_logb<T_numtype1> > >
 | 
|---|
 | 2833 | logb(const Array<T_numtype1, N_rank1>& d1)
 | 
|---|
 | 2834 | {
 | 
|---|
 | 2835 |     return _bz_ArrayExprUnaryOp<ArrayIterator<T_numtype1, N_rank1>,
 | 
|---|
 | 2836 |     _bz_logb<T_numtype1> >(d1.begin());
 | 
|---|
 | 2837 | }
 | 
|---|
 | 2838 | 
 | 
|---|
 | 2839 | template<class P_expr1>
 | 
|---|
 | 2840 | inline
 | 
|---|
 | 2841 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<_bz_ArrayExpr<P_expr1>,
 | 
|---|
 | 2842 |     _bz_logb<_bz_typename P_expr1::T_numtype> > >
 | 
|---|
 | 2843 | logb(_bz_ArrayExpr<P_expr1> d1)
 | 
|---|
 | 2844 | {
 | 
|---|
 | 2845 |     return _bz_ArrayExprUnaryOp<_bz_ArrayExpr<P_expr1>,
 | 
|---|
 | 2846 |     _bz_logb<_bz_typename P_expr1::T_numtype> >(d1);
 | 
|---|
 | 2847 | }
 | 
|---|
 | 2848 | 
 | 
|---|
 | 2849 | template<int N_index1>
 | 
|---|
 | 2850 | inline
 | 
|---|
 | 2851 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<IndexPlaceholder<N_index1>,
 | 
|---|
 | 2852 |     _bz_logb<int> > >
 | 
|---|
 | 2853 | logb(IndexPlaceholder<N_index1> d1)
 | 
|---|
 | 2854 | {
 | 
|---|
 | 2855 |     return _bz_ArrayExprUnaryOp<IndexPlaceholder<N_index1>,
 | 
|---|
 | 2856 |     _bz_logb<int> >(d1);
 | 
|---|
 | 2857 | }
 | 
|---|
 | 2858 | 
 | 
|---|
 | 2859 | #endif
 | 
|---|
 | 2860 | 
 | 
|---|
 | 2861 | /****************************************************************************
 | 
|---|
 | 2862 |  * log1p
 | 
|---|
 | 2863 |  ****************************************************************************/
 | 
|---|
 | 2864 | 
 | 
|---|
 | 2865 | #ifdef BZ_HAVE_IEEE_MATH
 | 
|---|
 | 2866 | template<class T_numtype1, int N_rank1>
 | 
|---|
 | 2867 | inline
 | 
|---|
 | 2868 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<ArrayIterator<T_numtype1, N_rank1>,
 | 
|---|
 | 2869 |     _bz_log1p<T_numtype1> > >
 | 
|---|
 | 2870 | log1p(const Array<T_numtype1, N_rank1>& d1)
 | 
|---|
 | 2871 | {
 | 
|---|
 | 2872 |     return _bz_ArrayExprUnaryOp<ArrayIterator<T_numtype1, N_rank1>,
 | 
|---|
 | 2873 |     _bz_log1p<T_numtype1> >(d1.begin());
 | 
|---|
 | 2874 | }
 | 
|---|
 | 2875 | 
 | 
|---|
 | 2876 | template<class P_expr1>
 | 
|---|
 | 2877 | inline
 | 
|---|
 | 2878 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<_bz_ArrayExpr<P_expr1>,
 | 
|---|
 | 2879 |     _bz_log1p<_bz_typename P_expr1::T_numtype> > >
 | 
|---|
 | 2880 | log1p(_bz_ArrayExpr<P_expr1> d1)
 | 
|---|
 | 2881 | {
 | 
|---|
 | 2882 |     return _bz_ArrayExprUnaryOp<_bz_ArrayExpr<P_expr1>,
 | 
|---|
 | 2883 |     _bz_log1p<_bz_typename P_expr1::T_numtype> >(d1);
 | 
|---|
 | 2884 | }
 | 
|---|
 | 2885 | 
 | 
|---|
 | 2886 | template<int N_index1>
 | 
|---|
 | 2887 | inline
 | 
|---|
 | 2888 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<IndexPlaceholder<N_index1>,
 | 
|---|
 | 2889 |     _bz_log1p<int> > >
 | 
|---|
 | 2890 | log1p(IndexPlaceholder<N_index1> d1)
 | 
|---|
 | 2891 | {
 | 
|---|
 | 2892 |     return _bz_ArrayExprUnaryOp<IndexPlaceholder<N_index1>,
 | 
|---|
 | 2893 |     _bz_log1p<int> >(d1);
 | 
|---|
 | 2894 | }
 | 
|---|
 | 2895 | 
 | 
|---|
 | 2896 | #endif
 | 
|---|
 | 2897 | 
 | 
|---|
 | 2898 | /****************************************************************************
 | 
|---|
 | 2899 |  * log10
 | 
|---|
 | 2900 |  ****************************************************************************/
 | 
|---|
 | 2901 | 
 | 
|---|
 | 2902 | template<class T_numtype1, int N_rank1>
 | 
|---|
 | 2903 | inline
 | 
|---|
 | 2904 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<ArrayIterator<T_numtype1, N_rank1>,
 | 
|---|
 | 2905 |     _bz_log10<T_numtype1> > >
 | 
|---|
 | 2906 | log10(const Array<T_numtype1, N_rank1>& d1)
 | 
|---|
 | 2907 | {
 | 
|---|
 | 2908 |     return _bz_ArrayExprUnaryOp<ArrayIterator<T_numtype1, N_rank1>,
 | 
|---|
 | 2909 |     _bz_log10<T_numtype1> >(d1.begin());
 | 
|---|
 | 2910 | }
 | 
|---|
 | 2911 | 
 | 
|---|
 | 2912 | template<class P_expr1>
 | 
|---|
 | 2913 | inline
 | 
|---|
 | 2914 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<_bz_ArrayExpr<P_expr1>,
 | 
|---|
 | 2915 |     _bz_log10<_bz_typename P_expr1::T_numtype> > >
 | 
|---|
 | 2916 | log10(_bz_ArrayExpr<P_expr1> d1)
 | 
|---|
 | 2917 | {
 | 
|---|
 | 2918 |     return _bz_ArrayExprUnaryOp<_bz_ArrayExpr<P_expr1>,
 | 
|---|
 | 2919 |     _bz_log10<_bz_typename P_expr1::T_numtype> >(d1);
 | 
|---|
 | 2920 | }
 | 
|---|
 | 2921 | 
 | 
|---|
 | 2922 | template<int N_index1>
 | 
|---|
 | 2923 | inline
 | 
|---|
 | 2924 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<IndexPlaceholder<N_index1>,
 | 
|---|
 | 2925 |     _bz_log10<int> > >
 | 
|---|
 | 2926 | log10(IndexPlaceholder<N_index1> d1)
 | 
|---|
 | 2927 | {
 | 
|---|
 | 2928 |     return _bz_ArrayExprUnaryOp<IndexPlaceholder<N_index1>,
 | 
|---|
 | 2929 |     _bz_log10<int> >(d1);
 | 
|---|
 | 2930 | }
 | 
|---|
 | 2931 | 
 | 
|---|
 | 2932 | 
 | 
|---|
 | 2933 | /****************************************************************************
 | 
|---|
 | 2934 |  * nearest
 | 
|---|
 | 2935 |  ****************************************************************************/
 | 
|---|
 | 2936 | 
 | 
|---|
 | 2937 | #ifdef BZ_HAVE_SYSTEM_V_MATH
 | 
|---|
 | 2938 | template<class T_numtype1, int N_rank1>
 | 
|---|
 | 2939 | inline
 | 
|---|
 | 2940 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<ArrayIterator<T_numtype1, N_rank1>,
 | 
|---|
 | 2941 |     _bz_nearest<T_numtype1> > >
 | 
|---|
 | 2942 | nearest(const Array<T_numtype1, N_rank1>& d1)
 | 
|---|
 | 2943 | {
 | 
|---|
 | 2944 |     return _bz_ArrayExprUnaryOp<ArrayIterator<T_numtype1, N_rank1>,
 | 
|---|
 | 2945 |     _bz_nearest<T_numtype1> >(d1.begin());
 | 
|---|
 | 2946 | }
 | 
|---|
 | 2947 | 
 | 
|---|
 | 2948 | template<class P_expr1>
 | 
|---|
 | 2949 | inline
 | 
|---|
 | 2950 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<_bz_ArrayExpr<P_expr1>,
 | 
|---|
 | 2951 |     _bz_nearest<_bz_typename P_expr1::T_numtype> > >
 | 
|---|
 | 2952 | nearest(_bz_ArrayExpr<P_expr1> d1)
 | 
|---|
 | 2953 | {
 | 
|---|
 | 2954 |     return _bz_ArrayExprUnaryOp<_bz_ArrayExpr<P_expr1>,
 | 
|---|
 | 2955 |     _bz_nearest<_bz_typename P_expr1::T_numtype> >(d1);
 | 
|---|
 | 2956 | }
 | 
|---|
 | 2957 | 
 | 
|---|
 | 2958 | template<int N_index1>
 | 
|---|
 | 2959 | inline
 | 
|---|
 | 2960 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<IndexPlaceholder<N_index1>,
 | 
|---|
 | 2961 |     _bz_nearest<int> > >
 | 
|---|
 | 2962 | nearest(IndexPlaceholder<N_index1> d1)
 | 
|---|
 | 2963 | {
 | 
|---|
 | 2964 |     return _bz_ArrayExprUnaryOp<IndexPlaceholder<N_index1>,
 | 
|---|
 | 2965 |     _bz_nearest<int> >(d1);
 | 
|---|
 | 2966 | }
 | 
|---|
 | 2967 | 
 | 
|---|
 | 2968 | #endif
 | 
|---|
 | 2969 | 
 | 
|---|
 | 2970 | /****************************************************************************
 | 
|---|
 | 2971 |  * nextafter
 | 
|---|
 | 2972 |  ****************************************************************************/
 | 
|---|
 | 2973 | 
 | 
|---|
 | 2974 | #ifdef BZ_HAVE_SYSTEM_V_MATH
 | 
|---|
 | 2975 | template<class T_numtype1, int N_rank1, class T_numtype2, int N_rank2>
 | 
|---|
 | 2976 | inline
 | 
|---|
 | 2977 | _bz_ArrayExpr<_bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 2978 |     _bz_nextafter<T_numtype1,T_numtype2> > >
 | 
|---|
 | 2979 | nextafter(const Array<T_numtype1, N_rank1>& d1, const Array<T_numtype2, N_rank2>& d2)
 | 
|---|
 | 2980 | {
 | 
|---|
 | 2981 |     return _bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 2982 |     _bz_nextafter<T_numtype1,T_numtype2> >(d1.begin(), d2.begin());
 | 
|---|
 | 2983 | }
 | 
|---|
 | 2984 | 
 | 
|---|
 | 2985 | template<class T_numtype1, int N_rank1, class P_expr2>
 | 
|---|
 | 2986 | inline
 | 
|---|
 | 2987 | _bz_ArrayExpr<_bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 2988 |     _bz_nextafter<T_numtype1,_bz_typename P_expr2::T_numtype> > >
 | 
|---|
 | 2989 | nextafter(const Array<T_numtype1, N_rank1>& d1, _bz_ArrayExpr<P_expr2> d2)
 | 
|---|
 | 2990 | {
 | 
|---|
 | 2991 |     return _bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 2992 |     _bz_nextafter<T_numtype1,_bz_typename P_expr2::T_numtype> >(d1.begin(), d2);
 | 
|---|
 | 2993 | }
 | 
|---|
 | 2994 | 
 | 
|---|
 | 2995 | template<class T_numtype1, int N_rank1, int N_index2>
 | 
|---|
 | 2996 | inline
 | 
|---|
 | 2997 | _bz_ArrayExpr<_bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, IndexPlaceholder<N_index2>,
 | 
|---|
 | 2998 |     _bz_nextafter<T_numtype1,int> > >
 | 
|---|
 | 2999 | nextafter(const Array<T_numtype1, N_rank1>& d1, IndexPlaceholder<N_index2> d2)
 | 
|---|
 | 3000 | {
 | 
|---|
 | 3001 |     return _bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, IndexPlaceholder<N_index2>,
 | 
|---|
 | 3002 |     _bz_nextafter<T_numtype1,int> >(d1.begin(), d2);
 | 
|---|
 | 3003 | }
 | 
|---|
 | 3004 | 
 | 
|---|
 | 3005 | template<class T_numtype1, int N_rank1>
 | 
|---|
 | 3006 | inline
 | 
|---|
 | 3007 | _bz_ArrayExpr<_bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, _bz_ArrayExprConstant<float>,
 | 
|---|
 | 3008 |     _bz_nextafter<T_numtype1,float> > >
 | 
|---|
 | 3009 | nextafter(const Array<T_numtype1, N_rank1>& d1, float d2)
 | 
|---|
 | 3010 | {
 | 
|---|
 | 3011 |     return _bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, _bz_ArrayExprConstant<float>,
 | 
|---|
 | 3012 |     _bz_nextafter<T_numtype1,float> >(d1.begin(), _bz_ArrayExprConstant<float>(d2));
 | 
|---|
 | 3013 | }
 | 
|---|
 | 3014 | 
 | 
|---|
 | 3015 | template<class T_numtype1, int N_rank1>
 | 
|---|
 | 3016 | inline
 | 
|---|
 | 3017 | _bz_ArrayExpr<_bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, _bz_ArrayExprConstant<double>,
 | 
|---|
 | 3018 |     _bz_nextafter<T_numtype1,double> > >
 | 
|---|
 | 3019 | nextafter(const Array<T_numtype1, N_rank1>& d1, double d2)
 | 
|---|
 | 3020 | {
 | 
|---|
 | 3021 |     return _bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, _bz_ArrayExprConstant<double>,
 | 
|---|
 | 3022 |     _bz_nextafter<T_numtype1,double> >(d1.begin(), _bz_ArrayExprConstant<double>(d2));
 | 
|---|
 | 3023 | }
 | 
|---|
 | 3024 | 
 | 
|---|
 | 3025 | template<class T_numtype1, int N_rank1>
 | 
|---|
 | 3026 | inline
 | 
|---|
 | 3027 | _bz_ArrayExpr<_bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, _bz_ArrayExprConstant<long double>,
 | 
|---|
 | 3028 |     _bz_nextafter<T_numtype1,long double> > >
 | 
|---|
 | 3029 | nextafter(const Array<T_numtype1, N_rank1>& d1, long double d2)
 | 
|---|
 | 3030 | {
 | 
|---|
 | 3031 |     return _bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, _bz_ArrayExprConstant<long double>,
 | 
|---|
 | 3032 |     _bz_nextafter<T_numtype1,long double> >(d1.begin(), _bz_ArrayExprConstant<long double>(d2));
 | 
|---|
 | 3033 | }
 | 
|---|
 | 3034 | 
 | 
|---|
 | 3035 | #ifdef BZ_HAVE_COMPLEX
 | 
|---|
 | 3036 | template<class T_numtype1, int N_rank1, class T2>
 | 
|---|
 | 3037 | inline
 | 
|---|
 | 3038 | _bz_ArrayExpr<_bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, _bz_ArrayExprConstant<complex<T2> > ,
 | 
|---|
 | 3039 |     _bz_nextafter<T_numtype1,complex<T2> > > >
 | 
|---|
 | 3040 | nextafter(const Array<T_numtype1, N_rank1>& d1, complex<T2> d2)
 | 
|---|
 | 3041 | {
 | 
|---|
 | 3042 |     return _bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, _bz_ArrayExprConstant<complex<T2> > ,
 | 
|---|
 | 3043 |     _bz_nextafter<T_numtype1,complex<T2> > >(d1.begin(), _bz_ArrayExprConstant<complex<T2> > (d2));
 | 
|---|
 | 3044 | }
 | 
|---|
 | 3045 | 
 | 
|---|
 | 3046 | #endif // BZ_HAVE_COMPLEX
 | 
|---|
 | 3047 | 
 | 
|---|
 | 3048 | template<class P_expr1, class T_numtype2, int N_rank2>
 | 
|---|
 | 3049 | inline
 | 
|---|
 | 3050 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 3051 |     _bz_nextafter<_bz_typename P_expr1::T_numtype,T_numtype2> > >
 | 
|---|
 | 3052 | nextafter(_bz_ArrayExpr<P_expr1> d1, const Array<T_numtype2, N_rank2>& d2)
 | 
|---|
 | 3053 | {
 | 
|---|
 | 3054 |     return _bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 3055 |     _bz_nextafter<_bz_typename P_expr1::T_numtype,T_numtype2> >(d1, d2.begin());
 | 
|---|
 | 3056 | }
 | 
|---|
 | 3057 | 
 | 
|---|
 | 3058 | template<class P_expr1, class P_expr2>
 | 
|---|
 | 3059 | inline
 | 
|---|
 | 3060 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 3061 |     _bz_nextafter<_bz_typename P_expr1::T_numtype,_bz_typename P_expr2::T_numtype> > >
 | 
|---|
 | 3062 | nextafter(_bz_ArrayExpr<P_expr1> d1, _bz_ArrayExpr<P_expr2> d2)
 | 
|---|
 | 3063 | {
 | 
|---|
 | 3064 |     return _bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 3065 |     _bz_nextafter<_bz_typename P_expr1::T_numtype,_bz_typename P_expr2::T_numtype> >(d1, d2);
 | 
|---|
 | 3066 | }
 | 
|---|
 | 3067 | 
 | 
|---|
 | 3068 | template<class P_expr1, int N_index2>
 | 
|---|
 | 3069 | inline
 | 
|---|
 | 3070 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, IndexPlaceholder<N_index2>,
 | 
|---|
 | 3071 |     _bz_nextafter<_bz_typename P_expr1::T_numtype,int> > >
 | 
|---|
 | 3072 | nextafter(_bz_ArrayExpr<P_expr1> d1, IndexPlaceholder<N_index2> d2)
 | 
|---|
 | 3073 | {
 | 
|---|
 | 3074 |     return _bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, IndexPlaceholder<N_index2>,
 | 
|---|
 | 3075 |     _bz_nextafter<_bz_typename P_expr1::T_numtype,int> >(d1, d2);
 | 
|---|
 | 3076 | }
 | 
|---|
 | 3077 | 
 | 
|---|
 | 3078 | template<class P_expr1>
 | 
|---|
 | 3079 | inline
 | 
|---|
 | 3080 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, _bz_ArrayExprConstant<float>,
 | 
|---|
 | 3081 |     _bz_nextafter<_bz_typename P_expr1::T_numtype,float> > >
 | 
|---|
 | 3082 | nextafter(_bz_ArrayExpr<P_expr1> d1, float d2)
 | 
|---|
 | 3083 | {
 | 
|---|
 | 3084 |     return _bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, _bz_ArrayExprConstant<float>,
 | 
|---|
 | 3085 |     _bz_nextafter<_bz_typename P_expr1::T_numtype,float> >(d1, _bz_ArrayExprConstant<float>(d2));
 | 
|---|
 | 3086 | }
 | 
|---|
 | 3087 | 
 | 
|---|
 | 3088 | template<class P_expr1>
 | 
|---|
 | 3089 | inline
 | 
|---|
 | 3090 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, _bz_ArrayExprConstant<double>,
 | 
|---|
 | 3091 |     _bz_nextafter<_bz_typename P_expr1::T_numtype,double> > >
 | 
|---|
 | 3092 | nextafter(_bz_ArrayExpr<P_expr1> d1, double d2)
 | 
|---|
 | 3093 | {
 | 
|---|
 | 3094 |     return _bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, _bz_ArrayExprConstant<double>,
 | 
|---|
 | 3095 |     _bz_nextafter<_bz_typename P_expr1::T_numtype,double> >(d1, _bz_ArrayExprConstant<double>(d2));
 | 
|---|
 | 3096 | }
 | 
|---|
 | 3097 | 
 | 
|---|
 | 3098 | template<class P_expr1>
 | 
|---|
 | 3099 | inline
 | 
|---|
 | 3100 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, _bz_ArrayExprConstant<long double>,
 | 
|---|
 | 3101 |     _bz_nextafter<_bz_typename P_expr1::T_numtype,long double> > >
 | 
|---|
 | 3102 | nextafter(_bz_ArrayExpr<P_expr1> d1, long double d2)
 | 
|---|
 | 3103 | {
 | 
|---|
 | 3104 |     return _bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, _bz_ArrayExprConstant<long double>,
 | 
|---|
 | 3105 |     _bz_nextafter<_bz_typename P_expr1::T_numtype,long double> >(d1, _bz_ArrayExprConstant<long double>(d2));
 | 
|---|
 | 3106 | }
 | 
|---|
 | 3107 | 
 | 
|---|
 | 3108 | #ifdef BZ_HAVE_COMPLEX
 | 
|---|
 | 3109 | template<class P_expr1, class T2>
 | 
|---|
 | 3110 | inline
 | 
|---|
 | 3111 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, _bz_ArrayExprConstant<complex<T2> > ,
 | 
|---|
 | 3112 |     _bz_nextafter<_bz_typename P_expr1::T_numtype,complex<T2> > > >
 | 
|---|
 | 3113 | nextafter(_bz_ArrayExpr<P_expr1> d1, complex<T2> d2)
 | 
|---|
 | 3114 | {
 | 
|---|
 | 3115 |     return _bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, _bz_ArrayExprConstant<complex<T2> > ,
 | 
|---|
 | 3116 |     _bz_nextafter<_bz_typename P_expr1::T_numtype,complex<T2> > >(d1, _bz_ArrayExprConstant<complex<T2> > (d2));
 | 
|---|
 | 3117 | }
 | 
|---|
 | 3118 | 
 | 
|---|
 | 3119 | #endif // BZ_HAVE_COMPLEX
 | 
|---|
 | 3120 | 
 | 
|---|
 | 3121 | template<int N_index1, class T_numtype2, int N_rank2>
 | 
|---|
 | 3122 | inline
 | 
|---|
 | 3123 | _bz_ArrayExpr<_bz_ArrayExprOp<IndexPlaceholder<N_index1>, ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 3124 |     _bz_nextafter<int,T_numtype2> > >
 | 
|---|
 | 3125 | nextafter(IndexPlaceholder<N_index1> d1, const Array<T_numtype2, N_rank2>& d2)
 | 
|---|
 | 3126 | {
 | 
|---|
 | 3127 |     return _bz_ArrayExprOp<IndexPlaceholder<N_index1>, ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 3128 |     _bz_nextafter<int,T_numtype2> >(d1, d2.begin());
 | 
|---|
 | 3129 | }
 | 
|---|
 | 3130 | 
 | 
|---|
 | 3131 | template<int N_index1, class P_expr2>
 | 
|---|
 | 3132 | inline
 | 
|---|
 | 3133 | _bz_ArrayExpr<_bz_ArrayExprOp<IndexPlaceholder<N_index1>, _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 3134 |     _bz_nextafter<int,_bz_typename P_expr2::T_numtype> > >
 | 
|---|
 | 3135 | nextafter(IndexPlaceholder<N_index1> d1, _bz_ArrayExpr<P_expr2> d2)
 | 
|---|
 | 3136 | {
 | 
|---|
 | 3137 |     return _bz_ArrayExprOp<IndexPlaceholder<N_index1>, _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 3138 |     _bz_nextafter<int,_bz_typename P_expr2::T_numtype> >(d1, d2);
 | 
|---|
 | 3139 | }
 | 
|---|
 | 3140 | 
 | 
|---|
 | 3141 | template<int N_index1, int N_index2>
 | 
|---|
 | 3142 | inline
 | 
|---|
 | 3143 | _bz_ArrayExpr<_bz_ArrayExprOp<IndexPlaceholder<N_index1>, IndexPlaceholder<N_index2>,
 | 
|---|
 | 3144 |     _bz_nextafter<int,int> > >
 | 
|---|
 | 3145 | nextafter(IndexPlaceholder<N_index1> d1, IndexPlaceholder<N_index2> d2)
 | 
|---|
 | 3146 | {
 | 
|---|
 | 3147 |     return _bz_ArrayExprOp<IndexPlaceholder<N_index1>, IndexPlaceholder<N_index2>,
 | 
|---|
 | 3148 |     _bz_nextafter<int,int> >(d1, d2);
 | 
|---|
 | 3149 | }
 | 
|---|
 | 3150 | 
 | 
|---|
 | 3151 | template<int N_index1>
 | 
|---|
 | 3152 | inline
 | 
|---|
 | 3153 | _bz_ArrayExpr<_bz_ArrayExprOp<IndexPlaceholder<N_index1>, _bz_ArrayExprConstant<float>,
 | 
|---|
 | 3154 |     _bz_nextafter<int,float> > >
 | 
|---|
 | 3155 | nextafter(IndexPlaceholder<N_index1> d1, float d2)
 | 
|---|
 | 3156 | {
 | 
|---|
 | 3157 |     return _bz_ArrayExprOp<IndexPlaceholder<N_index1>, _bz_ArrayExprConstant<float>,
 | 
|---|
 | 3158 |     _bz_nextafter<int,float> >(d1, _bz_ArrayExprConstant<float>(d2));
 | 
|---|
 | 3159 | }
 | 
|---|
 | 3160 | 
 | 
|---|
 | 3161 | template<int N_index1>
 | 
|---|
 | 3162 | inline
 | 
|---|
 | 3163 | _bz_ArrayExpr<_bz_ArrayExprOp<IndexPlaceholder<N_index1>, _bz_ArrayExprConstant<double>,
 | 
|---|
 | 3164 |     _bz_nextafter<int,double> > >
 | 
|---|
 | 3165 | nextafter(IndexPlaceholder<N_index1> d1, double d2)
 | 
|---|
 | 3166 | {
 | 
|---|
 | 3167 |     return _bz_ArrayExprOp<IndexPlaceholder<N_index1>, _bz_ArrayExprConstant<double>,
 | 
|---|
 | 3168 |     _bz_nextafter<int,double> >(d1, _bz_ArrayExprConstant<double>(d2));
 | 
|---|
 | 3169 | }
 | 
|---|
 | 3170 | 
 | 
|---|
 | 3171 | template<int N_index1>
 | 
|---|
 | 3172 | inline
 | 
|---|
 | 3173 | _bz_ArrayExpr<_bz_ArrayExprOp<IndexPlaceholder<N_index1>, _bz_ArrayExprConstant<long double>,
 | 
|---|
 | 3174 |     _bz_nextafter<int,long double> > >
 | 
|---|
 | 3175 | nextafter(IndexPlaceholder<N_index1> d1, long double d2)
 | 
|---|
 | 3176 | {
 | 
|---|
 | 3177 |     return _bz_ArrayExprOp<IndexPlaceholder<N_index1>, _bz_ArrayExprConstant<long double>,
 | 
|---|
 | 3178 |     _bz_nextafter<int,long double> >(d1, _bz_ArrayExprConstant<long double>(d2));
 | 
|---|
 | 3179 | }
 | 
|---|
 | 3180 | 
 | 
|---|
 | 3181 | #ifdef BZ_HAVE_COMPLEX
 | 
|---|
 | 3182 | template<int N_index1, class T2>
 | 
|---|
 | 3183 | inline
 | 
|---|
 | 3184 | _bz_ArrayExpr<_bz_ArrayExprOp<IndexPlaceholder<N_index1>, _bz_ArrayExprConstant<complex<T2> > ,
 | 
|---|
 | 3185 |     _bz_nextafter<int,complex<T2> > > >
 | 
|---|
 | 3186 | nextafter(IndexPlaceholder<N_index1> d1, complex<T2> d2)
 | 
|---|
 | 3187 | {
 | 
|---|
 | 3188 |     return _bz_ArrayExprOp<IndexPlaceholder<N_index1>, _bz_ArrayExprConstant<complex<T2> > ,
 | 
|---|
 | 3189 |     _bz_nextafter<int,complex<T2> > >(d1, _bz_ArrayExprConstant<complex<T2> > (d2));
 | 
|---|
 | 3190 | }
 | 
|---|
 | 3191 | 
 | 
|---|
 | 3192 | #endif // BZ_HAVE_COMPLEX
 | 
|---|
 | 3193 | 
 | 
|---|
 | 3194 | template<class T_numtype2, int N_rank2>
 | 
|---|
 | 3195 | inline
 | 
|---|
 | 3196 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExprConstant<float>, ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 3197 |     _bz_nextafter<float,T_numtype2> > >
 | 
|---|
 | 3198 | nextafter(float d1, const Array<T_numtype2, N_rank2>& d2)
 | 
|---|
 | 3199 | {
 | 
|---|
 | 3200 |     return _bz_ArrayExprOp<_bz_ArrayExprConstant<float>, ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 3201 |     _bz_nextafter<float,T_numtype2> >(_bz_ArrayExprConstant<float>(d1), d2.begin());
 | 
|---|
 | 3202 | }
 | 
|---|
 | 3203 | 
 | 
|---|
 | 3204 | template<class P_expr2>
 | 
|---|
 | 3205 | inline
 | 
|---|
 | 3206 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExprConstant<float>, _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 3207 |     _bz_nextafter<float,_bz_typename P_expr2::T_numtype> > >
 | 
|---|
 | 3208 | nextafter(float d1, _bz_ArrayExpr<P_expr2> d2)
 | 
|---|
 | 3209 | {
 | 
|---|
 | 3210 |     return _bz_ArrayExprOp<_bz_ArrayExprConstant<float>, _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 3211 |     _bz_nextafter<float,_bz_typename P_expr2::T_numtype> >(_bz_ArrayExprConstant<float>(d1), d2);
 | 
|---|
 | 3212 | }
 | 
|---|
 | 3213 | 
 | 
|---|
 | 3214 | template<int N_index2>
 | 
|---|
 | 3215 | inline
 | 
|---|
 | 3216 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExprConstant<float>, IndexPlaceholder<N_index2>,
 | 
|---|
 | 3217 |     _bz_nextafter<float,int> > >
 | 
|---|
 | 3218 | nextafter(float d1, IndexPlaceholder<N_index2> d2)
 | 
|---|
 | 3219 | {
 | 
|---|
 | 3220 |     return _bz_ArrayExprOp<_bz_ArrayExprConstant<float>, IndexPlaceholder<N_index2>,
 | 
|---|
 | 3221 |     _bz_nextafter<float,int> >(_bz_ArrayExprConstant<float>(d1), d2);
 | 
|---|
 | 3222 | }
 | 
|---|
 | 3223 | 
 | 
|---|
 | 3224 | template<class T_numtype2, int N_rank2>
 | 
|---|
 | 3225 | inline
 | 
|---|
 | 3226 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExprConstant<double>, ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 3227 |     _bz_nextafter<double,T_numtype2> > >
 | 
|---|
 | 3228 | nextafter(double d1, const Array<T_numtype2, N_rank2>& d2)
 | 
|---|
 | 3229 | {
 | 
|---|
 | 3230 |     return _bz_ArrayExprOp<_bz_ArrayExprConstant<double>, ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 3231 |     _bz_nextafter<double,T_numtype2> >(_bz_ArrayExprConstant<double>(d1), d2.begin());
 | 
|---|
 | 3232 | }
 | 
|---|
 | 3233 | 
 | 
|---|
 | 3234 | template<class P_expr2>
 | 
|---|
 | 3235 | inline
 | 
|---|
 | 3236 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExprConstant<double>, _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 3237 |     _bz_nextafter<double,_bz_typename P_expr2::T_numtype> > >
 | 
|---|
 | 3238 | nextafter(double d1, _bz_ArrayExpr<P_expr2> d2)
 | 
|---|
 | 3239 | {
 | 
|---|
 | 3240 |     return _bz_ArrayExprOp<_bz_ArrayExprConstant<double>, _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 3241 |     _bz_nextafter<double,_bz_typename P_expr2::T_numtype> >(_bz_ArrayExprConstant<double>(d1), d2);
 | 
|---|
 | 3242 | }
 | 
|---|
 | 3243 | 
 | 
|---|
 | 3244 | template<int N_index2>
 | 
|---|
 | 3245 | inline
 | 
|---|
 | 3246 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExprConstant<double>, IndexPlaceholder<N_index2>,
 | 
|---|
 | 3247 |     _bz_nextafter<double,int> > >
 | 
|---|
 | 3248 | nextafter(double d1, IndexPlaceholder<N_index2> d2)
 | 
|---|
 | 3249 | {
 | 
|---|
 | 3250 |     return _bz_ArrayExprOp<_bz_ArrayExprConstant<double>, IndexPlaceholder<N_index2>,
 | 
|---|
 | 3251 |     _bz_nextafter<double,int> >(_bz_ArrayExprConstant<double>(d1), d2);
 | 
|---|
 | 3252 | }
 | 
|---|
 | 3253 | 
 | 
|---|
 | 3254 | template<class T_numtype2, int N_rank2>
 | 
|---|
 | 3255 | inline
 | 
|---|
 | 3256 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExprConstant<long double>, ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 3257 |     _bz_nextafter<long double,T_numtype2> > >
 | 
|---|
 | 3258 | nextafter(long double d1, const Array<T_numtype2, N_rank2>& d2)
 | 
|---|
 | 3259 | {
 | 
|---|
 | 3260 |     return _bz_ArrayExprOp<_bz_ArrayExprConstant<long double>, ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 3261 |     _bz_nextafter<long double,T_numtype2> >(_bz_ArrayExprConstant<long double>(d1), d2.begin());
 | 
|---|
 | 3262 | }
 | 
|---|
 | 3263 | 
 | 
|---|
 | 3264 | template<class P_expr2>
 | 
|---|
 | 3265 | inline
 | 
|---|
 | 3266 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExprConstant<long double>, _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 3267 |     _bz_nextafter<long double,_bz_typename P_expr2::T_numtype> > >
 | 
|---|
 | 3268 | nextafter(long double d1, _bz_ArrayExpr<P_expr2> d2)
 | 
|---|
 | 3269 | {
 | 
|---|
 | 3270 |     return _bz_ArrayExprOp<_bz_ArrayExprConstant<long double>, _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 3271 |     _bz_nextafter<long double,_bz_typename P_expr2::T_numtype> >(_bz_ArrayExprConstant<long double>(d1), d2);
 | 
|---|
 | 3272 | }
 | 
|---|
 | 3273 | 
 | 
|---|
 | 3274 | template<int N_index2>
 | 
|---|
 | 3275 | inline
 | 
|---|
 | 3276 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExprConstant<long double>, IndexPlaceholder<N_index2>,
 | 
|---|
 | 3277 |     _bz_nextafter<long double,int> > >
 | 
|---|
 | 3278 | nextafter(long double d1, IndexPlaceholder<N_index2> d2)
 | 
|---|
 | 3279 | {
 | 
|---|
 | 3280 |     return _bz_ArrayExprOp<_bz_ArrayExprConstant<long double>, IndexPlaceholder<N_index2>,
 | 
|---|
 | 3281 |     _bz_nextafter<long double,int> >(_bz_ArrayExprConstant<long double>(d1), d2);
 | 
|---|
 | 3282 | }
 | 
|---|
 | 3283 | 
 | 
|---|
 | 3284 | #ifdef BZ_HAVE_COMPLEX
 | 
|---|
 | 3285 | template<class T1, class T_numtype2, int N_rank2>
 | 
|---|
 | 3286 | inline
 | 
|---|
 | 3287 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExprConstant<complex<T1> > , ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 3288 |     _bz_nextafter<complex<T1> ,T_numtype2> > >
 | 
|---|
 | 3289 | nextafter(complex<T1> d1, const Array<T_numtype2, N_rank2>& d2)
 | 
|---|
 | 3290 | {
 | 
|---|
 | 3291 |     return _bz_ArrayExprOp<_bz_ArrayExprConstant<complex<T1> > , ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 3292 |     _bz_nextafter<complex<T1> ,T_numtype2> >(_bz_ArrayExprConstant<complex<T1> > (d1), d2.begin());
 | 
|---|
 | 3293 | }
 | 
|---|
 | 3294 | 
 | 
|---|
 | 3295 | #endif // BZ_HAVE_COMPLEX
 | 
|---|
 | 3296 | 
 | 
|---|
 | 3297 | #ifdef BZ_HAVE_COMPLEX
 | 
|---|
 | 3298 | template<class T1, class P_expr2>
 | 
|---|
 | 3299 | inline
 | 
|---|
 | 3300 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExprConstant<complex<T1> > , _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 3301 |     _bz_nextafter<complex<T1> ,_bz_typename P_expr2::T_numtype> > >
 | 
|---|
 | 3302 | nextafter(complex<T1> d1, _bz_ArrayExpr<P_expr2> d2)
 | 
|---|
 | 3303 | {
 | 
|---|
 | 3304 |     return _bz_ArrayExprOp<_bz_ArrayExprConstant<complex<T1> > , _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 3305 |     _bz_nextafter<complex<T1> ,_bz_typename P_expr2::T_numtype> >(_bz_ArrayExprConstant<complex<T1> > (d1), d2);
 | 
|---|
 | 3306 | }
 | 
|---|
 | 3307 | 
 | 
|---|
 | 3308 | #endif // BZ_HAVE_COMPLEX
 | 
|---|
 | 3309 | 
 | 
|---|
 | 3310 | #ifdef BZ_HAVE_COMPLEX
 | 
|---|
 | 3311 | template<class T1, int N_index2>
 | 
|---|
 | 3312 | inline
 | 
|---|
 | 3313 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExprConstant<complex<T1> > , IndexPlaceholder<N_index2>,
 | 
|---|
 | 3314 |     _bz_nextafter<complex<T1> ,int> > >
 | 
|---|
 | 3315 | nextafter(complex<T1> d1, IndexPlaceholder<N_index2> d2)
 | 
|---|
 | 3316 | {
 | 
|---|
 | 3317 |     return _bz_ArrayExprOp<_bz_ArrayExprConstant<complex<T1> > , IndexPlaceholder<N_index2>,
 | 
|---|
 | 3318 |     _bz_nextafter<complex<T1> ,int> >(_bz_ArrayExprConstant<complex<T1> > (d1), d2);
 | 
|---|
 | 3319 | }
 | 
|---|
 | 3320 | 
 | 
|---|
 | 3321 | #endif // BZ_HAVE_COMPLEX
 | 
|---|
 | 3322 | 
 | 
|---|
 | 3323 | #endif
 | 
|---|
 | 3324 | 
 | 
|---|
 | 3325 | /****************************************************************************
 | 
|---|
 | 3326 |  * pow
 | 
|---|
 | 3327 |  ****************************************************************************/
 | 
|---|
 | 3328 | 
 | 
|---|
 | 3329 | template<class T_numtype1, int N_rank1, class T_numtype2, int N_rank2>
 | 
|---|
 | 3330 | inline
 | 
|---|
 | 3331 | _bz_ArrayExpr<_bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 3332 |     _bz_pow<T_numtype1,T_numtype2> > >
 | 
|---|
 | 3333 | pow(const Array<T_numtype1, N_rank1>& d1, const Array<T_numtype2, N_rank2>& d2)
 | 
|---|
 | 3334 | {
 | 
|---|
 | 3335 |     return _bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 3336 |     _bz_pow<T_numtype1,T_numtype2> >(d1.begin(), d2.begin());
 | 
|---|
 | 3337 | }
 | 
|---|
 | 3338 | 
 | 
|---|
 | 3339 | template<class T_numtype1, int N_rank1, class P_expr2>
 | 
|---|
 | 3340 | inline
 | 
|---|
 | 3341 | _bz_ArrayExpr<_bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 3342 |     _bz_pow<T_numtype1,_bz_typename P_expr2::T_numtype> > >
 | 
|---|
 | 3343 | pow(const Array<T_numtype1, N_rank1>& d1, _bz_ArrayExpr<P_expr2> d2)
 | 
|---|
 | 3344 | {
 | 
|---|
 | 3345 |     return _bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 3346 |     _bz_pow<T_numtype1,_bz_typename P_expr2::T_numtype> >(d1.begin(), d2);
 | 
|---|
 | 3347 | }
 | 
|---|
 | 3348 | 
 | 
|---|
 | 3349 | template<class T_numtype1, int N_rank1, int N_index2>
 | 
|---|
 | 3350 | inline
 | 
|---|
 | 3351 | _bz_ArrayExpr<_bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, IndexPlaceholder<N_index2>,
 | 
|---|
 | 3352 |     _bz_pow<T_numtype1,int> > >
 | 
|---|
 | 3353 | pow(const Array<T_numtype1, N_rank1>& d1, IndexPlaceholder<N_index2> d2)
 | 
|---|
 | 3354 | {
 | 
|---|
 | 3355 |     return _bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, IndexPlaceholder<N_index2>,
 | 
|---|
 | 3356 |     _bz_pow<T_numtype1,int> >(d1.begin(), d2);
 | 
|---|
 | 3357 | }
 | 
|---|
 | 3358 | 
 | 
|---|
 | 3359 | template<class T_numtype1, int N_rank1>
 | 
|---|
 | 3360 | inline
 | 
|---|
 | 3361 | _bz_ArrayExpr<_bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, _bz_ArrayExprConstant<float>,
 | 
|---|
 | 3362 |     _bz_pow<T_numtype1,float> > >
 | 
|---|
 | 3363 | pow(const Array<T_numtype1, N_rank1>& d1, float d2)
 | 
|---|
 | 3364 | {
 | 
|---|
 | 3365 |     return _bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, _bz_ArrayExprConstant<float>,
 | 
|---|
 | 3366 |     _bz_pow<T_numtype1,float> >(d1.begin(), _bz_ArrayExprConstant<float>(d2));
 | 
|---|
 | 3367 | }
 | 
|---|
 | 3368 | 
 | 
|---|
 | 3369 | template<class T_numtype1, int N_rank1>
 | 
|---|
 | 3370 | inline
 | 
|---|
 | 3371 | _bz_ArrayExpr<_bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, _bz_ArrayExprConstant<double>,
 | 
|---|
 | 3372 |     _bz_pow<T_numtype1,double> > >
 | 
|---|
 | 3373 | pow(const Array<T_numtype1, N_rank1>& d1, double d2)
 | 
|---|
 | 3374 | {
 | 
|---|
 | 3375 |     return _bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, _bz_ArrayExprConstant<double>,
 | 
|---|
 | 3376 |     _bz_pow<T_numtype1,double> >(d1.begin(), _bz_ArrayExprConstant<double>(d2));
 | 
|---|
 | 3377 | }
 | 
|---|
 | 3378 | 
 | 
|---|
 | 3379 | template<class T_numtype1, int N_rank1>
 | 
|---|
 | 3380 | inline
 | 
|---|
 | 3381 | _bz_ArrayExpr<_bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, _bz_ArrayExprConstant<long double>,
 | 
|---|
 | 3382 |     _bz_pow<T_numtype1,long double> > >
 | 
|---|
 | 3383 | pow(const Array<T_numtype1, N_rank1>& d1, long double d2)
 | 
|---|
 | 3384 | {
 | 
|---|
 | 3385 |     return _bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, _bz_ArrayExprConstant<long double>,
 | 
|---|
 | 3386 |     _bz_pow<T_numtype1,long double> >(d1.begin(), _bz_ArrayExprConstant<long double>(d2));
 | 
|---|
 | 3387 | }
 | 
|---|
 | 3388 | 
 | 
|---|
 | 3389 | #ifdef BZ_HAVE_COMPLEX
 | 
|---|
 | 3390 | template<class T_numtype1, int N_rank1, class T2>
 | 
|---|
 | 3391 | inline
 | 
|---|
 | 3392 | _bz_ArrayExpr<_bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, _bz_ArrayExprConstant<complex<T2> > ,
 | 
|---|
 | 3393 |     _bz_pow<T_numtype1,complex<T2> > > >
 | 
|---|
 | 3394 | pow(const Array<T_numtype1, N_rank1>& d1, complex<T2> d2)
 | 
|---|
 | 3395 | {
 | 
|---|
 | 3396 |     return _bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, _bz_ArrayExprConstant<complex<T2> > ,
 | 
|---|
 | 3397 |     _bz_pow<T_numtype1,complex<T2> > >(d1.begin(), _bz_ArrayExprConstant<complex<T2> > (d2));
 | 
|---|
 | 3398 | }
 | 
|---|
 | 3399 | 
 | 
|---|
 | 3400 | #endif // BZ_HAVE_COMPLEX
 | 
|---|
 | 3401 | 
 | 
|---|
 | 3402 | template<class P_expr1, class T_numtype2, int N_rank2>
 | 
|---|
 | 3403 | inline
 | 
|---|
 | 3404 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 3405 |     _bz_pow<_bz_typename P_expr1::T_numtype,T_numtype2> > >
 | 
|---|
 | 3406 | pow(_bz_ArrayExpr<P_expr1> d1, const Array<T_numtype2, N_rank2>& d2)
 | 
|---|
 | 3407 | {
 | 
|---|
 | 3408 |     return _bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 3409 |     _bz_pow<_bz_typename P_expr1::T_numtype,T_numtype2> >(d1, d2.begin());
 | 
|---|
 | 3410 | }
 | 
|---|
 | 3411 | 
 | 
|---|
 | 3412 | template<class P_expr1, class P_expr2>
 | 
|---|
 | 3413 | inline
 | 
|---|
 | 3414 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 3415 |     _bz_pow<_bz_typename P_expr1::T_numtype,_bz_typename P_expr2::T_numtype> > >
 | 
|---|
 | 3416 | pow(_bz_ArrayExpr<P_expr1> d1, _bz_ArrayExpr<P_expr2> d2)
 | 
|---|
 | 3417 | {
 | 
|---|
 | 3418 |     return _bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 3419 |     _bz_pow<_bz_typename P_expr1::T_numtype,_bz_typename P_expr2::T_numtype> >(d1, d2);
 | 
|---|
 | 3420 | }
 | 
|---|
 | 3421 | 
 | 
|---|
 | 3422 | template<class P_expr1, int N_index2>
 | 
|---|
 | 3423 | inline
 | 
|---|
 | 3424 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, IndexPlaceholder<N_index2>,
 | 
|---|
 | 3425 |     _bz_pow<_bz_typename P_expr1::T_numtype,int> > >
 | 
|---|
 | 3426 | pow(_bz_ArrayExpr<P_expr1> d1, IndexPlaceholder<N_index2> d2)
 | 
|---|
 | 3427 | {
 | 
|---|
 | 3428 |     return _bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, IndexPlaceholder<N_index2>,
 | 
|---|
 | 3429 |     _bz_pow<_bz_typename P_expr1::T_numtype,int> >(d1, d2);
 | 
|---|
 | 3430 | }
 | 
|---|
 | 3431 | 
 | 
|---|
 | 3432 | template<class P_expr1>
 | 
|---|
 | 3433 | inline
 | 
|---|
 | 3434 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, _bz_ArrayExprConstant<float>,
 | 
|---|
 | 3435 |     _bz_pow<_bz_typename P_expr1::T_numtype,float> > >
 | 
|---|
 | 3436 | pow(_bz_ArrayExpr<P_expr1> d1, float d2)
 | 
|---|
 | 3437 | {
 | 
|---|
 | 3438 |     return _bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, _bz_ArrayExprConstant<float>,
 | 
|---|
 | 3439 |     _bz_pow<_bz_typename P_expr1::T_numtype,float> >(d1, _bz_ArrayExprConstant<float>(d2));
 | 
|---|
 | 3440 | }
 | 
|---|
 | 3441 | 
 | 
|---|
 | 3442 | template<class P_expr1>
 | 
|---|
 | 3443 | inline
 | 
|---|
 | 3444 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, _bz_ArrayExprConstant<double>,
 | 
|---|
 | 3445 |     _bz_pow<_bz_typename P_expr1::T_numtype,double> > >
 | 
|---|
 | 3446 | pow(_bz_ArrayExpr<P_expr1> d1, double d2)
 | 
|---|
 | 3447 | {
 | 
|---|
 | 3448 |     return _bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, _bz_ArrayExprConstant<double>,
 | 
|---|
 | 3449 |     _bz_pow<_bz_typename P_expr1::T_numtype,double> >(d1, _bz_ArrayExprConstant<double>(d2));
 | 
|---|
 | 3450 | }
 | 
|---|
 | 3451 | 
 | 
|---|
 | 3452 | template<class P_expr1>
 | 
|---|
 | 3453 | inline
 | 
|---|
 | 3454 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, _bz_ArrayExprConstant<long double>,
 | 
|---|
 | 3455 |     _bz_pow<_bz_typename P_expr1::T_numtype,long double> > >
 | 
|---|
 | 3456 | pow(_bz_ArrayExpr<P_expr1> d1, long double d2)
 | 
|---|
 | 3457 | {
 | 
|---|
 | 3458 |     return _bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, _bz_ArrayExprConstant<long double>,
 | 
|---|
 | 3459 |     _bz_pow<_bz_typename P_expr1::T_numtype,long double> >(d1, _bz_ArrayExprConstant<long double>(d2));
 | 
|---|
 | 3460 | }
 | 
|---|
 | 3461 | 
 | 
|---|
 | 3462 | #ifdef BZ_HAVE_COMPLEX
 | 
|---|
 | 3463 | template<class P_expr1, class T2>
 | 
|---|
 | 3464 | inline
 | 
|---|
 | 3465 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, _bz_ArrayExprConstant<complex<T2> > ,
 | 
|---|
 | 3466 |     _bz_pow<_bz_typename P_expr1::T_numtype,complex<T2> > > >
 | 
|---|
 | 3467 | pow(_bz_ArrayExpr<P_expr1> d1, complex<T2> d2)
 | 
|---|
 | 3468 | {
 | 
|---|
 | 3469 |     return _bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, _bz_ArrayExprConstant<complex<T2> > ,
 | 
|---|
 | 3470 |     _bz_pow<_bz_typename P_expr1::T_numtype,complex<T2> > >(d1, _bz_ArrayExprConstant<complex<T2> > (d2));
 | 
|---|
 | 3471 | }
 | 
|---|
 | 3472 | 
 | 
|---|
 | 3473 | #endif // BZ_HAVE_COMPLEX
 | 
|---|
 | 3474 | 
 | 
|---|
 | 3475 | template<int N_index1, class T_numtype2, int N_rank2>
 | 
|---|
 | 3476 | inline
 | 
|---|
 | 3477 | _bz_ArrayExpr<_bz_ArrayExprOp<IndexPlaceholder<N_index1>, ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 3478 |     _bz_pow<int,T_numtype2> > >
 | 
|---|
 | 3479 | pow(IndexPlaceholder<N_index1> d1, const Array<T_numtype2, N_rank2>& d2)
 | 
|---|
 | 3480 | {
 | 
|---|
 | 3481 |     return _bz_ArrayExprOp<IndexPlaceholder<N_index1>, ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 3482 |     _bz_pow<int,T_numtype2> >(d1, d2.begin());
 | 
|---|
 | 3483 | }
 | 
|---|
 | 3484 | 
 | 
|---|
 | 3485 | template<int N_index1, class P_expr2>
 | 
|---|
 | 3486 | inline
 | 
|---|
 | 3487 | _bz_ArrayExpr<_bz_ArrayExprOp<IndexPlaceholder<N_index1>, _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 3488 |     _bz_pow<int,_bz_typename P_expr2::T_numtype> > >
 | 
|---|
 | 3489 | pow(IndexPlaceholder<N_index1> d1, _bz_ArrayExpr<P_expr2> d2)
 | 
|---|
 | 3490 | {
 | 
|---|
 | 3491 |     return _bz_ArrayExprOp<IndexPlaceholder<N_index1>, _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 3492 |     _bz_pow<int,_bz_typename P_expr2::T_numtype> >(d1, d2);
 | 
|---|
 | 3493 | }
 | 
|---|
 | 3494 | 
 | 
|---|
 | 3495 | template<int N_index1, int N_index2>
 | 
|---|
 | 3496 | inline
 | 
|---|
 | 3497 | _bz_ArrayExpr<_bz_ArrayExprOp<IndexPlaceholder<N_index1>, IndexPlaceholder<N_index2>,
 | 
|---|
 | 3498 |     _bz_pow<int,int> > >
 | 
|---|
 | 3499 | pow(IndexPlaceholder<N_index1> d1, IndexPlaceholder<N_index2> d2)
 | 
|---|
 | 3500 | {
 | 
|---|
 | 3501 |     return _bz_ArrayExprOp<IndexPlaceholder<N_index1>, IndexPlaceholder<N_index2>,
 | 
|---|
 | 3502 |     _bz_pow<int,int> >(d1, d2);
 | 
|---|
 | 3503 | }
 | 
|---|
 | 3504 | 
 | 
|---|
 | 3505 | template<int N_index1>
 | 
|---|
 | 3506 | inline
 | 
|---|
 | 3507 | _bz_ArrayExpr<_bz_ArrayExprOp<IndexPlaceholder<N_index1>, _bz_ArrayExprConstant<float>,
 | 
|---|
 | 3508 |     _bz_pow<int,float> > >
 | 
|---|
 | 3509 | pow(IndexPlaceholder<N_index1> d1, float d2)
 | 
|---|
 | 3510 | {
 | 
|---|
 | 3511 |     return _bz_ArrayExprOp<IndexPlaceholder<N_index1>, _bz_ArrayExprConstant<float>,
 | 
|---|
 | 3512 |     _bz_pow<int,float> >(d1, _bz_ArrayExprConstant<float>(d2));
 | 
|---|
 | 3513 | }
 | 
|---|
 | 3514 | 
 | 
|---|
 | 3515 | template<int N_index1>
 | 
|---|
 | 3516 | inline
 | 
|---|
 | 3517 | _bz_ArrayExpr<_bz_ArrayExprOp<IndexPlaceholder<N_index1>, _bz_ArrayExprConstant<double>,
 | 
|---|
 | 3518 |     _bz_pow<int,double> > >
 | 
|---|
 | 3519 | pow(IndexPlaceholder<N_index1> d1, double d2)
 | 
|---|
 | 3520 | {
 | 
|---|
 | 3521 |     return _bz_ArrayExprOp<IndexPlaceholder<N_index1>, _bz_ArrayExprConstant<double>,
 | 
|---|
 | 3522 |     _bz_pow<int,double> >(d1, _bz_ArrayExprConstant<double>(d2));
 | 
|---|
 | 3523 | }
 | 
|---|
 | 3524 | 
 | 
|---|
 | 3525 | template<int N_index1>
 | 
|---|
 | 3526 | inline
 | 
|---|
 | 3527 | _bz_ArrayExpr<_bz_ArrayExprOp<IndexPlaceholder<N_index1>, _bz_ArrayExprConstant<long double>,
 | 
|---|
 | 3528 |     _bz_pow<int,long double> > >
 | 
|---|
 | 3529 | pow(IndexPlaceholder<N_index1> d1, long double d2)
 | 
|---|
 | 3530 | {
 | 
|---|
 | 3531 |     return _bz_ArrayExprOp<IndexPlaceholder<N_index1>, _bz_ArrayExprConstant<long double>,
 | 
|---|
 | 3532 |     _bz_pow<int,long double> >(d1, _bz_ArrayExprConstant<long double>(d2));
 | 
|---|
 | 3533 | }
 | 
|---|
 | 3534 | 
 | 
|---|
 | 3535 | #ifdef BZ_HAVE_COMPLEX
 | 
|---|
 | 3536 | template<int N_index1, class T2>
 | 
|---|
 | 3537 | inline
 | 
|---|
 | 3538 | _bz_ArrayExpr<_bz_ArrayExprOp<IndexPlaceholder<N_index1>, _bz_ArrayExprConstant<complex<T2> > ,
 | 
|---|
 | 3539 |     _bz_pow<int,complex<T2> > > >
 | 
|---|
 | 3540 | pow(IndexPlaceholder<N_index1> d1, complex<T2> d2)
 | 
|---|
 | 3541 | {
 | 
|---|
 | 3542 |     return _bz_ArrayExprOp<IndexPlaceholder<N_index1>, _bz_ArrayExprConstant<complex<T2> > ,
 | 
|---|
 | 3543 |     _bz_pow<int,complex<T2> > >(d1, _bz_ArrayExprConstant<complex<T2> > (d2));
 | 
|---|
 | 3544 | }
 | 
|---|
 | 3545 | 
 | 
|---|
 | 3546 | #endif // BZ_HAVE_COMPLEX
 | 
|---|
 | 3547 | 
 | 
|---|
 | 3548 | template<class T_numtype2, int N_rank2>
 | 
|---|
 | 3549 | inline
 | 
|---|
 | 3550 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExprConstant<float>, ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 3551 |     _bz_pow<float,T_numtype2> > >
 | 
|---|
 | 3552 | pow(float d1, const Array<T_numtype2, N_rank2>& d2)
 | 
|---|
 | 3553 | {
 | 
|---|
 | 3554 |     return _bz_ArrayExprOp<_bz_ArrayExprConstant<float>, ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 3555 |     _bz_pow<float,T_numtype2> >(_bz_ArrayExprConstant<float>(d1), d2.begin());
 | 
|---|
 | 3556 | }
 | 
|---|
 | 3557 | 
 | 
|---|
 | 3558 | template<class P_expr2>
 | 
|---|
 | 3559 | inline
 | 
|---|
 | 3560 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExprConstant<float>, _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 3561 |     _bz_pow<float,_bz_typename P_expr2::T_numtype> > >
 | 
|---|
 | 3562 | pow(float d1, _bz_ArrayExpr<P_expr2> d2)
 | 
|---|
 | 3563 | {
 | 
|---|
 | 3564 |     return _bz_ArrayExprOp<_bz_ArrayExprConstant<float>, _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 3565 |     _bz_pow<float,_bz_typename P_expr2::T_numtype> >(_bz_ArrayExprConstant<float>(d1), d2);
 | 
|---|
 | 3566 | }
 | 
|---|
 | 3567 | 
 | 
|---|
 | 3568 | template<int N_index2>
 | 
|---|
 | 3569 | inline
 | 
|---|
 | 3570 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExprConstant<float>, IndexPlaceholder<N_index2>,
 | 
|---|
 | 3571 |     _bz_pow<float,int> > >
 | 
|---|
 | 3572 | pow(float d1, IndexPlaceholder<N_index2> d2)
 | 
|---|
 | 3573 | {
 | 
|---|
 | 3574 |     return _bz_ArrayExprOp<_bz_ArrayExprConstant<float>, IndexPlaceholder<N_index2>,
 | 
|---|
 | 3575 |     _bz_pow<float,int> >(_bz_ArrayExprConstant<float>(d1), d2);
 | 
|---|
 | 3576 | }
 | 
|---|
 | 3577 | 
 | 
|---|
 | 3578 | template<class T_numtype2, int N_rank2>
 | 
|---|
 | 3579 | inline
 | 
|---|
 | 3580 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExprConstant<double>, ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 3581 |     _bz_pow<double,T_numtype2> > >
 | 
|---|
 | 3582 | pow(double d1, const Array<T_numtype2, N_rank2>& d2)
 | 
|---|
 | 3583 | {
 | 
|---|
 | 3584 |     return _bz_ArrayExprOp<_bz_ArrayExprConstant<double>, ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 3585 |     _bz_pow<double,T_numtype2> >(_bz_ArrayExprConstant<double>(d1), d2.begin());
 | 
|---|
 | 3586 | }
 | 
|---|
 | 3587 | 
 | 
|---|
 | 3588 | template<class P_expr2>
 | 
|---|
 | 3589 | inline
 | 
|---|
 | 3590 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExprConstant<double>, _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 3591 |     _bz_pow<double,_bz_typename P_expr2::T_numtype> > >
 | 
|---|
 | 3592 | pow(double d1, _bz_ArrayExpr<P_expr2> d2)
 | 
|---|
 | 3593 | {
 | 
|---|
 | 3594 |     return _bz_ArrayExprOp<_bz_ArrayExprConstant<double>, _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 3595 |     _bz_pow<double,_bz_typename P_expr2::T_numtype> >(_bz_ArrayExprConstant<double>(d1), d2);
 | 
|---|
 | 3596 | }
 | 
|---|
 | 3597 | 
 | 
|---|
 | 3598 | template<int N_index2>
 | 
|---|
 | 3599 | inline
 | 
|---|
 | 3600 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExprConstant<double>, IndexPlaceholder<N_index2>,
 | 
|---|
 | 3601 |     _bz_pow<double,int> > >
 | 
|---|
 | 3602 | pow(double d1, IndexPlaceholder<N_index2> d2)
 | 
|---|
 | 3603 | {
 | 
|---|
 | 3604 |     return _bz_ArrayExprOp<_bz_ArrayExprConstant<double>, IndexPlaceholder<N_index2>,
 | 
|---|
 | 3605 |     _bz_pow<double,int> >(_bz_ArrayExprConstant<double>(d1), d2);
 | 
|---|
 | 3606 | }
 | 
|---|
 | 3607 | 
 | 
|---|
 | 3608 | template<class T_numtype2, int N_rank2>
 | 
|---|
 | 3609 | inline
 | 
|---|
 | 3610 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExprConstant<long double>, ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 3611 |     _bz_pow<long double,T_numtype2> > >
 | 
|---|
 | 3612 | pow(long double d1, const Array<T_numtype2, N_rank2>& d2)
 | 
|---|
 | 3613 | {
 | 
|---|
 | 3614 |     return _bz_ArrayExprOp<_bz_ArrayExprConstant<long double>, ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 3615 |     _bz_pow<long double,T_numtype2> >(_bz_ArrayExprConstant<long double>(d1), d2.begin());
 | 
|---|
 | 3616 | }
 | 
|---|
 | 3617 | 
 | 
|---|
 | 3618 | template<class P_expr2>
 | 
|---|
 | 3619 | inline
 | 
|---|
 | 3620 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExprConstant<long double>, _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 3621 |     _bz_pow<long double,_bz_typename P_expr2::T_numtype> > >
 | 
|---|
 | 3622 | pow(long double d1, _bz_ArrayExpr<P_expr2> d2)
 | 
|---|
 | 3623 | {
 | 
|---|
 | 3624 |     return _bz_ArrayExprOp<_bz_ArrayExprConstant<long double>, _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 3625 |     _bz_pow<long double,_bz_typename P_expr2::T_numtype> >(_bz_ArrayExprConstant<long double>(d1), d2);
 | 
|---|
 | 3626 | }
 | 
|---|
 | 3627 | 
 | 
|---|
 | 3628 | template<int N_index2>
 | 
|---|
 | 3629 | inline
 | 
|---|
 | 3630 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExprConstant<long double>, IndexPlaceholder<N_index2>,
 | 
|---|
 | 3631 |     _bz_pow<long double,int> > >
 | 
|---|
 | 3632 | pow(long double d1, IndexPlaceholder<N_index2> d2)
 | 
|---|
 | 3633 | {
 | 
|---|
 | 3634 |     return _bz_ArrayExprOp<_bz_ArrayExprConstant<long double>, IndexPlaceholder<N_index2>,
 | 
|---|
 | 3635 |     _bz_pow<long double,int> >(_bz_ArrayExprConstant<long double>(d1), d2);
 | 
|---|
 | 3636 | }
 | 
|---|
 | 3637 | 
 | 
|---|
 | 3638 | #ifdef BZ_HAVE_COMPLEX
 | 
|---|
 | 3639 | template<class T1, class T_numtype2, int N_rank2>
 | 
|---|
 | 3640 | inline
 | 
|---|
 | 3641 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExprConstant<complex<T1> > , ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 3642 |     _bz_pow<complex<T1> ,T_numtype2> > >
 | 
|---|
 | 3643 | pow(complex<T1> d1, const Array<T_numtype2, N_rank2>& d2)
 | 
|---|
 | 3644 | {
 | 
|---|
 | 3645 |     return _bz_ArrayExprOp<_bz_ArrayExprConstant<complex<T1> > , ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 3646 |     _bz_pow<complex<T1> ,T_numtype2> >(_bz_ArrayExprConstant<complex<T1> > (d1), d2.begin());
 | 
|---|
 | 3647 | }
 | 
|---|
 | 3648 | 
 | 
|---|
 | 3649 | #endif // BZ_HAVE_COMPLEX
 | 
|---|
 | 3650 | 
 | 
|---|
 | 3651 | #ifdef BZ_HAVE_COMPLEX
 | 
|---|
 | 3652 | template<class T1, class P_expr2>
 | 
|---|
 | 3653 | inline
 | 
|---|
 | 3654 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExprConstant<complex<T1> > , _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 3655 |     _bz_pow<complex<T1> ,_bz_typename P_expr2::T_numtype> > >
 | 
|---|
 | 3656 | pow(complex<T1> d1, _bz_ArrayExpr<P_expr2> d2)
 | 
|---|
 | 3657 | {
 | 
|---|
 | 3658 |     return _bz_ArrayExprOp<_bz_ArrayExprConstant<complex<T1> > , _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 3659 |     _bz_pow<complex<T1> ,_bz_typename P_expr2::T_numtype> >(_bz_ArrayExprConstant<complex<T1> > (d1), d2);
 | 
|---|
 | 3660 | }
 | 
|---|
 | 3661 | 
 | 
|---|
 | 3662 | #endif // BZ_HAVE_COMPLEX
 | 
|---|
 | 3663 | 
 | 
|---|
 | 3664 | #ifdef BZ_HAVE_COMPLEX
 | 
|---|
 | 3665 | template<class T1, int N_index2>
 | 
|---|
 | 3666 | inline
 | 
|---|
 | 3667 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExprConstant<complex<T1> > , IndexPlaceholder<N_index2>,
 | 
|---|
 | 3668 |     _bz_pow<complex<T1> ,int> > >
 | 
|---|
 | 3669 | pow(complex<T1> d1, IndexPlaceholder<N_index2> d2)
 | 
|---|
 | 3670 | {
 | 
|---|
 | 3671 |     return _bz_ArrayExprOp<_bz_ArrayExprConstant<complex<T1> > , IndexPlaceholder<N_index2>,
 | 
|---|
 | 3672 |     _bz_pow<complex<T1> ,int> >(_bz_ArrayExprConstant<complex<T1> > (d1), d2);
 | 
|---|
 | 3673 | }
 | 
|---|
 | 3674 | 
 | 
|---|
 | 3675 | #endif // BZ_HAVE_COMPLEX
 | 
|---|
 | 3676 | 
 | 
|---|
 | 3677 | 
 | 
|---|
 | 3678 | /****************************************************************************
 | 
|---|
 | 3679 |  * pow2
 | 
|---|
 | 3680 |  ****************************************************************************/
 | 
|---|
 | 3681 | 
 | 
|---|
 | 3682 | template<class T_numtype1, int N_rank1>
 | 
|---|
 | 3683 | inline
 | 
|---|
 | 3684 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<ArrayIterator<T_numtype1, N_rank1>,
 | 
|---|
 | 3685 |     _bz_pow2<T_numtype1> > >
 | 
|---|
 | 3686 | pow2(const Array<T_numtype1, N_rank1>& d1)
 | 
|---|
 | 3687 | {
 | 
|---|
 | 3688 |     return _bz_ArrayExprUnaryOp<ArrayIterator<T_numtype1, N_rank1>,
 | 
|---|
 | 3689 |     _bz_pow2<T_numtype1> >(d1.begin());
 | 
|---|
 | 3690 | }
 | 
|---|
 | 3691 | 
 | 
|---|
 | 3692 | template<class P_expr1>
 | 
|---|
 | 3693 | inline
 | 
|---|
 | 3694 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<_bz_ArrayExpr<P_expr1>,
 | 
|---|
 | 3695 |     _bz_pow2<_bz_typename P_expr1::T_numtype> > >
 | 
|---|
 | 3696 | pow2(_bz_ArrayExpr<P_expr1> d1)
 | 
|---|
 | 3697 | {
 | 
|---|
 | 3698 |     return _bz_ArrayExprUnaryOp<_bz_ArrayExpr<P_expr1>,
 | 
|---|
 | 3699 |     _bz_pow2<_bz_typename P_expr1::T_numtype> >(d1);
 | 
|---|
 | 3700 | }
 | 
|---|
 | 3701 | 
 | 
|---|
 | 3702 | template<int N_index1>
 | 
|---|
 | 3703 | inline
 | 
|---|
 | 3704 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<IndexPlaceholder<N_index1>,
 | 
|---|
 | 3705 |     _bz_pow2<int> > >
 | 
|---|
 | 3706 | pow2(IndexPlaceholder<N_index1> d1)
 | 
|---|
 | 3707 | {
 | 
|---|
 | 3708 |     return _bz_ArrayExprUnaryOp<IndexPlaceholder<N_index1>,
 | 
|---|
 | 3709 |     _bz_pow2<int> >(d1);
 | 
|---|
 | 3710 | }
 | 
|---|
 | 3711 | 
 | 
|---|
 | 3712 | 
 | 
|---|
 | 3713 | /****************************************************************************
 | 
|---|
 | 3714 |  * pow3
 | 
|---|
 | 3715 |  ****************************************************************************/
 | 
|---|
 | 3716 | 
 | 
|---|
 | 3717 | template<class T_numtype1, int N_rank1>
 | 
|---|
 | 3718 | inline
 | 
|---|
 | 3719 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<ArrayIterator<T_numtype1, N_rank1>,
 | 
|---|
 | 3720 |     _bz_pow3<T_numtype1> > >
 | 
|---|
 | 3721 | pow3(const Array<T_numtype1, N_rank1>& d1)
 | 
|---|
 | 3722 | {
 | 
|---|
 | 3723 |     return _bz_ArrayExprUnaryOp<ArrayIterator<T_numtype1, N_rank1>,
 | 
|---|
 | 3724 |     _bz_pow3<T_numtype1> >(d1.begin());
 | 
|---|
 | 3725 | }
 | 
|---|
 | 3726 | 
 | 
|---|
 | 3727 | template<class P_expr1>
 | 
|---|
 | 3728 | inline
 | 
|---|
 | 3729 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<_bz_ArrayExpr<P_expr1>,
 | 
|---|
 | 3730 |     _bz_pow3<_bz_typename P_expr1::T_numtype> > >
 | 
|---|
 | 3731 | pow3(_bz_ArrayExpr<P_expr1> d1)
 | 
|---|
 | 3732 | {
 | 
|---|
 | 3733 |     return _bz_ArrayExprUnaryOp<_bz_ArrayExpr<P_expr1>,
 | 
|---|
 | 3734 |     _bz_pow3<_bz_typename P_expr1::T_numtype> >(d1);
 | 
|---|
 | 3735 | }
 | 
|---|
 | 3736 | 
 | 
|---|
 | 3737 | template<int N_index1>
 | 
|---|
 | 3738 | inline
 | 
|---|
 | 3739 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<IndexPlaceholder<N_index1>,
 | 
|---|
 | 3740 |     _bz_pow3<int> > >
 | 
|---|
 | 3741 | pow3(IndexPlaceholder<N_index1> d1)
 | 
|---|
 | 3742 | {
 | 
|---|
 | 3743 |     return _bz_ArrayExprUnaryOp<IndexPlaceholder<N_index1>,
 | 
|---|
 | 3744 |     _bz_pow3<int> >(d1);
 | 
|---|
 | 3745 | }
 | 
|---|
 | 3746 | 
 | 
|---|
 | 3747 | 
 | 
|---|
 | 3748 | /****************************************************************************
 | 
|---|
 | 3749 |  * pow4
 | 
|---|
 | 3750 |  ****************************************************************************/
 | 
|---|
 | 3751 | 
 | 
|---|
 | 3752 | template<class T_numtype1, int N_rank1>
 | 
|---|
 | 3753 | inline
 | 
|---|
 | 3754 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<ArrayIterator<T_numtype1, N_rank1>,
 | 
|---|
 | 3755 |     _bz_pow4<T_numtype1> > >
 | 
|---|
 | 3756 | pow4(const Array<T_numtype1, N_rank1>& d1)
 | 
|---|
 | 3757 | {
 | 
|---|
 | 3758 |     return _bz_ArrayExprUnaryOp<ArrayIterator<T_numtype1, N_rank1>,
 | 
|---|
 | 3759 |     _bz_pow4<T_numtype1> >(d1.begin());
 | 
|---|
 | 3760 | }
 | 
|---|
 | 3761 | 
 | 
|---|
 | 3762 | template<class P_expr1>
 | 
|---|
 | 3763 | inline
 | 
|---|
 | 3764 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<_bz_ArrayExpr<P_expr1>,
 | 
|---|
 | 3765 |     _bz_pow4<_bz_typename P_expr1::T_numtype> > >
 | 
|---|
 | 3766 | pow4(_bz_ArrayExpr<P_expr1> d1)
 | 
|---|
 | 3767 | {
 | 
|---|
 | 3768 |     return _bz_ArrayExprUnaryOp<_bz_ArrayExpr<P_expr1>,
 | 
|---|
 | 3769 |     _bz_pow4<_bz_typename P_expr1::T_numtype> >(d1);
 | 
|---|
 | 3770 | }
 | 
|---|
 | 3771 | 
 | 
|---|
 | 3772 | template<int N_index1>
 | 
|---|
 | 3773 | inline
 | 
|---|
 | 3774 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<IndexPlaceholder<N_index1>,
 | 
|---|
 | 3775 |     _bz_pow4<int> > >
 | 
|---|
 | 3776 | pow4(IndexPlaceholder<N_index1> d1)
 | 
|---|
 | 3777 | {
 | 
|---|
 | 3778 |     return _bz_ArrayExprUnaryOp<IndexPlaceholder<N_index1>,
 | 
|---|
 | 3779 |     _bz_pow4<int> >(d1);
 | 
|---|
 | 3780 | }
 | 
|---|
 | 3781 | 
 | 
|---|
 | 3782 | 
 | 
|---|
 | 3783 | /****************************************************************************
 | 
|---|
 | 3784 |  * pow5
 | 
|---|
 | 3785 |  ****************************************************************************/
 | 
|---|
 | 3786 | 
 | 
|---|
 | 3787 | template<class T_numtype1, int N_rank1>
 | 
|---|
 | 3788 | inline
 | 
|---|
 | 3789 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<ArrayIterator<T_numtype1, N_rank1>,
 | 
|---|
 | 3790 |     _bz_pow5<T_numtype1> > >
 | 
|---|
 | 3791 | pow5(const Array<T_numtype1, N_rank1>& d1)
 | 
|---|
 | 3792 | {
 | 
|---|
 | 3793 |     return _bz_ArrayExprUnaryOp<ArrayIterator<T_numtype1, N_rank1>,
 | 
|---|
 | 3794 |     _bz_pow5<T_numtype1> >(d1.begin());
 | 
|---|
 | 3795 | }
 | 
|---|
 | 3796 | 
 | 
|---|
 | 3797 | template<class P_expr1>
 | 
|---|
 | 3798 | inline
 | 
|---|
 | 3799 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<_bz_ArrayExpr<P_expr1>,
 | 
|---|
 | 3800 |     _bz_pow5<_bz_typename P_expr1::T_numtype> > >
 | 
|---|
 | 3801 | pow5(_bz_ArrayExpr<P_expr1> d1)
 | 
|---|
 | 3802 | {
 | 
|---|
 | 3803 |     return _bz_ArrayExprUnaryOp<_bz_ArrayExpr<P_expr1>,
 | 
|---|
 | 3804 |     _bz_pow5<_bz_typename P_expr1::T_numtype> >(d1);
 | 
|---|
 | 3805 | }
 | 
|---|
 | 3806 | 
 | 
|---|
 | 3807 | template<int N_index1>
 | 
|---|
 | 3808 | inline
 | 
|---|
 | 3809 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<IndexPlaceholder<N_index1>,
 | 
|---|
 | 3810 |     _bz_pow5<int> > >
 | 
|---|
 | 3811 | pow5(IndexPlaceholder<N_index1> d1)
 | 
|---|
 | 3812 | {
 | 
|---|
 | 3813 |     return _bz_ArrayExprUnaryOp<IndexPlaceholder<N_index1>,
 | 
|---|
 | 3814 |     _bz_pow5<int> >(d1);
 | 
|---|
 | 3815 | }
 | 
|---|
 | 3816 | 
 | 
|---|
 | 3817 | 
 | 
|---|
 | 3818 | /****************************************************************************
 | 
|---|
 | 3819 |  * pow6
 | 
|---|
 | 3820 |  ****************************************************************************/
 | 
|---|
 | 3821 | 
 | 
|---|
 | 3822 | template<class T_numtype1, int N_rank1>
 | 
|---|
 | 3823 | inline
 | 
|---|
 | 3824 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<ArrayIterator<T_numtype1, N_rank1>,
 | 
|---|
 | 3825 |     _bz_pow6<T_numtype1> > >
 | 
|---|
 | 3826 | pow6(const Array<T_numtype1, N_rank1>& d1)
 | 
|---|
 | 3827 | {
 | 
|---|
 | 3828 |     return _bz_ArrayExprUnaryOp<ArrayIterator<T_numtype1, N_rank1>,
 | 
|---|
 | 3829 |     _bz_pow6<T_numtype1> >(d1.begin());
 | 
|---|
 | 3830 | }
 | 
|---|
 | 3831 | 
 | 
|---|
 | 3832 | template<class P_expr1>
 | 
|---|
 | 3833 | inline
 | 
|---|
 | 3834 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<_bz_ArrayExpr<P_expr1>,
 | 
|---|
 | 3835 |     _bz_pow6<_bz_typename P_expr1::T_numtype> > >
 | 
|---|
 | 3836 | pow6(_bz_ArrayExpr<P_expr1> d1)
 | 
|---|
 | 3837 | {
 | 
|---|
 | 3838 |     return _bz_ArrayExprUnaryOp<_bz_ArrayExpr<P_expr1>,
 | 
|---|
 | 3839 |     _bz_pow6<_bz_typename P_expr1::T_numtype> >(d1);
 | 
|---|
 | 3840 | }
 | 
|---|
 | 3841 | 
 | 
|---|
 | 3842 | template<int N_index1>
 | 
|---|
 | 3843 | inline
 | 
|---|
 | 3844 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<IndexPlaceholder<N_index1>,
 | 
|---|
 | 3845 |     _bz_pow6<int> > >
 | 
|---|
 | 3846 | pow6(IndexPlaceholder<N_index1> d1)
 | 
|---|
 | 3847 | {
 | 
|---|
 | 3848 |     return _bz_ArrayExprUnaryOp<IndexPlaceholder<N_index1>,
 | 
|---|
 | 3849 |     _bz_pow6<int> >(d1);
 | 
|---|
 | 3850 | }
 | 
|---|
 | 3851 | 
 | 
|---|
 | 3852 | 
 | 
|---|
 | 3853 | /****************************************************************************
 | 
|---|
 | 3854 |  * pow7
 | 
|---|
 | 3855 |  ****************************************************************************/
 | 
|---|
 | 3856 | 
 | 
|---|
 | 3857 | template<class T_numtype1, int N_rank1>
 | 
|---|
 | 3858 | inline
 | 
|---|
 | 3859 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<ArrayIterator<T_numtype1, N_rank1>,
 | 
|---|
 | 3860 |     _bz_pow7<T_numtype1> > >
 | 
|---|
 | 3861 | pow7(const Array<T_numtype1, N_rank1>& d1)
 | 
|---|
 | 3862 | {
 | 
|---|
 | 3863 |     return _bz_ArrayExprUnaryOp<ArrayIterator<T_numtype1, N_rank1>,
 | 
|---|
 | 3864 |     _bz_pow7<T_numtype1> >(d1.begin());
 | 
|---|
 | 3865 | }
 | 
|---|
 | 3866 | 
 | 
|---|
 | 3867 | template<class P_expr1>
 | 
|---|
 | 3868 | inline
 | 
|---|
 | 3869 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<_bz_ArrayExpr<P_expr1>,
 | 
|---|
 | 3870 |     _bz_pow7<_bz_typename P_expr1::T_numtype> > >
 | 
|---|
 | 3871 | pow7(_bz_ArrayExpr<P_expr1> d1)
 | 
|---|
 | 3872 | {
 | 
|---|
 | 3873 |     return _bz_ArrayExprUnaryOp<_bz_ArrayExpr<P_expr1>,
 | 
|---|
 | 3874 |     _bz_pow7<_bz_typename P_expr1::T_numtype> >(d1);
 | 
|---|
 | 3875 | }
 | 
|---|
 | 3876 | 
 | 
|---|
 | 3877 | template<int N_index1>
 | 
|---|
 | 3878 | inline
 | 
|---|
 | 3879 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<IndexPlaceholder<N_index1>,
 | 
|---|
 | 3880 |     _bz_pow7<int> > >
 | 
|---|
 | 3881 | pow7(IndexPlaceholder<N_index1> d1)
 | 
|---|
 | 3882 | {
 | 
|---|
 | 3883 |     return _bz_ArrayExprUnaryOp<IndexPlaceholder<N_index1>,
 | 
|---|
 | 3884 |     _bz_pow7<int> >(d1);
 | 
|---|
 | 3885 | }
 | 
|---|
 | 3886 | 
 | 
|---|
 | 3887 | 
 | 
|---|
 | 3888 | /****************************************************************************
 | 
|---|
 | 3889 |  * pow8
 | 
|---|
 | 3890 |  ****************************************************************************/
 | 
|---|
 | 3891 | 
 | 
|---|
 | 3892 | template<class T_numtype1, int N_rank1>
 | 
|---|
 | 3893 | inline
 | 
|---|
 | 3894 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<ArrayIterator<T_numtype1, N_rank1>,
 | 
|---|
 | 3895 |     _bz_pow8<T_numtype1> > >
 | 
|---|
 | 3896 | pow8(const Array<T_numtype1, N_rank1>& d1)
 | 
|---|
 | 3897 | {
 | 
|---|
 | 3898 |     return _bz_ArrayExprUnaryOp<ArrayIterator<T_numtype1, N_rank1>,
 | 
|---|
 | 3899 |     _bz_pow8<T_numtype1> >(d1.begin());
 | 
|---|
 | 3900 | }
 | 
|---|
 | 3901 | 
 | 
|---|
 | 3902 | template<class P_expr1>
 | 
|---|
 | 3903 | inline
 | 
|---|
 | 3904 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<_bz_ArrayExpr<P_expr1>,
 | 
|---|
 | 3905 |     _bz_pow8<_bz_typename P_expr1::T_numtype> > >
 | 
|---|
 | 3906 | pow8(_bz_ArrayExpr<P_expr1> d1)
 | 
|---|
 | 3907 | {
 | 
|---|
 | 3908 |     return _bz_ArrayExprUnaryOp<_bz_ArrayExpr<P_expr1>,
 | 
|---|
 | 3909 |     _bz_pow8<_bz_typename P_expr1::T_numtype> >(d1);
 | 
|---|
 | 3910 | }
 | 
|---|
 | 3911 | 
 | 
|---|
 | 3912 | template<int N_index1>
 | 
|---|
 | 3913 | inline
 | 
|---|
 | 3914 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<IndexPlaceholder<N_index1>,
 | 
|---|
 | 3915 |     _bz_pow8<int> > >
 | 
|---|
 | 3916 | pow8(IndexPlaceholder<N_index1> d1)
 | 
|---|
 | 3917 | {
 | 
|---|
 | 3918 |     return _bz_ArrayExprUnaryOp<IndexPlaceholder<N_index1>,
 | 
|---|
 | 3919 |     _bz_pow8<int> >(d1);
 | 
|---|
 | 3920 | }
 | 
|---|
 | 3921 | 
 | 
|---|
 | 3922 | 
 | 
|---|
 | 3923 | /****************************************************************************
 | 
|---|
 | 3924 |  * remainder
 | 
|---|
 | 3925 |  ****************************************************************************/
 | 
|---|
 | 3926 | 
 | 
|---|
 | 3927 | #ifdef BZ_HAVE_SYSTEM_V_MATH
 | 
|---|
 | 3928 | template<class T_numtype1, int N_rank1, class T_numtype2, int N_rank2>
 | 
|---|
 | 3929 | inline
 | 
|---|
 | 3930 | _bz_ArrayExpr<_bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 3931 |     _bz_remainder<T_numtype1,T_numtype2> > >
 | 
|---|
 | 3932 | remainder(const Array<T_numtype1, N_rank1>& d1, const Array<T_numtype2, N_rank2>& d2)
 | 
|---|
 | 3933 | {
 | 
|---|
 | 3934 |     return _bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 3935 |     _bz_remainder<T_numtype1,T_numtype2> >(d1.begin(), d2.begin());
 | 
|---|
 | 3936 | }
 | 
|---|
 | 3937 | 
 | 
|---|
 | 3938 | template<class T_numtype1, int N_rank1, class P_expr2>
 | 
|---|
 | 3939 | inline
 | 
|---|
 | 3940 | _bz_ArrayExpr<_bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 3941 |     _bz_remainder<T_numtype1,_bz_typename P_expr2::T_numtype> > >
 | 
|---|
 | 3942 | remainder(const Array<T_numtype1, N_rank1>& d1, _bz_ArrayExpr<P_expr2> d2)
 | 
|---|
 | 3943 | {
 | 
|---|
 | 3944 |     return _bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 3945 |     _bz_remainder<T_numtype1,_bz_typename P_expr2::T_numtype> >(d1.begin(), d2);
 | 
|---|
 | 3946 | }
 | 
|---|
 | 3947 | 
 | 
|---|
 | 3948 | template<class T_numtype1, int N_rank1, int N_index2>
 | 
|---|
 | 3949 | inline
 | 
|---|
 | 3950 | _bz_ArrayExpr<_bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, IndexPlaceholder<N_index2>,
 | 
|---|
 | 3951 |     _bz_remainder<T_numtype1,int> > >
 | 
|---|
 | 3952 | remainder(const Array<T_numtype1, N_rank1>& d1, IndexPlaceholder<N_index2> d2)
 | 
|---|
 | 3953 | {
 | 
|---|
 | 3954 |     return _bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, IndexPlaceholder<N_index2>,
 | 
|---|
 | 3955 |     _bz_remainder<T_numtype1,int> >(d1.begin(), d2);
 | 
|---|
 | 3956 | }
 | 
|---|
 | 3957 | 
 | 
|---|
 | 3958 | template<class T_numtype1, int N_rank1>
 | 
|---|
 | 3959 | inline
 | 
|---|
 | 3960 | _bz_ArrayExpr<_bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, _bz_ArrayExprConstant<float>,
 | 
|---|
 | 3961 |     _bz_remainder<T_numtype1,float> > >
 | 
|---|
 | 3962 | remainder(const Array<T_numtype1, N_rank1>& d1, float d2)
 | 
|---|
 | 3963 | {
 | 
|---|
 | 3964 |     return _bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, _bz_ArrayExprConstant<float>,
 | 
|---|
 | 3965 |     _bz_remainder<T_numtype1,float> >(d1.begin(), _bz_ArrayExprConstant<float>(d2));
 | 
|---|
 | 3966 | }
 | 
|---|
 | 3967 | 
 | 
|---|
 | 3968 | template<class T_numtype1, int N_rank1>
 | 
|---|
 | 3969 | inline
 | 
|---|
 | 3970 | _bz_ArrayExpr<_bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, _bz_ArrayExprConstant<double>,
 | 
|---|
 | 3971 |     _bz_remainder<T_numtype1,double> > >
 | 
|---|
 | 3972 | remainder(const Array<T_numtype1, N_rank1>& d1, double d2)
 | 
|---|
 | 3973 | {
 | 
|---|
 | 3974 |     return _bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, _bz_ArrayExprConstant<double>,
 | 
|---|
 | 3975 |     _bz_remainder<T_numtype1,double> >(d1.begin(), _bz_ArrayExprConstant<double>(d2));
 | 
|---|
 | 3976 | }
 | 
|---|
 | 3977 | 
 | 
|---|
 | 3978 | template<class T_numtype1, int N_rank1>
 | 
|---|
 | 3979 | inline
 | 
|---|
 | 3980 | _bz_ArrayExpr<_bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, _bz_ArrayExprConstant<long double>,
 | 
|---|
 | 3981 |     _bz_remainder<T_numtype1,long double> > >
 | 
|---|
 | 3982 | remainder(const Array<T_numtype1, N_rank1>& d1, long double d2)
 | 
|---|
 | 3983 | {
 | 
|---|
 | 3984 |     return _bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, _bz_ArrayExprConstant<long double>,
 | 
|---|
 | 3985 |     _bz_remainder<T_numtype1,long double> >(d1.begin(), _bz_ArrayExprConstant<long double>(d2));
 | 
|---|
 | 3986 | }
 | 
|---|
 | 3987 | 
 | 
|---|
 | 3988 | #ifdef BZ_HAVE_COMPLEX
 | 
|---|
 | 3989 | template<class T_numtype1, int N_rank1, class T2>
 | 
|---|
 | 3990 | inline
 | 
|---|
 | 3991 | _bz_ArrayExpr<_bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, _bz_ArrayExprConstant<complex<T2> > ,
 | 
|---|
 | 3992 |     _bz_remainder<T_numtype1,complex<T2> > > >
 | 
|---|
 | 3993 | remainder(const Array<T_numtype1, N_rank1>& d1, complex<T2> d2)
 | 
|---|
 | 3994 | {
 | 
|---|
 | 3995 |     return _bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, _bz_ArrayExprConstant<complex<T2> > ,
 | 
|---|
 | 3996 |     _bz_remainder<T_numtype1,complex<T2> > >(d1.begin(), _bz_ArrayExprConstant<complex<T2> > (d2));
 | 
|---|
 | 3997 | }
 | 
|---|
 | 3998 | 
 | 
|---|
 | 3999 | #endif // BZ_HAVE_COMPLEX
 | 
|---|
 | 4000 | 
 | 
|---|
 | 4001 | template<class P_expr1, class T_numtype2, int N_rank2>
 | 
|---|
 | 4002 | inline
 | 
|---|
 | 4003 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 4004 |     _bz_remainder<_bz_typename P_expr1::T_numtype,T_numtype2> > >
 | 
|---|
 | 4005 | remainder(_bz_ArrayExpr<P_expr1> d1, const Array<T_numtype2, N_rank2>& d2)
 | 
|---|
 | 4006 | {
 | 
|---|
 | 4007 |     return _bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 4008 |     _bz_remainder<_bz_typename P_expr1::T_numtype,T_numtype2> >(d1, d2.begin());
 | 
|---|
 | 4009 | }
 | 
|---|
 | 4010 | 
 | 
|---|
 | 4011 | template<class P_expr1, class P_expr2>
 | 
|---|
 | 4012 | inline
 | 
|---|
 | 4013 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 4014 |     _bz_remainder<_bz_typename P_expr1::T_numtype,_bz_typename P_expr2::T_numtype> > >
 | 
|---|
 | 4015 | remainder(_bz_ArrayExpr<P_expr1> d1, _bz_ArrayExpr<P_expr2> d2)
 | 
|---|
 | 4016 | {
 | 
|---|
 | 4017 |     return _bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 4018 |     _bz_remainder<_bz_typename P_expr1::T_numtype,_bz_typename P_expr2::T_numtype> >(d1, d2);
 | 
|---|
 | 4019 | }
 | 
|---|
 | 4020 | 
 | 
|---|
 | 4021 | template<class P_expr1, int N_index2>
 | 
|---|
 | 4022 | inline
 | 
|---|
 | 4023 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, IndexPlaceholder<N_index2>,
 | 
|---|
 | 4024 |     _bz_remainder<_bz_typename P_expr1::T_numtype,int> > >
 | 
|---|
 | 4025 | remainder(_bz_ArrayExpr<P_expr1> d1, IndexPlaceholder<N_index2> d2)
 | 
|---|
 | 4026 | {
 | 
|---|
 | 4027 |     return _bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, IndexPlaceholder<N_index2>,
 | 
|---|
 | 4028 |     _bz_remainder<_bz_typename P_expr1::T_numtype,int> >(d1, d2);
 | 
|---|
 | 4029 | }
 | 
|---|
 | 4030 | 
 | 
|---|
 | 4031 | template<class P_expr1>
 | 
|---|
 | 4032 | inline
 | 
|---|
 | 4033 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, _bz_ArrayExprConstant<float>,
 | 
|---|
 | 4034 |     _bz_remainder<_bz_typename P_expr1::T_numtype,float> > >
 | 
|---|
 | 4035 | remainder(_bz_ArrayExpr<P_expr1> d1, float d2)
 | 
|---|
 | 4036 | {
 | 
|---|
 | 4037 |     return _bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, _bz_ArrayExprConstant<float>,
 | 
|---|
 | 4038 |     _bz_remainder<_bz_typename P_expr1::T_numtype,float> >(d1, _bz_ArrayExprConstant<float>(d2));
 | 
|---|
 | 4039 | }
 | 
|---|
 | 4040 | 
 | 
|---|
 | 4041 | template<class P_expr1>
 | 
|---|
 | 4042 | inline
 | 
|---|
 | 4043 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, _bz_ArrayExprConstant<double>,
 | 
|---|
 | 4044 |     _bz_remainder<_bz_typename P_expr1::T_numtype,double> > >
 | 
|---|
 | 4045 | remainder(_bz_ArrayExpr<P_expr1> d1, double d2)
 | 
|---|
 | 4046 | {
 | 
|---|
 | 4047 |     return _bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, _bz_ArrayExprConstant<double>,
 | 
|---|
 | 4048 |     _bz_remainder<_bz_typename P_expr1::T_numtype,double> >(d1, _bz_ArrayExprConstant<double>(d2));
 | 
|---|
 | 4049 | }
 | 
|---|
 | 4050 | 
 | 
|---|
 | 4051 | template<class P_expr1>
 | 
|---|
 | 4052 | inline
 | 
|---|
 | 4053 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, _bz_ArrayExprConstant<long double>,
 | 
|---|
 | 4054 |     _bz_remainder<_bz_typename P_expr1::T_numtype,long double> > >
 | 
|---|
 | 4055 | remainder(_bz_ArrayExpr<P_expr1> d1, long double d2)
 | 
|---|
 | 4056 | {
 | 
|---|
 | 4057 |     return _bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, _bz_ArrayExprConstant<long double>,
 | 
|---|
 | 4058 |     _bz_remainder<_bz_typename P_expr1::T_numtype,long double> >(d1, _bz_ArrayExprConstant<long double>(d2));
 | 
|---|
 | 4059 | }
 | 
|---|
 | 4060 | 
 | 
|---|
 | 4061 | #ifdef BZ_HAVE_COMPLEX
 | 
|---|
 | 4062 | template<class P_expr1, class T2>
 | 
|---|
 | 4063 | inline
 | 
|---|
 | 4064 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, _bz_ArrayExprConstant<complex<T2> > ,
 | 
|---|
 | 4065 |     _bz_remainder<_bz_typename P_expr1::T_numtype,complex<T2> > > >
 | 
|---|
 | 4066 | remainder(_bz_ArrayExpr<P_expr1> d1, complex<T2> d2)
 | 
|---|
 | 4067 | {
 | 
|---|
 | 4068 |     return _bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, _bz_ArrayExprConstant<complex<T2> > ,
 | 
|---|
 | 4069 |     _bz_remainder<_bz_typename P_expr1::T_numtype,complex<T2> > >(d1, _bz_ArrayExprConstant<complex<T2> > (d2));
 | 
|---|
 | 4070 | }
 | 
|---|
 | 4071 | 
 | 
|---|
 | 4072 | #endif // BZ_HAVE_COMPLEX
 | 
|---|
 | 4073 | 
 | 
|---|
 | 4074 | template<int N_index1, class T_numtype2, int N_rank2>
 | 
|---|
 | 4075 | inline
 | 
|---|
 | 4076 | _bz_ArrayExpr<_bz_ArrayExprOp<IndexPlaceholder<N_index1>, ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 4077 |     _bz_remainder<int,T_numtype2> > >
 | 
|---|
 | 4078 | remainder(IndexPlaceholder<N_index1> d1, const Array<T_numtype2, N_rank2>& d2)
 | 
|---|
 | 4079 | {
 | 
|---|
 | 4080 |     return _bz_ArrayExprOp<IndexPlaceholder<N_index1>, ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 4081 |     _bz_remainder<int,T_numtype2> >(d1, d2.begin());
 | 
|---|
 | 4082 | }
 | 
|---|
 | 4083 | 
 | 
|---|
 | 4084 | template<int N_index1, class P_expr2>
 | 
|---|
 | 4085 | inline
 | 
|---|
 | 4086 | _bz_ArrayExpr<_bz_ArrayExprOp<IndexPlaceholder<N_index1>, _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 4087 |     _bz_remainder<int,_bz_typename P_expr2::T_numtype> > >
 | 
|---|
 | 4088 | remainder(IndexPlaceholder<N_index1> d1, _bz_ArrayExpr<P_expr2> d2)
 | 
|---|
 | 4089 | {
 | 
|---|
 | 4090 |     return _bz_ArrayExprOp<IndexPlaceholder<N_index1>, _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 4091 |     _bz_remainder<int,_bz_typename P_expr2::T_numtype> >(d1, d2);
 | 
|---|
 | 4092 | }
 | 
|---|
 | 4093 | 
 | 
|---|
 | 4094 | template<int N_index1, int N_index2>
 | 
|---|
 | 4095 | inline
 | 
|---|
 | 4096 | _bz_ArrayExpr<_bz_ArrayExprOp<IndexPlaceholder<N_index1>, IndexPlaceholder<N_index2>,
 | 
|---|
 | 4097 |     _bz_remainder<int,int> > >
 | 
|---|
 | 4098 | remainder(IndexPlaceholder<N_index1> d1, IndexPlaceholder<N_index2> d2)
 | 
|---|
 | 4099 | {
 | 
|---|
 | 4100 |     return _bz_ArrayExprOp<IndexPlaceholder<N_index1>, IndexPlaceholder<N_index2>,
 | 
|---|
 | 4101 |     _bz_remainder<int,int> >(d1, d2);
 | 
|---|
 | 4102 | }
 | 
|---|
 | 4103 | 
 | 
|---|
 | 4104 | template<int N_index1>
 | 
|---|
 | 4105 | inline
 | 
|---|
 | 4106 | _bz_ArrayExpr<_bz_ArrayExprOp<IndexPlaceholder<N_index1>, _bz_ArrayExprConstant<float>,
 | 
|---|
 | 4107 |     _bz_remainder<int,float> > >
 | 
|---|
 | 4108 | remainder(IndexPlaceholder<N_index1> d1, float d2)
 | 
|---|
 | 4109 | {
 | 
|---|
 | 4110 |     return _bz_ArrayExprOp<IndexPlaceholder<N_index1>, _bz_ArrayExprConstant<float>,
 | 
|---|
 | 4111 |     _bz_remainder<int,float> >(d1, _bz_ArrayExprConstant<float>(d2));
 | 
|---|
 | 4112 | }
 | 
|---|
 | 4113 | 
 | 
|---|
 | 4114 | template<int N_index1>
 | 
|---|
 | 4115 | inline
 | 
|---|
 | 4116 | _bz_ArrayExpr<_bz_ArrayExprOp<IndexPlaceholder<N_index1>, _bz_ArrayExprConstant<double>,
 | 
|---|
 | 4117 |     _bz_remainder<int,double> > >
 | 
|---|
 | 4118 | remainder(IndexPlaceholder<N_index1> d1, double d2)
 | 
|---|
 | 4119 | {
 | 
|---|
 | 4120 |     return _bz_ArrayExprOp<IndexPlaceholder<N_index1>, _bz_ArrayExprConstant<double>,
 | 
|---|
 | 4121 |     _bz_remainder<int,double> >(d1, _bz_ArrayExprConstant<double>(d2));
 | 
|---|
 | 4122 | }
 | 
|---|
 | 4123 | 
 | 
|---|
 | 4124 | template<int N_index1>
 | 
|---|
 | 4125 | inline
 | 
|---|
 | 4126 | _bz_ArrayExpr<_bz_ArrayExprOp<IndexPlaceholder<N_index1>, _bz_ArrayExprConstant<long double>,
 | 
|---|
 | 4127 |     _bz_remainder<int,long double> > >
 | 
|---|
 | 4128 | remainder(IndexPlaceholder<N_index1> d1, long double d2)
 | 
|---|
 | 4129 | {
 | 
|---|
 | 4130 |     return _bz_ArrayExprOp<IndexPlaceholder<N_index1>, _bz_ArrayExprConstant<long double>,
 | 
|---|
 | 4131 |     _bz_remainder<int,long double> >(d1, _bz_ArrayExprConstant<long double>(d2));
 | 
|---|
 | 4132 | }
 | 
|---|
 | 4133 | 
 | 
|---|
 | 4134 | #ifdef BZ_HAVE_COMPLEX
 | 
|---|
 | 4135 | template<int N_index1, class T2>
 | 
|---|
 | 4136 | inline
 | 
|---|
 | 4137 | _bz_ArrayExpr<_bz_ArrayExprOp<IndexPlaceholder<N_index1>, _bz_ArrayExprConstant<complex<T2> > ,
 | 
|---|
 | 4138 |     _bz_remainder<int,complex<T2> > > >
 | 
|---|
 | 4139 | remainder(IndexPlaceholder<N_index1> d1, complex<T2> d2)
 | 
|---|
 | 4140 | {
 | 
|---|
 | 4141 |     return _bz_ArrayExprOp<IndexPlaceholder<N_index1>, _bz_ArrayExprConstant<complex<T2> > ,
 | 
|---|
 | 4142 |     _bz_remainder<int,complex<T2> > >(d1, _bz_ArrayExprConstant<complex<T2> > (d2));
 | 
|---|
 | 4143 | }
 | 
|---|
 | 4144 | 
 | 
|---|
 | 4145 | #endif // BZ_HAVE_COMPLEX
 | 
|---|
 | 4146 | 
 | 
|---|
 | 4147 | template<class T_numtype2, int N_rank2>
 | 
|---|
 | 4148 | inline
 | 
|---|
 | 4149 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExprConstant<float>, ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 4150 |     _bz_remainder<float,T_numtype2> > >
 | 
|---|
 | 4151 | remainder(float d1, const Array<T_numtype2, N_rank2>& d2)
 | 
|---|
 | 4152 | {
 | 
|---|
 | 4153 |     return _bz_ArrayExprOp<_bz_ArrayExprConstant<float>, ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 4154 |     _bz_remainder<float,T_numtype2> >(_bz_ArrayExprConstant<float>(d1), d2.begin());
 | 
|---|
 | 4155 | }
 | 
|---|
 | 4156 | 
 | 
|---|
 | 4157 | template<class P_expr2>
 | 
|---|
 | 4158 | inline
 | 
|---|
 | 4159 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExprConstant<float>, _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 4160 |     _bz_remainder<float,_bz_typename P_expr2::T_numtype> > >
 | 
|---|
 | 4161 | remainder(float d1, _bz_ArrayExpr<P_expr2> d2)
 | 
|---|
 | 4162 | {
 | 
|---|
 | 4163 |     return _bz_ArrayExprOp<_bz_ArrayExprConstant<float>, _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 4164 |     _bz_remainder<float,_bz_typename P_expr2::T_numtype> >(_bz_ArrayExprConstant<float>(d1), d2);
 | 
|---|
 | 4165 | }
 | 
|---|
 | 4166 | 
 | 
|---|
 | 4167 | template<int N_index2>
 | 
|---|
 | 4168 | inline
 | 
|---|
 | 4169 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExprConstant<float>, IndexPlaceholder<N_index2>,
 | 
|---|
 | 4170 |     _bz_remainder<float,int> > >
 | 
|---|
 | 4171 | remainder(float d1, IndexPlaceholder<N_index2> d2)
 | 
|---|
 | 4172 | {
 | 
|---|
 | 4173 |     return _bz_ArrayExprOp<_bz_ArrayExprConstant<float>, IndexPlaceholder<N_index2>,
 | 
|---|
 | 4174 |     _bz_remainder<float,int> >(_bz_ArrayExprConstant<float>(d1), d2);
 | 
|---|
 | 4175 | }
 | 
|---|
 | 4176 | 
 | 
|---|
 | 4177 | template<class T_numtype2, int N_rank2>
 | 
|---|
 | 4178 | inline
 | 
|---|
 | 4179 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExprConstant<double>, ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 4180 |     _bz_remainder<double,T_numtype2> > >
 | 
|---|
 | 4181 | remainder(double d1, const Array<T_numtype2, N_rank2>& d2)
 | 
|---|
 | 4182 | {
 | 
|---|
 | 4183 |     return _bz_ArrayExprOp<_bz_ArrayExprConstant<double>, ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 4184 |     _bz_remainder<double,T_numtype2> >(_bz_ArrayExprConstant<double>(d1), d2.begin());
 | 
|---|
 | 4185 | }
 | 
|---|
 | 4186 | 
 | 
|---|
 | 4187 | template<class P_expr2>
 | 
|---|
 | 4188 | inline
 | 
|---|
 | 4189 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExprConstant<double>, _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 4190 |     _bz_remainder<double,_bz_typename P_expr2::T_numtype> > >
 | 
|---|
 | 4191 | remainder(double d1, _bz_ArrayExpr<P_expr2> d2)
 | 
|---|
 | 4192 | {
 | 
|---|
 | 4193 |     return _bz_ArrayExprOp<_bz_ArrayExprConstant<double>, _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 4194 |     _bz_remainder<double,_bz_typename P_expr2::T_numtype> >(_bz_ArrayExprConstant<double>(d1), d2);
 | 
|---|
 | 4195 | }
 | 
|---|
 | 4196 | 
 | 
|---|
 | 4197 | template<int N_index2>
 | 
|---|
 | 4198 | inline
 | 
|---|
 | 4199 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExprConstant<double>, IndexPlaceholder<N_index2>,
 | 
|---|
 | 4200 |     _bz_remainder<double,int> > >
 | 
|---|
 | 4201 | remainder(double d1, IndexPlaceholder<N_index2> d2)
 | 
|---|
 | 4202 | {
 | 
|---|
 | 4203 |     return _bz_ArrayExprOp<_bz_ArrayExprConstant<double>, IndexPlaceholder<N_index2>,
 | 
|---|
 | 4204 |     _bz_remainder<double,int> >(_bz_ArrayExprConstant<double>(d1), d2);
 | 
|---|
 | 4205 | }
 | 
|---|
 | 4206 | 
 | 
|---|
 | 4207 | template<class T_numtype2, int N_rank2>
 | 
|---|
 | 4208 | inline
 | 
|---|
 | 4209 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExprConstant<long double>, ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 4210 |     _bz_remainder<long double,T_numtype2> > >
 | 
|---|
 | 4211 | remainder(long double d1, const Array<T_numtype2, N_rank2>& d2)
 | 
|---|
 | 4212 | {
 | 
|---|
 | 4213 |     return _bz_ArrayExprOp<_bz_ArrayExprConstant<long double>, ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 4214 |     _bz_remainder<long double,T_numtype2> >(_bz_ArrayExprConstant<long double>(d1), d2.begin());
 | 
|---|
 | 4215 | }
 | 
|---|
 | 4216 | 
 | 
|---|
 | 4217 | template<class P_expr2>
 | 
|---|
 | 4218 | inline
 | 
|---|
 | 4219 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExprConstant<long double>, _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 4220 |     _bz_remainder<long double,_bz_typename P_expr2::T_numtype> > >
 | 
|---|
 | 4221 | remainder(long double d1, _bz_ArrayExpr<P_expr2> d2)
 | 
|---|
 | 4222 | {
 | 
|---|
 | 4223 |     return _bz_ArrayExprOp<_bz_ArrayExprConstant<long double>, _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 4224 |     _bz_remainder<long double,_bz_typename P_expr2::T_numtype> >(_bz_ArrayExprConstant<long double>(d1), d2);
 | 
|---|
 | 4225 | }
 | 
|---|
 | 4226 | 
 | 
|---|
 | 4227 | template<int N_index2>
 | 
|---|
 | 4228 | inline
 | 
|---|
 | 4229 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExprConstant<long double>, IndexPlaceholder<N_index2>,
 | 
|---|
 | 4230 |     _bz_remainder<long double,int> > >
 | 
|---|
 | 4231 | remainder(long double d1, IndexPlaceholder<N_index2> d2)
 | 
|---|
 | 4232 | {
 | 
|---|
 | 4233 |     return _bz_ArrayExprOp<_bz_ArrayExprConstant<long double>, IndexPlaceholder<N_index2>,
 | 
|---|
 | 4234 |     _bz_remainder<long double,int> >(_bz_ArrayExprConstant<long double>(d1), d2);
 | 
|---|
 | 4235 | }
 | 
|---|
 | 4236 | 
 | 
|---|
 | 4237 | #ifdef BZ_HAVE_COMPLEX
 | 
|---|
 | 4238 | template<class T1, class T_numtype2, int N_rank2>
 | 
|---|
 | 4239 | inline
 | 
|---|
 | 4240 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExprConstant<complex<T1> > , ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 4241 |     _bz_remainder<complex<T1> ,T_numtype2> > >
 | 
|---|
 | 4242 | remainder(complex<T1> d1, const Array<T_numtype2, N_rank2>& d2)
 | 
|---|
 | 4243 | {
 | 
|---|
 | 4244 |     return _bz_ArrayExprOp<_bz_ArrayExprConstant<complex<T1> > , ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 4245 |     _bz_remainder<complex<T1> ,T_numtype2> >(_bz_ArrayExprConstant<complex<T1> > (d1), d2.begin());
 | 
|---|
 | 4246 | }
 | 
|---|
 | 4247 | 
 | 
|---|
 | 4248 | #endif // BZ_HAVE_COMPLEX
 | 
|---|
 | 4249 | 
 | 
|---|
 | 4250 | #ifdef BZ_HAVE_COMPLEX
 | 
|---|
 | 4251 | template<class T1, class P_expr2>
 | 
|---|
 | 4252 | inline
 | 
|---|
 | 4253 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExprConstant<complex<T1> > , _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 4254 |     _bz_remainder<complex<T1> ,_bz_typename P_expr2::T_numtype> > >
 | 
|---|
 | 4255 | remainder(complex<T1> d1, _bz_ArrayExpr<P_expr2> d2)
 | 
|---|
 | 4256 | {
 | 
|---|
 | 4257 |     return _bz_ArrayExprOp<_bz_ArrayExprConstant<complex<T1> > , _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 4258 |     _bz_remainder<complex<T1> ,_bz_typename P_expr2::T_numtype> >(_bz_ArrayExprConstant<complex<T1> > (d1), d2);
 | 
|---|
 | 4259 | }
 | 
|---|
 | 4260 | 
 | 
|---|
 | 4261 | #endif // BZ_HAVE_COMPLEX
 | 
|---|
 | 4262 | 
 | 
|---|
 | 4263 | #ifdef BZ_HAVE_COMPLEX
 | 
|---|
 | 4264 | template<class T1, int N_index2>
 | 
|---|
 | 4265 | inline
 | 
|---|
 | 4266 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExprConstant<complex<T1> > , IndexPlaceholder<N_index2>,
 | 
|---|
 | 4267 |     _bz_remainder<complex<T1> ,int> > >
 | 
|---|
 | 4268 | remainder(complex<T1> d1, IndexPlaceholder<N_index2> d2)
 | 
|---|
 | 4269 | {
 | 
|---|
 | 4270 |     return _bz_ArrayExprOp<_bz_ArrayExprConstant<complex<T1> > , IndexPlaceholder<N_index2>,
 | 
|---|
 | 4271 |     _bz_remainder<complex<T1> ,int> >(_bz_ArrayExprConstant<complex<T1> > (d1), d2);
 | 
|---|
 | 4272 | }
 | 
|---|
 | 4273 | 
 | 
|---|
 | 4274 | #endif // BZ_HAVE_COMPLEX
 | 
|---|
 | 4275 | 
 | 
|---|
 | 4276 | #endif
 | 
|---|
 | 4277 | 
 | 
|---|
 | 4278 | /****************************************************************************
 | 
|---|
 | 4279 |  * rint
 | 
|---|
 | 4280 |  ****************************************************************************/
 | 
|---|
 | 4281 | 
 | 
|---|
 | 4282 | #ifdef BZ_HAVE_IEEE_MATH
 | 
|---|
 | 4283 | template<class T_numtype1, int N_rank1>
 | 
|---|
 | 4284 | inline
 | 
|---|
 | 4285 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<ArrayIterator<T_numtype1, N_rank1>,
 | 
|---|
 | 4286 |     _bz_rint<T_numtype1> > >
 | 
|---|
 | 4287 | rint(const Array<T_numtype1, N_rank1>& d1)
 | 
|---|
 | 4288 | {
 | 
|---|
 | 4289 |     return _bz_ArrayExprUnaryOp<ArrayIterator<T_numtype1, N_rank1>,
 | 
|---|
 | 4290 |     _bz_rint<T_numtype1> >(d1.begin());
 | 
|---|
 | 4291 | }
 | 
|---|
 | 4292 | 
 | 
|---|
 | 4293 | template<class P_expr1>
 | 
|---|
 | 4294 | inline
 | 
|---|
 | 4295 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<_bz_ArrayExpr<P_expr1>,
 | 
|---|
 | 4296 |     _bz_rint<_bz_typename P_expr1::T_numtype> > >
 | 
|---|
 | 4297 | rint(_bz_ArrayExpr<P_expr1> d1)
 | 
|---|
 | 4298 | {
 | 
|---|
 | 4299 |     return _bz_ArrayExprUnaryOp<_bz_ArrayExpr<P_expr1>,
 | 
|---|
 | 4300 |     _bz_rint<_bz_typename P_expr1::T_numtype> >(d1);
 | 
|---|
 | 4301 | }
 | 
|---|
 | 4302 | 
 | 
|---|
 | 4303 | template<int N_index1>
 | 
|---|
 | 4304 | inline
 | 
|---|
 | 4305 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<IndexPlaceholder<N_index1>,
 | 
|---|
 | 4306 |     _bz_rint<int> > >
 | 
|---|
 | 4307 | rint(IndexPlaceholder<N_index1> d1)
 | 
|---|
 | 4308 | {
 | 
|---|
 | 4309 |     return _bz_ArrayExprUnaryOp<IndexPlaceholder<N_index1>,
 | 
|---|
 | 4310 |     _bz_rint<int> >(d1);
 | 
|---|
 | 4311 | }
 | 
|---|
 | 4312 | 
 | 
|---|
 | 4313 | #endif
 | 
|---|
 | 4314 | 
 | 
|---|
 | 4315 | /****************************************************************************
 | 
|---|
 | 4316 |  * rsqrt
 | 
|---|
 | 4317 |  ****************************************************************************/
 | 
|---|
 | 4318 | 
 | 
|---|
 | 4319 | #ifdef BZ_HAVE_SYSTEM_V_MATH
 | 
|---|
 | 4320 | template<class T_numtype1, int N_rank1>
 | 
|---|
 | 4321 | inline
 | 
|---|
 | 4322 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<ArrayIterator<T_numtype1, N_rank1>,
 | 
|---|
 | 4323 |     _bz_rsqrt<T_numtype1> > >
 | 
|---|
 | 4324 | rsqrt(const Array<T_numtype1, N_rank1>& d1)
 | 
|---|
 | 4325 | {
 | 
|---|
 | 4326 |     return _bz_ArrayExprUnaryOp<ArrayIterator<T_numtype1, N_rank1>,
 | 
|---|
 | 4327 |     _bz_rsqrt<T_numtype1> >(d1.begin());
 | 
|---|
 | 4328 | }
 | 
|---|
 | 4329 | 
 | 
|---|
 | 4330 | template<class P_expr1>
 | 
|---|
 | 4331 | inline
 | 
|---|
 | 4332 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<_bz_ArrayExpr<P_expr1>,
 | 
|---|
 | 4333 |     _bz_rsqrt<_bz_typename P_expr1::T_numtype> > >
 | 
|---|
 | 4334 | rsqrt(_bz_ArrayExpr<P_expr1> d1)
 | 
|---|
 | 4335 | {
 | 
|---|
 | 4336 |     return _bz_ArrayExprUnaryOp<_bz_ArrayExpr<P_expr1>,
 | 
|---|
 | 4337 |     _bz_rsqrt<_bz_typename P_expr1::T_numtype> >(d1);
 | 
|---|
 | 4338 | }
 | 
|---|
 | 4339 | 
 | 
|---|
 | 4340 | template<int N_index1>
 | 
|---|
 | 4341 | inline
 | 
|---|
 | 4342 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<IndexPlaceholder<N_index1>,
 | 
|---|
 | 4343 |     _bz_rsqrt<int> > >
 | 
|---|
 | 4344 | rsqrt(IndexPlaceholder<N_index1> d1)
 | 
|---|
 | 4345 | {
 | 
|---|
 | 4346 |     return _bz_ArrayExprUnaryOp<IndexPlaceholder<N_index1>,
 | 
|---|
 | 4347 |     _bz_rsqrt<int> >(d1);
 | 
|---|
 | 4348 | }
 | 
|---|
 | 4349 | 
 | 
|---|
 | 4350 | #endif
 | 
|---|
 | 4351 | 
 | 
|---|
 | 4352 | /****************************************************************************
 | 
|---|
 | 4353 |  * scalb
 | 
|---|
 | 4354 |  ****************************************************************************/
 | 
|---|
 | 4355 | 
 | 
|---|
 | 4356 | #ifdef BZ_HAVE_SYSTEM_V_MATH
 | 
|---|
 | 4357 | template<class T_numtype1, int N_rank1, class T_numtype2, int N_rank2>
 | 
|---|
 | 4358 | inline
 | 
|---|
 | 4359 | _bz_ArrayExpr<_bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 4360 |     _bz_scalb<T_numtype1,T_numtype2> > >
 | 
|---|
 | 4361 | scalb(const Array<T_numtype1, N_rank1>& d1, const Array<T_numtype2, N_rank2>& d2)
 | 
|---|
 | 4362 | {
 | 
|---|
 | 4363 |     return _bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 4364 |     _bz_scalb<T_numtype1,T_numtype2> >(d1.begin(), d2.begin());
 | 
|---|
 | 4365 | }
 | 
|---|
 | 4366 | 
 | 
|---|
 | 4367 | template<class T_numtype1, int N_rank1, class P_expr2>
 | 
|---|
 | 4368 | inline
 | 
|---|
 | 4369 | _bz_ArrayExpr<_bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 4370 |     _bz_scalb<T_numtype1,_bz_typename P_expr2::T_numtype> > >
 | 
|---|
 | 4371 | scalb(const Array<T_numtype1, N_rank1>& d1, _bz_ArrayExpr<P_expr2> d2)
 | 
|---|
 | 4372 | {
 | 
|---|
 | 4373 |     return _bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 4374 |     _bz_scalb<T_numtype1,_bz_typename P_expr2::T_numtype> >(d1.begin(), d2);
 | 
|---|
 | 4375 | }
 | 
|---|
 | 4376 | 
 | 
|---|
 | 4377 | template<class T_numtype1, int N_rank1, int N_index2>
 | 
|---|
 | 4378 | inline
 | 
|---|
 | 4379 | _bz_ArrayExpr<_bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, IndexPlaceholder<N_index2>,
 | 
|---|
 | 4380 |     _bz_scalb<T_numtype1,int> > >
 | 
|---|
 | 4381 | scalb(const Array<T_numtype1, N_rank1>& d1, IndexPlaceholder<N_index2> d2)
 | 
|---|
 | 4382 | {
 | 
|---|
 | 4383 |     return _bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, IndexPlaceholder<N_index2>,
 | 
|---|
 | 4384 |     _bz_scalb<T_numtype1,int> >(d1.begin(), d2);
 | 
|---|
 | 4385 | }
 | 
|---|
 | 4386 | 
 | 
|---|
 | 4387 | template<class T_numtype1, int N_rank1>
 | 
|---|
 | 4388 | inline
 | 
|---|
 | 4389 | _bz_ArrayExpr<_bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, _bz_ArrayExprConstant<float>,
 | 
|---|
 | 4390 |     _bz_scalb<T_numtype1,float> > >
 | 
|---|
 | 4391 | scalb(const Array<T_numtype1, N_rank1>& d1, float d2)
 | 
|---|
 | 4392 | {
 | 
|---|
 | 4393 |     return _bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, _bz_ArrayExprConstant<float>,
 | 
|---|
 | 4394 |     _bz_scalb<T_numtype1,float> >(d1.begin(), _bz_ArrayExprConstant<float>(d2));
 | 
|---|
 | 4395 | }
 | 
|---|
 | 4396 | 
 | 
|---|
 | 4397 | template<class T_numtype1, int N_rank1>
 | 
|---|
 | 4398 | inline
 | 
|---|
 | 4399 | _bz_ArrayExpr<_bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, _bz_ArrayExprConstant<double>,
 | 
|---|
 | 4400 |     _bz_scalb<T_numtype1,double> > >
 | 
|---|
 | 4401 | scalb(const Array<T_numtype1, N_rank1>& d1, double d2)
 | 
|---|
 | 4402 | {
 | 
|---|
 | 4403 |     return _bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, _bz_ArrayExprConstant<double>,
 | 
|---|
 | 4404 |     _bz_scalb<T_numtype1,double> >(d1.begin(), _bz_ArrayExprConstant<double>(d2));
 | 
|---|
 | 4405 | }
 | 
|---|
 | 4406 | 
 | 
|---|
 | 4407 | template<class T_numtype1, int N_rank1>
 | 
|---|
 | 4408 | inline
 | 
|---|
 | 4409 | _bz_ArrayExpr<_bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, _bz_ArrayExprConstant<long double>,
 | 
|---|
 | 4410 |     _bz_scalb<T_numtype1,long double> > >
 | 
|---|
 | 4411 | scalb(const Array<T_numtype1, N_rank1>& d1, long double d2)
 | 
|---|
 | 4412 | {
 | 
|---|
 | 4413 |     return _bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, _bz_ArrayExprConstant<long double>,
 | 
|---|
 | 4414 |     _bz_scalb<T_numtype1,long double> >(d1.begin(), _bz_ArrayExprConstant<long double>(d2));
 | 
|---|
 | 4415 | }
 | 
|---|
 | 4416 | 
 | 
|---|
 | 4417 | #ifdef BZ_HAVE_COMPLEX
 | 
|---|
 | 4418 | template<class T_numtype1, int N_rank1, class T2>
 | 
|---|
 | 4419 | inline
 | 
|---|
 | 4420 | _bz_ArrayExpr<_bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, _bz_ArrayExprConstant<complex<T2> > ,
 | 
|---|
 | 4421 |     _bz_scalb<T_numtype1,complex<T2> > > >
 | 
|---|
 | 4422 | scalb(const Array<T_numtype1, N_rank1>& d1, complex<T2> d2)
 | 
|---|
 | 4423 | {
 | 
|---|
 | 4424 |     return _bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, _bz_ArrayExprConstant<complex<T2> > ,
 | 
|---|
 | 4425 |     _bz_scalb<T_numtype1,complex<T2> > >(d1.begin(), _bz_ArrayExprConstant<complex<T2> > (d2));
 | 
|---|
 | 4426 | }
 | 
|---|
 | 4427 | 
 | 
|---|
 | 4428 | #endif // BZ_HAVE_COMPLEX
 | 
|---|
 | 4429 | 
 | 
|---|
 | 4430 | template<class P_expr1, class T_numtype2, int N_rank2>
 | 
|---|
 | 4431 | inline
 | 
|---|
 | 4432 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 4433 |     _bz_scalb<_bz_typename P_expr1::T_numtype,T_numtype2> > >
 | 
|---|
 | 4434 | scalb(_bz_ArrayExpr<P_expr1> d1, const Array<T_numtype2, N_rank2>& d2)
 | 
|---|
 | 4435 | {
 | 
|---|
 | 4436 |     return _bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 4437 |     _bz_scalb<_bz_typename P_expr1::T_numtype,T_numtype2> >(d1, d2.begin());
 | 
|---|
 | 4438 | }
 | 
|---|
 | 4439 | 
 | 
|---|
 | 4440 | template<class P_expr1, class P_expr2>
 | 
|---|
 | 4441 | inline
 | 
|---|
 | 4442 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 4443 |     _bz_scalb<_bz_typename P_expr1::T_numtype,_bz_typename P_expr2::T_numtype> > >
 | 
|---|
 | 4444 | scalb(_bz_ArrayExpr<P_expr1> d1, _bz_ArrayExpr<P_expr2> d2)
 | 
|---|
 | 4445 | {
 | 
|---|
 | 4446 |     return _bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 4447 |     _bz_scalb<_bz_typename P_expr1::T_numtype,_bz_typename P_expr2::T_numtype> >(d1, d2);
 | 
|---|
 | 4448 | }
 | 
|---|
 | 4449 | 
 | 
|---|
 | 4450 | template<class P_expr1, int N_index2>
 | 
|---|
 | 4451 | inline
 | 
|---|
 | 4452 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, IndexPlaceholder<N_index2>,
 | 
|---|
 | 4453 |     _bz_scalb<_bz_typename P_expr1::T_numtype,int> > >
 | 
|---|
 | 4454 | scalb(_bz_ArrayExpr<P_expr1> d1, IndexPlaceholder<N_index2> d2)
 | 
|---|
 | 4455 | {
 | 
|---|
 | 4456 |     return _bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, IndexPlaceholder<N_index2>,
 | 
|---|
 | 4457 |     _bz_scalb<_bz_typename P_expr1::T_numtype,int> >(d1, d2);
 | 
|---|
 | 4458 | }
 | 
|---|
 | 4459 | 
 | 
|---|
 | 4460 | template<class P_expr1>
 | 
|---|
 | 4461 | inline
 | 
|---|
 | 4462 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, _bz_ArrayExprConstant<float>,
 | 
|---|
 | 4463 |     _bz_scalb<_bz_typename P_expr1::T_numtype,float> > >
 | 
|---|
 | 4464 | scalb(_bz_ArrayExpr<P_expr1> d1, float d2)
 | 
|---|
 | 4465 | {
 | 
|---|
 | 4466 |     return _bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, _bz_ArrayExprConstant<float>,
 | 
|---|
 | 4467 |     _bz_scalb<_bz_typename P_expr1::T_numtype,float> >(d1, _bz_ArrayExprConstant<float>(d2));
 | 
|---|
 | 4468 | }
 | 
|---|
 | 4469 | 
 | 
|---|
 | 4470 | template<class P_expr1>
 | 
|---|
 | 4471 | inline
 | 
|---|
 | 4472 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, _bz_ArrayExprConstant<double>,
 | 
|---|
 | 4473 |     _bz_scalb<_bz_typename P_expr1::T_numtype,double> > >
 | 
|---|
 | 4474 | scalb(_bz_ArrayExpr<P_expr1> d1, double d2)
 | 
|---|
 | 4475 | {
 | 
|---|
 | 4476 |     return _bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, _bz_ArrayExprConstant<double>,
 | 
|---|
 | 4477 |     _bz_scalb<_bz_typename P_expr1::T_numtype,double> >(d1, _bz_ArrayExprConstant<double>(d2));
 | 
|---|
 | 4478 | }
 | 
|---|
 | 4479 | 
 | 
|---|
 | 4480 | template<class P_expr1>
 | 
|---|
 | 4481 | inline
 | 
|---|
 | 4482 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, _bz_ArrayExprConstant<long double>,
 | 
|---|
 | 4483 |     _bz_scalb<_bz_typename P_expr1::T_numtype,long double> > >
 | 
|---|
 | 4484 | scalb(_bz_ArrayExpr<P_expr1> d1, long double d2)
 | 
|---|
 | 4485 | {
 | 
|---|
 | 4486 |     return _bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, _bz_ArrayExprConstant<long double>,
 | 
|---|
 | 4487 |     _bz_scalb<_bz_typename P_expr1::T_numtype,long double> >(d1, _bz_ArrayExprConstant<long double>(d2));
 | 
|---|
 | 4488 | }
 | 
|---|
 | 4489 | 
 | 
|---|
 | 4490 | #ifdef BZ_HAVE_COMPLEX
 | 
|---|
 | 4491 | template<class P_expr1, class T2>
 | 
|---|
 | 4492 | inline
 | 
|---|
 | 4493 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, _bz_ArrayExprConstant<complex<T2> > ,
 | 
|---|
 | 4494 |     _bz_scalb<_bz_typename P_expr1::T_numtype,complex<T2> > > >
 | 
|---|
 | 4495 | scalb(_bz_ArrayExpr<P_expr1> d1, complex<T2> d2)
 | 
|---|
 | 4496 | {
 | 
|---|
 | 4497 |     return _bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, _bz_ArrayExprConstant<complex<T2> > ,
 | 
|---|
 | 4498 |     _bz_scalb<_bz_typename P_expr1::T_numtype,complex<T2> > >(d1, _bz_ArrayExprConstant<complex<T2> > (d2));
 | 
|---|
 | 4499 | }
 | 
|---|
 | 4500 | 
 | 
|---|
 | 4501 | #endif // BZ_HAVE_COMPLEX
 | 
|---|
 | 4502 | 
 | 
|---|
 | 4503 | template<int N_index1, class T_numtype2, int N_rank2>
 | 
|---|
 | 4504 | inline
 | 
|---|
 | 4505 | _bz_ArrayExpr<_bz_ArrayExprOp<IndexPlaceholder<N_index1>, ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 4506 |     _bz_scalb<int,T_numtype2> > >
 | 
|---|
 | 4507 | scalb(IndexPlaceholder<N_index1> d1, const Array<T_numtype2, N_rank2>& d2)
 | 
|---|
 | 4508 | {
 | 
|---|
 | 4509 |     return _bz_ArrayExprOp<IndexPlaceholder<N_index1>, ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 4510 |     _bz_scalb<int,T_numtype2> >(d1, d2.begin());
 | 
|---|
 | 4511 | }
 | 
|---|
 | 4512 | 
 | 
|---|
 | 4513 | template<int N_index1, class P_expr2>
 | 
|---|
 | 4514 | inline
 | 
|---|
 | 4515 | _bz_ArrayExpr<_bz_ArrayExprOp<IndexPlaceholder<N_index1>, _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 4516 |     _bz_scalb<int,_bz_typename P_expr2::T_numtype> > >
 | 
|---|
 | 4517 | scalb(IndexPlaceholder<N_index1> d1, _bz_ArrayExpr<P_expr2> d2)
 | 
|---|
 | 4518 | {
 | 
|---|
 | 4519 |     return _bz_ArrayExprOp<IndexPlaceholder<N_index1>, _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 4520 |     _bz_scalb<int,_bz_typename P_expr2::T_numtype> >(d1, d2);
 | 
|---|
 | 4521 | }
 | 
|---|
 | 4522 | 
 | 
|---|
 | 4523 | template<int N_index1, int N_index2>
 | 
|---|
 | 4524 | inline
 | 
|---|
 | 4525 | _bz_ArrayExpr<_bz_ArrayExprOp<IndexPlaceholder<N_index1>, IndexPlaceholder<N_index2>,
 | 
|---|
 | 4526 |     _bz_scalb<int,int> > >
 | 
|---|
 | 4527 | scalb(IndexPlaceholder<N_index1> d1, IndexPlaceholder<N_index2> d2)
 | 
|---|
 | 4528 | {
 | 
|---|
 | 4529 |     return _bz_ArrayExprOp<IndexPlaceholder<N_index1>, IndexPlaceholder<N_index2>,
 | 
|---|
 | 4530 |     _bz_scalb<int,int> >(d1, d2);
 | 
|---|
 | 4531 | }
 | 
|---|
 | 4532 | 
 | 
|---|
 | 4533 | template<int N_index1>
 | 
|---|
 | 4534 | inline
 | 
|---|
 | 4535 | _bz_ArrayExpr<_bz_ArrayExprOp<IndexPlaceholder<N_index1>, _bz_ArrayExprConstant<float>,
 | 
|---|
 | 4536 |     _bz_scalb<int,float> > >
 | 
|---|
 | 4537 | scalb(IndexPlaceholder<N_index1> d1, float d2)
 | 
|---|
 | 4538 | {
 | 
|---|
 | 4539 |     return _bz_ArrayExprOp<IndexPlaceholder<N_index1>, _bz_ArrayExprConstant<float>,
 | 
|---|
 | 4540 |     _bz_scalb<int,float> >(d1, _bz_ArrayExprConstant<float>(d2));
 | 
|---|
 | 4541 | }
 | 
|---|
 | 4542 | 
 | 
|---|
 | 4543 | template<int N_index1>
 | 
|---|
 | 4544 | inline
 | 
|---|
 | 4545 | _bz_ArrayExpr<_bz_ArrayExprOp<IndexPlaceholder<N_index1>, _bz_ArrayExprConstant<double>,
 | 
|---|
 | 4546 |     _bz_scalb<int,double> > >
 | 
|---|
 | 4547 | scalb(IndexPlaceholder<N_index1> d1, double d2)
 | 
|---|
 | 4548 | {
 | 
|---|
 | 4549 |     return _bz_ArrayExprOp<IndexPlaceholder<N_index1>, _bz_ArrayExprConstant<double>,
 | 
|---|
 | 4550 |     _bz_scalb<int,double> >(d1, _bz_ArrayExprConstant<double>(d2));
 | 
|---|
 | 4551 | }
 | 
|---|
 | 4552 | 
 | 
|---|
 | 4553 | template<int N_index1>
 | 
|---|
 | 4554 | inline
 | 
|---|
 | 4555 | _bz_ArrayExpr<_bz_ArrayExprOp<IndexPlaceholder<N_index1>, _bz_ArrayExprConstant<long double>,
 | 
|---|
 | 4556 |     _bz_scalb<int,long double> > >
 | 
|---|
 | 4557 | scalb(IndexPlaceholder<N_index1> d1, long double d2)
 | 
|---|
 | 4558 | {
 | 
|---|
 | 4559 |     return _bz_ArrayExprOp<IndexPlaceholder<N_index1>, _bz_ArrayExprConstant<long double>,
 | 
|---|
 | 4560 |     _bz_scalb<int,long double> >(d1, _bz_ArrayExprConstant<long double>(d2));
 | 
|---|
 | 4561 | }
 | 
|---|
 | 4562 | 
 | 
|---|
 | 4563 | #ifdef BZ_HAVE_COMPLEX
 | 
|---|
 | 4564 | template<int N_index1, class T2>
 | 
|---|
 | 4565 | inline
 | 
|---|
 | 4566 | _bz_ArrayExpr<_bz_ArrayExprOp<IndexPlaceholder<N_index1>, _bz_ArrayExprConstant<complex<T2> > ,
 | 
|---|
 | 4567 |     _bz_scalb<int,complex<T2> > > >
 | 
|---|
 | 4568 | scalb(IndexPlaceholder<N_index1> d1, complex<T2> d2)
 | 
|---|
 | 4569 | {
 | 
|---|
 | 4570 |     return _bz_ArrayExprOp<IndexPlaceholder<N_index1>, _bz_ArrayExprConstant<complex<T2> > ,
 | 
|---|
 | 4571 |     _bz_scalb<int,complex<T2> > >(d1, _bz_ArrayExprConstant<complex<T2> > (d2));
 | 
|---|
 | 4572 | }
 | 
|---|
 | 4573 | 
 | 
|---|
 | 4574 | #endif // BZ_HAVE_COMPLEX
 | 
|---|
 | 4575 | 
 | 
|---|
 | 4576 | template<class T_numtype2, int N_rank2>
 | 
|---|
 | 4577 | inline
 | 
|---|
 | 4578 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExprConstant<float>, ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 4579 |     _bz_scalb<float,T_numtype2> > >
 | 
|---|
 | 4580 | scalb(float d1, const Array<T_numtype2, N_rank2>& d2)
 | 
|---|
 | 4581 | {
 | 
|---|
 | 4582 |     return _bz_ArrayExprOp<_bz_ArrayExprConstant<float>, ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 4583 |     _bz_scalb<float,T_numtype2> >(_bz_ArrayExprConstant<float>(d1), d2.begin());
 | 
|---|
 | 4584 | }
 | 
|---|
 | 4585 | 
 | 
|---|
 | 4586 | template<class P_expr2>
 | 
|---|
 | 4587 | inline
 | 
|---|
 | 4588 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExprConstant<float>, _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 4589 |     _bz_scalb<float,_bz_typename P_expr2::T_numtype> > >
 | 
|---|
 | 4590 | scalb(float d1, _bz_ArrayExpr<P_expr2> d2)
 | 
|---|
 | 4591 | {
 | 
|---|
 | 4592 |     return _bz_ArrayExprOp<_bz_ArrayExprConstant<float>, _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 4593 |     _bz_scalb<float,_bz_typename P_expr2::T_numtype> >(_bz_ArrayExprConstant<float>(d1), d2);
 | 
|---|
 | 4594 | }
 | 
|---|
 | 4595 | 
 | 
|---|
 | 4596 | template<int N_index2>
 | 
|---|
 | 4597 | inline
 | 
|---|
 | 4598 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExprConstant<float>, IndexPlaceholder<N_index2>,
 | 
|---|
 | 4599 |     _bz_scalb<float,int> > >
 | 
|---|
 | 4600 | scalb(float d1, IndexPlaceholder<N_index2> d2)
 | 
|---|
 | 4601 | {
 | 
|---|
 | 4602 |     return _bz_ArrayExprOp<_bz_ArrayExprConstant<float>, IndexPlaceholder<N_index2>,
 | 
|---|
 | 4603 |     _bz_scalb<float,int> >(_bz_ArrayExprConstant<float>(d1), d2);
 | 
|---|
 | 4604 | }
 | 
|---|
 | 4605 | 
 | 
|---|
 | 4606 | template<class T_numtype2, int N_rank2>
 | 
|---|
 | 4607 | inline
 | 
|---|
 | 4608 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExprConstant<double>, ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 4609 |     _bz_scalb<double,T_numtype2> > >
 | 
|---|
 | 4610 | scalb(double d1, const Array<T_numtype2, N_rank2>& d2)
 | 
|---|
 | 4611 | {
 | 
|---|
 | 4612 |     return _bz_ArrayExprOp<_bz_ArrayExprConstant<double>, ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 4613 |     _bz_scalb<double,T_numtype2> >(_bz_ArrayExprConstant<double>(d1), d2.begin());
 | 
|---|
 | 4614 | }
 | 
|---|
 | 4615 | 
 | 
|---|
 | 4616 | template<class P_expr2>
 | 
|---|
 | 4617 | inline
 | 
|---|
 | 4618 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExprConstant<double>, _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 4619 |     _bz_scalb<double,_bz_typename P_expr2::T_numtype> > >
 | 
|---|
 | 4620 | scalb(double d1, _bz_ArrayExpr<P_expr2> d2)
 | 
|---|
 | 4621 | {
 | 
|---|
 | 4622 |     return _bz_ArrayExprOp<_bz_ArrayExprConstant<double>, _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 4623 |     _bz_scalb<double,_bz_typename P_expr2::T_numtype> >(_bz_ArrayExprConstant<double>(d1), d2);
 | 
|---|
 | 4624 | }
 | 
|---|
 | 4625 | 
 | 
|---|
 | 4626 | template<int N_index2>
 | 
|---|
 | 4627 | inline
 | 
|---|
 | 4628 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExprConstant<double>, IndexPlaceholder<N_index2>,
 | 
|---|
 | 4629 |     _bz_scalb<double,int> > >
 | 
|---|
 | 4630 | scalb(double d1, IndexPlaceholder<N_index2> d2)
 | 
|---|
 | 4631 | {
 | 
|---|
 | 4632 |     return _bz_ArrayExprOp<_bz_ArrayExprConstant<double>, IndexPlaceholder<N_index2>,
 | 
|---|
 | 4633 |     _bz_scalb<double,int> >(_bz_ArrayExprConstant<double>(d1), d2);
 | 
|---|
 | 4634 | }
 | 
|---|
 | 4635 | 
 | 
|---|
 | 4636 | template<class T_numtype2, int N_rank2>
 | 
|---|
 | 4637 | inline
 | 
|---|
 | 4638 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExprConstant<long double>, ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 4639 |     _bz_scalb<long double,T_numtype2> > >
 | 
|---|
 | 4640 | scalb(long double d1, const Array<T_numtype2, N_rank2>& d2)
 | 
|---|
 | 4641 | {
 | 
|---|
 | 4642 |     return _bz_ArrayExprOp<_bz_ArrayExprConstant<long double>, ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 4643 |     _bz_scalb<long double,T_numtype2> >(_bz_ArrayExprConstant<long double>(d1), d2.begin());
 | 
|---|
 | 4644 | }
 | 
|---|
 | 4645 | 
 | 
|---|
 | 4646 | template<class P_expr2>
 | 
|---|
 | 4647 | inline
 | 
|---|
 | 4648 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExprConstant<long double>, _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 4649 |     _bz_scalb<long double,_bz_typename P_expr2::T_numtype> > >
 | 
|---|
 | 4650 | scalb(long double d1, _bz_ArrayExpr<P_expr2> d2)
 | 
|---|
 | 4651 | {
 | 
|---|
 | 4652 |     return _bz_ArrayExprOp<_bz_ArrayExprConstant<long double>, _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 4653 |     _bz_scalb<long double,_bz_typename P_expr2::T_numtype> >(_bz_ArrayExprConstant<long double>(d1), d2);
 | 
|---|
 | 4654 | }
 | 
|---|
 | 4655 | 
 | 
|---|
 | 4656 | template<int N_index2>
 | 
|---|
 | 4657 | inline
 | 
|---|
 | 4658 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExprConstant<long double>, IndexPlaceholder<N_index2>,
 | 
|---|
 | 4659 |     _bz_scalb<long double,int> > >
 | 
|---|
 | 4660 | scalb(long double d1, IndexPlaceholder<N_index2> d2)
 | 
|---|
 | 4661 | {
 | 
|---|
 | 4662 |     return _bz_ArrayExprOp<_bz_ArrayExprConstant<long double>, IndexPlaceholder<N_index2>,
 | 
|---|
 | 4663 |     _bz_scalb<long double,int> >(_bz_ArrayExprConstant<long double>(d1), d2);
 | 
|---|
 | 4664 | }
 | 
|---|
 | 4665 | 
 | 
|---|
 | 4666 | #ifdef BZ_HAVE_COMPLEX
 | 
|---|
 | 4667 | template<class T1, class T_numtype2, int N_rank2>
 | 
|---|
 | 4668 | inline
 | 
|---|
 | 4669 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExprConstant<complex<T1> > , ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 4670 |     _bz_scalb<complex<T1> ,T_numtype2> > >
 | 
|---|
 | 4671 | scalb(complex<T1> d1, const Array<T_numtype2, N_rank2>& d2)
 | 
|---|
 | 4672 | {
 | 
|---|
 | 4673 |     return _bz_ArrayExprOp<_bz_ArrayExprConstant<complex<T1> > , ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 4674 |     _bz_scalb<complex<T1> ,T_numtype2> >(_bz_ArrayExprConstant<complex<T1> > (d1), d2.begin());
 | 
|---|
 | 4675 | }
 | 
|---|
 | 4676 | 
 | 
|---|
 | 4677 | #endif // BZ_HAVE_COMPLEX
 | 
|---|
 | 4678 | 
 | 
|---|
 | 4679 | #ifdef BZ_HAVE_COMPLEX
 | 
|---|
 | 4680 | template<class T1, class P_expr2>
 | 
|---|
 | 4681 | inline
 | 
|---|
 | 4682 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExprConstant<complex<T1> > , _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 4683 |     _bz_scalb<complex<T1> ,_bz_typename P_expr2::T_numtype> > >
 | 
|---|
 | 4684 | scalb(complex<T1> d1, _bz_ArrayExpr<P_expr2> d2)
 | 
|---|
 | 4685 | {
 | 
|---|
 | 4686 |     return _bz_ArrayExprOp<_bz_ArrayExprConstant<complex<T1> > , _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 4687 |     _bz_scalb<complex<T1> ,_bz_typename P_expr2::T_numtype> >(_bz_ArrayExprConstant<complex<T1> > (d1), d2);
 | 
|---|
 | 4688 | }
 | 
|---|
 | 4689 | 
 | 
|---|
 | 4690 | #endif // BZ_HAVE_COMPLEX
 | 
|---|
 | 4691 | 
 | 
|---|
 | 4692 | #ifdef BZ_HAVE_COMPLEX
 | 
|---|
 | 4693 | template<class T1, int N_index2>
 | 
|---|
 | 4694 | inline
 | 
|---|
 | 4695 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExprConstant<complex<T1> > , IndexPlaceholder<N_index2>,
 | 
|---|
 | 4696 |     _bz_scalb<complex<T1> ,int> > >
 | 
|---|
 | 4697 | scalb(complex<T1> d1, IndexPlaceholder<N_index2> d2)
 | 
|---|
 | 4698 | {
 | 
|---|
 | 4699 |     return _bz_ArrayExprOp<_bz_ArrayExprConstant<complex<T1> > , IndexPlaceholder<N_index2>,
 | 
|---|
 | 4700 |     _bz_scalb<complex<T1> ,int> >(_bz_ArrayExprConstant<complex<T1> > (d1), d2);
 | 
|---|
 | 4701 | }
 | 
|---|
 | 4702 | 
 | 
|---|
 | 4703 | #endif // BZ_HAVE_COMPLEX
 | 
|---|
 | 4704 | 
 | 
|---|
 | 4705 | #endif
 | 
|---|
 | 4706 | 
 | 
|---|
 | 4707 | /****************************************************************************
 | 
|---|
 | 4708 |  * sin
 | 
|---|
 | 4709 |  ****************************************************************************/
 | 
|---|
 | 4710 | 
 | 
|---|
 | 4711 | template<class T_numtype1, int N_rank1>
 | 
|---|
 | 4712 | inline
 | 
|---|
 | 4713 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<ArrayIterator<T_numtype1, N_rank1>,
 | 
|---|
 | 4714 |     _bz_sin<T_numtype1> > >
 | 
|---|
 | 4715 | sin(const Array<T_numtype1, N_rank1>& d1)
 | 
|---|
 | 4716 | {
 | 
|---|
 | 4717 |     return _bz_ArrayExprUnaryOp<ArrayIterator<T_numtype1, N_rank1>,
 | 
|---|
 | 4718 |     _bz_sin<T_numtype1> >(d1.begin());
 | 
|---|
 | 4719 | }
 | 
|---|
 | 4720 | 
 | 
|---|
 | 4721 | template<class P_expr1>
 | 
|---|
 | 4722 | inline
 | 
|---|
 | 4723 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<_bz_ArrayExpr<P_expr1>,
 | 
|---|
 | 4724 |     _bz_sin<_bz_typename P_expr1::T_numtype> > >
 | 
|---|
 | 4725 | sin(_bz_ArrayExpr<P_expr1> d1)
 | 
|---|
 | 4726 | {
 | 
|---|
 | 4727 |     return _bz_ArrayExprUnaryOp<_bz_ArrayExpr<P_expr1>,
 | 
|---|
 | 4728 |     _bz_sin<_bz_typename P_expr1::T_numtype> >(d1);
 | 
|---|
 | 4729 | }
 | 
|---|
 | 4730 | 
 | 
|---|
 | 4731 | template<int N_index1>
 | 
|---|
 | 4732 | inline
 | 
|---|
 | 4733 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<IndexPlaceholder<N_index1>,
 | 
|---|
 | 4734 |     _bz_sin<int> > >
 | 
|---|
 | 4735 | sin(IndexPlaceholder<N_index1> d1)
 | 
|---|
 | 4736 | {
 | 
|---|
 | 4737 |     return _bz_ArrayExprUnaryOp<IndexPlaceholder<N_index1>,
 | 
|---|
 | 4738 |     _bz_sin<int> >(d1);
 | 
|---|
 | 4739 | }
 | 
|---|
 | 4740 | 
 | 
|---|
 | 4741 | 
 | 
|---|
 | 4742 | /****************************************************************************
 | 
|---|
 | 4743 |  * sinh
 | 
|---|
 | 4744 |  ****************************************************************************/
 | 
|---|
 | 4745 | 
 | 
|---|
 | 4746 | template<class T_numtype1, int N_rank1>
 | 
|---|
 | 4747 | inline
 | 
|---|
 | 4748 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<ArrayIterator<T_numtype1, N_rank1>,
 | 
|---|
 | 4749 |     _bz_sinh<T_numtype1> > >
 | 
|---|
 | 4750 | sinh(const Array<T_numtype1, N_rank1>& d1)
 | 
|---|
 | 4751 | {
 | 
|---|
 | 4752 |     return _bz_ArrayExprUnaryOp<ArrayIterator<T_numtype1, N_rank1>,
 | 
|---|
 | 4753 |     _bz_sinh<T_numtype1> >(d1.begin());
 | 
|---|
 | 4754 | }
 | 
|---|
 | 4755 | 
 | 
|---|
 | 4756 | template<class P_expr1>
 | 
|---|
 | 4757 | inline
 | 
|---|
 | 4758 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<_bz_ArrayExpr<P_expr1>,
 | 
|---|
 | 4759 |     _bz_sinh<_bz_typename P_expr1::T_numtype> > >
 | 
|---|
 | 4760 | sinh(_bz_ArrayExpr<P_expr1> d1)
 | 
|---|
 | 4761 | {
 | 
|---|
 | 4762 |     return _bz_ArrayExprUnaryOp<_bz_ArrayExpr<P_expr1>,
 | 
|---|
 | 4763 |     _bz_sinh<_bz_typename P_expr1::T_numtype> >(d1);
 | 
|---|
 | 4764 | }
 | 
|---|
 | 4765 | 
 | 
|---|
 | 4766 | template<int N_index1>
 | 
|---|
 | 4767 | inline
 | 
|---|
 | 4768 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<IndexPlaceholder<N_index1>,
 | 
|---|
 | 4769 |     _bz_sinh<int> > >
 | 
|---|
 | 4770 | sinh(IndexPlaceholder<N_index1> d1)
 | 
|---|
 | 4771 | {
 | 
|---|
 | 4772 |     return _bz_ArrayExprUnaryOp<IndexPlaceholder<N_index1>,
 | 
|---|
 | 4773 |     _bz_sinh<int> >(d1);
 | 
|---|
 | 4774 | }
 | 
|---|
 | 4775 | 
 | 
|---|
 | 4776 | 
 | 
|---|
 | 4777 | /****************************************************************************
 | 
|---|
 | 4778 |  * sqr
 | 
|---|
 | 4779 |  ****************************************************************************/
 | 
|---|
 | 4780 | 
 | 
|---|
 | 4781 | template<class T_numtype1, int N_rank1>
 | 
|---|
 | 4782 | inline
 | 
|---|
 | 4783 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<ArrayIterator<T_numtype1, N_rank1>,
 | 
|---|
 | 4784 |     _bz_sqr<T_numtype1> > >
 | 
|---|
 | 4785 | sqr(const Array<T_numtype1, N_rank1>& d1)
 | 
|---|
 | 4786 | {
 | 
|---|
 | 4787 |     return _bz_ArrayExprUnaryOp<ArrayIterator<T_numtype1, N_rank1>,
 | 
|---|
 | 4788 |     _bz_sqr<T_numtype1> >(d1.begin());
 | 
|---|
 | 4789 | }
 | 
|---|
 | 4790 | 
 | 
|---|
 | 4791 | template<class P_expr1>
 | 
|---|
 | 4792 | inline
 | 
|---|
 | 4793 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<_bz_ArrayExpr<P_expr1>,
 | 
|---|
 | 4794 |     _bz_sqr<_bz_typename P_expr1::T_numtype> > >
 | 
|---|
 | 4795 | sqr(_bz_ArrayExpr<P_expr1> d1)
 | 
|---|
 | 4796 | {
 | 
|---|
 | 4797 |     return _bz_ArrayExprUnaryOp<_bz_ArrayExpr<P_expr1>,
 | 
|---|
 | 4798 |     _bz_sqr<_bz_typename P_expr1::T_numtype> >(d1);
 | 
|---|
 | 4799 | }
 | 
|---|
 | 4800 | 
 | 
|---|
 | 4801 | template<int N_index1>
 | 
|---|
 | 4802 | inline
 | 
|---|
 | 4803 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<IndexPlaceholder<N_index1>,
 | 
|---|
 | 4804 |     _bz_sqr<int> > >
 | 
|---|
 | 4805 | sqr(IndexPlaceholder<N_index1> d1)
 | 
|---|
 | 4806 | {
 | 
|---|
 | 4807 |     return _bz_ArrayExprUnaryOp<IndexPlaceholder<N_index1>,
 | 
|---|
 | 4808 |     _bz_sqr<int> >(d1);
 | 
|---|
 | 4809 | }
 | 
|---|
 | 4810 | 
 | 
|---|
 | 4811 | 
 | 
|---|
 | 4812 | /****************************************************************************
 | 
|---|
 | 4813 |  * sqrt
 | 
|---|
 | 4814 |  ****************************************************************************/
 | 
|---|
 | 4815 | 
 | 
|---|
 | 4816 | template<class T_numtype1, int N_rank1>
 | 
|---|
 | 4817 | inline
 | 
|---|
 | 4818 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<ArrayIterator<T_numtype1, N_rank1>,
 | 
|---|
 | 4819 |     _bz_sqrt<T_numtype1> > >
 | 
|---|
 | 4820 | sqrt(const Array<T_numtype1, N_rank1>& d1)
 | 
|---|
 | 4821 | {
 | 
|---|
 | 4822 |     return _bz_ArrayExprUnaryOp<ArrayIterator<T_numtype1, N_rank1>,
 | 
|---|
 | 4823 |     _bz_sqrt<T_numtype1> >(d1.begin());
 | 
|---|
 | 4824 | }
 | 
|---|
 | 4825 | 
 | 
|---|
 | 4826 | template<class P_expr1>
 | 
|---|
 | 4827 | inline
 | 
|---|
 | 4828 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<_bz_ArrayExpr<P_expr1>,
 | 
|---|
 | 4829 |     _bz_sqrt<_bz_typename P_expr1::T_numtype> > >
 | 
|---|
 | 4830 | sqrt(_bz_ArrayExpr<P_expr1> d1)
 | 
|---|
 | 4831 | {
 | 
|---|
 | 4832 |     return _bz_ArrayExprUnaryOp<_bz_ArrayExpr<P_expr1>,
 | 
|---|
 | 4833 |     _bz_sqrt<_bz_typename P_expr1::T_numtype> >(d1);
 | 
|---|
 | 4834 | }
 | 
|---|
 | 4835 | 
 | 
|---|
 | 4836 | template<int N_index1>
 | 
|---|
 | 4837 | inline
 | 
|---|
 | 4838 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<IndexPlaceholder<N_index1>,
 | 
|---|
 | 4839 |     _bz_sqrt<int> > >
 | 
|---|
 | 4840 | sqrt(IndexPlaceholder<N_index1> d1)
 | 
|---|
 | 4841 | {
 | 
|---|
 | 4842 |     return _bz_ArrayExprUnaryOp<IndexPlaceholder<N_index1>,
 | 
|---|
 | 4843 |     _bz_sqrt<int> >(d1);
 | 
|---|
 | 4844 | }
 | 
|---|
 | 4845 | 
 | 
|---|
 | 4846 | 
 | 
|---|
 | 4847 | /****************************************************************************
 | 
|---|
 | 4848 |  * tan
 | 
|---|
 | 4849 |  ****************************************************************************/
 | 
|---|
 | 4850 | 
 | 
|---|
 | 4851 | template<class T_numtype1, int N_rank1>
 | 
|---|
 | 4852 | inline
 | 
|---|
 | 4853 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<ArrayIterator<T_numtype1, N_rank1>,
 | 
|---|
 | 4854 |     _bz_tan<T_numtype1> > >
 | 
|---|
 | 4855 | tan(const Array<T_numtype1, N_rank1>& d1)
 | 
|---|
 | 4856 | {
 | 
|---|
 | 4857 |     return _bz_ArrayExprUnaryOp<ArrayIterator<T_numtype1, N_rank1>,
 | 
|---|
 | 4858 |     _bz_tan<T_numtype1> >(d1.begin());
 | 
|---|
 | 4859 | }
 | 
|---|
 | 4860 | 
 | 
|---|
 | 4861 | template<class P_expr1>
 | 
|---|
 | 4862 | inline
 | 
|---|
 | 4863 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<_bz_ArrayExpr<P_expr1>,
 | 
|---|
 | 4864 |     _bz_tan<_bz_typename P_expr1::T_numtype> > >
 | 
|---|
 | 4865 | tan(_bz_ArrayExpr<P_expr1> d1)
 | 
|---|
 | 4866 | {
 | 
|---|
 | 4867 |     return _bz_ArrayExprUnaryOp<_bz_ArrayExpr<P_expr1>,
 | 
|---|
 | 4868 |     _bz_tan<_bz_typename P_expr1::T_numtype> >(d1);
 | 
|---|
 | 4869 | }
 | 
|---|
 | 4870 | 
 | 
|---|
 | 4871 | template<int N_index1>
 | 
|---|
 | 4872 | inline
 | 
|---|
 | 4873 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<IndexPlaceholder<N_index1>,
 | 
|---|
 | 4874 |     _bz_tan<int> > >
 | 
|---|
 | 4875 | tan(IndexPlaceholder<N_index1> d1)
 | 
|---|
 | 4876 | {
 | 
|---|
 | 4877 |     return _bz_ArrayExprUnaryOp<IndexPlaceholder<N_index1>,
 | 
|---|
 | 4878 |     _bz_tan<int> >(d1);
 | 
|---|
 | 4879 | }
 | 
|---|
 | 4880 | 
 | 
|---|
 | 4881 | 
 | 
|---|
 | 4882 | /****************************************************************************
 | 
|---|
 | 4883 |  * tanh
 | 
|---|
 | 4884 |  ****************************************************************************/
 | 
|---|
 | 4885 | 
 | 
|---|
 | 4886 | template<class T_numtype1, int N_rank1>
 | 
|---|
 | 4887 | inline
 | 
|---|
 | 4888 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<ArrayIterator<T_numtype1, N_rank1>,
 | 
|---|
 | 4889 |     _bz_tanh<T_numtype1> > >
 | 
|---|
 | 4890 | tanh(const Array<T_numtype1, N_rank1>& d1)
 | 
|---|
 | 4891 | {
 | 
|---|
 | 4892 |     return _bz_ArrayExprUnaryOp<ArrayIterator<T_numtype1, N_rank1>,
 | 
|---|
 | 4893 |     _bz_tanh<T_numtype1> >(d1.begin());
 | 
|---|
 | 4894 | }
 | 
|---|
 | 4895 | 
 | 
|---|
 | 4896 | template<class P_expr1>
 | 
|---|
 | 4897 | inline
 | 
|---|
 | 4898 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<_bz_ArrayExpr<P_expr1>,
 | 
|---|
 | 4899 |     _bz_tanh<_bz_typename P_expr1::T_numtype> > >
 | 
|---|
 | 4900 | tanh(_bz_ArrayExpr<P_expr1> d1)
 | 
|---|
 | 4901 | {
 | 
|---|
 | 4902 |     return _bz_ArrayExprUnaryOp<_bz_ArrayExpr<P_expr1>,
 | 
|---|
 | 4903 |     _bz_tanh<_bz_typename P_expr1::T_numtype> >(d1);
 | 
|---|
 | 4904 | }
 | 
|---|
 | 4905 | 
 | 
|---|
 | 4906 | template<int N_index1>
 | 
|---|
 | 4907 | inline
 | 
|---|
 | 4908 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<IndexPlaceholder<N_index1>,
 | 
|---|
 | 4909 |     _bz_tanh<int> > >
 | 
|---|
 | 4910 | tanh(IndexPlaceholder<N_index1> d1)
 | 
|---|
 | 4911 | {
 | 
|---|
 | 4912 |     return _bz_ArrayExprUnaryOp<IndexPlaceholder<N_index1>,
 | 
|---|
 | 4913 |     _bz_tanh<int> >(d1);
 | 
|---|
 | 4914 | }
 | 
|---|
 | 4915 | 
 | 
|---|
 | 4916 | 
 | 
|---|
 | 4917 | /****************************************************************************
 | 
|---|
 | 4918 |  * trunc
 | 
|---|
 | 4919 |  ****************************************************************************/
 | 
|---|
 | 4920 | 
 | 
|---|
 | 4921 | #ifdef BZ_HAVE_IEEE_MATH
 | 
|---|
 | 4922 | template<class T_numtype1, int N_rank1>
 | 
|---|
 | 4923 | inline
 | 
|---|
 | 4924 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<ArrayIterator<T_numtype1, N_rank1>,
 | 
|---|
 | 4925 |     _bz_trunc<T_numtype1> > >
 | 
|---|
 | 4926 | trunc(const Array<T_numtype1, N_rank1>& d1)
 | 
|---|
 | 4927 | {
 | 
|---|
 | 4928 |     return _bz_ArrayExprUnaryOp<ArrayIterator<T_numtype1, N_rank1>,
 | 
|---|
 | 4929 |     _bz_trunc<T_numtype1> >(d1.begin());
 | 
|---|
 | 4930 | }
 | 
|---|
 | 4931 | 
 | 
|---|
 | 4932 | template<class P_expr1>
 | 
|---|
 | 4933 | inline
 | 
|---|
 | 4934 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<_bz_ArrayExpr<P_expr1>,
 | 
|---|
 | 4935 |     _bz_trunc<_bz_typename P_expr1::T_numtype> > >
 | 
|---|
 | 4936 | trunc(_bz_ArrayExpr<P_expr1> d1)
 | 
|---|
 | 4937 | {
 | 
|---|
 | 4938 |     return _bz_ArrayExprUnaryOp<_bz_ArrayExpr<P_expr1>,
 | 
|---|
 | 4939 |     _bz_trunc<_bz_typename P_expr1::T_numtype> >(d1);
 | 
|---|
 | 4940 | }
 | 
|---|
 | 4941 | 
 | 
|---|
 | 4942 | template<int N_index1>
 | 
|---|
 | 4943 | inline
 | 
|---|
 | 4944 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<IndexPlaceholder<N_index1>,
 | 
|---|
 | 4945 |     _bz_trunc<int> > >
 | 
|---|
 | 4946 | trunc(IndexPlaceholder<N_index1> d1)
 | 
|---|
 | 4947 | {
 | 
|---|
 | 4948 |     return _bz_ArrayExprUnaryOp<IndexPlaceholder<N_index1>,
 | 
|---|
 | 4949 |     _bz_trunc<int> >(d1);
 | 
|---|
 | 4950 | }
 | 
|---|
 | 4951 | 
 | 
|---|
 | 4952 | #endif
 | 
|---|
 | 4953 | 
 | 
|---|
 | 4954 | /****************************************************************************
 | 
|---|
 | 4955 |  * uitrunc
 | 
|---|
 | 4956 |  ****************************************************************************/
 | 
|---|
 | 4957 | 
 | 
|---|
 | 4958 | #ifdef BZ_HAVE_SYSTEM_V_MATH
 | 
|---|
 | 4959 | template<class T_numtype1, int N_rank1>
 | 
|---|
 | 4960 | inline
 | 
|---|
 | 4961 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<ArrayIterator<T_numtype1, N_rank1>,
 | 
|---|
 | 4962 |     _bz_uitrunc<T_numtype1> > >
 | 
|---|
 | 4963 | uitrunc(const Array<T_numtype1, N_rank1>& d1)
 | 
|---|
 | 4964 | {
 | 
|---|
 | 4965 |     return _bz_ArrayExprUnaryOp<ArrayIterator<T_numtype1, N_rank1>,
 | 
|---|
 | 4966 |     _bz_uitrunc<T_numtype1> >(d1.begin());
 | 
|---|
 | 4967 | }
 | 
|---|
 | 4968 | 
 | 
|---|
 | 4969 | template<class P_expr1>
 | 
|---|
 | 4970 | inline
 | 
|---|
 | 4971 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<_bz_ArrayExpr<P_expr1>,
 | 
|---|
 | 4972 |     _bz_uitrunc<_bz_typename P_expr1::T_numtype> > >
 | 
|---|
 | 4973 | uitrunc(_bz_ArrayExpr<P_expr1> d1)
 | 
|---|
 | 4974 | {
 | 
|---|
 | 4975 |     return _bz_ArrayExprUnaryOp<_bz_ArrayExpr<P_expr1>,
 | 
|---|
 | 4976 |     _bz_uitrunc<_bz_typename P_expr1::T_numtype> >(d1);
 | 
|---|
 | 4977 | }
 | 
|---|
 | 4978 | 
 | 
|---|
 | 4979 | template<int N_index1>
 | 
|---|
 | 4980 | inline
 | 
|---|
 | 4981 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<IndexPlaceholder<N_index1>,
 | 
|---|
 | 4982 |     _bz_uitrunc<int> > >
 | 
|---|
 | 4983 | uitrunc(IndexPlaceholder<N_index1> d1)
 | 
|---|
 | 4984 | {
 | 
|---|
 | 4985 |     return _bz_ArrayExprUnaryOp<IndexPlaceholder<N_index1>,
 | 
|---|
 | 4986 |     _bz_uitrunc<int> >(d1);
 | 
|---|
 | 4987 | }
 | 
|---|
 | 4988 | 
 | 
|---|
 | 4989 | #endif
 | 
|---|
 | 4990 | 
 | 
|---|
 | 4991 | /****************************************************************************
 | 
|---|
 | 4992 |  * unordered
 | 
|---|
 | 4993 |  ****************************************************************************/
 | 
|---|
 | 4994 | 
 | 
|---|
 | 4995 | #ifdef BZ_HAVE_SYSTEM_V_MATH
 | 
|---|
 | 4996 | template<class T_numtype1, int N_rank1, class T_numtype2, int N_rank2>
 | 
|---|
 | 4997 | inline
 | 
|---|
 | 4998 | _bz_ArrayExpr<_bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 4999 |     _bz_unordered<T_numtype1,T_numtype2> > >
 | 
|---|
 | 5000 | unordered(const Array<T_numtype1, N_rank1>& d1, const Array<T_numtype2, N_rank2>& d2)
 | 
|---|
 | 5001 | {
 | 
|---|
 | 5002 |     return _bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 5003 |     _bz_unordered<T_numtype1,T_numtype2> >(d1.begin(), d2.begin());
 | 
|---|
 | 5004 | }
 | 
|---|
 | 5005 | 
 | 
|---|
 | 5006 | template<class T_numtype1, int N_rank1, class P_expr2>
 | 
|---|
 | 5007 | inline
 | 
|---|
 | 5008 | _bz_ArrayExpr<_bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 5009 |     _bz_unordered<T_numtype1,_bz_typename P_expr2::T_numtype> > >
 | 
|---|
 | 5010 | unordered(const Array<T_numtype1, N_rank1>& d1, _bz_ArrayExpr<P_expr2> d2)
 | 
|---|
 | 5011 | {
 | 
|---|
 | 5012 |     return _bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 5013 |     _bz_unordered<T_numtype1,_bz_typename P_expr2::T_numtype> >(d1.begin(), d2);
 | 
|---|
 | 5014 | }
 | 
|---|
 | 5015 | 
 | 
|---|
 | 5016 | template<class T_numtype1, int N_rank1, int N_index2>
 | 
|---|
 | 5017 | inline
 | 
|---|
 | 5018 | _bz_ArrayExpr<_bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, IndexPlaceholder<N_index2>,
 | 
|---|
 | 5019 |     _bz_unordered<T_numtype1,int> > >
 | 
|---|
 | 5020 | unordered(const Array<T_numtype1, N_rank1>& d1, IndexPlaceholder<N_index2> d2)
 | 
|---|
 | 5021 | {
 | 
|---|
 | 5022 |     return _bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, IndexPlaceholder<N_index2>,
 | 
|---|
 | 5023 |     _bz_unordered<T_numtype1,int> >(d1.begin(), d2);
 | 
|---|
 | 5024 | }
 | 
|---|
 | 5025 | 
 | 
|---|
 | 5026 | template<class T_numtype1, int N_rank1>
 | 
|---|
 | 5027 | inline
 | 
|---|
 | 5028 | _bz_ArrayExpr<_bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, _bz_ArrayExprConstant<float>,
 | 
|---|
 | 5029 |     _bz_unordered<T_numtype1,float> > >
 | 
|---|
 | 5030 | unordered(const Array<T_numtype1, N_rank1>& d1, float d2)
 | 
|---|
 | 5031 | {
 | 
|---|
 | 5032 |     return _bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, _bz_ArrayExprConstant<float>,
 | 
|---|
 | 5033 |     _bz_unordered<T_numtype1,float> >(d1.begin(), _bz_ArrayExprConstant<float>(d2));
 | 
|---|
 | 5034 | }
 | 
|---|
 | 5035 | 
 | 
|---|
 | 5036 | template<class T_numtype1, int N_rank1>
 | 
|---|
 | 5037 | inline
 | 
|---|
 | 5038 | _bz_ArrayExpr<_bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, _bz_ArrayExprConstant<double>,
 | 
|---|
 | 5039 |     _bz_unordered<T_numtype1,double> > >
 | 
|---|
 | 5040 | unordered(const Array<T_numtype1, N_rank1>& d1, double d2)
 | 
|---|
 | 5041 | {
 | 
|---|
 | 5042 |     return _bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, _bz_ArrayExprConstant<double>,
 | 
|---|
 | 5043 |     _bz_unordered<T_numtype1,double> >(d1.begin(), _bz_ArrayExprConstant<double>(d2));
 | 
|---|
 | 5044 | }
 | 
|---|
 | 5045 | 
 | 
|---|
 | 5046 | template<class T_numtype1, int N_rank1>
 | 
|---|
 | 5047 | inline
 | 
|---|
 | 5048 | _bz_ArrayExpr<_bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, _bz_ArrayExprConstant<long double>,
 | 
|---|
 | 5049 |     _bz_unordered<T_numtype1,long double> > >
 | 
|---|
 | 5050 | unordered(const Array<T_numtype1, N_rank1>& d1, long double d2)
 | 
|---|
 | 5051 | {
 | 
|---|
 | 5052 |     return _bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, _bz_ArrayExprConstant<long double>,
 | 
|---|
 | 5053 |     _bz_unordered<T_numtype1,long double> >(d1.begin(), _bz_ArrayExprConstant<long double>(d2));
 | 
|---|
 | 5054 | }
 | 
|---|
 | 5055 | 
 | 
|---|
 | 5056 | #ifdef BZ_HAVE_COMPLEX
 | 
|---|
 | 5057 | template<class T_numtype1, int N_rank1, class T2>
 | 
|---|
 | 5058 | inline
 | 
|---|
 | 5059 | _bz_ArrayExpr<_bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, _bz_ArrayExprConstant<complex<T2> > ,
 | 
|---|
 | 5060 |     _bz_unordered<T_numtype1,complex<T2> > > >
 | 
|---|
 | 5061 | unordered(const Array<T_numtype1, N_rank1>& d1, complex<T2> d2)
 | 
|---|
 | 5062 | {
 | 
|---|
 | 5063 |     return _bz_ArrayExprOp<ArrayIterator<T_numtype1, N_rank1>, _bz_ArrayExprConstant<complex<T2> > ,
 | 
|---|
 | 5064 |     _bz_unordered<T_numtype1,complex<T2> > >(d1.begin(), _bz_ArrayExprConstant<complex<T2> > (d2));
 | 
|---|
 | 5065 | }
 | 
|---|
 | 5066 | 
 | 
|---|
 | 5067 | #endif // BZ_HAVE_COMPLEX
 | 
|---|
 | 5068 | 
 | 
|---|
 | 5069 | template<class P_expr1, class T_numtype2, int N_rank2>
 | 
|---|
 | 5070 | inline
 | 
|---|
 | 5071 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 5072 |     _bz_unordered<_bz_typename P_expr1::T_numtype,T_numtype2> > >
 | 
|---|
 | 5073 | unordered(_bz_ArrayExpr<P_expr1> d1, const Array<T_numtype2, N_rank2>& d2)
 | 
|---|
 | 5074 | {
 | 
|---|
 | 5075 |     return _bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 5076 |     _bz_unordered<_bz_typename P_expr1::T_numtype,T_numtype2> >(d1, d2.begin());
 | 
|---|
 | 5077 | }
 | 
|---|
 | 5078 | 
 | 
|---|
 | 5079 | template<class P_expr1, class P_expr2>
 | 
|---|
 | 5080 | inline
 | 
|---|
 | 5081 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 5082 |     _bz_unordered<_bz_typename P_expr1::T_numtype,_bz_typename P_expr2::T_numtype> > >
 | 
|---|
 | 5083 | unordered(_bz_ArrayExpr<P_expr1> d1, _bz_ArrayExpr<P_expr2> d2)
 | 
|---|
 | 5084 | {
 | 
|---|
 | 5085 |     return _bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 5086 |     _bz_unordered<_bz_typename P_expr1::T_numtype,_bz_typename P_expr2::T_numtype> >(d1, d2);
 | 
|---|
 | 5087 | }
 | 
|---|
 | 5088 | 
 | 
|---|
 | 5089 | template<class P_expr1, int N_index2>
 | 
|---|
 | 5090 | inline
 | 
|---|
 | 5091 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, IndexPlaceholder<N_index2>,
 | 
|---|
 | 5092 |     _bz_unordered<_bz_typename P_expr1::T_numtype,int> > >
 | 
|---|
 | 5093 | unordered(_bz_ArrayExpr<P_expr1> d1, IndexPlaceholder<N_index2> d2)
 | 
|---|
 | 5094 | {
 | 
|---|
 | 5095 |     return _bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, IndexPlaceholder<N_index2>,
 | 
|---|
 | 5096 |     _bz_unordered<_bz_typename P_expr1::T_numtype,int> >(d1, d2);
 | 
|---|
 | 5097 | }
 | 
|---|
 | 5098 | 
 | 
|---|
 | 5099 | template<class P_expr1>
 | 
|---|
 | 5100 | inline
 | 
|---|
 | 5101 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, _bz_ArrayExprConstant<float>,
 | 
|---|
 | 5102 |     _bz_unordered<_bz_typename P_expr1::T_numtype,float> > >
 | 
|---|
 | 5103 | unordered(_bz_ArrayExpr<P_expr1> d1, float d2)
 | 
|---|
 | 5104 | {
 | 
|---|
 | 5105 |     return _bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, _bz_ArrayExprConstant<float>,
 | 
|---|
 | 5106 |     _bz_unordered<_bz_typename P_expr1::T_numtype,float> >(d1, _bz_ArrayExprConstant<float>(d2));
 | 
|---|
 | 5107 | }
 | 
|---|
 | 5108 | 
 | 
|---|
 | 5109 | template<class P_expr1>
 | 
|---|
 | 5110 | inline
 | 
|---|
 | 5111 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, _bz_ArrayExprConstant<double>,
 | 
|---|
 | 5112 |     _bz_unordered<_bz_typename P_expr1::T_numtype,double> > >
 | 
|---|
 | 5113 | unordered(_bz_ArrayExpr<P_expr1> d1, double d2)
 | 
|---|
 | 5114 | {
 | 
|---|
 | 5115 |     return _bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, _bz_ArrayExprConstant<double>,
 | 
|---|
 | 5116 |     _bz_unordered<_bz_typename P_expr1::T_numtype,double> >(d1, _bz_ArrayExprConstant<double>(d2));
 | 
|---|
 | 5117 | }
 | 
|---|
 | 5118 | 
 | 
|---|
 | 5119 | template<class P_expr1>
 | 
|---|
 | 5120 | inline
 | 
|---|
 | 5121 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, _bz_ArrayExprConstant<long double>,
 | 
|---|
 | 5122 |     _bz_unordered<_bz_typename P_expr1::T_numtype,long double> > >
 | 
|---|
 | 5123 | unordered(_bz_ArrayExpr<P_expr1> d1, long double d2)
 | 
|---|
 | 5124 | {
 | 
|---|
 | 5125 |     return _bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, _bz_ArrayExprConstant<long double>,
 | 
|---|
 | 5126 |     _bz_unordered<_bz_typename P_expr1::T_numtype,long double> >(d1, _bz_ArrayExprConstant<long double>(d2));
 | 
|---|
 | 5127 | }
 | 
|---|
 | 5128 | 
 | 
|---|
 | 5129 | #ifdef BZ_HAVE_COMPLEX
 | 
|---|
 | 5130 | template<class P_expr1, class T2>
 | 
|---|
 | 5131 | inline
 | 
|---|
 | 5132 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, _bz_ArrayExprConstant<complex<T2> > ,
 | 
|---|
 | 5133 |     _bz_unordered<_bz_typename P_expr1::T_numtype,complex<T2> > > >
 | 
|---|
 | 5134 | unordered(_bz_ArrayExpr<P_expr1> d1, complex<T2> d2)
 | 
|---|
 | 5135 | {
 | 
|---|
 | 5136 |     return _bz_ArrayExprOp<_bz_ArrayExpr<P_expr1>, _bz_ArrayExprConstant<complex<T2> > ,
 | 
|---|
 | 5137 |     _bz_unordered<_bz_typename P_expr1::T_numtype,complex<T2> > >(d1, _bz_ArrayExprConstant<complex<T2> > (d2));
 | 
|---|
 | 5138 | }
 | 
|---|
 | 5139 | 
 | 
|---|
 | 5140 | #endif // BZ_HAVE_COMPLEX
 | 
|---|
 | 5141 | 
 | 
|---|
 | 5142 | template<int N_index1, class T_numtype2, int N_rank2>
 | 
|---|
 | 5143 | inline
 | 
|---|
 | 5144 | _bz_ArrayExpr<_bz_ArrayExprOp<IndexPlaceholder<N_index1>, ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 5145 |     _bz_unordered<int,T_numtype2> > >
 | 
|---|
 | 5146 | unordered(IndexPlaceholder<N_index1> d1, const Array<T_numtype2, N_rank2>& d2)
 | 
|---|
 | 5147 | {
 | 
|---|
 | 5148 |     return _bz_ArrayExprOp<IndexPlaceholder<N_index1>, ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 5149 |     _bz_unordered<int,T_numtype2> >(d1, d2.begin());
 | 
|---|
 | 5150 | }
 | 
|---|
 | 5151 | 
 | 
|---|
 | 5152 | template<int N_index1, class P_expr2>
 | 
|---|
 | 5153 | inline
 | 
|---|
 | 5154 | _bz_ArrayExpr<_bz_ArrayExprOp<IndexPlaceholder<N_index1>, _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 5155 |     _bz_unordered<int,_bz_typename P_expr2::T_numtype> > >
 | 
|---|
 | 5156 | unordered(IndexPlaceholder<N_index1> d1, _bz_ArrayExpr<P_expr2> d2)
 | 
|---|
 | 5157 | {
 | 
|---|
 | 5158 |     return _bz_ArrayExprOp<IndexPlaceholder<N_index1>, _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 5159 |     _bz_unordered<int,_bz_typename P_expr2::T_numtype> >(d1, d2);
 | 
|---|
 | 5160 | }
 | 
|---|
 | 5161 | 
 | 
|---|
 | 5162 | template<int N_index1, int N_index2>
 | 
|---|
 | 5163 | inline
 | 
|---|
 | 5164 | _bz_ArrayExpr<_bz_ArrayExprOp<IndexPlaceholder<N_index1>, IndexPlaceholder<N_index2>,
 | 
|---|
 | 5165 |     _bz_unordered<int,int> > >
 | 
|---|
 | 5166 | unordered(IndexPlaceholder<N_index1> d1, IndexPlaceholder<N_index2> d2)
 | 
|---|
 | 5167 | {
 | 
|---|
 | 5168 |     return _bz_ArrayExprOp<IndexPlaceholder<N_index1>, IndexPlaceholder<N_index2>,
 | 
|---|
 | 5169 |     _bz_unordered<int,int> >(d1, d2);
 | 
|---|
 | 5170 | }
 | 
|---|
 | 5171 | 
 | 
|---|
 | 5172 | template<int N_index1>
 | 
|---|
 | 5173 | inline
 | 
|---|
 | 5174 | _bz_ArrayExpr<_bz_ArrayExprOp<IndexPlaceholder<N_index1>, _bz_ArrayExprConstant<float>,
 | 
|---|
 | 5175 |     _bz_unordered<int,float> > >
 | 
|---|
 | 5176 | unordered(IndexPlaceholder<N_index1> d1, float d2)
 | 
|---|
 | 5177 | {
 | 
|---|
 | 5178 |     return _bz_ArrayExprOp<IndexPlaceholder<N_index1>, _bz_ArrayExprConstant<float>,
 | 
|---|
 | 5179 |     _bz_unordered<int,float> >(d1, _bz_ArrayExprConstant<float>(d2));
 | 
|---|
 | 5180 | }
 | 
|---|
 | 5181 | 
 | 
|---|
 | 5182 | template<int N_index1>
 | 
|---|
 | 5183 | inline
 | 
|---|
 | 5184 | _bz_ArrayExpr<_bz_ArrayExprOp<IndexPlaceholder<N_index1>, _bz_ArrayExprConstant<double>,
 | 
|---|
 | 5185 |     _bz_unordered<int,double> > >
 | 
|---|
 | 5186 | unordered(IndexPlaceholder<N_index1> d1, double d2)
 | 
|---|
 | 5187 | {
 | 
|---|
 | 5188 |     return _bz_ArrayExprOp<IndexPlaceholder<N_index1>, _bz_ArrayExprConstant<double>,
 | 
|---|
 | 5189 |     _bz_unordered<int,double> >(d1, _bz_ArrayExprConstant<double>(d2));
 | 
|---|
 | 5190 | }
 | 
|---|
 | 5191 | 
 | 
|---|
 | 5192 | template<int N_index1>
 | 
|---|
 | 5193 | inline
 | 
|---|
 | 5194 | _bz_ArrayExpr<_bz_ArrayExprOp<IndexPlaceholder<N_index1>, _bz_ArrayExprConstant<long double>,
 | 
|---|
 | 5195 |     _bz_unordered<int,long double> > >
 | 
|---|
 | 5196 | unordered(IndexPlaceholder<N_index1> d1, long double d2)
 | 
|---|
 | 5197 | {
 | 
|---|
 | 5198 |     return _bz_ArrayExprOp<IndexPlaceholder<N_index1>, _bz_ArrayExprConstant<long double>,
 | 
|---|
 | 5199 |     _bz_unordered<int,long double> >(d1, _bz_ArrayExprConstant<long double>(d2));
 | 
|---|
 | 5200 | }
 | 
|---|
 | 5201 | 
 | 
|---|
 | 5202 | #ifdef BZ_HAVE_COMPLEX
 | 
|---|
 | 5203 | template<int N_index1, class T2>
 | 
|---|
 | 5204 | inline
 | 
|---|
 | 5205 | _bz_ArrayExpr<_bz_ArrayExprOp<IndexPlaceholder<N_index1>, _bz_ArrayExprConstant<complex<T2> > ,
 | 
|---|
 | 5206 |     _bz_unordered<int,complex<T2> > > >
 | 
|---|
 | 5207 | unordered(IndexPlaceholder<N_index1> d1, complex<T2> d2)
 | 
|---|
 | 5208 | {
 | 
|---|
 | 5209 |     return _bz_ArrayExprOp<IndexPlaceholder<N_index1>, _bz_ArrayExprConstant<complex<T2> > ,
 | 
|---|
 | 5210 |     _bz_unordered<int,complex<T2> > >(d1, _bz_ArrayExprConstant<complex<T2> > (d2));
 | 
|---|
 | 5211 | }
 | 
|---|
 | 5212 | 
 | 
|---|
 | 5213 | #endif // BZ_HAVE_COMPLEX
 | 
|---|
 | 5214 | 
 | 
|---|
 | 5215 | template<class T_numtype2, int N_rank2>
 | 
|---|
 | 5216 | inline
 | 
|---|
 | 5217 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExprConstant<float>, ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 5218 |     _bz_unordered<float,T_numtype2> > >
 | 
|---|
 | 5219 | unordered(float d1, const Array<T_numtype2, N_rank2>& d2)
 | 
|---|
 | 5220 | {
 | 
|---|
 | 5221 |     return _bz_ArrayExprOp<_bz_ArrayExprConstant<float>, ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 5222 |     _bz_unordered<float,T_numtype2> >(_bz_ArrayExprConstant<float>(d1), d2.begin());
 | 
|---|
 | 5223 | }
 | 
|---|
 | 5224 | 
 | 
|---|
 | 5225 | template<class P_expr2>
 | 
|---|
 | 5226 | inline
 | 
|---|
 | 5227 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExprConstant<float>, _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 5228 |     _bz_unordered<float,_bz_typename P_expr2::T_numtype> > >
 | 
|---|
 | 5229 | unordered(float d1, _bz_ArrayExpr<P_expr2> d2)
 | 
|---|
 | 5230 | {
 | 
|---|
 | 5231 |     return _bz_ArrayExprOp<_bz_ArrayExprConstant<float>, _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 5232 |     _bz_unordered<float,_bz_typename P_expr2::T_numtype> >(_bz_ArrayExprConstant<float>(d1), d2);
 | 
|---|
 | 5233 | }
 | 
|---|
 | 5234 | 
 | 
|---|
 | 5235 | template<int N_index2>
 | 
|---|
 | 5236 | inline
 | 
|---|
 | 5237 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExprConstant<float>, IndexPlaceholder<N_index2>,
 | 
|---|
 | 5238 |     _bz_unordered<float,int> > >
 | 
|---|
 | 5239 | unordered(float d1, IndexPlaceholder<N_index2> d2)
 | 
|---|
 | 5240 | {
 | 
|---|
 | 5241 |     return _bz_ArrayExprOp<_bz_ArrayExprConstant<float>, IndexPlaceholder<N_index2>,
 | 
|---|
 | 5242 |     _bz_unordered<float,int> >(_bz_ArrayExprConstant<float>(d1), d2);
 | 
|---|
 | 5243 | }
 | 
|---|
 | 5244 | 
 | 
|---|
 | 5245 | template<class T_numtype2, int N_rank2>
 | 
|---|
 | 5246 | inline
 | 
|---|
 | 5247 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExprConstant<double>, ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 5248 |     _bz_unordered<double,T_numtype2> > >
 | 
|---|
 | 5249 | unordered(double d1, const Array<T_numtype2, N_rank2>& d2)
 | 
|---|
 | 5250 | {
 | 
|---|
 | 5251 |     return _bz_ArrayExprOp<_bz_ArrayExprConstant<double>, ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 5252 |     _bz_unordered<double,T_numtype2> >(_bz_ArrayExprConstant<double>(d1), d2.begin());
 | 
|---|
 | 5253 | }
 | 
|---|
 | 5254 | 
 | 
|---|
 | 5255 | template<class P_expr2>
 | 
|---|
 | 5256 | inline
 | 
|---|
 | 5257 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExprConstant<double>, _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 5258 |     _bz_unordered<double,_bz_typename P_expr2::T_numtype> > >
 | 
|---|
 | 5259 | unordered(double d1, _bz_ArrayExpr<P_expr2> d2)
 | 
|---|
 | 5260 | {
 | 
|---|
 | 5261 |     return _bz_ArrayExprOp<_bz_ArrayExprConstant<double>, _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 5262 |     _bz_unordered<double,_bz_typename P_expr2::T_numtype> >(_bz_ArrayExprConstant<double>(d1), d2);
 | 
|---|
 | 5263 | }
 | 
|---|
 | 5264 | 
 | 
|---|
 | 5265 | template<int N_index2>
 | 
|---|
 | 5266 | inline
 | 
|---|
 | 5267 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExprConstant<double>, IndexPlaceholder<N_index2>,
 | 
|---|
 | 5268 |     _bz_unordered<double,int> > >
 | 
|---|
 | 5269 | unordered(double d1, IndexPlaceholder<N_index2> d2)
 | 
|---|
 | 5270 | {
 | 
|---|
 | 5271 |     return _bz_ArrayExprOp<_bz_ArrayExprConstant<double>, IndexPlaceholder<N_index2>,
 | 
|---|
 | 5272 |     _bz_unordered<double,int> >(_bz_ArrayExprConstant<double>(d1), d2);
 | 
|---|
 | 5273 | }
 | 
|---|
 | 5274 | 
 | 
|---|
 | 5275 | template<class T_numtype2, int N_rank2>
 | 
|---|
 | 5276 | inline
 | 
|---|
 | 5277 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExprConstant<long double>, ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 5278 |     _bz_unordered<long double,T_numtype2> > >
 | 
|---|
 | 5279 | unordered(long double d1, const Array<T_numtype2, N_rank2>& d2)
 | 
|---|
 | 5280 | {
 | 
|---|
 | 5281 |     return _bz_ArrayExprOp<_bz_ArrayExprConstant<long double>, ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 5282 |     _bz_unordered<long double,T_numtype2> >(_bz_ArrayExprConstant<long double>(d1), d2.begin());
 | 
|---|
 | 5283 | }
 | 
|---|
 | 5284 | 
 | 
|---|
 | 5285 | template<class P_expr2>
 | 
|---|
 | 5286 | inline
 | 
|---|
 | 5287 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExprConstant<long double>, _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 5288 |     _bz_unordered<long double,_bz_typename P_expr2::T_numtype> > >
 | 
|---|
 | 5289 | unordered(long double d1, _bz_ArrayExpr<P_expr2> d2)
 | 
|---|
 | 5290 | {
 | 
|---|
 | 5291 |     return _bz_ArrayExprOp<_bz_ArrayExprConstant<long double>, _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 5292 |     _bz_unordered<long double,_bz_typename P_expr2::T_numtype> >(_bz_ArrayExprConstant<long double>(d1), d2);
 | 
|---|
 | 5293 | }
 | 
|---|
 | 5294 | 
 | 
|---|
 | 5295 | template<int N_index2>
 | 
|---|
 | 5296 | inline
 | 
|---|
 | 5297 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExprConstant<long double>, IndexPlaceholder<N_index2>,
 | 
|---|
 | 5298 |     _bz_unordered<long double,int> > >
 | 
|---|
 | 5299 | unordered(long double d1, IndexPlaceholder<N_index2> d2)
 | 
|---|
 | 5300 | {
 | 
|---|
 | 5301 |     return _bz_ArrayExprOp<_bz_ArrayExprConstant<long double>, IndexPlaceholder<N_index2>,
 | 
|---|
 | 5302 |     _bz_unordered<long double,int> >(_bz_ArrayExprConstant<long double>(d1), d2);
 | 
|---|
 | 5303 | }
 | 
|---|
 | 5304 | 
 | 
|---|
 | 5305 | #ifdef BZ_HAVE_COMPLEX
 | 
|---|
 | 5306 | template<class T1, class T_numtype2, int N_rank2>
 | 
|---|
 | 5307 | inline
 | 
|---|
 | 5308 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExprConstant<complex<T1> > , ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 5309 |     _bz_unordered<complex<T1> ,T_numtype2> > >
 | 
|---|
 | 5310 | unordered(complex<T1> d1, const Array<T_numtype2, N_rank2>& d2)
 | 
|---|
 | 5311 | {
 | 
|---|
 | 5312 |     return _bz_ArrayExprOp<_bz_ArrayExprConstant<complex<T1> > , ArrayIterator<T_numtype2, N_rank2>,
 | 
|---|
 | 5313 |     _bz_unordered<complex<T1> ,T_numtype2> >(_bz_ArrayExprConstant<complex<T1> > (d1), d2.begin());
 | 
|---|
 | 5314 | }
 | 
|---|
 | 5315 | 
 | 
|---|
 | 5316 | #endif // BZ_HAVE_COMPLEX
 | 
|---|
 | 5317 | 
 | 
|---|
 | 5318 | #ifdef BZ_HAVE_COMPLEX
 | 
|---|
 | 5319 | template<class T1, class P_expr2>
 | 
|---|
 | 5320 | inline
 | 
|---|
 | 5321 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExprConstant<complex<T1> > , _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 5322 |     _bz_unordered<complex<T1> ,_bz_typename P_expr2::T_numtype> > >
 | 
|---|
 | 5323 | unordered(complex<T1> d1, _bz_ArrayExpr<P_expr2> d2)
 | 
|---|
 | 5324 | {
 | 
|---|
 | 5325 |     return _bz_ArrayExprOp<_bz_ArrayExprConstant<complex<T1> > , _bz_ArrayExpr<P_expr2>,
 | 
|---|
 | 5326 |     _bz_unordered<complex<T1> ,_bz_typename P_expr2::T_numtype> >(_bz_ArrayExprConstant<complex<T1> > (d1), d2);
 | 
|---|
 | 5327 | }
 | 
|---|
 | 5328 | 
 | 
|---|
 | 5329 | #endif // BZ_HAVE_COMPLEX
 | 
|---|
 | 5330 | 
 | 
|---|
 | 5331 | #ifdef BZ_HAVE_COMPLEX
 | 
|---|
 | 5332 | template<class T1, int N_index2>
 | 
|---|
 | 5333 | inline
 | 
|---|
 | 5334 | _bz_ArrayExpr<_bz_ArrayExprOp<_bz_ArrayExprConstant<complex<T1> > , IndexPlaceholder<N_index2>,
 | 
|---|
 | 5335 |     _bz_unordered<complex<T1> ,int> > >
 | 
|---|
 | 5336 | unordered(complex<T1> d1, IndexPlaceholder<N_index2> d2)
 | 
|---|
 | 5337 | {
 | 
|---|
 | 5338 |     return _bz_ArrayExprOp<_bz_ArrayExprConstant<complex<T1> > , IndexPlaceholder<N_index2>,
 | 
|---|
 | 5339 |     _bz_unordered<complex<T1> ,int> >(_bz_ArrayExprConstant<complex<T1> > (d1), d2);
 | 
|---|
 | 5340 | }
 | 
|---|
 | 5341 | 
 | 
|---|
 | 5342 | #endif // BZ_HAVE_COMPLEX
 | 
|---|
 | 5343 | 
 | 
|---|
 | 5344 | #endif
 | 
|---|
 | 5345 | 
 | 
|---|
 | 5346 | /****************************************************************************
 | 
|---|
 | 5347 |  * y0
 | 
|---|
 | 5348 |  ****************************************************************************/
 | 
|---|
 | 5349 | 
 | 
|---|
 | 5350 | #ifdef BZ_HAVE_IEEE_MATH
 | 
|---|
 | 5351 | template<class T_numtype1, int N_rank1>
 | 
|---|
 | 5352 | inline
 | 
|---|
 | 5353 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<ArrayIterator<T_numtype1, N_rank1>,
 | 
|---|
 | 5354 |     _bz_y0<T_numtype1> > >
 | 
|---|
 | 5355 | y0(const Array<T_numtype1, N_rank1>& d1)
 | 
|---|
 | 5356 | {
 | 
|---|
 | 5357 |     return _bz_ArrayExprUnaryOp<ArrayIterator<T_numtype1, N_rank1>,
 | 
|---|
 | 5358 |     _bz_y0<T_numtype1> >(d1.begin());
 | 
|---|
 | 5359 | }
 | 
|---|
 | 5360 | 
 | 
|---|
 | 5361 | template<class P_expr1>
 | 
|---|
 | 5362 | inline
 | 
|---|
 | 5363 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<_bz_ArrayExpr<P_expr1>,
 | 
|---|
 | 5364 |     _bz_y0<_bz_typename P_expr1::T_numtype> > >
 | 
|---|
 | 5365 | y0(_bz_ArrayExpr<P_expr1> d1)
 | 
|---|
 | 5366 | {
 | 
|---|
 | 5367 |     return _bz_ArrayExprUnaryOp<_bz_ArrayExpr<P_expr1>,
 | 
|---|
 | 5368 |     _bz_y0<_bz_typename P_expr1::T_numtype> >(d1);
 | 
|---|
 | 5369 | }
 | 
|---|
 | 5370 | 
 | 
|---|
 | 5371 | template<int N_index1>
 | 
|---|
 | 5372 | inline
 | 
|---|
 | 5373 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<IndexPlaceholder<N_index1>,
 | 
|---|
 | 5374 |     _bz_y0<int> > >
 | 
|---|
 | 5375 | y0(IndexPlaceholder<N_index1> d1)
 | 
|---|
 | 5376 | {
 | 
|---|
 | 5377 |     return _bz_ArrayExprUnaryOp<IndexPlaceholder<N_index1>,
 | 
|---|
 | 5378 |     _bz_y0<int> >(d1);
 | 
|---|
 | 5379 | }
 | 
|---|
 | 5380 | 
 | 
|---|
 | 5381 | #endif
 | 
|---|
 | 5382 | 
 | 
|---|
 | 5383 | /****************************************************************************
 | 
|---|
 | 5384 |  * y1
 | 
|---|
 | 5385 |  ****************************************************************************/
 | 
|---|
 | 5386 | 
 | 
|---|
 | 5387 | #ifdef BZ_HAVE_IEEE_MATH
 | 
|---|
 | 5388 | template<class T_numtype1, int N_rank1>
 | 
|---|
 | 5389 | inline
 | 
|---|
 | 5390 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<ArrayIterator<T_numtype1, N_rank1>,
 | 
|---|
 | 5391 |     _bz_y1<T_numtype1> > >
 | 
|---|
 | 5392 | y1(const Array<T_numtype1, N_rank1>& d1)
 | 
|---|
 | 5393 | {
 | 
|---|
 | 5394 |     return _bz_ArrayExprUnaryOp<ArrayIterator<T_numtype1, N_rank1>,
 | 
|---|
 | 5395 |     _bz_y1<T_numtype1> >(d1.begin());
 | 
|---|
 | 5396 | }
 | 
|---|
 | 5397 | 
 | 
|---|
 | 5398 | template<class P_expr1>
 | 
|---|
 | 5399 | inline
 | 
|---|
 | 5400 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<_bz_ArrayExpr<P_expr1>,
 | 
|---|
 | 5401 |     _bz_y1<_bz_typename P_expr1::T_numtype> > >
 | 
|---|
 | 5402 | y1(_bz_ArrayExpr<P_expr1> d1)
 | 
|---|
 | 5403 | {
 | 
|---|
 | 5404 |     return _bz_ArrayExprUnaryOp<_bz_ArrayExpr<P_expr1>,
 | 
|---|
 | 5405 |     _bz_y1<_bz_typename P_expr1::T_numtype> >(d1);
 | 
|---|
 | 5406 | }
 | 
|---|
 | 5407 | 
 | 
|---|
 | 5408 | template<int N_index1>
 | 
|---|
 | 5409 | inline
 | 
|---|
 | 5410 | _bz_ArrayExpr<_bz_ArrayExprUnaryOp<IndexPlaceholder<N_index1>,
 | 
|---|
 | 5411 |     _bz_y1<int> > >
 | 
|---|
 | 5412 | y1(IndexPlaceholder<N_index1> d1)
 | 
|---|
 | 5413 | {
 | 
|---|
 | 5414 |     return _bz_ArrayExprUnaryOp<IndexPlaceholder<N_index1>,
 | 
|---|
 | 5415 |     _bz_y1<int> >(d1);
 | 
|---|
 | 5416 | }
 | 
|---|
 | 5417 | 
 | 
|---|
 | 5418 | #endif
 | 
|---|
 | 5419 | 
 | 
|---|
 | 5420 | BZ_NAMESPACE_END
 | 
|---|
 | 5421 | 
 | 
|---|
 | 5422 | #endif
 | 
|---|