Accept the word only when value < limit.
570def aarch64EncodeBounded =
571 (lambda unrestricted value : Nat .
572 (lambda unrestricted limit : Nat .
573 (lambda unrestricted word : (family AArch64EncodeResult) .
574 (nat-eliminate
575 (lambda unrestricted accepted : Nat . (family AArch64EncodeResult))
576 (constructor AArch64EncodeResult AArch64ImmediateOutOfRange value)
577 (lambda unrestricted predecessor : Nat .
578 (lambda unrestricted induction : (family AArch64EncodeResult) . word))
579 (naturalLess value limit)))))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.