[hwxi@xanadu scm]$ scheme Scheme Microcode Version 14.5 MIT Scheme running under GNU/Linux Type `^C' (control-C) followed by `H' to obtain information about interrupts. Scheme saved on Tuesday November 27, 2001 at 1:53:32 AM Release 7.6.0 Microcode 14.5 Runtime 14.192 1 ]=> (load "twentyfour.scm") ;Loading "twentyfour.scm" -- done ;Value: game-of-24 1 ]=> (game-of-24 3 3 8 8) 8/(3-8/3) 8/(3-8/3) 8/(3-8/3) 8/(3-8/3) ;Value: 1 1 ]=> (game-of-24 3 3 7 7) (3/7+3)*7 (3/7+3)*7 (3+3/7)*7 (3+3/7)*7 ;Value: 1 1 ]=> (game-of-24 10 10 4 4) (10*10-4)/4 (10*10-4)/4 ;Value: 1 1 ]=> (game-of-24 2 3 5 12) 12/(3-5/2) ;Value: 1 1 ]=> (game-of-24 1 5 5 5) 5*(5-1/5) (5-1/5)*5 5*(5-1/5) (5-1/5)*5 5*(5-1/5) (5-1/5)*5 ;Value: 1 1 ]=> (game-of-24 1 7 7 7) ;Value: 0 1 ]=> (game-of-24 1 7 7 10) 7/1+(7+10) 7/1+10+7 7/1+7+10 7+(7/1+10) 7+10+7/1 7+7/1+10 7+(7+10/1) 7+10/1+7 7+7+10/1 1*7+(7+10) 1*7+10+7 1*7+7+10 1*7+(7+10) 1*7+10+7 1*7+7+10 1*10+(7+7) 1*10+7+7 1*10+7+7 (1+7)*(10-7) (1+7)*(10-7) (1+7)*(10-7) (1+7)*(10-7) 1*(7+7+10) (7+7+10)/1 1*10+(7+7) 1*(7+7)+10 7+7+10/1 (7+7)/1+10 1*(7+10+7) (7+10+7)/1 1*7+(7+10) 1*(7+10)+7 7+10+7/1 (7+10)/1+7 1*(7+(7+10)) (7+(7+10))/1 1*(7+10)+7 1*7+(7+10) 7+(7+10)/1 7/1+(7+10) ;Value: 1 1 ]=> (game-of-24 1 7 8 10) (10-7)/(1/8) 8*(10-7/1) 8/1*(10-7) 8*(10/1-7) 8*(10-1*7) 1*8*(10-7) (1*10-7)*8 8+10-(1-7) 8+(10-(1-7)) 8-(1-7)+10 8-(1-7-10) 10-(1-7-8) 7+10-(1-8) 7+(10-(1-8)) 7-(1-8)+10 7-(1-8-10) 10-(1-8-7) 7+8-(1-10) 7+(8-(1-10)) 7-(1-10)+8 7-(1-10-8) 8-(1-10-7) 7-1+(8+10) 7-1+10+8 7-1+8+10 7+(8-1+10) 7+10+(8-1) 7+(8-1)+10 7+(8+(10-1)) 7+(10-1)+8 7+8+(10-1) 1*(8*(10-7)) 8*(10-7)/1 1*(10-7)*8 1*8*(10-7) 8*((10-7)/1) 8/1*(10-7) 8/(1/(10-7)) (10-7)/(1/8) 7+8+10-1 7+8+(10-1) 7+8-1+10 7+8-(1-10) 10-(1-(7+8)) 7+10+8-1 7+10+(8-1) 7+10-1+8 7+10-(1-8) 8-(1-(7+10)) 7+(8+10)-1 7+(8+10-1) 7-1+(8+10) 7-(1-(8+10)) 8+10-(1-7) ;Value: 1 1 ]=> (game-of-24 1 7 8 9) 7/1+(8+9) 7/1+9+8 7/1+8+9 7+(8/1+9) 7+9+8/1 7+8/1+9 7+(8+9/1) 7+9/1+8 7+8+9/1 1*7+(8+9) 1*7+9+8 1*7+8+9 1*8+(7+9) 1*8+9+7 1*8+7+9 1*9+(7+8) 1*9+8+7 1*9+7+8 (1-7+9)*8 8*(9-(7-1)) (1-(7-9))*8 (1+(9-7))*8 (1+9-7)*8 1*(7+8+9) (7+8+9)/1 1*9+(7+8) 1*(7+8)+9 7+8+9/1 (7+8)/1+9 1*(7+9+8) (7+9+8)/1 1*8+(7+9) 1*(7+9)+8 7+9+8/1 (7+9)/1+8 1*(7+(8+9)) (7+(8+9))/1 1*(8+9)+7 1*7+(8+9) 7+(8+9)/1 7/1+(8+9) ;Value: 1 1 ]=> (game-of-24 2 7 8 9) 2*(7+9)-8 ;Value: 1 1 ]=>