From 4c95cef89913a4fc8696dd5092625790a576100d Mon Sep 17 00:00:00 2001
From: Louis <me@louisgallet.fr>
Date: Tue, 5 Sep 2023 15:02:49 +0200
Subject: [PATCH] vault backup: 2023-09-05 15:02:49

---
 .obsidian/workspace.json             | 10 ++++----
 Algo/Séminaire/Exercices sémaines.md | 35 +++++++++++++++++++++++++++-
 2 files changed, 39 insertions(+), 6 deletions(-)

diff --git a/.obsidian/workspace.json b/.obsidian/workspace.json
index c36e46a..15bbd93 100644
--- a/.obsidian/workspace.json
+++ b/.obsidian/workspace.json
@@ -13,7 +13,7 @@
             "state": {
               "type": "markdown",
               "state": {
-                "file": "Algo/Séminaire/Introduction.md",
+                "file": "Algo/Séminaire/Exercices sémaines.md",
                 "mode": "source",
                 "source": false
               }
@@ -85,7 +85,7 @@
             "state": {
               "type": "backlink",
               "state": {
-                "file": "Algo/Séminaire/Introduction.md",
+                "file": "Algo/Séminaire/Exercices sémaines.md",
                 "collapseAll": false,
                 "extraContext": false,
                 "sortOrder": "alphabetical",
@@ -102,7 +102,7 @@
             "state": {
               "type": "outgoing-link",
               "state": {
-                "file": "Algo/Séminaire/Introduction.md",
+                "file": "Algo/Séminaire/Exercices sémaines.md",
                 "linksCollapsed": false,
                 "unlinkedCollapsed": true
               }
@@ -125,7 +125,7 @@
             "state": {
               "type": "outline",
               "state": {
-                "file": "Algo/Séminaire/Introduction.md"
+                "file": "Algo/Séminaire/Exercices sémaines.md"
               }
             }
           }
@@ -148,10 +148,10 @@
   },
   "active": "13c9bfe482ec2d42",
   "lastOpenFiles": [
+    "Algo/Séminaire/Introduction.md",
     "Algo/Séminaire/Exercices sémaines.md",
     "Algo/Séminaire/Chapter 2 - Functions.md",
     "Algo/Séminaire/Chapter 1 - CAML basics.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",
diff --git a/Algo/Séminaire/Exercices sémaines.md b/Algo/Séminaire/Exercices sémaines.md
index 56a22e2..4237a26 100644
--- a/Algo/Séminaire/Exercices sémaines.md	
+++ b/Algo/Séminaire/Exercices sémaines.md	
@@ -1,4 +1,37 @@
+## 2.2 (Power)
+
+```Ocaml
+(*First version*)
+# let power28(x) =
+	let x2 = x + x in
+	let x4 = x2*x2 in
+	let x8 = x4*x4 in
+	let x16 = x8*x8 in
+	x16*x8*x4 ;;
+
+(*Second version*)
+# let power28(x) = x*x*x*x*x*x...*x ;;
+
+(*Third version*)
+# let power28(x) = 
+	let sq(x) = x+x in
+	let pow4(x) = sq(sq(x)) in
+	pow4(pow4(x))*sq(pow4(x))*pow4(x);;
+
+(*Fourth version*)
+# let power28(x)=
+	let sq(x) = x+x in
+	let p4=sq(sq(x)) in
+	sq(sq(p4))*sq(p4)*p4;;
+```
+
 ## 2.3
+
+![[F1D2AA19-E790-4022-AFFF-F778EAB28AB5.jpg]]
+
+
+
 ![[69E2987C-209A-48CD-8964-5A60462966E5.jpg]]
 
-![[F1D2AA19-E790-4022-AFFF-F778EAB28AB5.jpg]]
\ No newline at end of file
+
+