64def sm86ControlCheck =
65 (lambda unrestricted condition : Nat .
66 (lambda unrestricted code : Nat .
67 (lambda unrestricted success : (pi unrestricted witness : Nat . (family SM86ControlResult)) .
68 (nat-eliminate
69 (lambda unrestricted valid : Nat . (family SM86ControlResult))
70 (sm86ControlFailure code)
71 (lambda unrestricted predecessor : Nat .
72 (lambda unrestricted induction : (family SM86ControlResult) . (success zero)))
73 condition))))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.