let mk_invariant_TransitionsDisjunction () =
  let tmp_tr = Cil_const.make_logic_var "_buch_tr" Cil_types.Linteger in
  mk_global_invariant (
    Pexists(
      [tmp_tr],
        unamed (Pand (
          unamed (
            (* 0 <= tr <nbTrans *)
            mk_logicvar_intervalle tmp_tr 0 (getNumberOfTransitions ())
          ),
          unamed (
            Prel(Rneq,mk_offseted_array_lval_from_lval (host_trans_term ()) tmp_tr , mk_int_term 0)
          )
        ))
    )) "_Buch_tr_disjunction"