lgallet/epicours
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

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

Browse Source
This commit is contained in:
Louis Gallet 2023-09-05 15:02:49 +02:00
parent d9d826fcbd
commit 4c95cef899
Signed by: lgallet
SSH Key Fingerprint: SHA256:qnW7pk4EoMRR0UftZLZQKSMUImbEFsiruLC7jbCHJAY
2 changed files with 39 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
.obsidian/workspace.json vendored
View File

@ -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",

35
Algo/Séminaire/Exercices sémaines.md
View File

@ -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
![[69E2987C-209A-48CD-8964-5A60462966E5.jpg]]
![[F1D2AA19-E790-4022-AFFF-F778EAB28AB5.jpg]]
![[69E2987C-209A-48CD-8964-5A60462966E5.jpg]]