diff --git a/korekursion.tex b/korekursion.tex
index c2991430780f05be62307ce28e51be1c3391dddd..1c08bd09fcb14d506f8d4c5d969240f3bb81b168 100644
--- a/korekursion.tex
+++ b/korekursion.tex
@@ -18,7 +18,7 @@ hd (genl t) = node t
 tl (genl t) = genl (left t)
 
 hd (genr t) = node t
-tl (genr t) = genr (right t)
+tl (genr t) = genl (right t)
 
 hd (const x) = x
 tl (const x) = const x