fixwgaps result a 0.001
EnsureTolRule result result
puts [checkshape result]