- tuple-reverse tupprocedure
function (result)
(tuple-reverse tup) requires (%tuple? tup) ensures (and (%tuple result) (= (%tuple-length result) (%tuple-length tup)))
function (result)
(tuple-reverse tup)
requires (%tuple? tup)
ensures (and (%tuple result)
(= (%tuple-length result)
(%tuple-length tup)))