34def tgU =
35 (lambda unrestricted value : Nat .
36 (sm86Unsigned32
37 (nat-to-byte (nat-modulo value 256))
38 (nat-to-byte (nat-modulo (nat-divide value 256) 256))
39 (nat-to-byte (nat-modulo (nat-divide value 65536) 256))
40 (nat-to-byte (nat-modulo (nat-divide value 16777216) 256))))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.