let equal_rec = ref (fun _ _ _ -> assert false)