vault backup: 2023-10-16 13:30:06

This commit is contained in:
Louis Gallet 2023-10-16 13:30:06 +02:00
parent 05c50e8de1
commit f8b1eca99e
Signed by: lgallet
SSH Key Fingerprint: SHA256:qnW7pk4EoMRR0UftZLZQKSMUImbEFsiruLC7jbCHJAY
2 changed files with 10 additions and 13 deletions

View File

@ -19,16 +19,6 @@
} }
} }
}, },
{
"id": "6e963cd2a688ff4e",
"type": "leaf",
"state": {
"type": "release-notes",
"state": {
"currentVersion": "1.4.16"
}
}
},
{ {
"id": "26919eaeae9a8f38", "id": "26919eaeae9a8f38",
"type": "leaf", "type": "leaf",
@ -41,8 +31,7 @@
} }
} }
} }
], ]
"currentTab": 1
} }
], ],
"direction": "vertical" "direction": "vertical"
@ -179,7 +168,7 @@
"command-palette:Open command palette": false "command-palette:Open command palette": false
} }
}, },
"active": "6e963cd2a688ff4e", "active": "eaf65669cfff2a2c",
"lastOpenFiles": [ "lastOpenFiles": [
"Algo/Séminaire/Chapter 1 - CAML basics.md", "Algo/Séminaire/Chapter 1 - CAML basics.md",
"Algo/Courses/Chapter 6 - Lists (Exercises).md", "Algo/Courses/Chapter 6 - Lists (Exercises).md",

View File

@ -211,4 +211,12 @@ let rec reverse = function
| [] -> [] | [] -> []
| e::t -> reverse t@[e];; | e::t -> reverse t@[e];;
val reverse : 'a list -> 'a list = <fun> val reverse : 'a list -> 'a list = <fun>
(* Correction *)
# let reverse l =
let rec rev rl = function
[] -> rl
| e::t -> rev(e::rl) l
in rev [] l
``` ```