((rec,l((^a(print(string-join`(,@(reverse(map car l)),@a))),(map cdr(cons a l)))(string-split(read-line)" ")))())