417def aosDecodeBytes =
418 (lambda unrestricted value : (family JSON) . (let unrestricted hex = (aosMemberBytes b"hex" value)
419 in (aosWhen (naturalAnd (aosHasExactly2 b"t" b"hex" value) (naturalAnd (aosMemberIsString b"hex" value) (aosIsHexBytes hex)))
420 (constructor AosValue AosBytes hex))))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.