src/HOL/Tools/atp-inputs/full_combIK.dfg
author huffman
Thu, 28 Sep 2006 19:04:13 +0200
changeset 20763 052b348a98a9
parent 20647 680b58597f65
permissions -rw-r--r--
rearranged axioms and simp rules for scaleR

%ID: $Id$
%Author: Jia Meng, NICTA
%full-typed combinator reduction for I, K

clause(
forall([A, B, P, Q],
or( equal(typeinfo(hAPP(typeinfo(hAPP(typeinfo(c_COMBK,tc_fun(A,tc_fun(B,A))),typeinfo(P,A)),tc_fun(B,A)),typeinfo(Q,B)),A),typeinfo(P,A)))),
a1 ).

clause(
forall([P, T],
or( equal(typeinfo(hAPP(typeinfo(c_COMBI,tc_fun(T,T)),typeinfo(P,T)),T),typeinfo(P,T)))),
a3 ).