let () = print_int Foo.A.x; print_newline ()