fact: Definition open := Formula_rec LNT (fun _ => Formula) (fun t t0 : Term => (t = t0)%nt) (fun (r : Relations LNT) (ts : Terms (arityR LNT r)) => atomic r ts) (fun (f : Formula) _ (f0 : Formula) _ => (f -> f0)%nt) (fun (f : Formula) _ => (~ f)%nt) (fun (n : nat) _ (recf : Formula) => recf).
imports: Coq(Arith Lia Ensembles Decidable) hydras.Ackermann(folProp subAll folLogic3) hydras.Ackermann(NewNotations)