context Input : Feature "Select OBody"
P1 isa GSMPoint
{
PointType = 0;
TypeObject isa GSMPointCoord
{
X = 50mm;
Y = 0mm;
Z = 150mm;
}
}
P2 isa GSMPoint
{
PointType = 0;
TypeObject isa GSMPointCoord
{
X = 50mm;
Y = 100mm;
Z = 150mm;
}
}
Line1 isa GSMLine
{
LineType= 0 ;
TypeObject isa GSMLinePtPt
{
FirstPoint = object : Input : Feature "Select WindowP3";
SecondPoint = object: ../../P1;
}
}
Line2 isa GSMLine
{
LineType= 0 ;
TypeObject isa GSMLinePtPt
{
FirstPoint = object : Input : Feature "Select WindowP3";
SecondPoint = object: ../../P2;
}
}
|