open Ast

let () =
  let s = random_int 7 77 in 
  let i = int_of_string s in
  assert( i <= 77 ); 
  assert( i >= 7 );