annotate spzeros.m @ 1113:47e86b5270ad feature/timesteppers

Change name of property k to dt in time.Timestepper
author Jonatan Werpers <jonatan@werpers.com>
date Wed, 10 Apr 2019 22:40:55 +0200
parents 13d2f20c0c0d
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
488
13d2f20c0c0d Add a function spzeros()
Jonatan Werpers <jonatan@werpers.com>
parents:
diff changeset
1 function S = spzeros(varargin)
13d2f20c0c0d Add a function spzeros()
Jonatan Werpers <jonatan@werpers.com>
parents:
diff changeset
2 switch length(varargin)
13d2f20c0c0d Add a function spzeros()
Jonatan Werpers <jonatan@werpers.com>
parents:
diff changeset
3 case 2
13d2f20c0c0d Add a function spzeros()
Jonatan Werpers <jonatan@werpers.com>
parents:
diff changeset
4 S = sparse(varargin{1}, varargin{2});
13d2f20c0c0d Add a function spzeros()
Jonatan Werpers <jonatan@werpers.com>
parents:
diff changeset
5 case 1
13d2f20c0c0d Add a function spzeros()
Jonatan Werpers <jonatan@werpers.com>
parents:
diff changeset
6 v = varargin{1};
13d2f20c0c0d Add a function spzeros()
Jonatan Werpers <jonatan@werpers.com>
parents:
diff changeset
7 switch length(v)
13d2f20c0c0d Add a function spzeros()
Jonatan Werpers <jonatan@werpers.com>
parents:
diff changeset
8 case 1
13d2f20c0c0d Add a function spzeros()
Jonatan Werpers <jonatan@werpers.com>
parents:
diff changeset
9 S = sparse(v,v);
13d2f20c0c0d Add a function spzeros()
Jonatan Werpers <jonatan@werpers.com>
parents:
diff changeset
10 case 2
13d2f20c0c0d Add a function spzeros()
Jonatan Werpers <jonatan@werpers.com>
parents:
diff changeset
11 S = sparse(v(1), v(2));
13d2f20c0c0d Add a function spzeros()
Jonatan Werpers <jonatan@werpers.com>
parents:
diff changeset
12 otherwise
13d2f20c0c0d Add a function spzeros()
Jonatan Werpers <jonatan@werpers.com>
parents:
diff changeset
13 error('Input must be either one integer, two integers or a vector with two integers');
13d2f20c0c0d Add a function spzeros()
Jonatan Werpers <jonatan@werpers.com>
parents:
diff changeset
14 end
13d2f20c0c0d Add a function spzeros()
Jonatan Werpers <jonatan@werpers.com>
parents:
diff changeset
15 otherwise
13d2f20c0c0d Add a function spzeros()
Jonatan Werpers <jonatan@werpers.com>
parents:
diff changeset
16 error('Too many input arguments.');
13d2f20c0c0d Add a function spzeros()
Jonatan Werpers <jonatan@werpers.com>
parents:
diff changeset
17 end
13d2f20c0c0d Add a function spzeros()
Jonatan Werpers <jonatan@werpers.com>
parents:
diff changeset
18 end