| 7fd59977 |
1 | -- |
| 2 | -- File : RightAngularWedge.cdl |
| 3 | -- Created : Sat 9 Jan 1993 |
| 4 | -- Author : CKY / Contract Toubro-Larsen ( SIVA ) |
| 5 | -- |
| 6 | ---Copyright : MATRA-DATAVISION 1993 |
| 7 | -- |
| 8 | |
| 9 | class RightAngularWedge from IGESSolid inherits IGESEntity |
| 10 | |
| 11 | |
| 12 | ---Purpose: defines RightAngularWedge, Type <152> Form Number <0> |
| 13 | -- in package IGESSolid |
| 14 | -- A right angular wedge is a triangular/trapezoidal prism |
| 15 | |
| 16 | uses |
| 17 | |
| 18 | Pnt from gp, |
| 19 | Dir from gp, |
| 20 | XYZ from gp |
| 21 | |
| 22 | is |
| 23 | |
| 24 | Create returns mutable RightAngularWedge; |
| 25 | |
| 26 | Init (me : mutable; |
| 27 | aSize : XYZ; |
| 28 | lowX : Real; |
| 29 | aCorner : XYZ; |
| 30 | anXAxis : XYZ; |
| 31 | anZAxis : XYZ); |
| 32 | ---Purpose : This method is used to set the fields of the class |
| 33 | -- RightAngularWedge |
| 34 | -- - aSize : the lengths along the local axes |
| 35 | -- - lowX : the length at the smaller X-side |
| 36 | -- - aCorner : the corner point coordinates |
| 37 | -- default (0,0,0) |
| 38 | -- - anXAxis : the unit vector defining local X-axis |
| 39 | -- default (1,0,0) |
| 40 | -- - anZAxis : the unit vector defining local Z-axis |
| 41 | -- default (0,0,1) |
| 42 | |
| 43 | Size(me) returns XYZ; |
| 44 | ---Purpose : returns the size |
| 45 | |
| 46 | XBigLength (me) returns Real; |
| 47 | ---Purpose : returns the length along the local X-axis |
| 48 | |
| 49 | XSmallLength (me) returns Real; |
| 50 | ---Purpose : returns the smaller length along the local X-direction at Y=LY |
| 51 | |
| 52 | YLength (me) returns Real; |
| 53 | ---Purpose : returns the length along the local Y-axis |
| 54 | |
| 55 | ZLength (me) returns Real; |
| 56 | ---Purpose : returns the length along the local Z-axis |
| 57 | |
| 58 | Corner (me) returns Pnt; |
| 59 | ---Purpose : returns the corner point coordinates |
| 60 | |
| 61 | TransformedCorner (me) returns Pnt; |
| 62 | ---Purpose : returns the corner point coordinates after applying |
| 63 | -- TransformationMatrix |
| 64 | |
| 65 | XAxis (me) returns Dir; |
| 66 | ---Purpose : returns the direction defining the local X-axis |
| 67 | |
| 68 | TransformedXAxis (me) returns Dir; |
| 69 | ---Purpose : returns the direction defining the local X-axis |
| 70 | -- after applying the TransformationMatrix |
| 71 | |
| 72 | YAxis (me) returns Dir; |
| 73 | ---Purpose : returns the direction defining the local Y-axis |
| 74 | -- it is got by taking the cross product of ZAxis and XAxis |
| 75 | |
| 76 | TransformedYAxis (me) returns Dir; |
| 77 | ---Purpose : returns the direction defining the local Y-axis |
| 78 | -- after applying the TransformationMatrix |
| 79 | |
| 80 | ZAxis (me) returns Dir; |
| 81 | ---Purpose : returns the direction defining the local Z-axis |
| 82 | |
| 83 | TransformedZAxis (me) returns Dir; |
| 84 | ---Purpose : returns the direction defining the local Z-axis |
| 85 | -- after applying the TransformationMatrix |
| 86 | |
| 87 | fields |
| 88 | |
| 89 | -- |
| 90 | -- Class : IGESSolid_RightAngularWedge |
| 91 | -- |
| 92 | -- Purpose : Declaration of variables specific to the definition |
| 93 | -- of the Class RightAngularWedge. |
| 94 | -- |
| 95 | -- Reminder : A RightAngularWedge instance is defined by : |
| 96 | -- a vertex at (X1,Y1,Z1) and three orthogonal edges lying |
| 97 | -- along the local +X, +Y and +Z axes. The local X and Z axes |
| 98 | -- are defined by a unit vector along the axes. |
| 99 | |
| 100 | theSize : XYZ; |
| 101 | -- the lengths along the local axes |
| 102 | |
| 103 | theXSmallLength : Real; |
| 104 | -- the length of X-direction at Y = LY |
| 105 | |
| 106 | theCorner : XYZ; |
| 107 | -- the corner point coordinates |
| 108 | |
| 109 | theXAxis : XYZ; |
| 110 | -- the unit vector along the local X-direction |
| 111 | |
| 112 | theZAxis : XYZ; |
| 113 | -- the unit vector along the local Z-direction |
| 114 | |
| 115 | end RightAngularWedge; |
projects / occt.git / blame