| 1 | /*************************************************************************** | 
|---|
| 2 | * blitz/meta/matassign.h   TinyMatrix assignment metaprogram | 
|---|
| 3 | * | 
|---|
| 4 | * $Id: matassign.h,v 1.1.1.1 1999-04-09 17:59:03 ansari Exp $ | 
|---|
| 5 | * | 
|---|
| 6 | * Copyright (C) 1997,1998 Todd Veldhuizen <tveldhui@seurat.uwaterloo.ca> | 
|---|
| 7 | * | 
|---|
| 8 | * This program is free software; you can redistribute it and/or | 
|---|
| 9 | * modify it under the terms of the GNU General Public License | 
|---|
| 10 | * as published by the Free Software Foundation; either version 2 | 
|---|
| 11 | * of the License, or (at your option) any later version. | 
|---|
| 12 | * | 
|---|
| 13 | * This program is distributed in the hope that it will be useful, | 
|---|
| 14 | * but WITHOUT ANY WARRANTY; without even the implied warranty of | 
|---|
| 15 | * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the | 
|---|
| 16 | * GNU General Public License for more details. | 
|---|
| 17 | * | 
|---|
| 18 | * Suggestions:          blitz-suggest@cybervision.com | 
|---|
| 19 | * Bugs:                 blitz-bugs@cybervision.com | 
|---|
| 20 | * | 
|---|
| 21 | * For more information, please see the Blitz++ Home Page: | 
|---|
| 22 | *    http://seurat.uwaterloo.ca/blitz/ | 
|---|
| 23 | * | 
|---|
| 24 | *************************************************************************** | 
|---|
| 25 | * $Log: not supported by cvs2svn $ | 
|---|
| 26 | * Revision 1.2  1998/03/14 00:08:44  tveldhui | 
|---|
| 27 | * 0.2-alpha-05 | 
|---|
| 28 | * | 
|---|
| 29 | * Revision 1.1  1997/07/16 14:51:20  tveldhui | 
|---|
| 30 | * Update: Alpha release 0.2 (Arrays) | 
|---|
| 31 | * | 
|---|
| 32 | */ | 
|---|
| 33 |  | 
|---|
| 34 |  | 
|---|
| 35 | #ifndef BZ_META_MATASSIGN_H | 
|---|
| 36 | #define BZ_META_MATASSIGN_H | 
|---|
| 37 |  | 
|---|
| 38 | BZ_NAMESPACE(blitz) | 
|---|
| 39 |  | 
|---|
| 40 | template<int N_rows, int N_columns, int I, int J> | 
|---|
| 41 | class _bz_meta_matAssign2 { | 
|---|
| 42 | public: | 
|---|
| 43 | enum { go = (J < N_columns - 1) ? 1 : 0 }; | 
|---|
| 44 |  | 
|---|
| 45 | template<class T_matrix, class T_expr, class T_updater> | 
|---|
| 46 | static inline void f(T_matrix& mat, T_expr expr, T_updater u) | 
|---|
| 47 | { | 
|---|
| 48 | u.update(mat(I,J), expr(I,J)); | 
|---|
| 49 | _bz_meta_matAssign2<N_rows * go, N_columns * go, I * go, (J+1) * go> | 
|---|
| 50 | ::f(mat, expr, u); | 
|---|
| 51 | } | 
|---|
| 52 | }; | 
|---|
| 53 |  | 
|---|
| 54 | template<> | 
|---|
| 55 | class _bz_meta_matAssign2<0,0,0,0> { | 
|---|
| 56 | public: | 
|---|
| 57 | template<class T_matrix, class T_expr, class T_updater> | 
|---|
| 58 | static inline void f(T_matrix& mat, T_expr expr, T_updater u) | 
|---|
| 59 | { } | 
|---|
| 60 | }; | 
|---|
| 61 |  | 
|---|
| 62 | template<int N_rows, int N_columns, int I> | 
|---|
| 63 | class _bz_meta_matAssign { | 
|---|
| 64 | public: | 
|---|
| 65 | enum { go = (I < N_rows-1) ? 1 : 0 }; | 
|---|
| 66 |  | 
|---|
| 67 | template<class T_matrix, class T_expr, class T_updater> | 
|---|
| 68 | static inline void f(T_matrix& mat, T_expr expr, T_updater u) | 
|---|
| 69 | { | 
|---|
| 70 | _bz_meta_matAssign2<N_rows, N_columns, I, 0>::f(mat, expr, u); | 
|---|
| 71 | _bz_meta_matAssign<N_rows * go, N_columns * go, (I+1) * go> | 
|---|
| 72 | ::f(mat, expr, u); | 
|---|
| 73 | } | 
|---|
| 74 | }; | 
|---|
| 75 |  | 
|---|
| 76 | template<> | 
|---|
| 77 | class _bz_meta_matAssign<0,0,0> { | 
|---|
| 78 | public: | 
|---|
| 79 | template<class T_matrix, class T_expr, class T_updater> | 
|---|
| 80 | static inline void f(T_matrix& mat, T_expr expr, T_updater u) | 
|---|
| 81 | { } | 
|---|
| 82 | }; | 
|---|
| 83 |  | 
|---|
| 84 |  | 
|---|
| 85 | BZ_NAMESPACE_END | 
|---|
| 86 |  | 
|---|
| 87 | #endif // BZ_META_ASSIGN_H | 
|---|