vault backup: 2023-09-07 14:22:23

This commit is contained in:
Louis Gallet 2023-09-07 14:22:23 +02:00
parent 9af0cb7927
commit 64f7b0914e
Signed by: lgallet
SSH Key Fingerprint: SHA256:qnW7pk4EoMRR0UftZLZQKSMUImbEFsiruLC7jbCHJAY

View File

@ -118,6 +118,6 @@ let min4 number1 number2 number3 number4 = let nb1 = min2(number1 number2) and n
```
### Exercise 3.4
```Ocaml
let highest_square_sum x1 x2 x3 = let bigger = max3(x1 x2 x3) and middle = middle3(x1 x2 x3) in (bigger*bigger middle*middle)
let highest_square_sum x1 x2 x3 = let bigger = max3(x1 x2 x3) and middle = middle3(x1 x2 x3) in (bigger*bigger, middle*middle)
```