REDUCE is waiting for a prompt:
Declare k operator ?  (Y or N)

REDUCE session log:

Reduce (CSL, rev XXXX), dd-Mon-yyyy ...

1: 
2: 
lisp_dialect

swget

swtoggle

asltx

exprltx

itoa

atoi

array2flatls

arrayltx

asltx_marker

swset

swreset

3: 
4: 
5: 
6: 

7: write "=====> submit number ", 0, " done <=====" ;
=====> submit number 0 done <=====


8: ;

9: operator a, b, c, d ;

10: let c^2=a^2+b^2 ;

11: let d=a*b/2 ;

12: q1:=y^2 - x^3 + d^2*x ;
        2  2        3      2
       a *b *x - 4*x  + 4*y
q1 := -----------------------
                 4


13: solve(y^2=x^3 - d^2*x, {x,y}) ;
{{x=arbcomplex(2),

                      2  2      2
     sqrt(x)*sqrt( - a *b  + 4*x )
  y=-------------------------------},
                   2

 {x=arbcomplex(1),

                         2  2      2
      - sqrt(x)*sqrt( - a *b  + 4*x )
  y=----------------------------------}}
                    2


14: j:=sqrt(k(2)^2 + l^2) ;
Declare k operator ?  (Y or N)


?wType Y or N
rite "=====> submit n
umber ", 1, " done <=====

" ;
15: 


The session will now be terminated.

