src/HOL/Tools/atp-inputs/full_helper1.tptp
author huffman
Sat, 16 Sep 2006 23:46:38 +0200
changeset 20557 81dd3679f92c
parent 19492 29c6cba140da
child 20645 5e28b8f2cb52
permissions -rw-r--r--
complex_of_real abbreviates of_real::real=>complex; cmod abbreviates norm::complex=>real; removed several redundant lemmas
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
19492
29c6cba140da added some helper files for HOL goals/lemmas. Clauses have TPTP format.
mengj
parents:
diff changeset
     1
%ID: $Id$
29c6cba140da added some helper files for HOL goals/lemmas. Clauses have TPTP format.
mengj
parents:
diff changeset
     2
%Author: Jia Meng, NICTA
29c6cba140da added some helper files for HOL goals/lemmas. Clauses have TPTP format.
mengj
parents:
diff changeset
     3
%extensionality for full-types
29c6cba140da added some helper files for HOL goals/lemmas. Clauses have TPTP format.
mengj
parents:
diff changeset
     4
29c6cba140da added some helper files for HOL goals/lemmas. Clauses have TPTP format.
mengj
parents:
diff changeset
     5
input_clause(a18,axiom,
29c6cba140da added some helper files for HOL goals/lemmas. Clauses have TPTP format.
mengj
parents:
diff changeset
     6
[--equal(typeinfo(hAPP(typeinfo(F,tc_fun(A,B)),typeinfo(hAPP(typeinfo(hAPP(typeinfo(hEXTENT,tc_fun(tc_fun(A,B),tc_fun(tc_fun(A,B),A))),typeinfo(F,tc_fun(A,B))),tc_fun(tc_fun(A,B),A)),typeinfo(G,tc_fun(A,B))),A)),B),typeinfo(hAPP(typeinfo(G,tc_fun(A,B)),typeinfo(hAPP(typeinfo(hAPP(typeinfo(hEXTENT,tc_fun(tc_fun(A,B),tc_fun(tc_fun(A,B),A))),typeinfo(F,tc_fun(A,B))),tc_fun(tc_fun(A,B),A)),typeinfo(G,tc_fun(A,B))),A)),B)),
29c6cba140da added some helper files for HOL goals/lemmas. Clauses have TPTP format.
mengj
parents:
diff changeset
     7
++equal(typeinfo(F,tc_fun(A,B)),typeinfo(G,tc_fun(A,B)))]).