Create Comet.rkt

This is the code...