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:
1.1 KB
|
Line | |
---|
1 | Starts dribbling to chemistry.output (1996/6/4, 14:58:11).
|
---|
2 | NIL
|
---|
3 |
|
---|
4 | >
|
---|
5 | (load "chemistry")Loading chemistry.lisp
|
---|
6 | ------------------- CASE 1 -------------------
|
---|
7 | Condition:
|
---|
8 | Green list: [ ]
|
---|
9 | Red list: [ A2 - A4 ]
|
---|
10 | Basis: [ (1) * X4 + (A2 - A4), (A2 - A4) * X1 + (1) * X3^2 + (A1 + A3 + A4) * X3 + (A1 * A3 + A1 * A4 + A3 * A4), (A2 - A4) * X2 + ( - 1) * X3^2 + ( - A1 + A2 - A3 - 2 * A4) * X3 + (A1 * A2 - A1 * A3 - 2 * A1 * A4 - A2^2 + A2 * A3 + 3 * A2 * A4 - 2 * A3 * A4 - 2 * A4^2), (1) * X3^3 + (A1 + A3 + A4) * X3^2 + (A1 * A3 + A1 * A4 + A3 * A4) * X3 + ( - A1 * A3 * A4) ]
|
---|
11 | ------------------- CASE 2 -------------------
|
---|
12 | Condition:
|
---|
13 | Green list: [ A2 - A4 ]
|
---|
14 | Red list: [ A1 * A2^2 - A1 * A2 * A3 - 3 * A1 * A2 * A4 + 2 * A1 * A4^2 - A2^3 + A2^2 * A3 + 4 * A2^2 * A4 - 3 * A2 * A3 * A4 - 5 * A2 * A4^2 + 2 * A3 * A4^2 + 2 * A4^3 ]
|
---|
15 | Basis: [ ( - A1 * A3 * A4) ]
|
---|
16 | ------------------- CASE 3 -------------------
|
---|
17 | Condition:
|
---|
18 | Green list: [ A2 - A4, A1 * A3 * A4 ]
|
---|
19 | Red list: [ ]
|
---|
20 | Basis: [ (1) * X4, (1) * X1 + (1) * X2 + (1) * X3 + (A1 + A3 + A4), ( - 1) * X3^2 + ( - A1 - A3 - A4) * X3 + ( - A1 * A3 - A1 * A4 - A3 * A4) ]
|
---|
21 | Finished loading chemistry.lisp
|
---|
22 | T
|
---|
23 |
|
---|
24 | >
|
---|
25 | (dribble)
|
---|
Note:
See
TracBrowser
for help on using the repository browser.