AlphaGitHub
Source/Packages

Runtime.DeviceArenaCertificate

packages/execution/src/Runtime/DeviceArenaCertificate.alpha

1,800 lines133 declarations66.8 KiBSHA-256 74ef7fffbf20
Download exact fileView at revisionf5034773ad4bb52133

def · lines 1287–1301

deviceArenaAllIntact

Full file
1287def deviceArenaAllIntact =
1288  (lambda unrestricted tracked : (family DeviceArenaTracked) .
1289    (lambda unrestricted carried : (family ArenaResidents) .
1290      (eliminate
1291        ArenaResidents
1292        (lambda unrestricted current : (family ArenaResidents) . Nat)
1293        carried
1294        (branch ArenaResidentsEnd . 1)
1295        (branch
1296          ArenaResidentsNext
1297          head
1298          tail
1299          induction
1300          .
1301          (naturalAnd (deviceArenaIntact tracked head) induction)))))

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.