AlphaGitHub
Source/Packages

Checkpoint.Schema

packages/execution/persistence/src/Checkpoint/Schema.alpha

2,376 lines254 declarations94.9 KiBSHA-256 c49b7c5718ad
Download exact fileView at revisionbcc11a4e7647d31628

def · lines 580–586

checkpointNaturalByteAt

Full file
580def checkpointNaturalByteAt =
581  (lambda unrestricted value : Nat .
582    (lambda unrestricted shift : Nat .
583      (nat-to-byte
584        (naturalModuloUnchecked
585          (naturalDivideUnchecked value (naturalPowerOfTwo shift))
586          (succ (byte-to-nat (byte 255)))))))

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.