AlphaGitHub
Source/Packages

ResourcePlanContract

packages/hardware/platforms/linux-nvidia/tests/ResourcePlanContract.alpha

639 lines74 declarations22.9 KiBSHA-256 df18db61c507
Download exact fileView at revisionbcc11a4e7647d31628

def · lines 254–262

rpLeaseAmount

Full file
254def rpLeaseAmount =
255  (lambda unrestricted value : (family StdResult (family NativePhysicalMemoryFailure) (family ResourceLease)) .
256    (eliminate
257      StdResult
258      (lambda unrestricted r : (family StdResult (family NativePhysicalMemoryFailure) (family ResourceLease)) .
259        Nat)
260      value
261      (branch StdFailure error . 0)
262      (branch StdSuccess lease . (resourceLeaseAmount lease))))

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.