A bracket generator and tournament organizer in Common Lisp