729def nativePhysicalTrainingCheckedBitPatchFieldFits =
730 (lambda unrestricted shift : Nat .
731 (lambda unrestricted width : Nat .
732 (lambda unrestricted limit : Nat .
733 (app
734 (nat-eliminate
735 (lambda unrestricted current : Nat . (pi unrestricted ignored : Nat . Nat))
736 (lambda unrestricted ignored : Nat .
737 (app naturalIsZero (nat-less-than (app naturalSaturatingSubtract limit width) shift)))
738 (lambda unrestricted predecessor : Nat .
739 (lambda unrestricted induction : (pi unrestricted ignored : Nat . Nat) .
740 (lambda unrestricted ignored : Nat . zero)))
741 (nat-less-than limit width))
742 zero))))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.