地球儀
sphere((0,0,0),r)
N=(0,0,r)
S=(0,0,-r)
A=(r,0,0)
circle((0,0,0),r,vector((0,0,1)))
circle((0,0,r*sin(23.5°)),r*cos(23.5°),vector((0,0,1)))
circle((0,0,r*sin(-23.5°)),r*cos(23.5°),vector((0,0,1)))
circle((0,0,r*sin(66.5°)),r*cos(66.5°),vector((0,0,1)))
circle((0,0,r*sin(-66.5°)),r*cos(66.5°),vector((0,0,1)))
circumcircularArc(N,(r*cos(i*15°),r*sin(i*15°),0),S)
Sequence(circumcircularArc(N,(r*cos(i*15°),r*sin(i*15°),0),S),i,1,24)
circle((0,0,r*sin(i*15°)),r*cos(i*15°),vector((0,0,1)))
Sequence(circle((0,0,r*sin(i*15°)),r*cos(i*15°),vector((0,0,1))),i,-5,5)
surface(r*cos(t)*cos(s),r*cos(t)*sin(s),r*sin(t),s,-180°,180°,t,-23.5°,23.5°)
surface(r*cos(t)*cos(s),r*cos(t)*sin(s),r*sin(t),s,-180°,180°,t,23.5°,66.5°)
surface(r*cos(t)*cos(s),r*cos(t)*sin(s),r*sin(t),s,-180°,180°,t,66.5°,90°)