src/ShapeBuild/ShapeBuild_Vertex.cdl

   1 -- Created on: 1998-06-11
   2 -- Created by: data exchange team
   3 -- Copyright (c) 1998-1999 Matra Datavision
   4 -- Copyright (c) 1999-2014 OPEN CASCADE SAS
   5 --
   6 -- This file is part of Open CASCADE Technology software library.
   7 --
   8 -- This library is free software; you can redistribute it and/or modify it under
   9 -- the terms of the GNU Lesser General Public License version 2.1 as published
  10 -- by the Free Software Foundation, with special exception defined in the file
  11 -- OCCT_LGPL_EXCEPTION.txt. Consult the file LICENSE_LGPL_21.txt included in OCCT
  12 -- distribution for complete text of the license and disclaimer of any warranty.
  13 --
  14 -- Alternatively, this file may be used under the terms of Open CASCADE
  15 -- commercial license or contractual agreement.
  16
  17 class Vertex from ShapeBuild
  18
  19     ---Purpose: Provides low-level functions used for constructing vertices
  20
  21 uses
  22     Pnt from gp,
  23     Vertex from TopoDS
  24
  25 is
  26
  27     CombineVertex ( me; V1, V2: Vertex from TopoDS; tolFactor: Real = 1.0001 )
  28     returns Vertex from TopoDS;
  29         ---Purpose: Combines new vertex from two others. This new one is the
  30         --          smallest vertex which comprises both of the source vertices.
  31         --          The function takes into account the positions and tolerances
  32         --          of the source vertices.
  33         --          The tolerance of the new vertex will be equal to the minimal
  34         --          tolerance that is required to comprise source vertices
  35         --          multiplied by tolFactor (in order to avoid errors because
  36         --          of discreteness of calculations).
  37
  38     CombineVertex ( me; pnt1, pnt2: Pnt from gp; tol1, tol2: Real;
  39                     tolFactor: Real = 1.0001 )
  40     returns Vertex from TopoDS;
  41         ---Purpose: The same function as above, except that it accepts two points
  42         --          and two tolerances instead of vertices
  43
  44 end Vertex;