source: CGBLisp/examples/pappus2.out@ 1

Last change on this file since 1 was 1, checked in by Marek Rychlik, 15 years ago

First import of a version circa 1997.
File size: 258 bytes
Line 
1
2[U1*W2-V1*Z2,V1*Z1-U1*W1+W1-V1,-V3*Z3+U3*W3-W3+V3,-V3*Z2-W2*X3+V3*X3+U3*W2,V2*Z1+W1*X3-V2*X3-U2*W1,U2*W3-V2*Z3,-W2*Z3+W1*Z3+W3*Z2-W1*Z2-W3*Z1+W2*Z1,-S*U2*V3+S*U1*V3+S*U3*V2-S*U1*V2-S*U3*V1+S*U2*V1+1];
3[U1,V1,U2,V2,U3,V3,X3,Z3,W3];
4[S,Z1,W1,Z2,W2];
5[[],[]];
Note: See TracBrowser for help on using the repository browser.