Try using ans instead of storing variables, works much faster.
:45
:LinR {0,1},{Ans,Ans
:Eq>St(RegEq,B)
:sub(B,1,lngth B-3)
Now Ans has the 45
"Virtute et fidelitate"
--------------------------
JBoylan@Technologist.Com
JBoylan@Geocities.Com
UIN:3569888
The J Pavilion
http://boylan.home.ml.org
--------------------------
(c) 1998 J Boylan