File indexing completed on 2025-01-18 09:43:03
0001
0002
0003
0004
0005
0006
0007
0008
0009 #ifndef ASSIGNMENT_HPP
0010 #define ASSIGNMENT_HPP
0011
0012 #include <boost/numeric/ublas/vector_expression.hpp>
0013 #include <boost/numeric/ublas/matrix_expression.hpp>
0014
0015
0016
0017
0018
0019 namespace boost { namespace numeric { namespace ublas {
0020
0021
0022
0023
0024
0025 template <class TV>
0026 class index_manipulator {
0027 public:
0028 typedef TV type;
0029 BOOST_UBLAS_INLINE
0030 const type &operator () () const {
0031 return *static_cast<const type *> (this);
0032 }
0033 BOOST_UBLAS_INLINE
0034 type &operator () () {
0035 return *static_cast<type *> (this);
0036 }
0037 };
0038
0039
0040
0041
0042
0043
0044
0045
0046 template <typename T>
0047 class vector_move_to_manip: public index_manipulator<vector_move_to_manip<T> > {
0048 public:
0049 BOOST_UBLAS_INLINE
0050 vector_move_to_manip(const T &k): i(k) { }
0051
0052 template <typename V>
0053 BOOST_UBLAS_INLINE
0054 void manip(V &k) const { k=i; }
0055 private:
0056 T i;
0057 };
0058
0059
0060
0061
0062
0063
0064
0065
0066
0067
0068
0069
0070
0071
0072
0073
0074
0075
0076
0077 template <typename T>
0078 BOOST_UBLAS_INLINE vector_move_to_manip<T> move_to(T i) {
0079 return vector_move_to_manip<T>(i);
0080 }
0081
0082
0083
0084
0085
0086
0087
0088
0089 template <std::size_t I>
0090 class static_vector_move_to_manip: public index_manipulator<static_vector_move_to_manip<I> > {
0091 public:
0092 template <typename V>
0093 BOOST_UBLAS_INLINE
0094 void manip(V &k) const { k=I; }
0095 };
0096
0097
0098
0099
0100
0101
0102
0103
0104
0105
0106
0107
0108
0109
0110
0111
0112
0113
0114
0115
0116 template <std::size_t I>
0117 BOOST_UBLAS_INLINE static_vector_move_to_manip<I> move_to() {
0118 return static_vector_move_to_manip<I>();
0119 }
0120
0121
0122
0123
0124
0125
0126
0127
0128 template <typename T>
0129 class vector_move_manip: public index_manipulator<vector_move_manip<T> > {
0130 public:
0131 BOOST_UBLAS_INLINE
0132 vector_move_manip(const T &k): i(k) { }
0133
0134 template <typename V>
0135 BOOST_UBLAS_INLINE void manip(V &k) const { k+=i; }
0136 private:
0137 T i;
0138 };
0139
0140
0141
0142
0143
0144
0145
0146
0147
0148
0149
0150
0151
0152
0153
0154
0155
0156
0157
0158
0159 template <typename T>
0160 BOOST_UBLAS_INLINE vector_move_manip<T> move(T i) {
0161 return vector_move_manip<T>(i);
0162 }
0163
0164
0165
0166
0167
0168
0169
0170
0171
0172
0173
0174 template <std::ptrdiff_t I>
0175 class static_vector_move_manip: public index_manipulator<static_vector_move_manip<I> > {
0176 public:
0177 template <typename V>
0178 BOOST_UBLAS_INLINE void manip(V &k) const {
0179
0180
0181 k = k + I;
0182 }
0183 };
0184
0185
0186
0187
0188
0189
0190
0191
0192
0193
0194
0195
0196
0197
0198
0199
0200
0201
0202
0203
0204
0205
0206 template <std::ptrdiff_t I>
0207 static_vector_move_manip<I> move() {
0208 return static_vector_move_manip<I>();
0209 }
0210
0211
0212
0213
0214
0215
0216
0217
0218
0219
0220
0221 template <typename T>
0222 class matrix_move_to_manip: public index_manipulator<matrix_move_to_manip<T> > {
0223 public:
0224 BOOST_UBLAS_INLINE
0225 matrix_move_to_manip(T k, T l): i(k), j(l) { }
0226
0227 template <typename V1, typename V2>
0228 BOOST_UBLAS_INLINE
0229 void manip(V1 &k, V2 &l) const {
0230 k=i;
0231 l=j;
0232 }
0233 private:
0234 T i, j;
0235 };
0236
0237
0238
0239
0240
0241
0242
0243
0244
0245
0246
0247
0248
0249
0250
0251
0252
0253
0254
0255
0256
0257
0258
0259
0260
0261
0262 template <typename T>
0263 BOOST_UBLAS_INLINE matrix_move_to_manip<T> move_to(T i, T j) {
0264 return matrix_move_to_manip<T>(i, j);
0265 }
0266
0267
0268
0269
0270
0271
0272
0273
0274
0275
0276
0277 template <std::size_t I,std::size_t J>
0278 class static_matrix_move_to_manip: public index_manipulator<static_matrix_move_to_manip<I, J> > {
0279 public:
0280 template <typename V, typename K>
0281 BOOST_UBLAS_INLINE
0282 void manip(V &k, K &l) const {
0283 k=I;
0284 l=J;
0285 }
0286 };
0287
0288
0289
0290
0291
0292
0293
0294
0295
0296
0297
0298
0299
0300
0301
0302
0303
0304
0305
0306
0307
0308
0309
0310 template <std::size_t I, std::size_t J>
0311 BOOST_UBLAS_INLINE static_matrix_move_to_manip<I, J> move_to() {
0312 return static_matrix_move_to_manip<I, J>();
0313 }
0314
0315
0316
0317
0318
0319
0320
0321
0322
0323 template <typename T>
0324 class matrix_move_manip: public index_manipulator<matrix_move_manip<T> > {
0325 public:
0326 BOOST_UBLAS_INLINE
0327 matrix_move_manip(T k, T l): i(k), j(l) { }
0328
0329 template <typename V, typename K>
0330 BOOST_UBLAS_INLINE
0331 void manip(V &k, K &l) const {
0332 k+=i;
0333 l+=j;
0334 }
0335 private:
0336 T i, j;
0337 };
0338
0339
0340
0341
0342
0343
0344
0345
0346
0347
0348
0349
0350
0351
0352
0353
0354
0355
0356
0357
0358
0359
0360
0361
0362 template <typename T>
0363 BOOST_UBLAS_INLINE matrix_move_manip<T> move(T i, T j) {
0364 return matrix_move_manip<T>(i, j);
0365 }
0366
0367
0368
0369
0370
0371
0372
0373
0374
0375
0376
0377 template <std::ptrdiff_t I, std::ptrdiff_t J>
0378 class static_matrix_move_manip: public index_manipulator<static_matrix_move_manip<I, J> > {
0379 public:
0380 template <typename V, typename K>
0381 BOOST_UBLAS_INLINE
0382 void manip(V &k, K &l) const {
0383
0384
0385 k = k + I;
0386 l = l + J;
0387 }
0388 };
0389
0390
0391
0392
0393
0394
0395
0396
0397
0398
0399
0400
0401
0402
0403
0404
0405
0406
0407
0408
0409
0410
0411
0412
0413
0414
0415
0416
0417 template <std::ptrdiff_t I, std::ptrdiff_t J>
0418 BOOST_UBLAS_INLINE static_matrix_move_manip<I, J> move() {
0419 return static_matrix_move_manip<I, J>();
0420 }
0421
0422
0423
0424
0425
0426
0427
0428
0429
0430 class begin1_manip: public index_manipulator<begin1_manip > {
0431 public:
0432 template <typename V, typename K>
0433 BOOST_UBLAS_INLINE
0434 void manip(V & k, K &) const {
0435 k=0;
0436 }
0437 };
0438
0439
0440
0441
0442
0443
0444
0445
0446
0447
0448
0449
0450
0451
0452
0453
0454
0455
0456
0457
0458
0459
0460
0461 inline begin1_manip begin1() {
0462 return begin1_manip();
0463 }
0464
0465
0466
0467
0468
0469
0470
0471
0472
0473
0474 class begin2_manip: public index_manipulator<begin2_manip > {
0475 public:
0476 template <typename V, typename K>
0477 BOOST_UBLAS_INLINE
0478 void manip(V &, K &l) const {
0479 l=0;
0480 }
0481 };
0482
0483
0484
0485
0486
0487
0488
0489
0490
0491
0492
0493
0494
0495
0496
0497
0498
0499
0500
0501
0502
0503
0504
0505 inline begin2_manip begin2() {
0506 return begin2_manip();
0507 }
0508
0509
0510
0511
0512
0513
0514
0515
0516
0517
0518 class next_row_manip: public index_manipulator<next_row_manip> {
0519 public:
0520 template <typename V, typename K>
0521 BOOST_UBLAS_INLINE
0522 void manip(V &k, K &l) const {
0523 k++;
0524 l=0;
0525 }
0526 };
0527
0528
0529
0530
0531
0532
0533
0534
0535
0536
0537
0538
0539
0540
0541
0542
0543
0544
0545
0546
0547
0548
0549
0550 inline next_row_manip next_row() {
0551 return next_row_manip();
0552 }
0553
0554
0555
0556
0557
0558
0559
0560
0561
0562 class next_column_manip: public index_manipulator<next_column_manip> {
0563 public:
0564 template <typename V, typename K>
0565 BOOST_UBLAS_INLINE
0566 void manip(V &k, K &l) const {
0567 k=0;
0568 l++;
0569 }
0570 };
0571
0572
0573
0574
0575
0576
0577
0578
0579
0580
0581
0582
0583
0584
0585
0586
0587
0588
0589
0590
0591
0592
0593
0594 inline next_column_manip next_column() {
0595 return next_column_manip();
0596 }
0597
0598
0599
0600
0601
0602 template <class T>
0603 class fill_policy_wrapper {
0604 public:
0605 typedef T type;
0606 };
0607
0608
0609 namespace fill_policy {
0610
0611
0612
0613
0614
0615
0616
0617
0618
0619 class index_assign :public fill_policy_wrapper<index_assign> {
0620 public:
0621 template <class T, typename S, typename V>
0622 BOOST_UBLAS_INLINE
0623 static void apply(T &e, const S &i, const V &v) {
0624 e()(i) = v;
0625 }
0626 template <class T, typename S, typename V>
0627 BOOST_UBLAS_INLINE
0628 static void apply(T &e, const S &i, const S &j, const V &v) {
0629 e()(i, j) = v;
0630 }
0631 };
0632
0633
0634
0635
0636
0637
0638
0639
0640
0641 class index_plus_assign :public fill_policy_wrapper<index_plus_assign> {
0642 public:
0643 template <class T, typename S, typename V>
0644 BOOST_UBLAS_INLINE
0645 static void apply(T &e, const S &i, const V &v) {
0646 e()(i) += v;
0647 }
0648 template <class T, typename S, typename V>
0649 BOOST_UBLAS_INLINE
0650 static void apply(T &e, const S &i, const S &j, const V &v) {
0651 e()(i, j) += v;
0652 }
0653 };
0654
0655
0656
0657
0658
0659
0660
0661
0662
0663 class index_minus_assign :public fill_policy_wrapper<index_minus_assign> {
0664 public:
0665 template <class T, typename S, typename V>
0666 BOOST_UBLAS_INLINE
0667 static void apply(T &e, const S &i, const V &v) {
0668 e()(i) -= v;
0669 }
0670 template <class T, typename S, typename V>
0671 BOOST_UBLAS_INLINE
0672 static void apply(T &e, const S &i, const S &j, const V &v) {
0673 e()(i, j) -= v;
0674 }
0675 };
0676
0677
0678
0679
0680
0681
0682
0683
0684
0685
0686 class sparse_push_back :public fill_policy_wrapper<sparse_push_back > {
0687 public:
0688 template <class T, class S, class V>
0689 BOOST_UBLAS_INLINE
0690 static void apply(T &e, const S &i, const V &v) {
0691 e().push_back(i, v);
0692 }
0693 template <class T, class S, class V>
0694 BOOST_UBLAS_INLINE
0695 static void apply(T &e, const S &i, const S &j, const V &v) {
0696 e().push_back(i,j, v);
0697 }
0698 };
0699
0700
0701
0702
0703
0704
0705
0706
0707 class sparse_insert :public fill_policy_wrapper<sparse_insert> {
0708 public:
0709 template <class T, class S, class V>
0710 BOOST_UBLAS_INLINE
0711 static void apply(T &e, const S &i, const V &v) {
0712 e().insert_element(i, v);
0713 }
0714 template <class T, class S, class V>
0715 BOOST_UBLAS_INLINE
0716 static void apply(T &e, const S &i, const S &j, const V &v) {
0717 e().insert_element(i,j, v);
0718 }
0719 };
0720
0721 }
0722
0723
0724
0725
0726 template <class T>
0727 class traverse_policy_wrapper {
0728 public:
0729 typedef T type;
0730 };
0731
0732
0733 namespace traverse_policy {
0734
0735
0736
0737
0738
0739
0740
0741 struct no_wrap {
0742
0743
0744
0745 template <class S1, class S2, class S3>
0746 BOOST_UBLAS_INLINE
0747 static void apply1(const S1 &, S2 &, S3 &) {
0748 }
0749
0750
0751
0752
0753 template <class S1, class S2, class S3>
0754 BOOST_UBLAS_INLINE
0755 static void apply2(const S1 &, const S1 &, S2 &, S3 &) {
0756 }
0757 };
0758
0759
0760
0761
0762
0763
0764 struct wrap {
0765
0766
0767
0768 template <class S1, class S2, class S3>
0769 BOOST_UBLAS_INLINE
0770 static void apply1(const S1 &s, S2 &i1, S3 &i2) {
0771 if (i2>=s) {
0772 i1++;
0773 i2=0;
0774 }
0775 }
0776
0777
0778
0779
0780 template <class S1, class S2, class S3>
0781 BOOST_UBLAS_INLINE
0782 static void apply2(const S1 &s1, const S1 &s2, S2 &i1, S3 &i2) {
0783 if (i2>=s2) i2=0;
0784 else i1-=s1;
0785 }
0786 };
0787
0788
0789
0790
0791
0792
0793
0794
0795
0796
0797
0798
0799
0800
0801 template <class Wrap = wrap>
0802 class by_row_policy :public traverse_policy_wrapper<by_row_policy<Wrap> > {
0803 public:
0804 template <typename S1, typename S2>
0805 BOOST_UBLAS_INLINE
0806 static void advance(S1 &, S2 &j) { j++;}
0807
0808 template <class E1, class E2, typename S1, typename S2, typename S3, typename S4, typename S5>
0809 BOOST_UBLAS_INLINE
0810 static bool next(const E1 &e, const E2 &me, S1 &i, S2 &j, const S3 &, const S3 &j0, S4 &k, S5 &l) {
0811 l++; j++;
0812 if (l>=e().size2()) {
0813 l=0; k++; j=j0; i++;
0814
0815
0816
0817
0818 if (k>=e().size1()) {
0819 j=j0+e().size2();
0820 Wrap::apply2(e().size1(), me().size2(), i, j);
0821 return false;
0822 }
0823 }
0824 return true;
0825 }
0826
0827 template <class E, typename S1, typename S2>
0828 BOOST_UBLAS_INLINE
0829 static void apply_wrap(const E& e, S1 &i, S2 &j) {
0830 Wrap::apply1(e().size2(), i, j);
0831 }
0832 };
0833
0834
0835
0836
0837
0838
0839
0840
0841
0842
0843
0844
0845
0846
0847 template <class Wrap = wrap>
0848 class by_column_policy :public traverse_policy_wrapper<by_column_policy<Wrap> > {
0849 public:
0850 template <typename S1, typename S2>
0851 BOOST_UBLAS_INLINE
0852 static void advance(S1 &i, S2 &) { i++;}
0853
0854 template <class E1, class E2, typename S1, typename S2, typename S3, typename S4, typename S5>
0855 BOOST_UBLAS_INLINE
0856 static bool next(const E1 &e, const E2 &me, S1 &i, S2 &j, const S3 &i0, const S3 &, S4 &k, S5 &l) {
0857 k++; i++;
0858 if (k>=e().size1()) {
0859 k=0; l++; i=i0; j++;
0860
0861
0862
0863
0864 if (l>=e().size2()) {
0865 i=i0+e().size1();
0866 Wrap::apply2(e().size2(), me().size1(), j, i);
0867 return false;
0868 }
0869 }
0870 return true;
0871 }
0872
0873 template <class E, typename S1, typename S2>
0874 BOOST_UBLAS_INLINE
0875 static void apply_wrap(const E& e, S1 &i, S2 &j) {
0876 Wrap::apply1(e().size1(), j, i);
0877 }
0878 };
0879 }
0880 #ifndef BOOST_UBLAS_DEFAULT_NO_WRAP_POLICY
0881 typedef traverse_policy::wrap DEFAULT_WRAP_POLICY;
0882 #else
0883 typedef traverse_policy::no_wrap DEFAULT_WRAP_POLICY;
0884 #endif
0885
0886 #ifndef BOOST_UBLAS_DEFAULT_ASSIGN_BY_COLUMN
0887 typedef traverse_policy::by_row_policy<DEFAULT_WRAP_POLICY> DEFAULT_TRAVERSE_POLICY;
0888 #else
0889 typedef traverse_policy::by_column<DEFAULT_WRAP_POLICY> DEFAULT_TRAVERSE_POLICY;
0890 #endif
0891
0892
0893 namespace traverse_policy {
0894
0895 inline by_row_policy<DEFAULT_WRAP_POLICY> by_row() {
0896 return by_row_policy<DEFAULT_WRAP_POLICY>();
0897 }
0898
0899 inline by_row_policy<wrap> by_row_wrap() {
0900 return by_row_policy<wrap>();
0901 }
0902
0903 inline by_row_policy<no_wrap> by_row_no_wrap() {
0904 return by_row_policy<no_wrap>();
0905 }
0906
0907 inline by_column_policy<DEFAULT_WRAP_POLICY> by_column() {
0908 return by_column_policy<DEFAULT_WRAP_POLICY>();
0909 }
0910
0911 inline by_column_policy<wrap> by_column_wrap() {
0912 return by_column_policy<wrap>();
0913 }
0914
0915 inline by_column_policy<no_wrap> by_column_no_wrap() {
0916 return by_column_policy<no_wrap>();
0917 }
0918
0919 }
0920
0921
0922
0923
0924
0925
0926
0927
0928
0929 template <class E, class Fill_Policy = fill_policy::index_assign>
0930 class vector_expression_assigner {
0931 public:
0932 typedef typename E::expression_type::value_type value_type;
0933 typedef typename E::expression_type::size_type size_type;
0934
0935 BOOST_UBLAS_INLINE
0936 vector_expression_assigner(E &e):ve(&e), i(0) {
0937 }
0938
0939 BOOST_UBLAS_INLINE
0940 vector_expression_assigner(size_type k, E &e):ve(&e), i(k) {
0941
0942
0943 }
0944
0945 BOOST_UBLAS_INLINE
0946 vector_expression_assigner(E &e, value_type val):ve(&e), i(0) {
0947 operator,(val);
0948 }
0949
0950 template <class AE>
0951 BOOST_UBLAS_INLINE
0952 vector_expression_assigner(E &e, const vector_expression<AE> &nve):ve(&e), i(0) {
0953 operator,(nve);
0954 }
0955
0956 template <typename T>
0957 BOOST_UBLAS_INLINE
0958 vector_expression_assigner(E &e, const index_manipulator<T> &ta):ve(&e), i(0) {
0959 operator,(ta);
0960 }
0961
0962 BOOST_UBLAS_INLINE
0963 vector_expression_assigner &operator, (const value_type& val) {
0964 apply(val);
0965 return *this;
0966 }
0967
0968 template <class AE>
0969 BOOST_UBLAS_INLINE
0970 vector_expression_assigner &operator, (const vector_expression<AE> &nve) {
0971 for (typename AE::size_type k = 0; k!= nve().size(); k++)
0972 operator,(nve()(k));
0973 return *this;
0974 }
0975
0976 template <typename T>
0977 BOOST_UBLAS_INLINE
0978 vector_expression_assigner &operator, (const index_manipulator<T> &ta) {
0979 ta().manip(i);
0980 return *this;
0981 }
0982
0983 template <class T>
0984 BOOST_UBLAS_INLINE
0985 vector_expression_assigner<E, T> operator, (fill_policy_wrapper<T>) const {
0986 return vector_expression_assigner<E, T>(i, *ve);
0987 }
0988
0989 private:
0990 BOOST_UBLAS_INLINE
0991 vector_expression_assigner &apply(const typename E::expression_type::value_type& val) {
0992 Fill_Policy::apply(*ve, i++, val);
0993 return *this;
0994 }
0995
0996 private:
0997 E *ve;
0998 size_type i;
0999 };
1000
1001
1002
1003
1004
1005
1006
1007
1008
1009
1010
1011
1012
1013
1014
1015
1016
1017
1018
1019
1020
1021
1022
1023
1024
1025
1026
1027
1028
1029
1030
1031
1032
1033
1034
1035
1036
1037
1038
1039
1040
1041
1042
1043
1044
1045
1046
1047
1048
1049
1050
1051
1052 template <class E>
1053 BOOST_UBLAS_INLINE
1054 vector_expression_assigner<vector_expression<E> > operator<<=(vector_expression<E> &v, const typename E::value_type &val) {
1055 return vector_expression_assigner<vector_expression<E> >(v,val);
1056 }
1057
1058
1059
1060
1061
1062
1063
1064
1065 template <class E1, class E2>
1066 BOOST_UBLAS_INLINE
1067 vector_expression_assigner<vector_expression<E1> > operator<<=(vector_expression<E1> &v, const vector_expression<E2> &ve) {
1068 return vector_expression_assigner<vector_expression<E1> >(v,ve);
1069 }
1070
1071
1072
1073
1074
1075
1076
1077
1078 template <class E, typename T>
1079 BOOST_UBLAS_INLINE
1080 vector_expression_assigner<vector_expression<E> > operator<<=(vector_expression<E> &v, const index_manipulator<T> &nv) {
1081 return vector_expression_assigner<vector_expression<E> >(v,nv);
1082 }
1083
1084
1085
1086
1087
1088
1089
1090
1091 template <class E, typename T>
1092 BOOST_UBLAS_INLINE
1093 vector_expression_assigner<vector_expression<E>, T> operator<<=(vector_expression<E> &v, fill_policy_wrapper<T>) {
1094 return vector_expression_assigner<vector_expression<E>, T>(v);
1095 }
1096
1097
1098
1099
1100
1101
1102
1103
1104
1105 template <class E, class Fill_Policy = fill_policy::index_assign, class Traverse_Policy = DEFAULT_TRAVERSE_POLICY >
1106 class matrix_expression_assigner {
1107 public:
1108 typedef typename E::expression_type::size_type size_type;
1109
1110 BOOST_UBLAS_INLINE
1111 matrix_expression_assigner(E &e): me(&e), i(0), j(0) {
1112 }
1113
1114 BOOST_UBLAS_INLINE
1115 matrix_expression_assigner(E &e, size_type k, size_type l): me(&e), i(k), j(l) {
1116 }
1117
1118 BOOST_UBLAS_INLINE
1119 matrix_expression_assigner(E &e, typename E::expression_type::value_type val): me(&e), i(0), j(0) {
1120 operator,(val);
1121 }
1122
1123 template <class AE>
1124 BOOST_UBLAS_INLINE
1125 matrix_expression_assigner(E &e, const vector_expression<AE> &nve):me(&e), i(0), j(0) {
1126 operator,(nve);
1127 }
1128
1129 template <class AE>
1130 BOOST_UBLAS_INLINE
1131 matrix_expression_assigner(E &e, const matrix_expression<AE> &nme):me(&e), i(0), j(0) {
1132 operator,(nme);
1133 }
1134
1135 template <typename T>
1136 BOOST_UBLAS_INLINE
1137 matrix_expression_assigner(E &e, const index_manipulator<T> &ta):me(&e), i(0), j(0) {
1138 operator,(ta);
1139 }
1140
1141 BOOST_UBLAS_INLINE
1142 matrix_expression_assigner &operator, (const typename E::expression_type::value_type& val) {
1143 Traverse_Policy::apply_wrap(*me, i ,j);
1144 return apply(val);
1145 }
1146
1147 template <class AE>
1148 BOOST_UBLAS_INLINE
1149 matrix_expression_assigner &operator, (const vector_expression<AE> &nve) {
1150 for (typename AE::size_type k = 0; k!= nve().size(); k++) {
1151 operator,(nve()(k));
1152 }
1153 return *this;
1154 }
1155
1156 template <class AE>
1157 BOOST_UBLAS_INLINE
1158 matrix_expression_assigner &operator, (const matrix_expression<AE> &nme) {
1159 return apply(nme);
1160 }
1161
1162 template <typename T>
1163 BOOST_UBLAS_INLINE
1164 matrix_expression_assigner &operator, (const index_manipulator<T> &ta) {
1165 ta().manip(i, j);
1166 return *this;
1167 }
1168
1169 template <class T>
1170 BOOST_UBLAS_INLINE
1171 matrix_expression_assigner<E, T, Traverse_Policy> operator, (fill_policy_wrapper<T>) const {
1172 return matrix_expression_assigner<E, T, Traverse_Policy>(*me, i, j);
1173 }
1174
1175
1176 template <class T>
1177 BOOST_UBLAS_INLINE
1178 matrix_expression_assigner<E, Fill_Policy, T> operator, (traverse_policy_wrapper<T>) {
1179 Traverse_Policy::apply_wrap(*me, i ,j);
1180 return matrix_expression_assigner<E, Fill_Policy, T>(*me, i, j);
1181 }
1182
1183 private:
1184 BOOST_UBLAS_INLINE
1185 matrix_expression_assigner &apply(const typename E::expression_type::value_type& val) {
1186 Fill_Policy::apply(*me, i, j, val);
1187 Traverse_Policy::advance(i,j);
1188 return *this;
1189 }
1190
1191 template <class AE>
1192 BOOST_UBLAS_INLINE
1193 matrix_expression_assigner &apply(const matrix_expression<AE> &nme) {
1194 size_type bi = i;
1195 size_type bj = j;
1196 typename AE::size_type k=0, l=0;
1197 Fill_Policy::apply(*me, i, j, nme()(k, l));
1198 while (Traverse_Policy::next(nme, *me, i, j, bi, bj, k, l))
1199 Fill_Policy::apply(*me, i, j, nme()(k, l));
1200 return *this;
1201 }
1202
1203 private:
1204 E *me;
1205 size_type i, j;
1206 };
1207
1208
1209
1210
1211
1212
1213
1214
1215 template <class E>
1216 BOOST_UBLAS_INLINE
1217 matrix_expression_assigner<matrix_expression<E> > operator<<=(matrix_expression<E> &me, const typename E::value_type &val) {
1218 return matrix_expression_assigner<matrix_expression<E> >(me,val);
1219 }
1220
1221
1222
1223
1224
1225
1226
1227
1228 template <class E, typename T>
1229 BOOST_UBLAS_INLINE
1230 matrix_expression_assigner<matrix_expression<E>, T> operator<<=(matrix_expression<E> &me, fill_policy_wrapper<T>) {
1231 return matrix_expression_assigner<matrix_expression<E>, T>(me);
1232 }
1233
1234
1235
1236
1237
1238
1239
1240
1241 template <class E, typename T>
1242 BOOST_UBLAS_INLINE
1243 matrix_expression_assigner<matrix_expression<E> > operator<<=(matrix_expression<E> &me, const index_manipulator<T> &ta) {
1244 return matrix_expression_assigner<matrix_expression<E> >(me,ta);
1245 }
1246
1247
1248
1249
1250
1251
1252
1253
1254 template <class E, typename T>
1255 BOOST_UBLAS_INLINE
1256 matrix_expression_assigner<matrix_expression<E>, fill_policy::index_assign, T> operator<<=(matrix_expression<E> &me, traverse_policy_wrapper<T>) {
1257 return matrix_expression_assigner<matrix_expression<E>, fill_policy::index_assign, T>(me);
1258 }
1259
1260
1261
1262
1263
1264
1265
1266
1267 template <class E1, class E2>
1268 BOOST_UBLAS_INLINE
1269 matrix_expression_assigner<matrix_expression<E1> > operator<<=(matrix_expression<E1> &me, const vector_expression<E2> &ve) {
1270 return matrix_expression_assigner<matrix_expression<E1> >(me,ve);
1271 }
1272
1273
1274
1275
1276
1277
1278
1279
1280 template <class E1, class E2>
1281 BOOST_UBLAS_INLINE
1282 matrix_expression_assigner<matrix_expression<E1> > operator<<=(matrix_expression<E1> &me1, const matrix_expression<E2> &me2) {
1283 return matrix_expression_assigner<matrix_expression<E1> >(me1,me2);
1284 }
1285
1286 } } }
1287
1288 #endif