Mercurial > hg > octave-lyh

comparison scripts/general/shift.m @ 6046:34f96dd5441b

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2006-10-10 16:10:25 by jwe]
author jwe
date Tue, 10 Oct 2006 16:10:31 +0000
parents e9cde940b271
children 93c65f2a5668
comparison
equal deleted inserted replaced
6045:421d8a903df7 6046:34f96dd5441b
33 ## Adapted-By: jwe 33 ## Adapted-By: jwe
34 34
35 function y = shift (x, b, dim) 35 function y = shift (x, b, dim)
36 36
37 if (nargin != 2 && nargin != 3) 37 if (nargin != 2 && nargin != 3)
38 usage ("shift (X, b, dim)"); 38 print_usage ();
39 endif 39 endif
40 40
41 if (! (isscalar (b) && b == round (b))) 41 if (! (isscalar (b) && b == round (b)))
42 error ("shift: b must be an integer"); 42 error ("shift: b must be an integer");
43 endif 43 endif