--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/src/HOL/Tools/atp-inputs/par_combIK.dfg	Wed Sep 20 14:02:41 2006 +0200
@@ -0,0 +1,13 @@
+%ID: $Id$
+%Author: Jia Meng, NICTA
+%partial-typed combinator reduction for I, K
+
+clause(
+forall([A, B, P, Q],
+or( equal(hAPP(hAPP(c_COMBK,P,tc_fun(A,tc_fun(B,A))),Q,tc_fun(B,A)),P))),
+a1 ).
+
+clause(
+forall([P, T],
+or( equal(hAPP(c_COMBI,P,tc_fun(T,T)),P))),
+a3 ).