Menu
▾
▴
[Octave-cvsupdate] SF.net SVN: octave:[9101] trunk/octave-forge/extra/quaternion_oo
|
From: <par...@us...> - 2011-11-15 14:12:52
|
Revision: 9101
http://octave.svn.sourceforge.net/octave/?rev=9101&view=rev
Author: paramaniac
Date: 2011-11-15 14:12:41 +0000 (Tue, 15 Nov 2011)
Log Message:
-----------
quaternion_oo: minor style fixes
Modified Paths:
--------------
trunk/octave-forge/extra/quaternion_oo/inst/@quaternion/abs.m
trunk/octave-forge/extra/quaternion_oo/inst/@quaternion/columns.m
trunk/octave-forge/extra/quaternion_oo/inst/@quaternion/conj.m
trunk/octave-forge/extra/quaternion_oo/inst/@quaternion/ctranspose.m
trunk/octave-forge/extra/quaternion_oo/inst/@quaternion/diag.m
trunk/octave-forge/extra/quaternion_oo/inst/@quaternion/display.m
trunk/octave-forge/extra/quaternion_oo/inst/@quaternion/eq.m
trunk/octave-forge/extra/quaternion_oo/inst/@quaternion/horzcat.m
trunk/octave-forge/extra/quaternion_oo/inst/@quaternion/inv.m
trunk/octave-forge/extra/quaternion_oo/inst/@quaternion/ispure.m
trunk/octave-forge/extra/quaternion_oo/inst/@quaternion/ldivide.m
trunk/octave-forge/extra/quaternion_oo/inst/@quaternion/minus.m
trunk/octave-forge/extra/quaternion_oo/inst/@quaternion/mldivide.m
trunk/octave-forge/extra/quaternion_oo/inst/@quaternion/mpower.m
trunk/octave-forge/extra/quaternion_oo/inst/@quaternion/mrdivide.m
trunk/octave-forge/extra/quaternion_oo/inst/@quaternion/mtimes.m
trunk/octave-forge/extra/quaternion_oo/inst/@quaternion/norm.m
trunk/octave-forge/extra/quaternion_oo/inst/@quaternion/plus.m
trunk/octave-forge/extra/quaternion_oo/inst/@quaternion/private/norm2.m
trunk/octave-forge/extra/quaternion_oo/inst/@quaternion/quaternion.m
trunk/octave-forge/extra/quaternion_oo/inst/@quaternion/rdivide.m
trunk/octave-forge/extra/quaternion_oo/inst/@quaternion/rows.m
trunk/octave-forge/extra/quaternion_oo/inst/@quaternion/size.m
trunk/octave-forge/extra/quaternion_oo/inst/@quaternion/subsref.m
trunk/octave-forge/extra/quaternion_oo/inst/@quaternion/times.m
trunk/octave-forge/extra/quaternion_oo/inst/@quaternion/transpose.m
trunk/octave-forge/extra/quaternion_oo/inst/@quaternion/uminus.m
trunk/octave-forge/extra/quaternion_oo/inst/@quaternion/unit.m
trunk/octave-forge/extra/quaternion_oo/inst/@quaternion/vertcat.m
Added Paths:
-----------
trunk/octave-forge/extra/quaternion_oo/devel/q_2x2.m
Added: trunk/octave-forge/extra/quaternion_oo/devel/q_2x2.m
===================================================================
--- trunk/octave-forge/extra/quaternion_oo/devel/q_2x2.m (rev 0)
+++ trunk/octave-forge/extra/quaternion_oo/devel/q_2x2.m 2011-11-15 14:12:41 UTC (rev 9101)
@@ -0,0 +1,10 @@
+w = [2, 6; 10, 14];
+
+x = [3, 7; 11, 15];
+
+y = [4, 8; 12, 16];
+
+z = [5, 9; 13, 17];
+
+q = quaternion (w, x, y, z)
+
Modified: trunk/octave-forge/extra/quaternion_oo/inst/@quaternion/abs.m
===================================================================
--- trunk/octave-forge/extra/quaternion_oo/inst/@quaternion/abs.m 2011-11-15 14:04:39 UTC (rev 9100)
+++ trunk/octave-forge/extra/quaternion_oo/inst/@quaternion/abs.m 2011-11-15 14:12:41 UTC (rev 9101)
@@ -27,7 +27,6 @@
## Created: August 2010
## Version: 0.2
-
function b = abs (a)
if (nargin != 1)
@@ -36,4 +35,4 @@
b = sqrt (norm2 (a));
-endfunction
\ No newline at end of file
+endfunction
Modified: trunk/octave-forge/extra/quaternion_oo/inst/@quaternion/columns.m
===================================================================
--- trunk/octave-forge/extra/quaternion_oo/inst/@quaternion/columns.m 2011-11-15 14:04:39 UTC (rev 9100)
+++ trunk/octave-forge/extra/quaternion_oo/inst/@quaternion/columns.m 2011-11-15 14:12:41 UTC (rev 9101)
@@ -20,7 +20,6 @@
## Created: May 2010
## Version: 0.1
-
function c = columns (a)
if (nargin != 1)
@@ -29,4 +28,4 @@
c = columns (a.w);
-endfunction
\ No newline at end of file
+endfunction
Modified: trunk/octave-forge/extra/quaternion_oo/inst/@quaternion/conj.m
===================================================================
--- trunk/octave-forge/extra/quaternion_oo/inst/@quaternion/conj.m 2011-11-15 14:04:39 UTC (rev 9100)
+++ trunk/octave-forge/extra/quaternion_oo/inst/@quaternion/conj.m 2011-11-15 14:12:41 UTC (rev 9101)
@@ -27,7 +27,6 @@
## Created: May 2010
## Version: 0.1
-
function a = conj (a)
if (nargin != 1)
@@ -38,4 +37,4 @@
a.y = -a.y;
a.z = -a.z;
-endfunction
\ No newline at end of file
+endfunction
Modified: trunk/octave-forge/extra/quaternion_oo/inst/@quaternion/ctranspose.m
===================================================================
--- trunk/octave-forge/extra/quaternion_oo/inst/@quaternion/ctranspose.m 2011-11-15 14:04:39 UTC (rev 9100)
+++ trunk/octave-forge/extra/quaternion_oo/inst/@quaternion/ctranspose.m 2011-11-15 14:12:41 UTC (rev 9101)
@@ -14,13 +14,12 @@
## along with this program. If not, see <http://www.gnu.org/licenses/>.
## -*- texinfo -*-
-## Conjugate transpose of a quaternion. Used by Octave for "q'"
+## Conjugate transpose of a quaternion. Used by Octave for "q'".
## Author: Lukas Reichlin <luk...@gm...>
## Created: May 2010
## Version: 0.1
-
function a = ctranspose (a)
if (nargin != 1)
@@ -29,4 +28,4 @@
a = conj (transpose (a));
-endfunction
\ No newline at end of file
+endfunction
Modified: trunk/octave-forge/extra/quaternion_oo/inst/@quaternion/diag.m
===================================================================
--- trunk/octave-forge/extra/quaternion_oo/inst/@quaternion/diag.m 2011-11-15 14:04:39 UTC (rev 9100)
+++ trunk/octave-forge/extra/quaternion_oo/inst/@quaternion/diag.m 2011-11-15 14:12:41 UTC (rev 9101)
@@ -28,7 +28,6 @@
## Created: May 2010
## Version: 0.1
-
function a = diag (a, b = 0)
if (nargin == 0 || nargin > 2)
@@ -40,4 +39,4 @@
a.y = diag (a.y, b);
a.z = diag (a.z, b);
-endfunction
\ No newline at end of file
+endfunction
Modified: trunk/octave-forge/extra/quaternion_oo/inst/@quaternion/display.m
===================================================================
--- trunk/octave-forge/extra/quaternion_oo/inst/@quaternion/display.m 2011-11-15 14:04:39 UTC (rev 9100)
+++ trunk/octave-forge/extra/quaternion_oo/inst/@quaternion/display.m 2011-11-15 14:12:41 UTC (rev 9101)
@@ -20,7 +20,6 @@
## Created: May 2010
## Version: 0.2
-
function display (q)
name = inputname(1);
Modified: trunk/octave-forge/extra/quaternion_oo/inst/@quaternion/eq.m
===================================================================
--- trunk/octave-forge/extra/quaternion_oo/inst/@quaternion/eq.m 2011-11-15 14:04:39 UTC (rev 9100)
+++ trunk/octave-forge/extra/quaternion_oo/inst/@quaternion/eq.m 2011-11-15 14:12:41 UTC (rev 9101)
@@ -14,13 +14,12 @@
## along with this program. If not, see <http://www.gnu.org/licenses/>.
## -*- texinfo -*-
-## Equal to operator for two quaternions. Used by Octave for "q1 == q2"
+## Equal to operator for two quaternions. Used by Octave for "q1 == q2".
## Author: Lukas Reichlin <luk...@gm...>
## Created: May 2010
## Version: 0.1
-
function flg = eq (a, b)
if (! isa (a, "quaternion"))
@@ -33,4 +32,4 @@
flg = (a.w == b.w) && (a.x == b.x) && (a.y == b.y) && (a.z == a.z);
-endfunction
\ No newline at end of file
+endfunction
Modified: trunk/octave-forge/extra/quaternion_oo/inst/@quaternion/horzcat.m
===================================================================
--- trunk/octave-forge/extra/quaternion_oo/inst/@quaternion/horzcat.m 2011-11-15 14:04:39 UTC (rev 9100)
+++ trunk/octave-forge/extra/quaternion_oo/inst/@quaternion/horzcat.m 2011-11-15 14:12:41 UTC (rev 9101)
@@ -14,13 +14,12 @@
## along with this program. If not, see <http://www.gnu.org/licenses/>.
## -*- texinfo -*-
-## Horizontal concatenation of quaternions. Used by Octave for "[q1, q2]"
+## Horizontal concatenation of quaternions. Used by Octave for "[q1, q2]".
## Author: Lukas Reichlin <luk...@gm...>
## Created: May 2010
## Version: 0.1
-
function q = horzcat (varargin)
qstr = cellfun (@quaternion, varargin); # uniformoutput = true !
@@ -32,4 +31,4 @@
q = quaternion (w, x, y, z);
-endfunction
\ No newline at end of file
+endfunction
Modified: trunk/octave-forge/extra/quaternion_oo/inst/@quaternion/inv.m
===================================================================
--- trunk/octave-forge/extra/quaternion_oo/inst/@quaternion/inv.m 2011-11-15 14:04:39 UTC (rev 9100)
+++ trunk/octave-forge/extra/quaternion_oo/inst/@quaternion/inv.m 2011-11-15 14:12:41 UTC (rev 9101)
@@ -22,7 +22,6 @@
## Created: May 2010
## Version: 0.2
-
function a = inv (a)
if (nargin != 1)
@@ -42,4 +41,4 @@
a.y = -a.y / norm2;
a.z = -a.z / norm2;
-endfunction
\ No newline at end of file
+endfunction
Modified: trunk/octave-forge/extra/quaternion_oo/inst/@quaternion/ispure.m
===================================================================
--- trunk/octave-forge/extra/quaternion_oo/inst/@quaternion/ispure.m 2011-11-15 14:04:39 UTC (rev 9100)
+++ trunk/octave-forge/extra/quaternion_oo/inst/@quaternion/ispure.m 2011-11-15 14:12:41 UTC (rev 9101)
@@ -22,7 +22,6 @@
## Created: May 2010
## Version: 0.1
-
function flg = ispure (a)
if (nargin != 1)
@@ -31,4 +30,4 @@
flg = all (all (abs (a.w) < eps));
-endfunction
\ No newline at end of file
+endfunction
Modified: trunk/octave-forge/extra/quaternion_oo/inst/@quaternion/ldivide.m
===================================================================
--- trunk/octave-forge/extra/quaternion_oo/inst/@quaternion/ldivide.m 2011-11-15 14:04:39 UTC (rev 9100)
+++ trunk/octave-forge/extra/quaternion_oo/inst/@quaternion/ldivide.m 2011-11-15 14:12:41 UTC (rev 9101)
@@ -14,15 +14,14 @@
## along with this program. If not, see <http://www.gnu.org/licenses/>.
## -*- texinfo -*-
-## Element-wise left division for quaternions. Used by Octave for "q1 .\ q2"
+## Element-wise left division for quaternions. Used by Octave for "q1 .\ q2".
## Author: Lukas Reichlin <luk...@gm...>
## Created: May 2010
## Version: 0.1
-
function q = ldivide (a, b)
q = a.^-1 .* b;
-endfunction
\ No newline at end of file
+endfunction
Modified: trunk/octave-forge/extra/quaternion_oo/inst/@quaternion/minus.m
===================================================================
--- trunk/octave-forge/extra/quaternion_oo/inst/@quaternion/minus.m 2011-11-15 14:04:39 UTC (rev 9100)
+++ trunk/octave-forge/extra/quaternion_oo/inst/@quaternion/minus.m 2011-11-15 14:12:41 UTC (rev 9101)
@@ -14,13 +14,12 @@
## along with this program. If not, see <http://www.gnu.org/licenses/>.
## -*- texinfo -*-
-## Subtraction of two quaternions. Used by Octave for "q1 - q2"
+## Subtraction of two quaternions. Used by Octave for "q1 - q2".
## Author: Lukas Reichlin <luk...@gm...>
## Created: May 2010
## Version: 0.1
-
function a = minus (a, b)
if (! isa (a, "quaternion"))
@@ -36,4 +35,4 @@
a.y = a.y - b.y;
a.z = a.z - b.z;
-endfunction
\ No newline at end of file
+endfunction
Modified: trunk/octave-forge/extra/quaternion_oo/inst/@quaternion/mldivide.m
===================================================================
--- trunk/octave-forge/extra/quaternion_oo/inst/@quaternion/mldivide.m 2011-11-15 14:04:39 UTC (rev 9100)
+++ trunk/octave-forge/extra/quaternion_oo/inst/@quaternion/mldivide.m 2011-11-15 14:12:41 UTC (rev 9101)
@@ -14,15 +14,14 @@
## along with this program. If not, see <http://www.gnu.org/licenses/>.
## -*- texinfo -*-
-## Matrix left division for quaternions. Used by Octave for "q1 \ q2"
+## Matrix left division for quaternions. Used by Octave for "q1 \ q2".
## Author: Lukas Reichlin <luk...@gm...>
## Created: May 2010
## Version: 0.1
-
function q = mldivide (a, b)
q = inv (a) * b;
-endfunction
\ No newline at end of file
+endfunction
Modified: trunk/octave-forge/extra/quaternion_oo/inst/@quaternion/mpower.m
===================================================================
--- trunk/octave-forge/extra/quaternion_oo/inst/@quaternion/mpower.m 2011-11-15 14:04:39 UTC (rev 9100)
+++ trunk/octave-forge/extra/quaternion_oo/inst/@quaternion/mpower.m 2011-11-15 14:12:41 UTC (rev 9101)
@@ -20,7 +20,6 @@
## Created: May 2010
## Version: 0.1
-
function a = mpower (a, b)
if (b == -1 && isa (a, "quaternion") && isscalar (a.w))
@@ -32,4 +31,4 @@
## TODO: - q1 ^ q2
## - arrays
-endfunction
\ No newline at end of file
+endfunction
Modified: trunk/octave-forge/extra/quaternion_oo/inst/@quaternion/mrdivide.m
===================================================================
--- trunk/octave-forge/extra/quaternion_oo/inst/@quaternion/mrdivide.m 2011-11-15 14:04:39 UTC (rev 9100)
+++ trunk/octave-forge/extra/quaternion_oo/inst/@quaternion/mrdivide.m 2011-11-15 14:12:41 UTC (rev 9101)
@@ -14,15 +14,14 @@
## along with this program. If not, see <http://www.gnu.org/licenses/>.
## -*- texinfo -*-
-## Matrix right division for quaternions. Used by Octave for "q1 / q2"
+## Matrix right division for quaternions. Used by Octave for "q1 / q2".
## Author: Lukas Reichlin <luk...@gm...>
## Created: May 2010
## Version: 0.1
-
function q = mrdivide (a, b)
q = a * inv (b);
-endfunction
\ No newline at end of file
+endfunction
Modified: trunk/octave-forge/extra/quaternion_oo/inst/@quaternion/mtimes.m
===================================================================
--- trunk/octave-forge/extra/quaternion_oo/inst/@quaternion/mtimes.m 2011-11-15 14:04:39 UTC (rev 9100)
+++ trunk/octave-forge/extra/quaternion_oo/inst/@quaternion/mtimes.m 2011-11-15 14:12:41 UTC (rev 9101)
@@ -14,13 +14,12 @@
## along with this program. If not, see <http://www.gnu.org/licenses/>.
## -*- texinfo -*-
-## Matrix multiplication of two quaternions. Used by Octave for "q1 * q2"
+## Matrix multiplication of two quaternions. Used by Octave for "q1 * q2".
## Author: Lukas Reichlin <luk...@gm...>
## Created: May 2010
## Version: 0.1
-
function a = mtimes (a, b)
if (! isa (a, "quaternion"))
@@ -41,4 +40,4 @@
a.y = y;
a.z = z;
-endfunction
\ No newline at end of file
+endfunction
Modified: trunk/octave-forge/extra/quaternion_oo/inst/@quaternion/norm.m
===================================================================
--- trunk/octave-forge/extra/quaternion_oo/inst/@quaternion/norm.m 2011-11-15 14:04:39 UTC (rev 9100)
+++ trunk/octave-forge/extra/quaternion_oo/inst/@quaternion/norm.m 2011-11-15 14:12:41 UTC (rev 9101)
@@ -22,7 +22,6 @@
## Created: November 2011
## Version: 0.1
-
function n = norm (a)
if (nargin != 1)
Modified: trunk/octave-forge/extra/quaternion_oo/inst/@quaternion/plus.m
===================================================================
--- trunk/octave-forge/extra/quaternion_oo/inst/@quaternion/plus.m 2011-11-15 14:04:39 UTC (rev 9100)
+++ trunk/octave-forge/extra/quaternion_oo/inst/@quaternion/plus.m 2011-11-15 14:12:41 UTC (rev 9101)
@@ -14,13 +14,12 @@
## along with this program. If not, see <http://www.gnu.org/licenses/>.
## -*- texinfo -*-
-## Addition of two quaternions. Used by Octave for "q1 + q2"
+## Addition of two quaternions. Used by Octave for "q1 + q2".
## Author: Lukas Reichlin <luk...@gm...>
## Created: May 2010
## Version: 0.1
-
function a = plus (a, b)
if (! isa (a, "quaternion"))
@@ -36,4 +35,4 @@
a.y = a.y + b.y;
a.z = a.z + b.z;
-endfunction
\ No newline at end of file
+endfunction
Modified: trunk/octave-forge/extra/quaternion_oo/inst/@quaternion/private/norm2.m
===================================================================
--- trunk/octave-forge/extra/quaternion_oo/inst/@quaternion/private/norm2.m 2011-11-15 14:04:39 UTC (rev 9100)
+++ trunk/octave-forge/extra/quaternion_oo/inst/@quaternion/private/norm2.m 2011-11-15 14:12:41 UTC (rev 9101)
@@ -22,9 +22,8 @@
## Created: November 2011
## Version: 0.1
-
function ret = norm2 (a)
ret = a.w.^2 + a.x.^2 + a.y.^2 + a.z.^2;
-endfunction
\ No newline at end of file
+endfunction
Modified: trunk/octave-forge/extra/quaternion_oo/inst/@quaternion/quaternion.m
===================================================================
--- trunk/octave-forge/extra/quaternion_oo/inst/@quaternion/quaternion.m 2011-11-15 14:04:39 UTC (rev 9100)
+++ trunk/octave-forge/extra/quaternion_oo/inst/@quaternion/quaternion.m 2011-11-15 14:12:41 UTC (rev 9101)
@@ -28,7 +28,6 @@
## Created: May 2010
## Version: 0.2
-
function q = quaternion (a, b, c, d)
switch (nargin)
Modified: trunk/octave-forge/extra/quaternion_oo/inst/@quaternion/rdivide.m
===================================================================
--- trunk/octave-forge/extra/quaternion_oo/inst/@quaternion/rdivide.m 2011-11-15 14:04:39 UTC (rev 9100)
+++ trunk/octave-forge/extra/quaternion_oo/inst/@quaternion/rdivide.m 2011-11-15 14:12:41 UTC (rev 9101)
@@ -14,15 +14,14 @@
## along with this program. If not, see <http://www.gnu.org/licenses/>.
## -*- texinfo -*-
-## Element-wise right division for quaternions. Used by Octave for "q1 ./ q2"
+## Element-wise right division for quaternions. Used by Octave for "q1 ./ q2".
## Author: Lukas Reichlin <luk...@gm...>
## Created: May 2010
## Version: 0.1
-
function q = rdivide (a, b)
q = a .* b.^-1;
-endfunction
\ No newline at end of file
+endfunction
Modified: trunk/octave-forge/extra/quaternion_oo/inst/@quaternion/rows.m
===================================================================
--- trunk/octave-forge/extra/quaternion_oo/inst/@quaternion/rows.m 2011-11-15 14:04:39 UTC (rev 9100)
+++ trunk/octave-forge/extra/quaternion_oo/inst/@quaternion/rows.m 2011-11-15 14:12:41 UTC (rev 9101)
@@ -20,7 +20,6 @@
## Created: May 2010
## Version: 0.1
-
function r = rows (a)
if (nargin != 1)
@@ -29,4 +28,4 @@
r = rows (a.w);
-endfunction
\ No newline at end of file
+endfunction
Modified: trunk/octave-forge/extra/quaternion_oo/inst/@quaternion/size.m
===================================================================
--- trunk/octave-forge/extra/quaternion_oo/inst/@quaternion/size.m 2011-11-15 14:04:39 UTC (rev 9100)
+++ trunk/octave-forge/extra/quaternion_oo/inst/@quaternion/size.m 2011-11-15 14:12:41 UTC (rev 9101)
@@ -20,7 +20,6 @@
## Created: May 2010
## Version: 0.1
-
function [s, varargout] = size (a, b)
switch (nargout)
@@ -47,4 +46,4 @@
print_usage ();
endswitch
-endfunction
\ No newline at end of file
+endfunction
Modified: trunk/octave-forge/extra/quaternion_oo/inst/@quaternion/subsref.m
===================================================================
--- trunk/octave-forge/extra/quaternion_oo/inst/@quaternion/subsref.m 2011-11-15 14:04:39 UTC (rev 9100)
+++ trunk/octave-forge/extra/quaternion_oo/inst/@quaternion/subsref.m 2011-11-15 14:12:41 UTC (rev 9101)
@@ -14,13 +14,12 @@
## along with this program. If not, see <http://www.gnu.org/licenses/>.
## -*- texinfo -*-
-## Subscripted reference for quaternions. Used by Octave for "q.w"
+## Subscripted reference for quaternions. Used by Octave for "q.w".
## Author: Lukas Reichlin <luk...@gm...>
## Created: May 2010
## Version: 0.1.1
-
function ret = subsref (q, s)
switch (s(1).type)
@@ -77,4 +76,4 @@
error ("quaternion: invalid subscript type");
endswitch
-endfunction
\ No newline at end of file
+endfunction
Modified: trunk/octave-forge/extra/quaternion_oo/inst/@quaternion/times.m
===================================================================
--- trunk/octave-forge/extra/quaternion_oo/inst/@quaternion/times.m 2011-11-15 14:04:39 UTC (rev 9100)
+++ trunk/octave-forge/extra/quaternion_oo/inst/@quaternion/times.m 2011-11-15 14:12:41 UTC (rev 9101)
@@ -14,13 +14,12 @@
## along with this program. If not, see <http://www.gnu.org/licenses/>.
## -*- texinfo -*-
-## Element-wise multiplication of two quaternions. Used by Octave for "q1 .* q2"
+## Element-wise multiplication of two quaternions. Used by Octave for "q1 .* q2".
## Author: Lukas Reichlin <luk...@gm...>
## Created: May 2010
## Version: 0.1
-
function a = times (a, b)
if (! isa (a, "quaternion"))
@@ -41,4 +40,4 @@
a.y = y;
a.z = z;
-endfunction
\ No newline at end of file
+endfunction
Modified: trunk/octave-forge/extra/quaternion_oo/inst/@quaternion/transpose.m
===================================================================
--- trunk/octave-forge/extra/quaternion_oo/inst/@quaternion/transpose.m 2011-11-15 14:04:39 UTC (rev 9100)
+++ trunk/octave-forge/extra/quaternion_oo/inst/@quaternion/transpose.m 2011-11-15 14:12:41 UTC (rev 9101)
@@ -14,13 +14,12 @@
## along with this program. If not, see <http://www.gnu.org/licenses/>.
## -*- texinfo -*-
-## Transpose of a quaternion. Used by Octave for "q.'"
+## Transpose of a quaternion. Used by Octave for "q.'".
## Author: Lukas Reichlin <luk...@gm...>
## Created: May 2010
## Version: 0.1
-
function a = transpose (a)
if (nargin != 1)
@@ -32,4 +31,4 @@
a.y = transpose (a.y);
a.z = transpose (a.z);
-endfunction
\ No newline at end of file
+endfunction
Modified: trunk/octave-forge/extra/quaternion_oo/inst/@quaternion/uminus.m
===================================================================
--- trunk/octave-forge/extra/quaternion_oo/inst/@quaternion/uminus.m 2011-11-15 14:04:39 UTC (rev 9100)
+++ trunk/octave-forge/extra/quaternion_oo/inst/@quaternion/uminus.m 2011-11-15 14:12:41 UTC (rev 9101)
@@ -14,13 +14,12 @@
## along with this program. If not, see <http://www.gnu.org/licenses/>.
## -*- texinfo -*-
-## Unary minus of a quaternion. Used by Octave for "-q"
+## Unary minus of a quaternion. Used by Octave for "-q".
## Author: Lukas Reichlin <luk...@gm...>
## Created: May 2010
## Version: 0.1
-
function a = uminus (a)
a.w = -a.w;
@@ -28,4 +27,4 @@
a.y = -a.y;
a.z = -a.z;
-endfunction
\ No newline at end of file
+endfunction
Modified: trunk/octave-forge/extra/quaternion_oo/inst/@quaternion/unit.m
===================================================================
--- trunk/octave-forge/extra/quaternion_oo/inst/@quaternion/unit.m 2011-11-15 14:04:39 UTC (rev 9100)
+++ trunk/octave-forge/extra/quaternion_oo/inst/@quaternion/unit.m 2011-11-15 14:12:41 UTC (rev 9101)
@@ -27,7 +27,6 @@
## Created: November 2011
## Version: 0.1
-
function q = unit (a)
if (nargin != 1)
@@ -36,4 +35,4 @@
q = a ./ abs (a);
-endfunction
\ No newline at end of file
+endfunction
Modified: trunk/octave-forge/extra/quaternion_oo/inst/@quaternion/vertcat.m
===================================================================
--- trunk/octave-forge/extra/quaternion_oo/inst/@quaternion/vertcat.m 2011-11-15 14:04:39 UTC (rev 9100)
+++ trunk/octave-forge/extra/quaternion_oo/inst/@quaternion/vertcat.m 2011-11-15 14:12:41 UTC (rev 9101)
@@ -14,13 +14,12 @@
## along with this program. If not, see <http://www.gnu.org/licenses/>.
## -*- texinfo -*-
-## Vertical concatenation of quaternions. Used by Octave for "[q1; q2]"
+## Vertical concatenation of quaternions. Used by Octave for "[q1; q2]".
## Author: Lukas Reichlin <luk...@gm...>
## Created: May 2010
## Version: 0.1
-
function q = vertcat (varargin)
qstr = cellfun (@quaternion, varargin); # uniformoutput = true !
@@ -32,4 +31,4 @@
q = quaternion (w, x, y, z);
-endfunction
\ No newline at end of file
+endfunction
This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.
|
