protoData_ofNode Function

private function protoData_ofNode(node_pos, proto, geometry, level) result(protodata)

Small helping routine to get the variable data from a leaf.

Arguments

Type	Intent	Optional	Attributes		Name
integer,	intent(in)			::	node_pos
type(sdr_protoTree_type),	intent(in)			::	proto
type(sdr_geometry_type),	intent(in)			::	geometry
integer,	intent(in)			::	level

Return Value real(kind=rk), (11+proto%node%nColors)