Draw a sphere: Difference between revisions

(added Ol)
Line 1,622:
(arc *middle* *middle* 180 0 (* 2 pi))
(fill-path))))</lang>
 
=={{header|ContextFree}}==
<lang contextFree>
startshape SPHERE
 
shape SPHERE {
CIRCLE[]
SPHERE[x 0.1% y 0.1%s 0.99 0.99 b 0.05]
}
</lang>
 
=={{header|D}}==