isvector_2.m

Revision 495 (checked in by cbc, 12 years ago)	Initial import of Stark code.

Line
1	function l=isvector(v)
2	% function l=isvector(v)
3	%
4	% is the argument a vector (a matrix with only one non-singular dimension)
5	%
6	% input : v : matrix
7	%
8	% output : l : 1 if v is a vector
9	% 0 if v is not a vector
10	%
11	% version 1.0.0 last change 10.08.2000
12
13	% Gerd Krahmann, LDEO, Aug 2000
14
15	if length(find(size(v)>1))>1
16	l = 0;
17	else
18	l = 1;
19	end

Note: See TracBrowser for help on using the browser.