NewScene , false

set oObj = ActiveSceneRoot.AddGeometry( "Cube", "MeshSurface" )

set oFacet = oObj.ActivePrimitive.Geometry.Facets(3)

LogMessage "The first facet of this geometry is of index " & oFacet.Navigate(siFirstComponent).Index

LogMessage "The last facet of this geometry is of index " & oFacet.Navigate(siLastComponent).Index

LogMessage "The next facet of this geometry is of index " & oFacet.Navigate(siNextComponent).Index

LogMessage "The previous facet of this geometry is of index " & oFacet.Navigate(siPreviousComponent).Index

' Expected result:

'INFO : The first facet of this geometry is of index 0

'INFO : The last facet of this geometry is of index 5

'INFO : The next facet of this geometry is of index 4

'INFO : The previous facet of this geometry is of index 2