vault backup: 2023-09-11 16:55:09

This commit is contained in:
Louis Gallet 2023-09-11 16:55:09 +02:00
parent d44ec0260e
commit a37d29ebb5
Signed by: lgallet
SSH Key Fingerprint: SHA256:qnW7pk4EoMRR0UftZLZQKSMUImbEFsiruLC7jbCHJAY

View File

@ -166,4 +166,10 @@ val avg : int -> int -> int = <fun>
# let and_p a b = match (a,b) with # let and_p a b = match (a,b) with
| (true, true) -> true | (true, true) -> true
| _ -> false;; | _ -> false;;
val and_p : bool -> bool -> bool = <fun> val and_p : bool -> bool -> bool = <fun>
# let and_t = function
| (true, true) -> true
| _ -> false
val and_t -> bool * bool = <fun>
```