]> git.deb.at Git - debienna.git/blobdiff - FunctionGenerator/index.mdwn
use unix newlines everywhere
[debienna.git] / FunctionGenerator / index.mdwn
index 3eedb4bb079cfe970b4a6c0f49e96bdfac44b227..8cc708723d8768f7ff231a6e85fa97bd867dd0a5 100644 (file)
@@ -1,35 +1,35 @@
-MarkusRaab hat gefragt ob es möglich ist mit funktionaler Programmierung\r
-auch ein neues Array zu erzeugen.\r
-\r
-Lösung in Python:\r
-\r
-{{{\r
-def creator (f,c,n):\r
-        if n==1:\r
-                return c\r
-        else:\r
-                return creator (f, lambda x: f(c(x)), n-1)\r
-\r
-\r
-f=creator (lambda y: y + [1], lambda x:x, 5)\r
-print f([])\r
-}}}\r
-\r
-Lösung in Lisp\r
-{{{\r
-(define (creator f c n)\r
-  (cond ((= n 0)\r
-         c)\r
-        (else\r
-         (creator f\r
-                  (f c)\r
-                  (- n 1)))))\r
-\r
-((creator (lambda (x)\r
-            (lambda (y) (x (cons 'a y))))\r
-           (lambda (x) x)\r
-           7)\r
- '())\r
-}}}\r
-----\r
+MarkusRaab hat gefragt ob es möglich ist mit funktionaler Programmierung
+auch ein neues Array zu erzeugen.
+
+Lösung in Python:
+
+{{{
+def creator (f,c,n):
+        if n==1:
+                return c
+        else:
+                return creator (f, lambda x: f(c(x)), n-1)
+
+
+f=creator (lambda y: y + [1], lambda x:x, 5)
+print f([])
+}}}
+
+Lösung in Lisp
+{{{
+(define (creator f c n)
+  (cond ((= n 0)
+         c)
+        (else
+         (creator f
+                  (f c)
+                  (- n 1)))))
+
+((creator (lambda (x)
+            (lambda (y) (x (cons 'a y))))
+           (lambda (x) x)
+           7)
+ '())
+}}}
+----
 CategoryCodeSnippets
\ No newline at end of file