REDUCE has terminated prematurely:
18: write "!!! Aborting: newcslgc.cpp:266 page type not recognised";
!!! Aborting: newcslgc.cpp:266 page type not recognised$

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: 
9: off nat;

10: on echo ;

11: operator a, b, c, d ;

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

13: let d=a*b/2 ;

14: q1:=y^2 - x^3 + d^2*x ;
q1 := (a**2*b**2*x - 4*x**3 + 4*y**2)/4$


15: solve(y^2=x^3 - d^2*x, {x,y});
{{x=arbcomplex(2),
y=(sqrt(x)*sqrt( - a**2*b**2 + 4*x**2))/2},
{x=arbcomplex(1),
y=( - sqrt(x)*sqrt( - a**2*b**2 + 4*x**2))/2}}$


16: procedure lastprime (n) ;
16:    begin scalar k, kfact ;
16:       k:=n+1 ;
16:       repeat
16:       << k:=k-1 ;
16: 	 kfact:=factorize(k)
16:       >> until length(kfact) = 1 and second(first(kfact))=1;
16:       return first(first(kfact))
16:    end ;
lastprime$


17: for i:=1:50 do lastprime(10**15);

18: write "!!! Aborting: newcslgc.cpp:266 page type not recognised";
!!! Aborting: newcslgc.cpp:266 page type not recognised$


19: write "=====> submit number ", 1, " done <=====" ;
=====> submit number 1 done <=====$


20: 


The session will now be terminated.

