diff --git a/collects/deinprogramm/DMdA.rkt b/collects/deinprogramm/DMdA.rkt
index b00016acd1..8d668c971f 100644
--- a/collects/deinprogramm/DMdA.rkt
+++ b/collects/deinprogramm/DMdA.rkt
@@ -157,10 +157,10 @@
   (even? (integer -> boolean)
 	 "feststellen, ob eine Zahl gerade ist")
 
-  (lcm (integer integer ... -> integer)
+  (lcm (integer integer ... -> natural)
        "kleinstes gemeinsames Vielfaches berechnen")
   
-  (gcd (integer integer ... -> integer)
+  (gcd (integer integer ... -> natural)
        "größten gemeinsamen Teiler berechnen")
   
   (rational? (%a -> boolean)