516def sm86PlaceWord24FieldWithValidWord =
517 (lambda unrestricted position : Nat .
518 (lambda unrestricted byte0 : Byte .
519 (lambda unrestricted byte1 : Byte .
520 (lambda unrestricted byte2 : Byte .
521 (lambda unrestricted encoded : Bytes .
522 (app
523 (lambda unrestricted extent : Nat .
524 (app
525 (nat-eliminate
526 (lambda unrestricted condition : Nat .
527 (pi unrestricted ignored : Nat . (family SM86FieldEncodingResult)))
528 (lambda unrestricted ignored : Nat .
529 (sm86FieldFailure
530 (constructor SM86EncodingErrorCode SM86EncodingFieldExtentInvalid)
531 position
532 sm86EncodingNaturalTwentyFour
533 extent
534 (bytes-length encoded)))
535 (lambda unrestricted predecessor : Nat .
536 (lambda unrestricted induction : (pi unrestricted ignored : Nat . (family SM86FieldEncodingResult)) .
537 (lambda unrestricted ignored : Nat .
538 (constructor
539 SM86FieldEncodingResult
540 SM86FieldEncodingSucceeded
541 (sm86PlaceWord24BitsUnchecked position byte0 byte1 byte2 encoded)
542 (sm86FieldTelemetryOne sm86EncodingNaturalTwentyFour extent)))))
543 (naturalLessOrEqual extent sm86EncodingNaturalOneHundredTwentyEight))
544 zero))
545 (naturalAdd position sm86EncodingNaturalTwentyFour)))))))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.