| changeset 15338 | 08519594b0e4 |
| parent 15337 | 628d87767434 |
| child 15339 | a7b603bbc1e6 |
--- a/doc-src/Tutorial/Ifexpr/value Mon Nov 29 11:12:19 2004 +0100 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,6 +0,0 @@ -consts value :: boolex => (nat => bool) => bool -primrec -"value (Const b) env = b" -"value (Var x) env = env x" -"value (Neg b) env = (~ value b env)" -"value (And b c) env = (value b env & value c env)"