Draw a sphere: Difference between revisions
Content added Content deleted
m (→{{header|REXX}}: removed STYLE from the PRE html tag.) |
(→{{header|zkl}}: opps, left out a line) |
||
Line 3,609: | Line 3,609: | ||
<lang zkl>img[X+X0,Y+Y0]=C*140+C;</lang> |
<lang zkl>img[X+X0,Y+Y0]=C*140+C;</lang> |
||
Perhaps a more useful solution is to use GnuPlot (I grabbed the code from (http://ayapin-film.sakura.ne.jp/Gnuplot/): |
Perhaps a more useful solution is to use GnuPlot (I grabbed the code from (http://ayapin-film.sakura.ne.jp/Gnuplot/): |
||
<lang zkl> |
<lang zkl>#<<< |
||
cmd:=0'| |
|||
set term wxt |
set term wxt |
||
set parametric |
set parametric |