392def sm86FieldValueFits =
393 (lambda unrestricted width : Nat .
394 (lambda unrestricted value : Nat .
395 (app
396 (nat-eliminate
397 (lambda unrestricted current : Nat . (pi unrestricted ignored : Nat . Nat))
398 (lambda unrestricted ignored : Nat . (sm86FieldValueFitsByByteChunks width value))
399 (lambda unrestricted predecessor : Nat .
400 (lambda unrestricted induction : (pi unrestricted ignored : Nat . Nat) .
401 (lambda unrestricted ignored : Nat . (sm86FieldWord32InRange value))))
402 (naturalEqual width (byte-to-nat (byte 32))))
403 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.