feat: add line-foot construction method
This commit is contained in:
parent
52272ff728
commit
b8ab409fc0
@ -728,6 +728,17 @@ classHandler: Record<JoyceClass, ClassHandler> :=
|
||||
commands.push `${aux} = Translate(${source}, ${displacement})`
|
||||
auxiliaries.push aux
|
||||
ends[1] = aux
|
||||
'foot'
|
||||
pt := args.subpoints
|
||||
unless pt then return
|
||||
destination := args.plane
|
||||
? args.plane[0]
|
||||
: `Line(${pt[1]},${pt[2]})`
|
||||
ends[0] = pt[0]
|
||||
commands.push
|
||||
`${aux} = ClosestPoint(${destination}, ${pt[0]})`
|
||||
auxiliaries.push aux
|
||||
ends[1] = aux
|
||||
'parallel'
|
||||
unless args.subpoints then return
|
||||
[newStart, oldStart, oldEnd] := args.subpoints
|
||||
|
Loading…
Reference in New Issue
Block a user