--- a/doc-src/Tutorial/Datatype/triemain.ML Mon Nov 29 11:12:19 2004 +0100 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,2 +0,0 @@ -Goal "!t v bs. lookup (update t as v) bs = \ -\ (if as=bs then Some v else lookup t bs)";