Create a9-4.rkt

Continuations are now union members