| 
421
 | 
     1  | 
import C3b._
  | 
384
Christian Urban <christian.urban@kcl.ac.uk> 
parents:  
diff
changeset
 
 | 
     2  | 
  | 
Christian Urban <christian.urban@kcl.ac.uk> 
parents:  
diff
changeset
 
 | 
     3  | 
  | 
Christian Urban <christian.urban@kcl.ac.uk> 
parents:  
diff
changeset
 
 | 
     4  | 
assert(compute(syard(split("3 + 4 * ( 2 - 1 )"))) == 7)
 | 
Christian Urban <christian.urban@kcl.ac.uk> 
parents:  
diff
changeset
 
 | 
     5  | 
assert(compute(syard(split("10 + 12 * 33"))) == 406)
 | 
Christian Urban <christian.urban@kcl.ac.uk> 
parents:  
diff
changeset
 
 | 
     6  | 
assert(compute(syard(split("( 5 + 7 ) * 2"))) == 24)
 | 
Christian Urban <christian.urban@kcl.ac.uk> 
parents:  
diff
changeset
 
 | 
     7  | 
assert(compute(syard(split("5 + 7 / 2"))) == 8)
 | 
Christian Urban <christian.urban@kcl.ac.uk> 
parents:  
diff
changeset
 
 | 
     8  | 
assert(compute(syard(split("5 * 7 / 2"))) == 17)
 | 
Christian Urban <christian.urban@kcl.ac.uk> 
parents:  
diff
changeset
 
 | 
     9  | 
assert(compute(syard(split("9 + 24 / ( 7 - 3 )"))) == 15)
 | 
Christian Urban <christian.urban@kcl.ac.uk> 
parents:  
diff
changeset
 
 | 
    10  | 
assert(compute(syard(split("4 ^ 3 ^ 2"))) == 262144)
 | 
Christian Urban <christian.urban@kcl.ac.uk> 
parents:  
diff
changeset
 
 | 
    11  | 
assert(compute(syard(split("4 ^ ( 3 ^ 2 )"))) == 262144)
 | 
Christian Urban <christian.urban@kcl.ac.uk> 
parents:  
diff
changeset
 
 | 
    12  | 
assert(compute(syard(split("( 4 ^ 3 ) ^ 2"))) == 4096)
 | 
Christian Urban <christian.urban@kcl.ac.uk> 
parents:  
diff
changeset
 
 | 
    13  | 
assert(compute(syard(split("( 3 + 1 ) ^ 2 ^ 3"))) == 65536)
 |