nodeext.sml

# nodeext.sml

clear();
tin Tout;
numeric numnodes, node;
numeric xcoord, ycoord;
GetOutputTIN(Tout, "TINToolkit", "ComputeStandardAttributes");

# pick a node less than or equal
# to number of nodes
numnodes = TINNumberNodes(Tout);
node = floor(numnodes / 2);

TINGetNodeExtents(Tout, node, xcoord, ycoord);
print("node, x, y ", node, xcoord, ycoord);