(* 10.1 *) 
 
#use "sect10_1/prefix.ml" ;; 
 
(* 10.2 *) 
 
#use "sect10_2/minimum.ml" ;; 
 
(* 10.3 *) 
 
let x = 2 in x + x ;; 
(* 
x + 3 ;; 
*) 
let x = 3 ;; 
let x = 2 in x + x ;; 
x + 3 ;; 
let x = 3 in let y = 4 in x + y ;; 
 
#use "sect10_3/minimum.ml" ;; 
 
(* 10.4 *) 
 
#use "sect10_4/shukei.ml" ;; 
 
(* 10.5 *) 
 
#use "sect10_5/append.ml" ;; 
 
(* 10.6 *) 
 
#use "sect10_6/merge.ml" ;; 
 
(* 10.7 *)