fact: Fixpoint term_eqb s t := match s,t with | var n, var m => eqb n m | L.app s1 t1, L.app s2 t2 => andb (term_eqb s1 s2) (term_eqb t1 t2) | lam s',lam t' => term_eqb s' t' | _,_ => false end.
imports: Nat Undecidability.L(Tactics.LTactics Functions.EqBool)