| 1028 | } |
| 1029 | |
| 1030 | void BaseVectorPtrMV :: SetScalar (double s) |
| 1031 | { |
| 1032 | static Timer t("BaseVector-MV :: SetScalar"); |
| 1033 | RegionTimer reg(t); |
| 1034 | |
| 1035 | ParallelForRange |
| 1036 | (refvec->FVDouble().Size(), [&] (IntRange myrange) |
| 1037 | { |
| 1038 | for (int i = 0; i < Size(); i++) |
| 1039 | vecs[i]->FVDouble().Range(myrange) = s; |
| 1040 | }); |
| 1041 | } |
| 1042 | |
| 1043 | void BaseVectorPtrMV :: Add (const MultiVector & v2, FlatMatrix<double> mat) |
| 1044 | { |