vault backup: 2023-09-04 15:59:40

2023-09-04 15:59:40 +02:00
parent fc6f528b76
commit b022a5bc90
2 changed files with 11 additions and 4 deletions
--- a/Algo/Séminaire/Chapter
+++ b/Algo/Séminaire/Chapter
@ -66,3 +66,10 @@ val square_of_pred: int -> int = <fun>
 # square_of_pred 3;;
 _: int = 4

+# let square_of_pred x = let pred x = x - 1 in pred x * pred x
+val square_of_pred: int -> int = <fun>
+val pred: int -> int = <fun>
+
+# square_of_pred 3;;
+_: int = 4 *same things but with another method*
+```