annotate spzeros.m @ 1039:a8ee5eca0e6c
feature/burgers1d
Allow for the residual normalization function to return a vector. Also change the default normalization from normalizing on norm(u-mean(u),inf) to norm(u/2), since this proved to be better for 1d burgers
| author |
Vidar Stiernström <vidar.stiernstrom@it.uu.se> |
| date |
Fri, 18 Jan 2019 09:06:20 +0100 |
| parents |
13d2f20c0c0d |
| children |
|
| rev |
line source |
|
488
|
1 function S = spzeros(varargin)
|
|
|
2 switch length(varargin)
|
|
|
3 case 2
|
|
|
4 S = sparse(varargin{1}, varargin{2});
|
|
|
5 case 1
|
|
|
6 v = varargin{1};
|
|
|
7 switch length(v)
|
|
|
8 case 1
|
|
|
9 S = sparse(v,v);
|
|
|
10 case 2
|
|
|
11 S = sparse(v(1), v(2));
|
|
|
12 otherwise
|
|
|
13 error('Input must be either one integer, two integers or a vector with two integers');
|
|
|
14 end
|
|
|
15 otherwise
|
|
|
16 error('Too many input arguments.');
|
|
|
17 end
|
|
|
18 end
|
