title 'Test optimization of constant expressions'.

remark EOF
----------------------------------------------------------------------
Testing ability of stat to optimize constant expressions.
stat must have been compiled with debugging enabled in order to
run these tests.
----------------------------------------------------------------------
EOF
eval 1+2+3+(4*5).
eval (4-2+6.323)*(0/4-1)*(1-3+abs(-9.78)).
eval 3**(2**(8/2*3/4)).

* Truth tables. 
eval 0 and 0.
eval 0 and 1.
eval 1 and 0.
eval 1 and 1.

eval 0 or 0.
eval 0 or 1.
eval 1 or 0.
eval 1 or 1.

eval not 0.
eval not 1.

eval (1 gt 2) and (2 gt 1).
eval (7/8+1 lt 2) or (2-1/6 lt 1).
eval not (7 ne 6).

eval -(7/8).
eval abs(-6.5).
eval arcos(1.0).
eval arcos(sqrt(2)/2).
eval arsin(sqrt(2)/2).
eval artan(0).
eval artan(1.0).
eval cos(3.141592654/4).
eval cos(3.141592654/6).
eval exp(1).
eval exp(-1).
eval lg10(10).
eval lg10(128.910).
eval ln(2.71828182846).
eval ln(50).
eval mod10(128.910).
eval rnd(128.9).
eval rnd(-128.9).
eval rnd(128.1).
eval rnd(-128.1).
eval rnd(128).
eval rnd(-128).
eval rnd(128.5).
eval rnd(-128.5).
eval sin(2*3.141592654).
eval sin(3.141592654/6).
eval tan(0).
eval tan(3.141592654/8).
eval trunc(3.141592654).
eval trunc(-9.99).

eval 'x'.
eval concat('x','y').