diff -r bff5d59de79b -r 1bfd75c1f232 doc-src/IsarAdvanced/Codegen/Thy/examples/class.ocaml
--- a/doc-src/IsarAdvanced/Codegen/Thy/examples/class.ocaml	Fri Apr 20 11:21:53 2007 +0200
+++ b/doc-src/IsarAdvanced/Codegen/Thy/examples/class.ocaml	Fri Apr 20 13:11:47 2007 +0200
@@ -14,7 +14,7 @@
 type 'a null = {null : 'a};;
 let null _A = _A.null;;
 
-let rec head _A = function y :: xs -> y
+let rec head _A = function x :: xs -> x
                   | [] -> null _A;;
 
 let rec null_option = None;;