comparison util/SL_A.m @ 128:8e660fd14774 ivand_dev

Feature 186
author Ivan Damnjanovic lnx <ivan.damnjanovic@eecs.qmul.ac.uk>
date Mon, 13 Jun 2011 14:55:45 +0100
parents fc395272d53e
children
comparison
equal deleted inserted replaced
126:db5a7fe1a404 128:8e660fd14774
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;