src/HOL/Tools/atp-inputs/par_combS_e.dfg
author paulson
Thu, 21 Sep 2006 17:31:10 +0200
changeset 20660 8606ddd42554
parent 20647 680b58597f65
permissions -rw-r--r--
corrected for the translation from _ to __ in c_COMBx_e

%ID: $Id$
%Author: Jia Meng, NICTA
%partial-typed combinator reduction for S'

clause(
forall([A, B, C, F, G, U, V, X],
or( equal(hAPP(hAPP(hAPP(hAPP(c_COMBS__e,C,tc_fun(tc_fun(A,tc_fun(B,U)),tc_fun(tc_fun(V,A),tc_fun(tc_fun(V,B),tc_fun(V,U))))),F,tc_fun(tc_fun(V,A),tc_fun(tc_fun(V,B),tc_fun(V,U)))),G,tc_fun(tc_fun(V,B),tc_fun(V,U))),X,tc_fun(V,U)),hAPP(hAPP(C,hAPP(F,X,tc_fun(V,A)),tc_fun(A,tc_fun(B,U))),hAPP(G,X,tc_fun(V,B)),tc_fun(B,U))))),
a8 ).