AlphaGitHub
Source/Packages

Observe.Value

packages/observability/src/Observe/Value.alpha

564 lines114 declarations29.3 KiBSHA-256 09f8c02938ee
Download exact fileView at revision426597bda5753d86c4

def · lines 442–446

aosDecodeMap

Full file
442def aosDecodeMap =
443  (lambda unrestricted decode : (pi unrestricted value : (family JSON) . (family AosDecoded)) .
444    (lambda unrestricted value : (family JSON) . (let unrestricted inner = (aosMemberValue b"v" value)
445      in (aosChoose (family AosDecoded) (naturalAnd (aosHasExactly2 b"t" b"v" value) (aosIsObject inner))
446           (aosDecodeMembers decode inner) aosRejected))))

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.