From: <jpi...@us...> - 2011-10-03 21:03:52
|
Revision: 8664 http://octave.svn.sourceforge.net/octave/?rev=8664&view=rev Author: jpicarbajal Date: 2011-10-03 21:03:42 +0000 (Mon, 03 Oct 2011) Log Message: ----------- geometry. Starting adaptation of matGeom Modified Paths: -------------- trunk/octave-forge/main/geometry/matGeom_raw/geom2d/Contents.m trunk/octave-forge/main/geometry/matGeom_raw/geom2d/angle3Points.m trunk/octave-forge/main/geometry/matGeom_raw/geom2d/angleAbsDiff.m trunk/octave-forge/main/geometry/matGeom_raw/geom2d/angleDiff.m trunk/octave-forge/main/geometry/matGeom_raw/geom2d/angleSort.m trunk/octave-forge/main/geometry/matGeom_raw/geom2d/angles2d.m trunk/octave-forge/main/geometry/matGeom_raw/geom2d/bisector.m trunk/octave-forge/main/geometry/matGeom_raw/geom2d/boxes2d.m trunk/octave-forge/main/geometry/matGeom_raw/geom2d/cartesianLine.m trunk/octave-forge/main/geometry/matGeom_raw/geom2d/centroid.m trunk/octave-forge/main/geometry/matGeom_raw/geom2d/changelog.txt trunk/octave-forge/main/geometry/matGeom_raw/geom2d/circleArcAsCurve.m trunk/octave-forge/main/geometry/matGeom_raw/geom2d/circleAsPolygon.m trunk/octave-forge/main/geometry/matGeom_raw/geom2d/circles2d.m trunk/octave-forge/main/geometry/matGeom_raw/geom2d/clipEdge.m trunk/octave-forge/main/geometry/matGeom_raw/geom2d/clipLine.m trunk/octave-forge/main/geometry/matGeom_raw/geom2d/clipLineRect.m trunk/octave-forge/main/geometry/matGeom_raw/geom2d/clipPoints.m trunk/octave-forge/main/geometry/matGeom_raw/geom2d/clipRay.m trunk/octave-forge/main/geometry/matGeom_raw/geom2d/crackPattern.m trunk/octave-forge/main/geometry/matGeom_raw/geom2d/crackPattern2.m trunk/octave-forge/main/geometry/matGeom_raw/geom2d/createBasisTransform.m trunk/octave-forge/main/geometry/matGeom_raw/geom2d/createCircle.m trunk/octave-forge/main/geometry/matGeom_raw/geom2d/createDirectedCircle.m trunk/octave-forge/main/geometry/matGeom_raw/geom2d/createEdge.m trunk/octave-forge/main/geometry/matGeom_raw/geom2d/createHomothecy.m trunk/octave-forge/main/geometry/matGeom_raw/geom2d/createLine.m trunk/octave-forge/main/geometry/matGeom_raw/geom2d/createLineReflection.m trunk/octave-forge/main/geometry/matGeom_raw/geom2d/createMedian.m trunk/octave-forge/main/geometry/matGeom_raw/geom2d/createRay.m trunk/octave-forge/main/geometry/matGeom_raw/geom2d/createRotation.m trunk/octave-forge/main/geometry/matGeom_raw/geom2d/createScaling.m trunk/octave-forge/main/geometry/matGeom_raw/geom2d/createTranslation.m trunk/octave-forge/main/geometry/matGeom_raw/geom2d/createVector.m trunk/octave-forge/main/geometry/matGeom_raw/geom2d/deg2rad.m trunk/octave-forge/main/geometry/matGeom_raw/geom2d/distancePointEdge.m trunk/octave-forge/main/geometry/matGeom_raw/geom2d/distancePointLine.m trunk/octave-forge/main/geometry/matGeom_raw/geom2d/distancePoints.m trunk/octave-forge/main/geometry/matGeom_raw/geom2d/drawArrow.m trunk/octave-forge/main/geometry/matGeom_raw/geom2d/drawBezierCurve.m trunk/octave-forge/main/geometry/matGeom_raw/geom2d/drawBox.m trunk/octave-forge/main/geometry/matGeom_raw/geom2d/drawCenteredEdge.m trunk/octave-forge/main/geometry/matGeom_raw/geom2d/drawCircle.m trunk/octave-forge/main/geometry/matGeom_raw/geom2d/drawCircleArc.m trunk/octave-forge/main/geometry/matGeom_raw/geom2d/drawEdge.m trunk/octave-forge/main/geometry/matGeom_raw/geom2d/drawEllipse.m trunk/octave-forge/main/geometry/matGeom_raw/geom2d/drawEllipseArc.m trunk/octave-forge/main/geometry/matGeom_raw/geom2d/drawLabels.m trunk/octave-forge/main/geometry/matGeom_raw/geom2d/drawLine.m trunk/octave-forge/main/geometry/matGeom_raw/geom2d/drawOrientedBox.m trunk/octave-forge/main/geometry/matGeom_raw/geom2d/drawParabola.m trunk/octave-forge/main/geometry/matGeom_raw/geom2d/drawPoint.m trunk/octave-forge/main/geometry/matGeom_raw/geom2d/drawRay.m trunk/octave-forge/main/geometry/matGeom_raw/geom2d/drawRect.m trunk/octave-forge/main/geometry/matGeom_raw/geom2d/drawRect2.m trunk/octave-forge/main/geometry/matGeom_raw/geom2d/drawShape.m trunk/octave-forge/main/geometry/matGeom_raw/geom2d/edgeAngle.m trunk/octave-forge/main/geometry/matGeom_raw/geom2d/edgeLength.m trunk/octave-forge/main/geometry/matGeom_raw/geom2d/edgePosition.m trunk/octave-forge/main/geometry/matGeom_raw/geom2d/edgeToLine.m trunk/octave-forge/main/geometry/matGeom_raw/geom2d/edges2d.m trunk/octave-forge/main/geometry/matGeom_raw/geom2d/ellipseAsPolygon.m trunk/octave-forge/main/geometry/matGeom_raw/geom2d/ellipses2d.m trunk/octave-forge/main/geometry/matGeom_raw/geom2d/enclosingCircle.m trunk/octave-forge/main/geometry/matGeom_raw/geom2d/fitAffineTransform2d.m trunk/octave-forge/main/geometry/matGeom_raw/geom2d/formatAngle.m trunk/octave-forge/main/geometry/matGeom_raw/geom2d/hexagonalGrid.m trunk/octave-forge/main/geometry/matGeom_raw/geom2d/homothecy.m trunk/octave-forge/main/geometry/matGeom_raw/geom2d/inCircle.m trunk/octave-forge/main/geometry/matGeom_raw/geom2d/inertiaEllipse.m trunk/octave-forge/main/geometry/matGeom_raw/geom2d/intersectBoxes.m trunk/octave-forge/main/geometry/matGeom_raw/geom2d/intersectCircles.m trunk/octave-forge/main/geometry/matGeom_raw/geom2d/intersectEdges.m trunk/octave-forge/main/geometry/matGeom_raw/geom2d/intersectLineCircle.m trunk/octave-forge/main/geometry/matGeom_raw/geom2d/intersectLineEdge.m trunk/octave-forge/main/geometry/matGeom_raw/geom2d/intersectLines.m trunk/octave-forge/main/geometry/matGeom_raw/geom2d/invertLine.m trunk/octave-forge/main/geometry/matGeom_raw/geom2d/isCounterClockwise.m trunk/octave-forge/main/geometry/matGeom_raw/geom2d/isLeftOriented.m trunk/octave-forge/main/geometry/matGeom_raw/geom2d/isParallel.m trunk/octave-forge/main/geometry/matGeom_raw/geom2d/isPerpendicular.m trunk/octave-forge/main/geometry/matGeom_raw/geom2d/isPointInCircle.m trunk/octave-forge/main/geometry/matGeom_raw/geom2d/isPointInEllipse.m trunk/octave-forge/main/geometry/matGeom_raw/geom2d/isPointOnCircle.m trunk/octave-forge/main/geometry/matGeom_raw/geom2d/isPointOnEdge.m trunk/octave-forge/main/geometry/matGeom_raw/geom2d/isPointOnLine.m trunk/octave-forge/main/geometry/matGeom_raw/geom2d/isPointOnRay.m trunk/octave-forge/main/geometry/matGeom_raw/geom2d/lineAngle.m trunk/octave-forge/main/geometry/matGeom_raw/geom2d/lineFit.m trunk/octave-forge/main/geometry/matGeom_raw/geom2d/linePosition.m trunk/octave-forge/main/geometry/matGeom_raw/geom2d/lineSymmetry.m trunk/octave-forge/main/geometry/matGeom_raw/geom2d/lines2d.m trunk/octave-forge/main/geometry/matGeom_raw/geom2d/medianLine.m trunk/octave-forge/main/geometry/matGeom_raw/geom2d/mergeBoxes.m trunk/octave-forge/main/geometry/matGeom_raw/geom2d/midPoint.m trunk/octave-forge/main/geometry/matGeom_raw/geom2d/minDistance.m trunk/octave-forge/main/geometry/matGeom_raw/geom2d/minDistancePoints.m trunk/octave-forge/main/geometry/matGeom_raw/geom2d/normalize.m trunk/octave-forge/main/geometry/matGeom_raw/geom2d/normalizeAngle.m trunk/octave-forge/main/geometry/matGeom_raw/geom2d/normalizeVector.m trunk/octave-forge/main/geometry/matGeom_raw/geom2d/onCircle.m trunk/octave-forge/main/geometry/matGeom_raw/geom2d/onEdge.m trunk/octave-forge/main/geometry/matGeom_raw/geom2d/onLine.m trunk/octave-forge/main/geometry/matGeom_raw/geom2d/onRay.m trunk/octave-forge/main/geometry/matGeom_raw/geom2d/orthogonalLine.m trunk/octave-forge/main/geometry/matGeom_raw/geom2d/parallelLine.m trunk/octave-forge/main/geometry/matGeom_raw/geom2d/pointOnLine.m trunk/octave-forge/main/geometry/matGeom_raw/geom2d/points2d.m trunk/octave-forge/main/geometry/matGeom_raw/geom2d/polarPoint.m trunk/octave-forge/main/geometry/matGeom_raw/geom2d/projPointOnLine.m trunk/octave-forge/main/geometry/matGeom_raw/geom2d/rad2deg.m trunk/octave-forge/main/geometry/matGeom_raw/geom2d/radicalAxis.m trunk/octave-forge/main/geometry/matGeom_raw/geom2d/randomPointInBox.m trunk/octave-forge/main/geometry/matGeom_raw/geom2d/rays2d.m trunk/octave-forge/main/geometry/matGeom_raw/geom2d/readme.txt trunk/octave-forge/main/geometry/matGeom_raw/geom2d/reverseEdge.m trunk/octave-forge/main/geometry/matGeom_raw/geom2d/reverseLine.m trunk/octave-forge/main/geometry/matGeom_raw/geom2d/rotateVector.m trunk/octave-forge/main/geometry/matGeom_raw/geom2d/rotation.m trunk/octave-forge/main/geometry/matGeom_raw/geom2d/scaling.m trunk/octave-forge/main/geometry/matGeom_raw/geom2d/squareGrid.m trunk/octave-forge/main/geometry/matGeom_raw/geom2d/transformEdge.m trunk/octave-forge/main/geometry/matGeom_raw/geom2d/transformLine.m trunk/octave-forge/main/geometry/matGeom_raw/geom2d/transformPoint.m trunk/octave-forge/main/geometry/matGeom_raw/geom2d/transformVector.m trunk/octave-forge/main/geometry/matGeom_raw/geom2d/transforms2d.m trunk/octave-forge/main/geometry/matGeom_raw/geom2d/translation.m trunk/octave-forge/main/geometry/matGeom_raw/geom2d/triangleGrid.m trunk/octave-forge/main/geometry/matGeom_raw/geom2d/vecnorm.m trunk/octave-forge/main/geometry/matGeom_raw/geom2d/vectorAngle.m trunk/octave-forge/main/geometry/matGeom_raw/geom2d/vectorNorm.m trunk/octave-forge/main/geometry/matGeom_raw/geom2d/vectors2d.m Added Paths: ----------- trunk/octave-forge/main/geometry/geom2d/ trunk/octave-forge/main/geometry/geom2d/angle2Points.m Removed Paths: ------------- trunk/octave-forge/main/geometry/matGeom_raw/geom2d/angle2Points.m Copied: trunk/octave-forge/main/geometry/geom2d/angle2Points.m (from rev 8663, trunk/octave-forge/main/geometry/matGeom_raw/geom2d/angle2Points.m) =================================================================== --- trunk/octave-forge/main/geometry/geom2d/angle2Points.m (rev 0) +++ trunk/octave-forge/main/geometry/geom2d/angle2Points.m 2011-10-03 21:03:42 UTC (rev 8664) @@ -0,0 +1,86 @@ +%% Copyright (c) 2007-2011, David Legland <dav...@gr...> +%% +%% All rights reserved. +%% +%% This program is free software; you can redistribute it and/or modify +%% it under the terms of the BSD License. For details see the COPYING +%% file included as part of this distribution. + +%% 2011 Adapted to Octave by Juan Pablo Carbajal <car...@if...> + +%% -*- texinfo -*- +%% @deftypefn {Function File} {@var{alpha} =} angle2Points (@var{p1}, @var{p2}) +%% Compute horizontal angle between 2 points +%% +%% @var{p1} and @var{p2} are either [1x2] arrays, or [Nx2] arrays, in this case +%% @var{alpha} is a [Nx1] array. The angle computed is the horizontal angle of +%% the line (@var{p1},@var{p2}). +%% +%% Result is always given in radians, between 0 and 2*pi. +%% +%% @seealso{points2d, angles2d, angle3points, normalizeAngle, vectorAngle} +%% +%% @end deftypefn + +function theta = angle2Points(varargin) + + % process input arguments + if length(varargin)==2 + p1 = varargin{1}; + p2 = varargin{2}; + elseif length(varargin)==1 + var = varargin{1}; + p1 = var(1,:); + p2 = var(2,:); + end + + % ensure data have correct size + n1 = size(p1, 1); + n2 = size(p2, 1); + if n1~=n2 && min(n1, n2)>1 + error('angle2Points: wrong size for inputs'); + end + + % angle of line (P2 P1), between 0 and 2*pi. + dp = bsxfun(@minus, p2, p1); + theta = mod(atan2(dp(:,2), dp(:,1)) + 2*pi, 2*pi); + +endfunction + +%!test +%! % all points inside window, possibly touching edges +%! p1 = [0 0]; +%! p2 = [10 0]; +%! angle_ = angle2Points (p1, p2); +%! assert (angle_,0,1e-6); +%! angle_ = angle2Points (p2, p1); +%! assert (angle_,pi,1e-6); + + +%!test +%! % all points inside window, possibly touching edges +%! p1 = [0 0]; +%! p2 = [0 10]; +%! angle_ = angle2Points (p1, p2); +%! assert (pi/2, angle_,1e-6); +%! angle_ = angle2Points (p2, p1); +%! assert (3*pi/2, angle_,1e-6); + +%!test +%! % all points inside window, possibly touching edges +%! p1 = [0 0;0 0;0 0;0 0]; +%! p2 = [10 0;10 10;0 10;-10 10]; +%! angle_ = angle2Points (p1, p2); +%! assert (size (p1, 1), size (angle_, 1)); +%! res = [0;pi/4;pi/2;3*pi/4]; +%! assert (res, angle_, 1e-6); + +%!test +%! % all points inside window, possibly touching edges +%! p1 = [0 0]; +%! p2 = [10 0;10 10;0 10;-10 10]; +%! angle_ = angle2Points (p1, p2); +%! assert(size (p2, 1), size (angle_, 1)); +%! res = [0;pi/4;pi/2;3*pi/4]; +%! assert(res, angle_,1e-6); + Modified: trunk/octave-forge/main/geometry/matGeom_raw/geom2d/Contents.m =================================================================== --- trunk/octave-forge/main/geometry/matGeom_raw/geom2d/Contents.m 2011-10-03 19:56:05 UTC (rev 8663) +++ trunk/octave-forge/main/geometry/matGeom_raw/geom2d/Contents.m 2011-10-03 21:03:42 UTC (rev 8664) @@ -1,3 +1,13 @@ +%% Copyright (c) 2010, David Legland <dav...@gr...> +%% +%% All rights reserved. +%% +%% This program is free software; you can redistribute it and/or modify +%% it under the terms of the BSD License. For details see the COPYING +%% file included as part of this distribution. + +%% 2011 Adapted to Octave by Juan Pablo Carbajal <car...@if...> + % GEOM2D Geometry 2D Toolbox % Version 1.0 21-Mar-2011 . % Deleted: trunk/octave-forge/main/geometry/matGeom_raw/geom2d/angle2Points.m =================================================================== --- trunk/octave-forge/main/geometry/matGeom_raw/geom2d/angle2Points.m 2011-10-03 19:56:05 UTC (rev 8663) +++ trunk/octave-forge/main/geometry/matGeom_raw/geom2d/angle2Points.m 2011-10-03 21:03:42 UTC (rev 8664) @@ -1,43 +0,0 @@ -function theta = angle2Points(varargin) -%ANGLE2POINTS Compute horizontal angle between 2 points -% -% ALPHA = angle2Points(P1, P2), -% Pi are either [1*2] arrays, or [N*2] arrays, in this case ALPHA is a -% [N*1] array. The angle computed is the horizontal angle of the line -% (P1 P2) -% Result is always given in radians, between 0 and 2*pi. -% -% See Also: -% points2d, angles2d, angle3points, normalizeAngle, vectorAngle -% -% -% --------- -% Author: David Legland -% e-mail: dav...@gr... -% created the 02/03/2007. -% Copyright 2010 INRA - Cepia Software Platform. - -% HISTORY: -% 2011-01-11 use bsxfun - -% process input arguments -if length(varargin)==2 - p1 = varargin{1}; - p2 = varargin{2}; -elseif length(varargin)==1 - var = varargin{1}; - p1 = var(1,:); - p2 = var(2,:); -end - -% ensure data have correct size -n1 = size(p1, 1); -n2 = size(p2, 1); -if n1~=n2 && min(n1, n2)>1 - error('angle2Points: wrong size for inputs'); -end - -% angle of line (P2 P1), between 0 and 2*pi. -dp = bsxfun(@minus, p2, p1); -theta = mod(atan2(dp(:,2), dp(:,1)) + 2*pi, 2*pi); - Modified: trunk/octave-forge/main/geometry/matGeom_raw/geom2d/angle3Points.m =================================================================== --- trunk/octave-forge/main/geometry/matGeom_raw/geom2d/angle3Points.m 2011-10-03 19:56:05 UTC (rev 8663) +++ trunk/octave-forge/main/geometry/matGeom_raw/geom2d/angle3Points.m 2011-10-03 21:03:42 UTC (rev 8664) @@ -1,3 +1,13 @@ +%% Copyright (c) 2010, David Legland <dav...@gr...> +%% +%% All rights reserved. +%% +%% This program is free software; you can redistribute it and/or modify +%% it under the terms of the BSD License. For details see the COPYING +%% file included as part of this distribution. + +%% 2011 Adapted to Octave by Juan Pablo Carbajal <car...@if...> + function theta = angle3Points(varargin) %ANGLE3POINTS Compute oriented angle made by 3 points % Modified: trunk/octave-forge/main/geometry/matGeom_raw/geom2d/angleAbsDiff.m =================================================================== --- trunk/octave-forge/main/geometry/matGeom_raw/geom2d/angleAbsDiff.m 2011-10-03 19:56:05 UTC (rev 8663) +++ trunk/octave-forge/main/geometry/matGeom_raw/geom2d/angleAbsDiff.m 2011-10-03 21:03:42 UTC (rev 8664) @@ -1,3 +1,13 @@ +%% Copyright (c) 2010, David Legland <dav...@gr...> +%% +%% All rights reserved. +%% +%% This program is free software; you can redistribute it and/or modify +%% it under the terms of the BSD License. For details see the COPYING +%% file included as part of this distribution. + +%% 2011 Adapted to Octave by Juan Pablo Carbajal <car...@if...> + function dif = angleAbsDiff(angle1, angle2) %ANGLEABSDIFF Absolute difference between two angles % Modified: trunk/octave-forge/main/geometry/matGeom_raw/geom2d/angleDiff.m =================================================================== --- trunk/octave-forge/main/geometry/matGeom_raw/geom2d/angleDiff.m 2011-10-03 19:56:05 UTC (rev 8663) +++ trunk/octave-forge/main/geometry/matGeom_raw/geom2d/angleDiff.m 2011-10-03 21:03:42 UTC (rev 8664) @@ -1,3 +1,13 @@ +%% Copyright (c) 2010, David Legland <dav...@gr...> +%% +%% All rights reserved. +%% +%% This program is free software; you can redistribute it and/or modify +%% it under the terms of the BSD License. For details see the COPYING +%% file included as part of this distribution. + +%% 2011 Adapted to Octave by Juan Pablo Carbajal <car...@if...> + function dif = angleDiff(angle1, angle2) %ANGLEDIFF Difference between two angles % Modified: trunk/octave-forge/main/geometry/matGeom_raw/geom2d/angleSort.m =================================================================== --- trunk/octave-forge/main/geometry/matGeom_raw/geom2d/angleSort.m 2011-10-03 19:56:05 UTC (rev 8663) +++ trunk/octave-forge/main/geometry/matGeom_raw/geom2d/angleSort.m 2011-10-03 21:03:42 UTC (rev 8664) @@ -1,3 +1,13 @@ +%% Copyright (c) 2010, David Legland <dav...@gr...> +%% +%% All rights reserved. +%% +%% This program is free software; you can redistribute it and/or modify +%% it under the terms of the BSD License. For details see the COPYING +%% file included as part of this distribution. + +%% 2011 Adapted to Octave by Juan Pablo Carbajal <car...@if...> + function varargout = angleSort(pts, varargin) %ANGLESORT Sort points in the plane according to their angle to origin % @@ -62,4 +72,4 @@ varargout{2} = I; end - \ No newline at end of file + Modified: trunk/octave-forge/main/geometry/matGeom_raw/geom2d/angles2d.m =================================================================== --- trunk/octave-forge/main/geometry/matGeom_raw/geom2d/angles2d.m 2011-10-03 19:56:05 UTC (rev 8663) +++ trunk/octave-forge/main/geometry/matGeom_raw/geom2d/angles2d.m 2011-10-03 21:03:42 UTC (rev 8664) @@ -1,3 +1,13 @@ +%% Copyright (c) 2010, David Legland <dav...@gr...> +%% +%% All rights reserved. +%% +%% This program is free software; you can redistribute it and/or modify +%% it under the terms of the BSD License. For details see the COPYING +%% file included as part of this distribution. + +%% 2011 Adapted to Octave by Juan Pablo Carbajal <car...@if...> + function angles2d %ANGLES2D Description of functions for manipulating angles % @@ -21,4 +31,4 @@ % Copyright 2010 INRA - Cepia Software Platform. -help('angles2d'); \ No newline at end of file +help('angles2d'); Modified: trunk/octave-forge/main/geometry/matGeom_raw/geom2d/bisector.m =================================================================== --- trunk/octave-forge/main/geometry/matGeom_raw/geom2d/bisector.m 2011-10-03 19:56:05 UTC (rev 8663) +++ trunk/octave-forge/main/geometry/matGeom_raw/geom2d/bisector.m 2011-10-03 21:03:42 UTC (rev 8664) @@ -1,3 +1,13 @@ +%% Copyright (c) 2010, David Legland <dav...@gr...> +%% +%% All rights reserved. +%% +%% This program is free software; you can redistribute it and/or modify +%% it under the terms of the BSD License. For details see the COPYING +%% file included as part of this distribution. + +%% 2011 Adapted to Octave by Juan Pablo Carbajal <car...@if...> + function ray = bisector(varargin) %BISECTOR Return the bisector of two lines, or 3 points % Modified: trunk/octave-forge/main/geometry/matGeom_raw/geom2d/boxes2d.m =================================================================== --- trunk/octave-forge/main/geometry/matGeom_raw/geom2d/boxes2d.m 2011-10-03 19:56:05 UTC (rev 8663) +++ trunk/octave-forge/main/geometry/matGeom_raw/geom2d/boxes2d.m 2011-10-03 21:03:42 UTC (rev 8664) @@ -1,3 +1,13 @@ +%% Copyright (c) 2010, David Legland <dav...@gr...> +%% +%% All rights reserved. +%% +%% This program is free software; you can redistribute it and/or modify +%% it under the terms of the BSD License. For details see the COPYING +%% file included as part of this distribution. + +%% 2011 Adapted to Octave by Juan Pablo Carbajal <car...@if...> + function boxes2d(varargin) %BOXES2D Description of functions operating on bounding boxes % Modified: trunk/octave-forge/main/geometry/matGeom_raw/geom2d/cartesianLine.m =================================================================== --- trunk/octave-forge/main/geometry/matGeom_raw/geom2d/cartesianLine.m 2011-10-03 19:56:05 UTC (rev 8663) +++ trunk/octave-forge/main/geometry/matGeom_raw/geom2d/cartesianLine.m 2011-10-03 21:03:42 UTC (rev 8664) @@ -1,3 +1,13 @@ +%% Copyright (c) 2010, David Legland <dav...@gr...> +%% +%% All rights reserved. +%% +%% This program is free software; you can redistribute it and/or modify +%% it under the terms of the BSD License. For details see the COPYING +%% file included as part of this distribution. + +%% 2011 Adapted to Octave by Juan Pablo Carbajal <car...@if...> + function line = cartesianLine(varargin) %CARTESIANLINE Create a straight line from cartesian equation coefficients % @@ -35,4 +45,4 @@ dx = cos(theta); dy = sin(theta); -line = [x0 y0 dx dy]; \ No newline at end of file +line = [x0 y0 dx dy]; Modified: trunk/octave-forge/main/geometry/matGeom_raw/geom2d/centroid.m =================================================================== --- trunk/octave-forge/main/geometry/matGeom_raw/geom2d/centroid.m 2011-10-03 19:56:05 UTC (rev 8663) +++ trunk/octave-forge/main/geometry/matGeom_raw/geom2d/centroid.m 2011-10-03 21:03:42 UTC (rev 8664) @@ -1,3 +1,13 @@ +%% Copyright (c) 2010, David Legland <dav...@gr...> +%% +%% All rights reserved. +%% +%% This program is free software; you can redistribute it and/or modify +%% it under the terms of the BSD License. For details see the COPYING +%% file included as part of this distribution. + +%% 2011 Adapted to Octave by Juan Pablo Carbajal <car...@if...> + function center = centroid(varargin) %CENTROID Compute centroid (center of mass) of a set of points % Modified: trunk/octave-forge/main/geometry/matGeom_raw/geom2d/changelog.txt =================================================================== --- trunk/octave-forge/main/geometry/matGeom_raw/geom2d/changelog.txt 2011-10-03 19:56:05 UTC (rev 8663) +++ trunk/octave-forge/main/geometry/matGeom_raw/geom2d/changelog.txt 2011-10-03 21:03:42 UTC (rev 8664) @@ -1,3 +1,13 @@ +%% Copyright (c) 2010, David Legland <dav...@gr...> +%% +%% All rights reserved. +%% +%% This program is free software; you can redistribute it and/or modify +%% it under the terms of the BSD License. For details see the COPYING +%% file included as part of this distribution. + +%% 2011 Adapted to Octave by Juan Pablo Carbajal <car...@if...> + change log for geom2d geom2d, release 2011.??.?? @@ -155,4 +165,4 @@ - fixed bug in intersectEdges many updates in doc. - \ No newline at end of file + Modified: trunk/octave-forge/main/geometry/matGeom_raw/geom2d/circleArcAsCurve.m =================================================================== --- trunk/octave-forge/main/geometry/matGeom_raw/geom2d/circleArcAsCurve.m 2011-10-03 19:56:05 UTC (rev 8663) +++ trunk/octave-forge/main/geometry/matGeom_raw/geom2d/circleArcAsCurve.m 2011-10-03 21:03:42 UTC (rev 8664) @@ -1,3 +1,13 @@ +%% Copyright (c) 2010, David Legland <dav...@gr...> +%% +%% All rights reserved. +%% +%% This program is free software; you can redistribute it and/or modify +%% it under the terms of the BSD License. For details see the COPYING +%% file included as part of this distribution. + +%% 2011 Adapted to Octave by Juan Pablo Carbajal <car...@if...> + function varargout = circleArcAsCurve(arc, N) %CIRCLEARCASCURVE Convert a circle arc into a series of points % Modified: trunk/octave-forge/main/geometry/matGeom_raw/geom2d/circleAsPolygon.m =================================================================== --- trunk/octave-forge/main/geometry/matGeom_raw/geom2d/circleAsPolygon.m 2011-10-03 19:56:05 UTC (rev 8663) +++ trunk/octave-forge/main/geometry/matGeom_raw/geom2d/circleAsPolygon.m 2011-10-03 21:03:42 UTC (rev 8664) @@ -1,3 +1,13 @@ +%% Copyright (c) 2010, David Legland <dav...@gr...> +%% +%% All rights reserved. +%% +%% This program is free software; you can redistribute it and/or modify +%% it under the terms of the BSD License. For details see the COPYING +%% file included as part of this distribution. + +%% 2011 Adapted to Octave by Juan Pablo Carbajal <car...@if...> + function varargout = circleAsPolygon(circle, varargin) %CIRCLEASPOLYGON Convert a circle into a series of points % @@ -44,4 +54,4 @@ elseif nargout==2 varargout{1}=x; varargout{2}=y; -end \ No newline at end of file +end Modified: trunk/octave-forge/main/geometry/matGeom_raw/geom2d/circles2d.m =================================================================== --- trunk/octave-forge/main/geometry/matGeom_raw/geom2d/circles2d.m 2011-10-03 19:56:05 UTC (rev 8663) +++ trunk/octave-forge/main/geometry/matGeom_raw/geom2d/circles2d.m 2011-10-03 21:03:42 UTC (rev 8664) @@ -1,3 +1,13 @@ +%% Copyright (c) 2010, David Legland <dav...@gr...> +%% +%% All rights reserved. +%% +%% This program is free software; you can redistribute it and/or modify +%% it under the terms of the BSD License. For details see the COPYING +%% file included as part of this distribution. + +%% 2011 Adapted to Octave by Juan Pablo Carbajal <car...@if...> + function circles2d(varargin) %CIRCLES2D Description of functions operating on circles % @@ -28,4 +38,4 @@ % Created: 2008-10-13, using Matlab 7.4.0.287 (R2007a) % Copyright 2010 INRA - Cepia Software Platform. -help('circles2d'); \ No newline at end of file +help('circles2d'); Modified: trunk/octave-forge/main/geometry/matGeom_raw/geom2d/clipEdge.m =================================================================== --- trunk/octave-forge/main/geometry/matGeom_raw/geom2d/clipEdge.m 2011-10-03 19:56:05 UTC (rev 8663) +++ trunk/octave-forge/main/geometry/matGeom_raw/geom2d/clipEdge.m 2011-10-03 21:03:42 UTC (rev 8664) @@ -1,3 +1,13 @@ +%% Copyright (c) 2010, David Legland <dav...@gr...> +%% +%% All rights reserved. +%% +%% This program is free software; you can redistribute it and/or modify +%% it under the terms of the BSD License. For details see the COPYING +%% file included as part of this distribution. + +%% 2011 Adapted to Octave by Juan Pablo Carbajal <car...@if...> + function edge2 = clipEdge(edge, box) %CLIPEDGE Clip an edge with a rectangular box % Modified: trunk/octave-forge/main/geometry/matGeom_raw/geom2d/clipLine.m =================================================================== --- trunk/octave-forge/main/geometry/matGeom_raw/geom2d/clipLine.m 2011-10-03 19:56:05 UTC (rev 8663) +++ trunk/octave-forge/main/geometry/matGeom_raw/geom2d/clipLine.m 2011-10-03 21:03:42 UTC (rev 8664) @@ -1,3 +1,13 @@ +%% Copyright (c) 2010, David Legland <dav...@gr...> +%% +%% All rights reserved. +%% +%% This program is free software; you can redistribute it and/or modify +%% it under the terms of the BSD License. For details see the COPYING +%% file included as part of this distribution. + +%% 2011 Adapted to Octave by Juan Pablo Carbajal <car...@if...> + function edge = clipLine(line, box, varargin) %CLIPLINE Clip a line with a box % Modified: trunk/octave-forge/main/geometry/matGeom_raw/geom2d/clipLineRect.m =================================================================== --- trunk/octave-forge/main/geometry/matGeom_raw/geom2d/clipLineRect.m 2011-10-03 19:56:05 UTC (rev 8663) +++ trunk/octave-forge/main/geometry/matGeom_raw/geom2d/clipLineRect.m 2011-10-03 21:03:42 UTC (rev 8664) @@ -1,3 +1,13 @@ +%% Copyright (c) 2010, David Legland <dav...@gr...> +%% +%% All rights reserved. +%% +%% This program is free software; you can redistribute it and/or modify +%% it under the terms of the BSD License. For details see the COPYING +%% file included as part of this distribution. + +%% 2011 Adapted to Octave by Juan Pablo Carbajal <car...@if...> + function edge = clipLineRect(line, rect) %CLIPLINERECT clip a line with a polygon % Modified: trunk/octave-forge/main/geometry/matGeom_raw/geom2d/clipPoints.m =================================================================== --- trunk/octave-forge/main/geometry/matGeom_raw/geom2d/clipPoints.m 2011-10-03 19:56:05 UTC (rev 8663) +++ trunk/octave-forge/main/geometry/matGeom_raw/geom2d/clipPoints.m 2011-10-03 21:03:42 UTC (rev 8664) @@ -1,3 +1,13 @@ +%% Copyright (c) 2010, David Legland <dav...@gr...> +%% +%% All rights reserved. +%% +%% This program is free software; you can redistribute it and/or modify +%% it under the terms of the BSD License. For details see the COPYING +%% file included as part of this distribution. + +%% 2011 Adapted to Octave by Juan Pablo Carbajal <car...@if...> + function points = clipPoints(points, box) %CLIPPOINTS Clip a set of points by a box % Modified: trunk/octave-forge/main/geometry/matGeom_raw/geom2d/clipRay.m =================================================================== --- trunk/octave-forge/main/geometry/matGeom_raw/geom2d/clipRay.m 2011-10-03 19:56:05 UTC (rev 8663) +++ trunk/octave-forge/main/geometry/matGeom_raw/geom2d/clipRay.m 2011-10-03 21:03:42 UTC (rev 8664) @@ -1,3 +1,13 @@ +%% Copyright (c) 2010, David Legland <dav...@gr...> +%% +%% All rights reserved. +%% +%% This program is free software; you can redistribute it and/or modify +%% it under the terms of the BSD License. For details see the COPYING +%% file included as part of this distribution. + +%% 2011 Adapted to Octave by Juan Pablo Carbajal <car...@if...> + function [edge isInside] = clipRay(ray, box) % Clip a ray with a box % Modified: trunk/octave-forge/main/geometry/matGeom_raw/geom2d/crackPattern.m =================================================================== --- trunk/octave-forge/main/geometry/matGeom_raw/geom2d/crackPattern.m 2011-10-03 19:56:05 UTC (rev 8663) +++ trunk/octave-forge/main/geometry/matGeom_raw/geom2d/crackPattern.m 2011-10-03 21:03:42 UTC (rev 8664) @@ -1,3 +1,13 @@ +%% Copyright (c) 2010, David Legland <dav...@gr...> +%% +%% All rights reserved. +%% +%% This program is free software; you can redistribute it and/or modify +%% it under the terms of the BSD License. For details see the COPYING +%% file included as part of this distribution. + +%% 2011 Adapted to Octave by Juan Pablo Carbajal <car...@if...> + function edges = crackPattern(box, points, alpha, varargin) %CRACKPATTERN Create a (bounded) crack pattern tessellation % Modified: trunk/octave-forge/main/geometry/matGeom_raw/geom2d/crackPattern2.m =================================================================== --- trunk/octave-forge/main/geometry/matGeom_raw/geom2d/crackPattern2.m 2011-10-03 19:56:05 UTC (rev 8663) +++ trunk/octave-forge/main/geometry/matGeom_raw/geom2d/crackPattern2.m 2011-10-03 21:03:42 UTC (rev 8664) @@ -1,3 +1,13 @@ +%% Copyright (c) 2010, David Legland <dav...@gr...> +%% +%% All rights reserved. +%% +%% This program is free software; you can redistribute it and/or modify +%% it under the terms of the BSD License. For details see the COPYING +%% file included as part of this distribution. + +%% 2011 Adapted to Octave by Juan Pablo Carbajal <car...@if...> + function edges = crackPattern2(box, points, alpha, varargin) %CRACKPATTERN2 Create a (bounded) crack pattern tessellation % Modified: trunk/octave-forge/main/geometry/matGeom_raw/geom2d/createBasisTransform.m =================================================================== --- trunk/octave-forge/main/geometry/matGeom_raw/geom2d/createBasisTransform.m 2011-10-03 19:56:05 UTC (rev 8663) +++ trunk/octave-forge/main/geometry/matGeom_raw/geom2d/createBasisTransform.m 2011-10-03 21:03:42 UTC (rev 8664) @@ -1,3 +1,13 @@ +%% Copyright (c) 2010, David Legland <dav...@gr...> +%% +%% All rights reserved. +%% +%% This program is free software; you can redistribute it and/or modify +%% it under the terms of the BSD License. For details see the COPYING +%% file included as part of this distribution. + +%% 2011 Adapted to Octave by Juan Pablo Carbajal <car...@if...> + function transfo = createBasisTransform(source, target) %CREATEBASISTRANSFORM Compute matrix for transforming a basis into another basis % Modified: trunk/octave-forge/main/geometry/matGeom_raw/geom2d/createCircle.m =================================================================== --- trunk/octave-forge/main/geometry/matGeom_raw/geom2d/createCircle.m 2011-10-03 19:56:05 UTC (rev 8663) +++ trunk/octave-forge/main/geometry/matGeom_raw/geom2d/createCircle.m 2011-10-03 21:03:42 UTC (rev 8664) @@ -1,3 +1,13 @@ +%% Copyright (c) 2010, David Legland <dav...@gr...> +%% +%% All rights reserved. +%% +%% This program is free software; you can redistribute it and/or modify +%% it under the terms of the BSD License. For details see the COPYING +%% file included as part of this distribution. + +%% 2011 Adapted to Octave by Juan Pablo Carbajal <car...@if...> + function circle = createCircle(varargin) %CREATECIRCLE Create a circle from 2 or 3 points % Modified: trunk/octave-forge/main/geometry/matGeom_raw/geom2d/createDirectedCircle.m =================================================================== --- trunk/octave-forge/main/geometry/matGeom_raw/geom2d/createDirectedCircle.m 2011-10-03 19:56:05 UTC (rev 8663) +++ trunk/octave-forge/main/geometry/matGeom_raw/geom2d/createDirectedCircle.m 2011-10-03 21:03:42 UTC (rev 8664) @@ -1,3 +1,13 @@ +%% Copyright (c) 2010, David Legland <dav...@gr...> +%% +%% All rights reserved. +%% +%% This program is free software; you can redistribute it and/or modify +%% it under the terms of the BSD License. For details see the COPYING +%% file included as part of this distribution. + +%% 2011 Adapted to Octave by Juan Pablo Carbajal <car...@if...> + function circle = createDirectedCircle(varargin) %CREATEDIRECTEDCIRCLE Create a directed circle % @@ -55,4 +65,4 @@ end -circle = [x0 y0 r d]; \ No newline at end of file +circle = [x0 y0 r d]; Modified: trunk/octave-forge/main/geometry/matGeom_raw/geom2d/createEdge.m =================================================================== --- trunk/octave-forge/main/geometry/matGeom_raw/geom2d/createEdge.m 2011-10-03 19:56:05 UTC (rev 8663) +++ trunk/octave-forge/main/geometry/matGeom_raw/geom2d/createEdge.m 2011-10-03 21:03:42 UTC (rev 8664) @@ -1,3 +1,13 @@ +%% Copyright (c) 2010, David Legland <dav...@gr...> +%% +%% All rights reserved. +%% +%% This program is free software; you can redistribute it and/or modify +%% it under the terms of the BSD License. For details see the COPYING +%% file included as part of this distribution. + +%% 2011 Adapted to Octave by Juan Pablo Carbajal <car...@if...> + function edge = createEdge(varargin) %CREATEEDGE Create an edge between two points, or from a line % Modified: trunk/octave-forge/main/geometry/matGeom_raw/geom2d/createHomothecy.m =================================================================== --- trunk/octave-forge/main/geometry/matGeom_raw/geom2d/createHomothecy.m 2011-10-03 19:56:05 UTC (rev 8663) +++ trunk/octave-forge/main/geometry/matGeom_raw/geom2d/createHomothecy.m 2011-10-03 21:03:42 UTC (rev 8664) @@ -1,3 +1,13 @@ +%% Copyright (c) 2010, David Legland <dav...@gr...> +%% +%% All rights reserved. +%% +%% This program is free software; you can redistribute it and/or modify +%% it under the terms of the BSD License. For details see the COPYING +%% file included as part of this distribution. + +%% 2011 Adapted to Octave by Juan Pablo Carbajal <car...@if...> + function trans = createHomothecy(point, ratio) %CREATEHOMOTHECY Create the the 3x3 matrix of an homothetic transform % Modified: trunk/octave-forge/main/geometry/matGeom_raw/geom2d/createLine.m =================================================================== --- trunk/octave-forge/main/geometry/matGeom_raw/geom2d/createLine.m 2011-10-03 19:56:05 UTC (rev 8663) +++ trunk/octave-forge/main/geometry/matGeom_raw/geom2d/createLine.m 2011-10-03 21:03:42 UTC (rev 8664) @@ -1,3 +1,13 @@ +%% Copyright (c) 2010, David Legland <dav...@gr...> +%% +%% All rights reserved. +%% +%% This program is free software; you can redistribute it and/or modify +%% it under the terms of the BSD License. For details see the COPYING +%% file included as part of this distribution. + +%% 2011 Adapted to Octave by Juan Pablo Carbajal <car...@if...> + function line = createLine(varargin) %CREATELINE Create a straight line from 2 points, or from other inputs % Modified: trunk/octave-forge/main/geometry/matGeom_raw/geom2d/createLineReflection.m =================================================================== --- trunk/octave-forge/main/geometry/matGeom_raw/geom2d/createLineReflection.m 2011-10-03 19:56:05 UTC (rev 8663) +++ trunk/octave-forge/main/geometry/matGeom_raw/geom2d/createLineReflection.m 2011-10-03 21:03:42 UTC (rev 8664) @@ -1,3 +1,13 @@ +%% Copyright (c) 2010, David Legland <dav...@gr...> +%% +%% All rights reserved. +%% +%% This program is free software; you can redistribute it and/or modify +%% it under the terms of the BSD License. For details see the COPYING +%% file included as part of this distribution. + +%% 2011 Adapted to Octave by Juan Pablo Carbajal <car...@if...> + function trans = createLineReflection(line) %CREATELINEREFLECTION Create the the 3x3 matrix of a line reflection % Modified: trunk/octave-forge/main/geometry/matGeom_raw/geom2d/createMedian.m =================================================================== --- trunk/octave-forge/main/geometry/matGeom_raw/geom2d/createMedian.m 2011-10-03 19:56:05 UTC (rev 8663) +++ trunk/octave-forge/main/geometry/matGeom_raw/geom2d/createMedian.m 2011-10-03 21:03:42 UTC (rev 8664) @@ -1,3 +1,13 @@ +%% Copyright (c) 2010, David Legland <dav...@gr...> +%% +%% All rights reserved. +%% +%% This program is free software; you can redistribute it and/or modify +%% it under the terms of the BSD License. For details see the COPYING +%% file included as part of this distribution. + +%% 2011 Adapted to Octave by Juan Pablo Carbajal <car...@if...> + function line = createMedian(varargin) %CREATEMEDIAN create a median line % @@ -55,4 +65,4 @@ end -line = [x0+dx/2, y0+dy/2, -dy, dx]; \ No newline at end of file +line = [x0+dx/2, y0+dy/2, -dy, dx]; Modified: trunk/octave-forge/main/geometry/matGeom_raw/geom2d/createRay.m =================================================================== --- trunk/octave-forge/main/geometry/matGeom_raw/geom2d/createRay.m 2011-10-03 19:56:05 UTC (rev 8663) +++ trunk/octave-forge/main/geometry/matGeom_raw/geom2d/createRay.m 2011-10-03 21:03:42 UTC (rev 8664) @@ -1,3 +1,13 @@ +%% Copyright (c) 2010, David Legland <dav...@gr...> +%% +%% All rights reserved. +%% +%% This program is free software; you can redistribute it and/or modify +%% it under the terms of the BSD License. For details see the COPYING +%% file included as part of this distribution. + +%% 2011 Adapted to Octave by Juan Pablo Carbajal <car...@if...> + function ray = createRay(varargin) %CREATERAY Create a ray (half-line), from various inputs % Modified: trunk/octave-forge/main/geometry/matGeom_raw/geom2d/createRotation.m =================================================================== --- trunk/octave-forge/main/geometry/matGeom_raw/geom2d/createRotation.m 2011-10-03 19:56:05 UTC (rev 8663) +++ trunk/octave-forge/main/geometry/matGeom_raw/geom2d/createRotation.m 2011-10-03 21:03:42 UTC (rev 8664) @@ -1,3 +1,13 @@ +%% Copyright (c) 2010, David Legland <dav...@gr...> +%% +%% All rights reserved. +%% +%% This program is free software; you can redistribute it and/or modify +%% it under the terms of the BSD License. For details see the COPYING +%% file included as part of this distribution. + +%% 2011 Adapted to Octave by Juan Pablo Carbajal <car...@if...> + function trans = createRotation(varargin) %CREATEROTATION Create the 3*3 matrix of a rotation % Modified: trunk/octave-forge/main/geometry/matGeom_raw/geom2d/createScaling.m =================================================================== --- trunk/octave-forge/main/geometry/matGeom_raw/geom2d/createScaling.m 2011-10-03 19:56:05 UTC (rev 8663) +++ trunk/octave-forge/main/geometry/matGeom_raw/geom2d/createScaling.m 2011-10-03 21:03:42 UTC (rev 8664) @@ -1,3 +1,13 @@ +%% Copyright (c) 2010, David Legland <dav...@gr...> +%% +%% All rights reserved. +%% +%% This program is free software; you can redistribute it and/or modify +%% it under the terms of the BSD License. For details see the COPYING +%% file included as part of this distribution. + +%% 2011 Adapted to Octave by Juan Pablo Carbajal <car...@if...> + function trans = createScaling(varargin) %CREATESCALING Create the 3*3 matrix of a scaling in 2 dimensions % Modified: trunk/octave-forge/main/geometry/matGeom_raw/geom2d/createTranslation.m =================================================================== --- trunk/octave-forge/main/geometry/matGeom_raw/geom2d/createTranslation.m 2011-10-03 19:56:05 UTC (rev 8663) +++ trunk/octave-forge/main/geometry/matGeom_raw/geom2d/createTranslation.m 2011-10-03 21:03:42 UTC (rev 8664) @@ -1,3 +1,13 @@ +%% Copyright (c) 2010, David Legland <dav...@gr...> +%% +%% All rights reserved. +%% +%% This program is free software; you can redistribute it and/or modify +%% it under the terms of the BSD License. For details see the COPYING +%% file included as part of this distribution. + +%% 2011 Adapted to Octave by Juan Pablo Carbajal <car...@if...> + function trans = createTranslation(varargin) %CREATETRANSLATION Create the 3*3 matrix of a translation % @@ -38,4 +48,4 @@ end % create the matrix representing the translation -trans = [1 0 tx ; 0 1 ty ; 0 0 1]; \ No newline at end of file +trans = [1 0 tx ; 0 1 ty ; 0 0 1]; Modified: trunk/octave-forge/main/geometry/matGeom_raw/geom2d/createVector.m =================================================================== --- trunk/octave-forge/main/geometry/matGeom_raw/geom2d/createVector.m 2011-10-03 19:56:05 UTC (rev 8663) +++ trunk/octave-forge/main/geometry/matGeom_raw/geom2d/createVector.m 2011-10-03 21:03:42 UTC (rev 8664) @@ -1,3 +1,13 @@ +%% Copyright (c) 2010, David Legland <dav...@gr...> +%% +%% All rights reserved. +%% +%% This program is free software; you can redistribute it and/or modify +%% it under the terms of the BSD License. For details see the COPYING +%% file included as part of this distribution. + +%% 2011 Adapted to Octave by Juan Pablo Carbajal <car...@if...> + function vect = createVector(p1, p2) %CREATEVECTOR Create a vector from two points % Modified: trunk/octave-forge/main/geometry/matGeom_raw/geom2d/deg2rad.m =================================================================== --- trunk/octave-forge/main/geometry/matGeom_raw/geom2d/deg2rad.m 2011-10-03 19:56:05 UTC (rev 8663) +++ trunk/octave-forge/main/geometry/matGeom_raw/geom2d/deg2rad.m 2011-10-03 21:03:42 UTC (rev 8664) @@ -1,3 +1,13 @@ +%% Copyright (c) 2010, David Legland <dav...@gr...> +%% +%% All rights reserved. +%% +%% This program is free software; you can redistribute it and/or modify +%% it under the terms of the BSD License. For details see the COPYING +%% file included as part of this distribution. + +%% 2011 Adapted to Octave by Juan Pablo Carbajal <car...@if...> + function rad = deg2rad(deg) %DEG2RAD Convert angle from degrees to radians % Modified: trunk/octave-forge/main/geometry/matGeom_raw/geom2d/distancePointEdge.m =================================================================== --- trunk/octave-forge/main/geometry/matGeom_raw/geom2d/distancePointEdge.m 2011-10-03 19:56:05 UTC (rev 8663) +++ trunk/octave-forge/main/geometry/matGeom_raw/geom2d/distancePointEdge.m 2011-10-03 21:03:42 UTC (rev 8664) @@ -1,3 +1,13 @@ +%% Copyright (c) 2010, David Legland <dav...@gr...> +%% +%% All rights reserved. +%% +%% This program is free software; you can redistribute it and/or modify +%% it under the terms of the BSD License. For details see the COPYING +%% file included as part of this distribution. + +%% 2011 Adapted to Octave by Juan Pablo Carbajal <car...@if...> + function varargout = distancePointEdge(point, edge) %DISTANCEPOINTEDGE Minimum distance between a point and an edge % Modified: trunk/octave-forge/main/geometry/matGeom_raw/geom2d/distancePointLine.m =================================================================== --- trunk/octave-forge/main/geometry/matGeom_raw/geom2d/distancePointLine.m 2011-10-03 19:56:05 UTC (rev 8663) +++ trunk/octave-forge/main/geometry/matGeom_raw/geom2d/distancePointLine.m 2011-10-03 21:03:42 UTC (rev 8664) @@ -1,3 +1,13 @@ +%% Copyright (c) 2010, David Legland <dav...@gr...> +%% +%% All rights reserved. +%% +%% This program is free software; you can redistribute it and/or modify +%% it under the terms of the BSD License. For details see the COPYING +%% file included as part of this distribution. + +%% 2011 Adapted to Octave by Juan Pablo Carbajal <car...@if...> + function dist = distancePointLine(point, line) %DISTANCEPOINTLINE Minimum distance between a point and a line % Modified: trunk/octave-forge/main/geometry/matGeom_raw/geom2d/distancePoints.m =================================================================== --- trunk/octave-forge/main/geometry/matGeom_raw/geom2d/distancePoints.m 2011-10-03 19:56:05 UTC (rev 8663) +++ trunk/octave-forge/main/geometry/matGeom_raw/geom2d/distancePoints.m 2011-10-03 21:03:42 UTC (rev 8664) @@ -1,3 +1,13 @@ +%% Copyright (c) 2010, David Legland <dav...@gr...> +%% +%% All rights reserved. +%% +%% This program is free software; you can redistribute it and/or modify +%% it under the terms of the BSD License. For details see the COPYING +%% file included as part of this distribution. + +%% 2011 Adapted to Octave by Juan Pablo Carbajal <car...@if...> + function dist = distancePoints(p1, p2, varargin) %DISTANCEPOINTS Compute distance between two points % Modified: trunk/octave-forge/main/geometry/matGeom_raw/geom2d/drawArrow.m =================================================================== --- trunk/octave-forge/main/geometry/matGeom_raw/geom2d/drawArrow.m 2011-10-03 19:56:05 UTC (rev 8663) +++ trunk/octave-forge/main/geometry/matGeom_raw/geom2d/drawArrow.m 2011-10-03 21:03:42 UTC (rev 8664) @@ -1,3 +1,13 @@ +%% Copyright (c) 2010, David Legland <dav...@gr...> +%% +%% All rights reserved. +%% +%% This program is free software; you can redistribute it and/or modify +%% it under the terms of the BSD License. For details see the COPYING +%% file included as part of this distribution. + +%% 2011 Adapted to Octave by Juan Pablo Carbajal <car...@if...> + function varargout = drawArrow(varargin) %DRAWARROW Draw an arrow on the current axis % Modified: trunk/octave-forge/main/geometry/matGeom_raw/geom2d/drawBezierCurve.m =================================================================== --- trunk/octave-forge/main/geometry/matGeom_raw/geom2d/drawBezierCurve.m 2011-10-03 19:56:05 UTC (rev 8663) +++ trunk/octave-forge/main/geometry/matGeom_raw/geom2d/drawBezierCurve.m 2011-10-03 21:03:42 UTC (rev 8664) @@ -1,3 +1,13 @@ +%% Copyright (c) 2010, David Legland <dav...@gr...> +%% +%% All rights reserved. +%% +%% This program is free software; you can redistribute it and/or modify +%% it under the terms of the BSD License. For details see the COPYING +%% file included as part of this distribution. + +%% 2011 Adapted to Octave by Juan Pablo Carbajal <car...@if...> + function varargout = drawBezierCurve(points, varargin) %DRAWBEZIERCURVE Draw a cubic bezier curve defined by 4 control points % Modified: trunk/octave-forge/main/geometry/matGeom_raw/geom2d/drawBox.m =================================================================== --- trunk/octave-forge/main/geometry/matGeom_raw/geom2d/drawBox.m 2011-10-03 19:56:05 UTC (rev 8663) +++ trunk/octave-forge/main/geometry/matGeom_raw/geom2d/drawBox.m 2011-10-03 21:03:42 UTC (rev 8664) @@ -1,3 +1,13 @@ +%% Copyright (c) 2010, David Legland <dav...@gr...> +%% +%% All rights reserved. +%% +%% This program is free software; you can redistribute it and/or modify +%% it under the terms of the BSD License. For details see the COPYING +%% file included as part of this distribution. + +%% 2011 Adapted to Octave by Juan Pablo Carbajal <car...@if...> + function varargout = drawBox(box, varargin) %DRAWBOX Draw a box defined by coordinate extents % Modified: trunk/octave-forge/main/geometry/matGeom_raw/geom2d/drawCenteredEdge.m =================================================================== --- trunk/octave-forge/main/geometry/matGeom_raw/geom2d/drawCenteredEdge.m 2011-10-03 19:56:05 UTC (rev 8663) +++ trunk/octave-forge/main/geometry/matGeom_raw/geom2d/drawCenteredEdge.m 2011-10-03 21:03:42 UTC (rev 8664) @@ -1,3 +1,13 @@ +%% Copyright (c) 2010, David Legland <dav...@gr...> +%% +%% All rights reserved. +%% +%% This program is free software; you can redistribute it and/or modify +%% it under the terms of the BSD License. For details see the COPYING +%% file included as part of this distribution. + +%% 2011 Adapted to Octave by Juan Pablo Carbajal <car...@if...> + function varargout = drawCenteredEdge(center, len, theta, varargin) %DRAWCENTEREDEDGE Draw an edge centered on a point % Modified: trunk/octave-forge/main/geometry/matGeom_raw/geom2d/drawCircle.m =================================================================== --- trunk/octave-forge/main/geometry/matGeom_raw/geom2d/drawCircle.m 2011-10-03 19:56:05 UTC (rev 8663) +++ trunk/octave-forge/main/geometry/matGeom_raw/geom2d/drawCircle.m 2011-10-03 21:03:42 UTC (rev 8664) @@ -1,3 +1,13 @@ +%% Copyright (c) 2010, David Legland <dav...@gr...> +%% +%% All rights reserved. +%% +%% This program is free software; you can redistribute it and/or modify +%% it under the terms of the BSD License. For details see the COPYING +%% file included as part of this distribution. + +%% 2011 Adapted to Octave by Juan Pablo Carbajal <car...@if...> + function varargout = drawCircle(varargin) %DRAWCIRCLE Draw a circle on the current axis % Modified: trunk/octave-forge/main/geometry/matGeom_raw/geom2d/drawCircleArc.m =================================================================== --- trunk/octave-forge/main/geometry/matGeom_raw/geom2d/drawCircleArc.m 2011-10-03 19:56:05 UTC (rev 8663) +++ trunk/octave-forge/main/geometry/matGeom_raw/geom2d/drawCircleArc.m 2011-10-03 21:03:42 UTC (rev 8664) @@ -1,3 +1,13 @@ +%% Copyright (c) 2010, David Legland <dav...@gr...> +%% +%% All rights reserved. +%% +%% This program is free software; you can redistribute it and/or modify +%% it under the terms of the BSD License. For details see the COPYING +%% file included as part of this distribution. + +%% 2011 Adapted to Octave by Juan Pablo Carbajal <car...@if...> + function varargout = drawCircleArc(varargin) %DRAWCIRCLEARC Draw a circle arc on the current axis % Modified: trunk/octave-forge/main/geometry/matGeom_raw/geom2d/drawEdge.m =================================================================== --- trunk/octave-forge/main/geometry/matGeom_raw/geom2d/drawEdge.m 2011-10-03 19:56:05 UTC (rev 8663) +++ trunk/octave-forge/main/geometry/matGeom_raw/geom2d/drawEdge.m 2011-10-03 21:03:42 UTC (rev 8664) @@ -1,3 +1,13 @@ +%% Copyright (c) 2010, David Legland <dav...@gr...> +%% +%% All rights reserved. +%% +%% This program is free software; you can redistribute it and/or modify +%% it under the terms of the BSD License. For details see the COPYING +%% file included as part of this distribution. + +%% 2011 Adapted to Octave by Juan Pablo Carbajal <car...@if...> + function varargout = drawEdge(varargin) %DRAWEDGE Draw an edge given by 2 points % Modified: trunk/octave-forge/main/geometry/matGeom_raw/geom2d/drawEllipse.m =================================================================== --- trunk/octave-forge/main/geometry/matGeom_raw/geom2d/drawEllipse.m 2011-10-03 19:56:05 UTC (rev 8663) +++ trunk/octave-forge/main/geometry/matGeom_raw/geom2d/drawEllipse.m 2011-10-03 21:03:42 UTC (rev 8664) @@ -1,3 +1,13 @@ +%% Copyright (c) 2010, David Legland <dav...@gr...> +%% +%% All rights reserved. +%% +%% This program is free software; you can redistribute it and/or modify +%% it under the terms of the BSD License. For details see the COPYING +%% file included as part of this distribution. + +%% 2011 Adapted to Octave by Juan Pablo Carbajal <car...@if...> + function varargout = drawEllipse(varargin) %DRAWELLIPSE Draw an ellipse on the current axis % Modified: trunk/octave-forge/main/geometry/matGeom_raw/geom2d/drawEllipseArc.m =================================================================== --- trunk/octave-forge/main/geometry/matGeom_raw/geom2d/drawEllipseArc.m 2011-10-03 19:56:05 UTC (rev 8663) +++ trunk/octave-forge/main/geometry/matGeom_raw/geom2d/drawEllipseArc.m 2011-10-03 21:03:42 UTC (rev 8664) @@ -1,3 +1,13 @@ +%% Copyright (c) 2010, David Legland <dav...@gr...> +%% +%% All rights reserved. +%% +%% This program is free software; you can redistribute it and/or modify +%% it under the terms of the BSD License. For details see the COPYING +%% file included as part of this distribution. + +%% 2011 Adapted to Octave by Juan Pablo Carbajal <car...@if...> + function varargout = drawEllipseArc(varargin) %DRAWELLIPSEARC Draw an ellipse arc on the current axis % Modified: trunk/octave-forge/main/geometry/matGeom_raw/geom2d/drawLabels.m =================================================================== --- trunk/octave-forge/main/geometry/matGeom_raw/geom2d/drawLabels.m 2011-10-03 19:56:05 UTC (rev 8663) +++ trunk/octave-forge/main/geometry/matGeom_raw/geom2d/drawLabels.m 2011-10-03 21:03:42 UTC (rev 8664) @@ -1,3 +1,13 @@ +%% Copyright (c) 2010, David Legland <dav...@gr...> +%% +%% All rights reserved. +%% +%% This program is free software; you can redistribute it and/or modify +%% it under the terms of the BSD License. For details see the COPYING +%% file included as part of this distribution. + +%% 2011 Adapted to Octave by Juan Pablo Carbajal <car...@if...> + function varargout = drawLabels(varargin) %DRAWLABELS Draw labels at specified positions % @@ -73,4 +83,4 @@ if nargout>0 varargout{1}=h; -end \ No newline at end of file +end Modified: trunk/octave-forge/main/geometry/matGeom_raw/geom2d/drawLine.m =================================================================== --- trunk/octave-forge/main/geometry/matGeom_raw/geom2d/drawLine.m 2011-10-03 19:56:05 UTC (rev 8663) +++ trunk/octave-forge/main/geometry/matGeom_raw/geom2d/drawLine.m 2011-10-03 21:03:42 UTC (rev 8664) @@ -1,3 +1,13 @@ +%% Copyright (c) 2010, David Legland <dav...@gr...> +%% +%% All rights reserved. +%% +%% This program is free software; you can redistribute it and/or modify +%% it under the terms of the BSD License. For details see the COPYING +%% file included as part of this distribution. + +%% 2011 Adapted to Octave by Juan Pablo Carbajal <car...@if...> + function varargout = drawLine(lin, varargin) %DRAWLINE Draw the line on the current axis % Modified: trunk/octave-forge/main/geometry/matGeom_raw/geom2d/drawOrientedBox.m =================================================================== --- trunk/octave-forge/main/geometry/matGeom_raw/geom2d/drawOrientedBox.m 2011-10-03 19:56:05 UTC (rev 8663) +++ trunk/octave-forge/main/geometry/matGeom_raw/geom2d/drawOrientedBox.m 2011-10-03 21:03:42 UTC (rev 8664) @@ -1,3 +1,13 @@ +%% Copyright (c) 2010, David Legland <dav...@gr...> +%% +%% All rights reserved. +%% +%% This program is free software; you can redistribute it and/or modify +%% it under the terms of the BSD License. For details see the COPYING +%% file included as part of this distribution. + +%% 2011 Adapted to Octave by Juan Pablo Carbajal <car...@if...> + function varargout = drawOrientedBox(box, varargin) %DRAWORIENTEDBOX Draw centered oriented rectangle % Modified: trunk/octave-forge/main/geometry/matGeom_raw/geom2d/drawParabola.m =================================================================== --- trunk/octave-forge/main/geometry/matGeom_raw/geom2d/drawParabola.m 2011-10-03 19:56:05 UTC (rev 8663) +++ trunk/octave-forge/main/geometry/matGeom_raw/geom2d/drawParabola.m 2011-10-03 21:03:42 UTC (rev 8664) @@ -1,3 +1,13 @@ +%% Copyright (c) 2010, David Legland <dav...@gr...> +%% +%% All rights reserved. +%% +%% This program is free software; you can redistribute it and/or modify +%% it under the terms of the BSD License. For details see the COPYING +%% file included as part of this distribution. + +%% 2011 Adapted to Octave by Juan Pablo Carbajal <car...@if...> + function varargout = drawParabola(varargin) %DRAWPARABOLA Draw a parabola on the current axis % Modified: trunk/octave-forge/main/geometry/matGeom_raw/geom2d/drawPoint.m =================================================================== --- trunk/octave-forge/main/geometry/matGeom_raw/geom2d/drawPoint.m 2011-10-03 19:56:05 UTC (rev 8663) +++ trunk/octave-forge/main/geometry/matGeom_raw/geom2d/drawPoint.m 2011-10-03 21:03:42 UTC (rev 8664) @@ -1,3 +1,13 @@ +%% Copyright (c) 2010, David Legland <dav...@gr...> +%% +%% All rights reserved. +%% +%% This program is free software; you can redistribute it and/or modify +%% it under the terms of the BSD License. For details see the COPYING +%% file included as part of this distribution. + +%% 2011 Adapted to Octave by Juan Pablo Carbajal <car...@if...> + function varargout = drawPoint(varargin) %DRAWPOINT Draw the point on the axis. % Modified: trunk/octave-forge/main/geometry/matGeom_raw/geom2d/drawRay.m =================================================================== --- trunk/octave-forge/main/geometry/matGeom_raw/geom2d/drawRay.m 2011-10-03 19:56:05 UTC (rev 8663) +++ trunk/octave-forge/main/geometry/matGeom_raw/geom2d/drawRay.m 2011-10-03 21:03:42 UTC (rev 8664) @@ -1,3 +1,13 @@ +%% Copyright (c) 2010, David Legland <dav...@gr...> +%% +%% All rights reserved. +%% +%% This program is free software; you can redistribute it and/or modify +%% it under the terms of the BSD License. For details see the COPYING +%% file included as part of this distribution. + +%% 2011 Adapted to Octave by Juan Pablo Carbajal <car...@if...> + function varargout = drawRay(ray, varargin) %DRAWRAY Draw a ray on the current axis % Modified: trunk/octave-forge/main/geometry/matGeom_raw/geom2d/drawRect.m =================================================================== --- trunk/octave-forge/main/geometry/matGeom_raw/geom2d/drawRect.m 2011-10-03 19:56:05 UTC (rev 8663) +++ trunk/octave-forge/main/geometry/matGeom_raw/geom2d/drawRect.m 2011-10-03 21:03:42 UTC (rev 8664) @@ -1,3 +1,13 @@ +%% C... [truncated message content] |