Mercurial > hg > smallbox
comparison util/SL_A.m @ 129:5a6cef81227e
Merge from branch "ivand_dev"
author | Ivan Damnjanovic lnx <ivan.damnjanovic@eecs.qmul.ac.uk> |
---|---|
date | Mon, 13 Jun 2011 14:58:00 +0100 |
parents | 8e660fd14774 |
children |
comparison
equal
deleted
inserted
replaced
127:6f78b069e541 | 129:5a6cef81227e |
---|---|
1 function y = SL_A(A, mode, m, n, x, I, dim) | 1 function y = SL_A(A, mode, m, n, x, I, dim) |
2 %%% Sparco to SparseLab implicit matix conversion | 2 %% Sparco to SparseLab implicit matix conversion |
3 % This is auxilary function to allow implicit matrices from SPARCO | |
4 % to be used with SparsLab solvers | |
5 | |
3 % Centre for Digital Music, Queen Mary, University of London. | 6 % Centre for Digital Music, Queen Mary, University of London. |
4 % This file copyright 2009 Ivan Damnjanovic. | 7 % This file copyright 2009 Ivan Damnjanovic. |
5 % | 8 % |
6 % This program is free software; you can redistribute it and/or | 9 % This program is free software; you can redistribute it and/or |
7 % modify it under the terms of the GNU General Public License as | 10 % modify it under the terms of the GNU General Public License as |
8 % published by the Free Software Foundation; either version 2 of the | 11 % published by the Free Software Foundation; either version 2 of the |
9 % License, or (at your option) any later version. See the file | 12 % License, or (at your option) any later version. See the file |
10 % COPYING included with this distribution for more information. | 13 % COPYING included with this distribution for more information. |
11 % | 14 %% |
12 % This is auxilary function to allow implicit matrices from SPARCO | |
13 % to be used with SparsLab solvers | |
14 | 15 |
15 if (mode == 1) | 16 if (mode == 1) |
16 | 17 |
17 u = zeros(dim, 1); | 18 u = zeros(dim, 1); |
18 u(I) = x; | 19 u(I) = x; |