isabelle: src/HOL/Tools/atp-inputs/par_comb_inclS.dfg@956cd30ef3be (annotated)

19717 2742cec21579 Helper files in DFG format. mengj parents: diff changeset	1	%ID: $Id$
2742cec21579 Helper files in DFG format. mengj parents: diff changeset	2	%Author: Jia Meng, NICTA
2742cec21579 Helper files in DFG format. mengj parents: diff changeset	3	%typed combinator reduction for partial-types (include S)
2742cec21579 Helper files in DFG format. mengj parents: diff changeset	4
2742cec21579 Helper files in DFG format. mengj parents: diff changeset	5	clause(
2742cec21579 Helper files in DFG format. mengj parents: diff changeset	6	forall([A, B, P, Q],
2742cec21579 Helper files in DFG format. mengj parents: diff changeset	7	or( equal(hAPP(hAPP(c_COMBK,P,tc_fun(A,tc_fun(B,A))),Q,tc_fun(B,A)),P))),
2742cec21579 Helper files in DFG format. mengj parents: diff changeset	8	a1 ).
2742cec21579 Helper files in DFG format. mengj parents: diff changeset	9
2742cec21579 Helper files in DFG format. mengj parents: diff changeset	10	clause(
2742cec21579 Helper files in DFG format. mengj parents: diff changeset	11	forall([A, B, C, P, Q, R],
2742cec21579 Helper files in DFG format. mengj parents: diff changeset	12	or( equal(hAPP(hAPP(hAPP(c_COMBS,P,tc_fun(tc_fun(A,tc_fun(B,C)),tc_fun(tc_fun(A,B),tc_fun(A,C)))),Q,tc_fun(tc_fun(A,B),tc_fun(A,C))),R,tc_fun(A,C)),hAPP(hAPP(P,R,tc_fun(A,tc_fun(B,C))),hAPP(Q,R,tc_fun(A,B)),tc_fun(B,C))))),
2742cec21579 Helper files in DFG format. mengj parents: diff changeset	13	a2 ).
2742cec21579 Helper files in DFG format. mengj parents: diff changeset	14
2742cec21579 Helper files in DFG format. mengj parents: diff changeset	15	clause(
2742cec21579 Helper files in DFG format. mengj parents: diff changeset	16	forall([P, T],
2742cec21579 Helper files in DFG format. mengj parents: diff changeset	17	or( equal(hAPP(c_COMBI,P,tc_fun(T,T)),P))),
2742cec21579 Helper files in DFG format. mengj parents: diff changeset	18	a3 ).
2742cec21579 Helper files in DFG format. mengj parents: diff changeset	19
2742cec21579 Helper files in DFG format. mengj parents: diff changeset	20	clause(
2742cec21579 Helper files in DFG format. mengj parents: diff changeset	21	forall([A, B, C, P, Q, R],
2742cec21579 Helper files in DFG format. mengj parents: diff changeset	22	or( equal(hAPP(hAPP(hAPP(c_COMBB,P,tc_fun(tc_fun(A,B),tc_fun(tc_fun(C,A),tc_fun(C,B)))),Q,tc_fun(tc_fun(C,A),tc_fun(C,B))),R,tc_fun(C,B)),hAPP(P,hAPP(Q,R,tc_fun(C,A)),tc_fun(A,B))))),
2742cec21579 Helper files in DFG format. mengj parents: diff changeset	23	a4 ).
2742cec21579 Helper files in DFG format. mengj parents: diff changeset	24
2742cec21579 Helper files in DFG format. mengj parents: diff changeset	25	clause(
2742cec21579 Helper files in DFG format. mengj parents: diff changeset	26	forall([A, B, C, P, Q, R],
2742cec21579 Helper files in DFG format. mengj parents: diff changeset	27	or( equal(hAPP(hAPP(hAPP(c_COMBC,P,tc_fun(tc_fun(A,tc_fun(B,C)),tc_fun(B,tc_fun(A,C)))),Q,tc_fun(B,tc_fun(A,C))),R,tc_fun(A,C)),hAPP(hAPP(P,R,tc_fun(A,tc_fun(B,C))),Q,tc_fun(B,C))))),
2742cec21579 Helper files in DFG format. mengj parents: diff changeset	28	a5 ).
2742cec21579 Helper files in DFG format. mengj parents: diff changeset	29
2742cec21579 Helper files in DFG format. mengj parents: diff changeset	30	clause(
2742cec21579 Helper files in DFG format. mengj parents: diff changeset	31	forall([A, X, Y],
2742cec21579 Helper files in DFG format. mengj parents: diff changeset	32	or( not(hBOOL(hAPP(hAPP(fequal,X,tc_fun(A,tc_fun(A,tc_bool))),Y,tc_fun(A,tc_bool)))),
2742cec21579 Helper files in DFG format. mengj parents: diff changeset	33	equal(X,Y))),
19969 c72e2110c026 Removed some incorrect axioms. mengj parents: 19717 diff changeset	34	a6 ).
19717 2742cec21579 Helper files in DFG format. mengj parents: diff changeset	35
2742cec21579 Helper files in DFG format. mengj parents: diff changeset	36	clause(
2742cec21579 Helper files in DFG format. mengj parents: diff changeset	37	forall([A, X, Y],
2742cec21579 Helper files in DFG format. mengj parents: diff changeset	38	or( not(equal(X,Y)),
2742cec21579 Helper files in DFG format. mengj parents: diff changeset	39	hBOOL(hAPP(hAPP(fequal,X,tc_fun(A,tc_fun(A,tc_bool))),Y,tc_fun(A,tc_bool))))),
19969 c72e2110c026 Removed some incorrect axioms. mengj parents: 19717 diff changeset	40	a7 ).
19717 2742cec21579 Helper files in DFG format. mengj parents: diff changeset	41

author	haftmann
	Tue, 25 Jul 2006 16:51:26 +0200
changeset 20192	956cd30ef3be
parent 19969	c72e2110c026
permissions	-rw-r--r--