55def participantTreeParentOf =
56 (lambda unrestricted node : (family ParticipantTreeNode) .
57 (eliminate
58 ParticipantTreeNode
59 (lambda unrestricted current : (family ParticipantTreeNode) . Nat)
60 node
61 (branch ParticipantTreeNodeOf role size parent depth . parent)))The compiler supplied declaration spans and resolved links from this source snapshot. This page does not assert that this file belongs to a checked closure.