507def greedyArgmaxSM86ValidateVocabulary =
508 (lambda unrestricted vocabulary : Nat .
509 (nat-eliminate
510 (lambda unrestricted positive : Nat . (family GreedyArgmaxSM86Validation))
511 (constructor
512 GreedyArgmaxSM86Validation
513 GreedyArgmaxSM86ValidationRejected
514 (constructor GreedyArgmaxSM86FailureCode GreedyArgmaxSM86VocabularyZero))
515 (lambda unrestricted positivePredecessor : Nat .
516 (lambda unrestricted positiveInduction : (family GreedyArgmaxSM86Validation) .
517 (nat-eliminate
518 (lambda unrestricted bounded : Nat . (family GreedyArgmaxSM86Validation))
519 (constructor
520 GreedyArgmaxSM86Validation
521 GreedyArgmaxSM86ValidationRejected
522 (constructor GreedyArgmaxSM86FailureCode GreedyArgmaxSM86VocabularyTooLarge))
523 (lambda unrestricted boundedPredecessor : Nat .
524 (lambda unrestricted boundedInduction : (family GreedyArgmaxSM86Validation) .
525 (constructor GreedyArgmaxSM86Validation GreedyArgmaxSM86ValidationAccepted)))
526 (naturalLessOrEqual vocabulary greedyArgmaxSM86MaximumVocabulary))))
527 (naturalNonzero vocabulary)))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.