Define a Common Lisp macro named threeWayBranch which takes three parameters, x y and toExecute. x and y will be numbers and toExecute a list with three sublists. The threeWayBranch macro will execute statements in toExecutes first sublist if x y, and the third sublist if x = y. Assume each of toExecutes sublists contain an arbitrary number of statements.

;threeWayBranch (threeWayBranch 2 3 ((print "Hello")) ((print "Hello") (print "World")) ((print "!"))"Hello" (threeWayBranch 3 2 ( ((print "Hello")) ((print "Hello") (print "World")) ((print "!")"World" (threeWayBranch 3 3 ((print "Hello")) ((print "Hello" ) (print "World")) ((print "!")"!" ;threeWayBranch (threeWayBranch 2 3 ((print "Hello")) ((print "Hello") (print "World")) ((print "!"))"Hello" (threeWayBranch 3 2 ( ((print "Hello")) ((print "Hello") (print "World")) ((print "!")"World" (threeWayBranch 3 3 ((print "Hello")) ((print "Hello" ) (print "World")) ((print "!")