#############################################################
## 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