vault backup: 2023-09-05 15:20:49

.obsidian/workspace.json

@@ -13,7 +13,7 @@
             "state": {
               "type": "markdown",
               "state": {
-                "file": "Algo/Séminaire/Exercices sémaines.md",
+                "file": "Algo/Séminaire/Chapter 2 - Functions.md",
                 "mode": "source",
                 "source": false
               }
@@ -85,7 +85,7 @@
             "state": {
               "type": "backlink",
               "state": {
-                "file": "Algo/Séminaire/Exercices sémaines.md",
+                "file": "Algo/Séminaire/Chapter 2 - Functions.md",
                 "collapseAll": false,
                 "extraContext": false,
                 "sortOrder": "alphabetical",
@@ -102,7 +102,7 @@
             "state": {
               "type": "outgoing-link",
               "state": {
-                "file": "Algo/Séminaire/Exercices sémaines.md",
+                "file": "Algo/Séminaire/Chapter 2 - Functions.md",
                 "linksCollapsed": false,
                 "unlinkedCollapsed": true
               }
@@ -125,7 +125,7 @@
             "state": {
               "type": "outline",
               "state": {
-                "file": "Algo/Séminaire/Exercices sémaines.md"
+                "file": "Algo/Séminaire/Chapter 2 - Functions.md"
               }
             }
           }
@@ -148,11 +148,11 @@
   },
   "active": "13c9bfe482ec2d42",
   "lastOpenFiles": [
+    "Algo/Séminaire/Exercices sémaines.md",
+    "Algo/Séminaire/assets/69E2987C-209A-48CD-8964-5A60462966E5.jpg",
     "Algo/Séminaire/Chapter 1 - CAML basics.md",
     "Algo/Séminaire/Chapter 2 - Functions.md",
-    "Algo/Séminaire/Exercices sémaines.md",
     "Algo/Séminaire/Introduction.md",
-    "Algo/Séminaire/assets/69E2987C-209A-48CD-8964-5A60462966E5.jpg",
     "Algo/Séminaire/assets",
     "Algo/Séminaire/assets/F1D2AA19-E790-4022-AFFF-F778EAB28AB5.jpg",
     "Mathématiques/Séminaire/Logics/Logics.md",

Algo/Séminaire/Chapter 2 - Functions.md

@@ -73,3 +73,5 @@ val pred: int -> int = <fun>
 # square_of_pred 3;;
 _: int = 4 (*same things but with another method*)
 ```
+
+## 2.3. Function with several parameters (2 or more)

Algo/Séminaire/Exercices sémaines.md

@@ -1,4 +1,4 @@
-## 2.2 (Power)
+## Exercise 2.2 (Power)
 
 ```Ocaml
 (*First version ; 6 multiplications*)
@@ -25,13 +25,29 @@
 	sq(sq(p4))*sq(p4)*p4;;
 ```
 
-## 2.3
+## Exercise 2.3
 
-![[F1D2AA19-E790-4022-AFFF-F778EAB28AB5.jpg]]
+```Ocaml
+# (*my verison*)
+# let mirror(n) = let diz = n/10 and uni = n mod 10 in uni*10 + diz;;
+val mirror : int -> int = <fun>
+
+# (*teatcher version*)
+# let mirror n = 10 *(n mod 10)+n/10;;
+val mirror : int -> int = <fun>
+```
+
+```Ocaml
+# let abba(n) = n*100 + mirror(n) ;;
+val abba: int -> int = <fun>
+```
+
+```Ocaml
+# let stammer(n) = abba(mirror(n)) * 10 000 + abba(n) ;;
+val stammer: int -> int = <fun>
+```
 
 
 
-![[69E2987C-209A-48CD-8964-5A60462966E5.jpg]]
-