2068def jsonTreeKindIsValue =
2069 (lambda unrestricted kind : (family JSONTreeKind) .
2070 (eliminate
2071 JSONTreeKind
2072 (lambda unrestricted current : (family JSONTreeKind) . Nat)
2073 kind
2074 (branch JSONTreeValueKind . (succ zero))
2075 (branch JSONTreeObjectMembersKind . zero)
2076 (branch JSONTreeArrayValuesKind . zero)))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.