' this example illustrates how to access the automation object for the 
' points of the cube polygon mesh.
CreatePrim "Cube", "MeshSurface"
set oSelList = GetValue("SelectionList")
set oItem = oSelList(0)
set oGeometry = oItem.obj
set o0DGeometry = oGeometry.Geometry0D