1% 2% test exponential equations 3% (implemented via solvetab) 4 5solve(13^(x+1)-2*13^x=(1/5)*5^x,x); 6 7 8 2*arbint(1)*i*pi + log(55) 9{x=----------------------------} 10 5 11 log(----) 12 13 13 14 15solve(7^(2x-5)* 5^x = 9^(x+1),x); 16 17 18 2*arbint(2)*i*pi + log(151263) 19{x=--------------------------------} 20 245 21 log(-----) 22 9 23 24 25end; 26 27Tested on x86_64-pc-windows CSL 28Time (counter 1): 0 ms plus GC time: 16 ms 29 30End of Lisp run after 0.00+0.06 seconds 31real 0.22 32user 0.04 33sys 0.04 34