'
'	This example illustrates how to iterate over the output ports
'	of an operator and access the object being written too.
'
set root = Application.ActiveProject.ActiveScene.Root
set grid = root.AddGeometry("Grid","MeshSurface")
' find the operators on the grid
for each op in grid.ActivePrimitive.ConstructionHistory
	   LogMessage op.Name & ", " & op.Type
	   for each port in op.OutputPorts
	   	   LogMessage port.Name & ": " & port.target2
	   next
next