diff --git a/Algo/Séminaire/Exercices seminaire.md b/Algo/Séminaire/Exercices seminaire.md index a315154..e34b8c2 100644 --- a/Algo/Séminaire/Exercices seminaire.md +++ b/Algo/Séminaire/Exercices seminaire.md @@ -197,7 +197,7 @@ val rate_standart : int -> float = val rate_express : int -> float = # let rate rt kg = match rt with - x when x = "economic" -> rate_eco(kg) + | x when x = "economic" -> rate_eco(kg) | x when x = "standard" -> rate_standard(kg) | x when x = "express" -> rate_express(kg) | _ -> invalid_arg "Bad type of shipping class";;