' this example illustrates how to access the automation object for the 

' polygons of the cube polygon mesh.

CreatePrim "Cube", "MeshSurface"

set oSelList = GetValue("SelectionList")

set oItem = oSelList(0)

set oGeometry = oItem.obj

set o2DGeometry = oGeometry.Geometry2D