Ticket Swapping solutions

Ticket Swapping was solved using Lisp by 1 contestant. Solution sizes: average 1389 bytes (shortest: 1389; longest: 1390).