- tuple-for-each proc tup #!rest tupsprocedure
command ((old new (lambda (proc tup . tups) #t)))
(tuple-for-each proc tup . tups) requires (and (procedure? proc) (%tuple tup) ((list-of? %tuple?) tups) (apply = (%tuple-length tup) (map %tuple-length tups))) ensures "proc applied to each item"