chickadee » tuples » tuple-cons-right

function (result)

(tuple-cons-right arg tup)

requires (%tuple? tup)

ensures  (and (%tuple result)
              (= (%tuple-length result)
                 (+ (%tuple-length tup) 1)))