1 files changed, 0 insertions, 123 deletions
diff --git a/inst/geom3d/drawPolygon3d.m b/inst/geom3d/drawPolygon3d.m
deleted file mode 100644
index 5850cc8..0000000
--- a/inst/geom3d/drawPolygon3d.m
+++ /dev/null
@@ -1,123 +0,0 @@
-## Copyright (C) 2004-2011 David Legland <david.legland@grignon.inra.fr>
-## Copyright (C) 2004-2011 INRA - CEPIA Nantes - MIAJ (Jouy-en-Josas)
-## Copyright (C) 2012 Adapted to Octave by Juan Pablo Carbajal <carbajal@ifi.uzh.ch>
-## All rights reserved.
-##
-## Redistribution and use in source and binary forms, with or without
-## modification, are permitted provided that the following conditions are met:
-##
-##     1 Redistributions of source code must retain the above copyright notice,
-##       this list of conditions and the following disclaimer.
-##     2 Redistributions in binary form must reproduce the above copyright
-##       notice, this list of conditions and the following disclaimer in the
-##       documentation and/or other materials provided with the distribution.
-##
-## THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS ''AS IS''
-## AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
-## IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
-## ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE FOR
-## ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
-## DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR
-## SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER
-## CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY,
-## OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
-## OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
-
-## -*- texinfo -*-
-## @deftypefn {Function File} {@var{h} =} drawPolygon3d (@var{poly})
-## @deftypefnx {Function File} {@var{h} =} drawPolygon3d (@var{px},@var{py},@var{pz})
-## @deftypefnx {Function File} {@var{h} =} drawPolygon3d (@dots{},@var{param},@var{value})
-## Draw a 3D polygon specified by a list of vertices
-##
-##   drawPolygon3d(POLY);
-##   packs coordinates in a single N-by-3 array.
-##
-##   drawPolygon3d(PX, PY, PZ);
-##   specifies coordinates in separate arrays.
-##
-##   drawPolygon3d(..., PARAM, VALUE);
-##   Specifies style options to draw the polyline, see plot for details.
-##
-##   H = drawPolygon3d(...);
-##   also return a handle to the list of line objects.
-##
-## @seealso{polygons3d, fillPolygon3d, drawPolyline3d}
-## @end deftypefn
-
-function varargout = drawPolygon3d(varargin)
-
-  # check case we want to draw several curves, stored in a cell array
-  var = varargin{1};
-  if iscell(var)
-      holded = false;
-      if !ishold()
-        hold on;
-        holded = true;
-      end
-
-      h = [];
-      for i = 1:length(var(:))
-          h = [h; drawPolygon3d(var{i}, varargin{2:end})]; ##ok<AGROW>
-      end
-
-      if holded
-        hold off
-      end
-
-      if nargout > 0
-          varargout{1} = h;
-      end
-      return;
-  end
-
-  # extract curve coordinate
-  if size(var, 2) == 1
-      # first argument contains x coord, second argument contains y coord
-      # and third one the z coord
-      px = var;
-      if length(varargin) < 3
-          error('Wrong number of arguments in drawPolygon3d');
-      end
-      py = varargin{2};
-      pz = varargin{3};
-      varargin = varargin(4:end);
-  else
-      # first argument contains both coordinate
-      px = var(:, 1);
-      py = var(:, 2);
-      pz = var(:, 3);
-      varargin = varargin(2:end);
-  end
-
-
-  ## draw the polygon
-
-  # check that the polygon is closed
-  if px(1) ~= px(end) || py(1) ~= py(end) || pz(1) ~= pz(end)
-      px = [px; px(1)];
-      py = [py; py(1)];
-      pz = [pz; pz(1)];
-  end
-
-  # draw the closed curve
-  h = plot3(px, py, pz, varargin{:});
-
-  if nargout > 0
-      varargout = {h};
-  end
-
-endfunction
-
-%!demo
-%! l=0.25;
-%! # Corner Triangle with a wedge
-%! poly2 = [1 0 0; ...
-%!        ([1 0 0]+l*[-1 1 0]); ...
-%!        mean(eye(3)); ...
-%!        ([1 0 0]+(1-l)*[-1 1 0]); ...
-%!        0 1 0; ...
-%!        0 0 1];
-%! drawPolygon3d(poly2)
-%! axis square
-%! axis equal
-%! view([74 26])