let get_next func status states =
  let st,tr = mk_empty_pre_or_post () in
  let (_,trans_l) = Data_for_aorai.getAutomata() in
  List.iter
    (fun t ->
       if (states.(t.start.nums)) && (isCrossable t func status) then
         begin
           st.(t.stop.nums)<- true ;
           tr.(t.numt)<- true
         end
    )
    trans_l;
  (st,tr)