' 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