getz.sml

# getz.sml

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

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

zvalue = TINGetNodeZValue(Tout, node);
print("node, zvalue ", node, zvalue);