Reguläres rechtwinkliges Heptagon: c=0
Gleichungen für den Konfigurationsraum des Roboters (in Singular):
ring S=0,(x,y,z,e,f,t,u,v,w,a,b,c,d,h),dp; ideal J= f2+w2-1, x2+t2+a2-1, y2+u2+b2-1, z2+v2+c2-1, e2+d2-1, ft+wa, xy+tu+ab, yz+uv+bc, ze+cd, x+y+z+e+1, f+t+u+v-1, w+a+b+c+d;Die Gleichungen beschreiben eine Kurve im R13. Die Projektionen auf die verschiedenen Ebenen sollen brechnet werden. Die Projektion auf die e,f-Ebene erhält man durch:
J=homog(J,h); ideal L=std(J); intvec hi=hilb(L,1); ideal K=eliminate(J,xyztuvwabcd,hi); K=subst(K,h,1); K; // Gleichung der Projektion auf die e,f - Ebene LIB "surf.lib"; plot(K[1]); // Bild der Kurve K=0 in der e,f - Ebene