170def naturalDivisionState =
171 (lambda unrestricted value : Nat .
172 (lambda unrestricted divisor : Nat .
173 (nat-eliminate
174 (lambda unrestricted current : Nat . (family NaturalDivisionState))
175 (constructor NaturalDivisionState NaturalDivisionStateValue zero zero)
176 (lambda unrestricted predecessor : Nat .
177 (lambda unrestricted induction : (family NaturalDivisionState) .
178 (naturalDivisionStep divisor induction)))
179 value)))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.