mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-04 18:06:22 +03:00
25 lines
576 B
Plaintext
25 lines
576 B
Plaintext
#############################################################
|
|
## Fix wire algo
|
|
## moves a curve of invalid wire to make it valid
|
|
#############################################################
|
|
|
|
point px 100 0 0
|
|
point py 0 100 0
|
|
point pz 0 0 100
|
|
|
|
vertex vx px
|
|
vertex vy py
|
|
|
|
edge exy vx vy
|
|
|
|
gcarc arc cir py pz px
|
|
|
|
# Here we have an error during automatic grid execution with test and testgrid:
|
|
# Tcl Exception: EMPTY
|
|
# But in line-by-line entering or script sourcing mode this line doesn't produce any error
|
|
|
|
mkedge earc arc
|
|
|
|
strongwire result exy earc
|
|
whatis result
|