src/HOL/Tools/atp-inputs/par_combIK.dfg
changeset 20647 680b58597f65
equal deleted inserted replaced
20646:02729d4d6e4a 20647:680b58597f65
       
     1 %ID: $Id$
       
     2 %Author: Jia Meng, NICTA
       
     3 %partial-typed combinator reduction for I, K
       
     4 
       
     5 clause(
       
     6 forall([A, B, P, Q],
       
     7 or( equal(hAPP(hAPP(c_COMBK,P,tc_fun(A,tc_fun(B,A))),Q,tc_fun(B,A)),P))),
       
     8 a1 ).
       
     9 
       
    10 clause(
       
    11 forall([P, T],
       
    12 or( equal(hAPP(c_COMBI,P,tc_fun(T,T)),P))),
       
    13 a3 ).