ran out of time, got this far 1 minute before the jam closed. to run, load Prolog and type "consult graphics." after it returns from loading the graphics library then copy and paste in the rest of the code
