perm filename TRACE.KRD[S,AIL] blob sn#104752 filedate 1974-06-05 generic text, type T, neo UTF8
M3=(PAC/PA-PC)/(1-PC);

                                    PAC
                                    --- - PC
                                    PA
(D4)                           M3 = --------
                                     1 - PC

(C5) SUBST(RHS(D2),M1,D1);

                                 PAB         PAB
                                 --- - PB    --- - PB
                                 PA          PA
(D5)                 M3 = M2(1 - --------) + --------
                                  1 - PB      1 - PB

(C6) SUBST(RHS(D3),M2,%);

                      -1    -1
(D6) M3 = ((1 + -1 PC)   (PB   PBC + -1 PC))(1 -

                                                               PAB
                                                               --- - PB
                                                               PA
                                     (PAB/PA - PB)/(1 - PB)) + --------
                                                                1 - PB

(C7) SUBST(PA,P2+P1+P0+P2,%);

                      -1    -1
(D7) M3 = ((1 + -1 PC)   (PB   PBC + -1 PC))(1 -

                                                               PAB
                                                               --- - PB
                                                               PA
                                     (PAB/PA - PB)/(1 - PB)) + --------
                                                                1 - PB

(C8) SUBST(P0+P1+P2+P3,PA,%);

                      -1    -1
(D8) M3 = ((1 + -1 PC)   (PB   PBC + -1 PC))(1 - (PAB/(P3 + P2 +

                                                        PAB
                                                 ----------------- - PB
                                                 P3 + P2 + P1 + P0
                      P1 + P0) - PB)/(1 - PB)) + ----------------------
                                                         1 - PB

(C9) SUBST(P0+P1+P4+P5,PB,%);

EXPRESSION TOO WIDE TO BE DISPLAYED
ERROR DURING DISPLAY

(C10) RATSIMP(%);

]
↑]
COMPUTING THE DISPLAY NOW
↑]
COMPUTING THE DISPLAY NOW
↑]
COMPUTING THE DISPLAY NOW
EXPRESSION TOO WIDE TO BE DISPLAYED
ERROR DURING DISPLAY

(C11) SUBST(P0+P2+P4+P6,PC,%);

] ***$*** SUBST ( P0 + P2 + P4 + P6 , PC , % )   
SYNTAX ERROR
PLEASE REPHRASE OR EDIT

(C11) SUBST(P0+P2+P4+P6,PC,%);


(COMPUTING THE DISPLAY NOW)
YOU HAVE RUN OUT OF LIST SPACE.
DO YOU WANT MORE?
TYPE ALL; NONE; A LEVEL-NO. OR THE NAME OF A SPACE.
↑]
COMPUTING THE DISPLAY NOW
ALL
↑]
COMPUTING THE DISPLAY NOW
$
←ALL

↑]
COMPUTING THE DISPLAY NOW
↑]
COMPUTING THE DISPLAY NOW
↑Z
5567)   .IOT 1,1   :AMCSYMA
SYS: KRD; TS AMCSYM - FILE NOT FOUND
:MACSYMA


THIS IS MACSYMA 246

FIX 246 DSK MACSYM BEING LOADED 
LOADING DONE

(C1) M3=M1+M2*(1-M1);

(D1)                       M3 = (1 - M1) M2 + M1

(C2) M1=(PAB/PA-PB)/(1-PB);

                                    PAB
                                    --- - PB
                                    PA
(D2)                           M1 = --------
                                     1 - PB

(C3) M2=(PBC/PA-PC)/(1-PC);

                                    PBC
                                    --- - PC
                                    PA
(D3)                           M2 = --------
                                     1 - PC

(C4) SUBST(P0+P1+P2+P3,PA,D2,D3);

WRONG NO. OF ARGS TO SUBSTITUTE
(C5) M3=(PAC/PA-PC)/(1-PC);

                                    PAC
                                    --- - PC
                                    PA
(D5)                           M3 = --------
                                     1 - PC

(C6) SUBST(P0+P1+P2+P3,PA,D2);

                                    PAB
                             ----------------- - PB
                             P3 + P2 + P1 + P0
(D6)                    M1 = ----------------------
                                     1 - PB

(C7) SUBST(P0+P1+P2+P3,PA,D3);

                                    PBC
                             ----------------- - PC
                             P3 + P2 + P1 + P0
(D7)                    M2 = ----------------------
                                     1 - PC

