set oRoot = ActiveProject.ActiveScene.Root
set oSphere = oRoot.AddGeometry( "Sphere", "MeshSurface" )
set oGeometry = oSphere.ActivePrimitive.Geometry
set oFacets = oGeometry.Facets
for each oFacet in oFacets
        logMessage "Facet #" & oFacet.Index & " has " & oFacet.NbPoints & " points."
next
' Expected Result:
'INFO : Facet #0 has 3 points.
'INFO : Facet #1 has 4 points.
'INFO : Facet #2 has 4 points.
'       <snip>
'INFO : Facet #61 has 4 points.
'INFO : Facet #62 has 4 points.
'INFO : Facet #63 has 3 points.

var oRoot = ActiveProject.ActiveScene.Root;
var oSphere = oRoot.AddGeometry( "Sphere", "MeshSurface" );
var oGeometry = oSphere.ActivePrimitive.Geometry;
var oFacets = oGeometry.Facets;
facetEnum = new Enumerator(oFacets);
var oFacet;
for( ; !facetEnum.atEnd(); facetEnum.moveNext() ) {
        oFacet = facetEnum.item();
        LogMessage( "Facet #" + oFacet.Index + " has " + oFacet.NbPoints + " points." );
}
// Expected result:
//INFO : Facet #0 has 3 points.
//INFO : Facet #1 has 4 points.
//INFO : Facet #2 has 4 points.
//      <snip>
//INFO : Facet #61 has 4 points.
//INFO : Facet #62 has 4 points.
//INFO : Facet #63 has 3 points.