(
	obj = $
	baseobj = obj.baseobject
	epoly = obj.modifiers[1]
	flag = bit.set 0 30 true
	c_getEdgeFlags = polyop.getEdgeFlags
	edgesel = polyop.getEdgeSelection baseobj
	polyop.setEdgeFlags baseobj edgesel flag
	edgesNew = #{}
	for i=1 to (polyop.getNumEdges obj) where (bit.get (c_getEdgeFlags obj i) 30) do edgesNew[i] = true
	epoly.Select #Edge edgesNew
)