187def vaSelectAlignment =
188 (lambda unrestricted size : ByteCount .
189 (nat-eliminate
190 (lambda unrestricted current : Nat . (family VAAlignment))
191 (constructor VAAlignment VAAlignment2MiB)
192 (lambda unrestricted predecessor : Nat .
193 (lambda unrestricted induction : (family VAAlignment) .
194 (constructor VAAlignment VAAlignment64KiB)))
195 (modelWord64LessThan (stdByteCountValue size) (stdByteAlignmentValue va2MiB))))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.