109def specBitLength =
110 (lambda unrestricted value : Nat .
111 (eliminate SpecBitState (lambda unrestricted current : (family SpecBitState) . Nat)
112 (nat-eliminate (lambda unrestricted current : Nat . (family SpecBitState))
113 (nat-eliminate (lambda unrestricted current : Nat . (family SpecBitState))
114 (constructor SpecBitState SpecBitStateOf value 0)
115 (lambda unrestricted predecessor : Nat . (lambda unrestricted induction : (family SpecBitState) . (specChunkStep induction)))
116 20)
117 (lambda unrestricted predecessor : Nat . (lambda unrestricted induction : (family SpecBitState) . (specBitStep induction)))
118 64)
119 (branch SpecBitStateOf remaining count . count)))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.