diff --git a/Algo/Séminaire/Chapter 4 - A bit of imperative.md b/Algo/Séminaire/Chapter 4 - A bit of imperative.md
index dfbf713..3d3b155 100644
--- a/Algo/Séminaire/Chapter 4 - A bit of imperative.md	
+++ b/Algo/Séminaire/Chapter 4 - A bit of imperative.md	
@@ -40,4 +40,11 @@ toto
 ## 0.2. Sequence of prints
 ```Ocaml
 # print_string "The answer is: "; print_int 42;;
-The answer is: 42 -: unit = ()
\ No newline at end of file
+The answer is: 42 -: unit = ()
+
+# 3*2*7; print_string "The answer is : ";;
+The answer is -: unit = () 
+Warning 10 [non-unit-statement]: this expression should have type unit.
+
+# print_string "The answer is: "; 3*2*7;;
+The answer is: -:int = 42
\ No newline at end of file