CreatePrim "Grid", "MeshSurface"

'This create a texture property containing the projected U,V,W values

CreateTextureProj

'Select the newly created property

SelectObj "Grid.polymsh.cls.Texture_Coordinates_AUTO.Texture_Projection"

'The current selection contains the newly created cluster property

set mySelList = GetValue("SelectionList")

set myItem = mySelList(0)

set myClusterProp = myItem.obj

myNbElem = myClusterProp.NbElements

LogMessage "Cluster_V1 Property [ " & myItem & " ] contains " & myNbElem & " element(s)"