fact: Definition eq_tt_bool t12 t12' := match t12, t12' with (t1,t2), (t1',t2') => andb (eq_bool t1 t1') (eq_bool t2 t2') end.
imports: Coq(Bool Peano List PeanoNat) CoLoR(closure more_list equiv_list list_permut dickson) Coq(Relations Wellfounded Arith Wf_nat Recdef Program Morphisms Lia) CoLoR(term_spec term decidable_set ordered_set NatCompat)