`count` consecutive registers from `base`; none from RZ.
785def sm121LowerSpan =
786 (lambda unrestricted base : Nat .
787 (lambda unrestricted count : Nat .
788 (nat-eliminate
789 (lambda unrestricted current : Nat . (family SM121LowerRegisters))
790 sm121LowerNone
791 (lambda unrestricted predecessor : Nat .
792 (lambda unrestricted induction : (family SM121LowerRegisters) .
793 (nat-eliminate
794 (lambda unrestricted current : Nat . (family SM121LowerRegisters))
795 sm121LowerNone
796 (lambda unrestricted unused : Nat .
797 (lambda unrestricted inner : (family SM121LowerRegisters) .
798 (sm121LowerAppend induction (sm121LowerOne (nat-add base predecessor)))))
799 (sm121LowerNamed base))))
800 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.