vault backup: 2023-10-27 14:54:10

This commit is contained in:
Louis Gallet 2023-10-27 14:54:10 +02:00
parent 0fac88d66f
commit 6c41337f1f
Signed by: lgallet
SSH Key Fingerprint: SHA256:qnW7pk4EoMRR0UftZLZQKSMUImbEFsiruLC7jbCHJAY

View File

@ -74,4 +74,8 @@ let rec partition p l =
| h==t> let (l1, l2) = partition p t in
if p h then (h::l1,l2)
else (l1, h::l2);;
val partition : ('a -> bool) -> 'a list -> 'a list * 'a list = <fun>
val partition : ('a -> bool) -> 'a list -> 'a list * 'a list = <fun>
```
## Ex 2.7
```Ocaml