let fact = ref None let zero = ref (-1) let _ = prerr_endline "API"