Added a test for multiplied variables

This commit is contained in:
Neil Brown 2008-02-08 23:49:20 +00:00
parent 914e9c3d71
commit 71915494a6

View File

@ -82,6 +82,10 @@ PROC m()
a[x] := 3 a[x] := 3
a[y] := 5 a[y] := 5
%PASS Multiplied variables
a[x*y] := 3
a[(x*y) + 1] := 5
%PASS Modulo variable (c.d.) and a constant, safe %PASS Modulo variable (c.d.) and a constant, safe
a[x REM 3] := 3 a[x REM 3] := 3
a[3] := 4 a[3] := 4