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