(C8) SUBST(P0+P1+P2+P3,PA,DD3;

SUBST ( P0 + P1 + P2 + P3 , PA , DD3 ***$***   
SYNTAX ERROR
PLEASE REPHRASE OR EDIT

(C8) D3;

                                    PBC
                                    --- - PC
                                    PA
(D8)                           M2 = --------
                                     1 - PC

(C9) SUBST(PB,PA,%);

                                    PBC
                                    --- - PC
                                    PB
(D9)                           M2 = --------
                                     1 - PC

(C10) ↑Z
5567)   .IOT 1,1   :TCTYP DA
!≥≡
␈
≡␈␈␈:KILL  MACSYM$J≡
␈
≡␈␈␈*:NEWTTY ≡
␈
≡␈␈␈*:MACSYMA≡
␈
≡␈␈␈≡
␈
≡␈␈␈≡
␈
≡␈␈␈THIS IS MACSYMA 246≡
␈
≡␈␈␈≡
␈
≡␈␈␈FIX 246 DSK MACSYM BEING LOADED ≡
␈
≡␈␈␈LOADING DONE≡
␈
≡␈␈␈≡
␈
≡␈␈␈(C1) A≡
␈
≡␈␈␈;≡
␈
≡␈␈␈≡
␈
≡␈␈␈(D1)                                A≡
␈
≡␈␈␈≡
␈
≡␈␈␈(C2) A/B;≡
␈
≡␈␈␈≡
␈
≡␈␈␈                                    A≡
␈
≡␈␈␈(D2)                                -≡
␈
≡␈␈␈                                    B≡
␈
≡␈␈␈≡
␈
≡␈␈␈(C3) 1/(1+1/A));≡
␈
≡␈␈␈≡
␈
≡␈␈␈1 / ( 1 + 1 / A ) ) ***$***   ≡
␈≥≡␈␈␈SYNTAX ERROR≡
␈
≡␈␈␈PLEASE REPHRASE OR EDIT≡
␈
≡␈␈␈≡
␈
≡␈␈␈(C3) 1/(1+1/A);≡
␈
≡␈␈␈≡
␈
≡␈␈␈                                    1≡
␈
≡␈␈␈(D3)                              -----≡
␈
≡␈␈␈                                  1≡
␈
≡␈␈␈                                  - + 1≡
␈
≡␈␈␈                                  A≡
␈
≡␈␈␈≡
␈
≡␈␈␈(C4) A+B*C≡
␈
≡␈␈␈;≡
␈
≡␈␈␈≡
␈
≡␈␈␈(D4)                             B C + A≡
␈
≡␈␈␈≡
␈
≡␈␈␈(C5) ;≡
␈
≡␈␈␈≡
␈
≡␈␈␈(C5) A;≡
␈
≡␈␈␈≡
␈
≡␈␈␈(D5)                                A≡
␈
≡␈␈␈≡
␈
≡␈␈␈(C6) ≡
␈
≡␈␈␈≡
␈
≡␈␈␈≡
␈≥≡␈␈␈A+B;≡
␈
≡␈␈␈≡
␈
≡␈␈␈(D6)                              B + A≡
␈
≡␈␈␈≡
␈
≡␈␈␈(C7) A+A+A;≡
␈
≡␈␈␈≡
␈
≡␈␈␈(D7)                               3 A≡
␈
≡␈␈␈≡
␈
≡␈␈␈(C8) SUM(A+B[I],0,2,I);≡
␈
≡␈␈␈≡
␈
≡␈␈␈0≡
␈
≡␈␈␈ONLY ATOMS CAN BE BOUND≡
␈
≡␈␈␈(C9) SUM(A+B[I],I,0,2);≡
␈
≡␈␈␈≡
␈
≡␈␈␈(D9)                        3 A + B  + B  + B≡
␈
≡␈␈␈                                   2    1    0≡
␈
≡␈␈␈≡
␈
≡␈␈␈(C10) SUM(A+B[I],I,0,N);≡
␈
≡␈␈␈≡
␈
≡␈␈␈                                N≡
␈
≡␈␈␈                              \====≡
␈
≡␈␈␈                               \≡
␈
≡␈␈␈(D10)                           >    (B  + A)≡
␈
≡␈␈␈                               /       I≡
␈
≡␈␈␈                              /====≡
␈≥≡␈␈␈                              I = 0≡
␈
≡␈␈␈≡
␈
≡␈␈␈(C11) ↑Z≡
␈
≡␈␈␈5567)   .IOT 1,1   :LOGOUT≡
␈
≡␈␈␈≥∨≡
␈
≡␈␈␈ML ITS 876  CONSOLE 35 FREE. 03:08:53≡
␈
≡␈␈␈