let load_ya_file f  =
  try
    let c = open_in f in
    let automata = Yalexer.parse c  in
    close_in c;
    Data_for_aorai.setAutomata automata;
  with
    | Not_found -> Aorai_option.abort "Unknown Ya file %s" f
    | Yalexer.Error (loc,msg) -> syntax_error loc msg