1 (**************************************************************************)
4 (* ||A|| A project by Andrea Asperti *)
6 (* ||I|| Developers: *)
7 (* ||T|| The HELM team. *)
8 (* ||A|| http://helm.cs.unibo.it *)
10 (* \ / This file is distributed under the terms of the *)
11 (* v GNU General Public License Version 2 *)
13 (**************************************************************************)
15 (* LOGIC ********************************************************************)
17 (* NOTE: This file was generated by xoa.native, do not edit *****************)
19 include "basics/pts.ma".
21 include "ground/notation/xoa/and_4.ma".
23 (* Note: multiple conjunction connective (4) *)
24 inductive and4 (P0,P1,P2,P3:Prop) : Prop ≝
25 | and4_intro: P0 → P1 → P2 → P3 → and4 ? ? ? ?
28 interpretation "multiple conjunction connective (4)" 'And P0 P1 P2 P3 = (and4 P0 P1 P2 P3).