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

vault backup: 2023-09-05 19:31:13

Browse Source
This commit is contained in:
Louis Gallet 2023-09-05 19:31:13 +02:00
parent c599aadc51
commit 78e00883ea
Signed by: lgallet
SSH Key Fingerprint: SHA256:qnW7pk4EoMRR0UftZLZQKSMUImbEFsiruLC7jbCHJAY
2 changed files with 13 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

12
.obsidian/workspace.json vendored
View File

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

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

@ -49,5 +49,12 @@ val stammer: int -> int = <fun>
## Exercice 2.6
```Ocaml
let sef_of_time h m s =
h*3600 + m*60 + s ;;
let time_of_sec s =
let hours = s/3600 and minutes = s mod 60 and seconds = s mod 3600 in (hours, minutes, seconds)
```