Mercurial > repos > public > sbplib
comparison +blockmatrix/fromMatrix.m @ 425:e56dbd9e4196 feature/grids
Merge feature/beams
author | Jonatan Werpers <jonatan@werpers.com> |
---|---|
date | Tue, 07 Feb 2017 16:09:02 +0100 |
parents | 3974dccff55b |
children |
comparison
equal
deleted
inserted
replaced
423:a2cb0d4f4a02 | 425:e56dbd9e4196 |
---|---|
11 for i = 1:length(d1) | 11 for i = 1:length(d1) |
12 J = 1; | 12 J = 1; |
13 for j = 1:length(d2) | 13 for j = 1:length(d2) |
14 Asub = A(I:(I + d1(i)-1), J:(J + d2(j)-1)); | 14 Asub = A(I:(I + d1(i)-1), J:(J + d2(j)-1)); |
15 if nnz(Asub) == 0 | 15 if nnz(Asub) == 0 |
16 bm{i,j} = []; | 16 bm{i,j} = sparse(d1(i), d2(j)); |
17 else | 17 else |
18 bm{i,j} = Asub; | 18 bm{i,j} = Asub; |
19 end | 19 end |
20 J = J + d2(j); | 20 J = J + d2(j); |
21 end | 21 end |