Mercurial > octave-nkf

diff scripts/quaternion/qtransvmat.m @ 4030:22bd65326ec1

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2002-08-09 18:58:13 by jwe]
author jwe
date Fri, 09 Aug 2002 19:00:16 +0000
parents d25bc039237b
children 0ab4fd8ded30
line wrap: on
line diff
--- a/scripts/quaternion/qtransvmat.m	Fri Aug 09 07:38:55 2002 +0000
+++ b/scripts/quaternion/qtransvmat.m	Fri Aug 09 19:00:16 2002 +0000
@@ -29,7 +29,7 @@
 
 function Aib = qtransvmat (qib)
 
-  if (! is_vector(qib) || length (qib) != 4)
+  if (! isvector(qib) || length (qib) != 4)
     error ("qtransvmat: q(%d,%d) must be a quaternion", rows (qib), \
 	   columns (qib));
   elseif (max (abs (imag (qib))) != 0)