0031381: Foundation Classes -wrong evaluations for rational BSpline curves using...
[occt.git] / src / BSplCLib / BSplCLib_1.cxx
1 // Copyright (c) 1995-1999 Matra Datavision
2 // Copyright (c) 1999-2014 OPEN CASCADE SAS
3 //
4 // This file is part of Open CASCADE Technology software library.
5 //
6 // This library is free software; you can redistribute it and/or modify it under
7 // the terms of the GNU Lesser General Public License version 2.1 as published
8 // by the Free Software Foundation, with special exception defined in the file
9 // OCCT_LGPL_EXCEPTION.txt. Consult the file LICENSE_LGPL_21.txt included in OCCT
10 // distribution for complete text of the license and disclaimer of any warranty.
11 //
12 // Alternatively, this file may be used under the terms of Open CASCADE
13 // commercial license or contractual agreement.
14
15 #include <BSplCLib.hxx>
16
17 #include <Standard_NotImplemented.hxx>
18 // BSpline Curve in 2d space
19 // **************************
20
21 #define Dimension_gen 2
22
23 #define Array1OfPoints  TColgp_Array1OfPnt2d
24 #define Point           gp_Pnt2d
25 #define Vector          gp_Vec2d
26
27 #define PointToCoords(carr,pnt,op) \
28 (carr)[0] = (pnt).X() op,  \
29         (carr)[1] = (pnt).Y() op
30
31 #define CoordsToPoint(pnt,carr,op) \
32         (pnt).SetX ((carr)[0] op), \
33         (pnt).SetY ((carr)[1] op)
34
35 #define NullifyPoint(pnt) \
36         (pnt).SetCoord (0.,0.)
37
38 #define NullifyCoords(carr) \
39         (carr)[0] = (carr)[1] = 0.
40
41 #define ModifyCoords(carr,op) \
42         (carr)[0] op,          \
43         (carr)[1] op
44
45 #define CopyCoords(carr,carr2) \
46         (carr)[0] = (carr2)[0], \
47         (carr)[1] = (carr2)[1]
48
49 #define BSplCLib_DataContainer BSplCLib_DataContainer_2d  
50   
51 #include <BSplCLib_CurveComputation.gxx>