582def telemetryRecordRouteContains =
583 (lambda unrestricted wanted : Nat .
584 (lambda unrestricted routes : (family TelemetryRecordRoutes) .
585 (eliminate
586 TelemetryRecordRoutes
587 (lambda unrestricted current : (family TelemetryRecordRoutes) . Nat)
588 routes
589 (branch TelemetryRecordRoutesEnd . 0)
590 (branch
591 TelemetryRecordRoutesNext
592 tag
593 recipe
594 tail
595 induction
596 .
597 (naturalOr (naturalEqual tag wanted) induction)))))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.