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

vault backup: 2023-09-07 21:32:14

Browse Source
This commit is contained in:
Louis Gallet 2023-09-07 21:32:14 +02:00
parent 1e0b99b364
commit 9938bb93ee
Signed by: lgallet
SSH Key Fingerprint: SHA256:qnW7pk4EoMRR0UftZLZQKSMUImbEFsiruLC7jbCHJAY
2 changed files with 7 additions and 7 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/Chapter 1 - CAML basics.md",
"file": "Algo/Séminaire/Chapter 3 - Case analysis.md",
"mode": "source",
"source": false
}
@ -85,7 +85,7 @@
"state": {
"type": "backlink",
"state": {
"file": "Algo/Séminaire/Chapter 1 - CAML basics.md",
"file": "Algo/Séminaire/Chapter 3 - Case analysis.md",
"collapseAll": false,
"extraContext": false,
"sortOrder": "alphabetical",
@ -102,7 +102,7 @@
"state": {
"type": "outgoing-link",
"state": {
"file": "Algo/Séminaire/Chapter 1 - CAML basics.md",
"file": "Algo/Séminaire/Chapter 3 - Case analysis.md",
"linksCollapsed": false,
"unlinkedCollapsed": true
}
@ -125,7 +125,7 @@
"state": {
"type": "outline",
"state": {
"file": "Algo/Séminaire/Chapter 1 - CAML basics.md"
"file": "Algo/Séminaire/Chapter 3 - Case analysis.md"
}
}
}
@ -149,8 +149,8 @@
"active": "bdba25946b821d06",
"lastOpenFiles": [
"Algo/Séminaire/Chapter 2 - Functions.md",
"Algo/Séminaire/Introduction.md",
"Algo/Séminaire/Chapter 1 - CAML basics.md",
"Algo/Séminaire/Introduction.md",
"Algo/Séminaire/Chapter 3 - Case analysis.md",
"Algo/Séminaire/Exercices seminaire.md",
"Algo/Séminaire/assets/69E2987C-209A-48CD-8964-5A60462966E5.jpg",

4
Algo/Séminaire/Chapter 3 - Case analysis.md
View File

@ -113,7 +113,7 @@ val f : int -> int = <fun>
### "Or" filter
```Ocaml
let f x match x with
# let f x match x with
0 | 20 -> 18
| 1 | 11 | 12 -> 24
|_ -> x * x ;;
@ -121,7 +121,7 @@ let f x match x with
### Guarded filters
```Ocaml
let sign x = match x with
# let sign x = match x with
0 -> 0
| y when y < 0 -> -1
| _ -> 1