Anonymous user
Draw a sphere: Difference between revisions
Adds Clojure solution
(Updated D entry) |
(Adds Clojure solution) |
||
Line 615:
}
}</lang>
=={{header|Clojure}}==
{{libheader|quil}}
<lang clojure>
(use 'quil.core)
(def w 500)
(def h 400)
(defn setup []
(background 0))
(defn draw []
(push-matrix)
(translate 250 200 0)
(sphere 100)
(pop-matrix))
(defsketch main
:title "sphere"
:setup setup
:size [w h]
:draw draw
:renderer :opengl)
</lang>
{{out}}
[http://i.imgur.com/fkzH5wM.png]
=={{header|D}}==
| |||