vault backup: 2023-10-09 13:56:07

This commit is contained in:
Louis Gallet 2023-10-09 13:56:08 +02:00
parent 47b63721c2
commit 0f93510572
Signed by: lgallet
SSH Key Fingerprint: SHA256:qnW7pk4EoMRR0UftZLZQKSMUImbEFsiruLC7jbCHJAY
2 changed files with 27 additions and 8 deletions

View File

@ -18,8 +18,21 @@
"source": false
}
}
},
{
"id": "26919eaeae9a8f38",
"type": "leaf",
"state": {
"type": "markdown",
"state": {
"file": "Algo/Courses/Chapter 6 - Lists (Exercises).md",
"mode": "source",
"source": false
}
]
}
}
],
"currentTab": 1
}
],
"direction": "vertical"
@ -85,7 +98,7 @@
"state": {
"type": "backlink",
"state": {
"file": "Algo/Courses/Chapter 6 - Lists.md",
"file": "Algo/Courses/Chapter 6 - Lists (Exercises).md",
"collapseAll": false,
"extraContext": false,
"sortOrder": "alphabetical",
@ -102,7 +115,7 @@
"state": {
"type": "outgoing-link",
"state": {
"file": "Algo/Courses/Chapter 6 - Lists.md",
"file": "Algo/Courses/Chapter 6 - Lists (Exercises).md",
"linksCollapsed": false,
"unlinkedCollapsed": true
}
@ -125,7 +138,7 @@
"state": {
"type": "outline",
"state": {
"file": "Algo/Courses/Chapter 6 - Lists.md"
"file": "Algo/Courses/Chapter 6 - Lists (Exercises).md"
}
}
},
@ -156,10 +169,10 @@
"command-palette:Open command palette": false
}
},
"active": "eaf65669cfff2a2c",
"active": "26919eaeae9a8f38",
"lastOpenFiles": [
"Algo/Courses/Chapter 6 - Lists (Exercises).md",
"Algo/Courses/Chapter 6 - Lists.md",
"Algo/Courses/Chapter 6 - Lists (Exercises).md",
"Algo/Courses/Untitled.md",
"Algo/Séminaire/Exercices seminaire.md",
"Prog/Loops.md",

View File

@ -140,6 +140,12 @@ let rec growing = function
```
## Exercise 3.2
```
```Ocaml
let rec delete x = function
| e::i -> if x == e then
| [] -> []
| e::i ->
if x == e then i
else if e < x then
e::delete x i
else 1
```