- 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)))