src/HOL/Tools/atp-inputs/full_helper1.tptp
author huffman
Fri, 22 Sep 2006 23:19:45 +0200
changeset 20685 fee8c75e3b5d
parent 20645 5e28b8f2cb52
permissions -rw-r--r--
added lemmas about LIMSEQ and norm; simplified some proofs
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
20645
5e28b8f2cb52 Moved the functional equality axioms to helper1 files.
mengj
parents: 19492
diff changeset
     3
%functional equality and extensionality for full-types
5e28b8f2cb52 Moved the functional equality axioms to helper1 files.
mengj
parents: 19492
diff changeset
     4
5e28b8f2cb52 Moved the functional equality axioms to helper1 files.
mengj
parents: 19492
diff changeset
     5
input_clause(a9,axiom,
5e28b8f2cb52 Moved the functional equality axioms to helper1 files.
mengj
parents: 19492
diff changeset
     6
[--hBOOL(typeinfo(hAPP(typeinfo(hAPP(typeinfo(fequal,tc_fun(A,tc_fun(A,tc_bool))),typeinfo(X,A)),tc_fun(A,tc_bool)),typeinfo(Y,A)),tc_bool)),
5e28b8f2cb52 Moved the functional equality axioms to helper1 files.
mengj
parents: 19492
diff changeset
     7
++equal(typeinfo(X,A),typeinfo(Y,A))]).
19492
29c6cba140da added some helper files for HOL goals/lemmas. Clauses have TPTP format.
mengj
parents:
diff changeset
     8
20645
5e28b8f2cb52 Moved the functional equality axioms to helper1 files.
mengj
parents: 19492
diff changeset
     9
input_clause(a10,axiom,
5e28b8f2cb52 Moved the functional equality axioms to helper1 files.
mengj
parents: 19492
diff changeset
    10
[++hBOOL(typeinfo(hAPP(typeinfo(hAPP(typeinfo(fequal,tc_fun(A,tc_fun(A,tc_bool))),typeinfo(X,A)),tc_fun(A,tc_bool)),typeinfo(Y,A)),tc_bool)),
5e28b8f2cb52 Moved the functional equality axioms to helper1 files.
mengj
parents: 19492
diff changeset
    11
--equal(typeinfo(X,A),typeinfo(Y,A))]).
5e28b8f2cb52 Moved the functional equality axioms to helper1 files.
mengj
parents: 19492
diff changeset
    12
5e28b8f2cb52 Moved the functional equality axioms to helper1 files.
mengj
parents: 19492
diff changeset
    13
input_clause(a11,axiom,
19492
29c6cba140da added some helper files for HOL goals/lemmas. Clauses have TPTP format.
mengj
parents:
diff changeset
    14
[--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
    15
++equal(typeinfo(F,tc_fun(A,B)),typeinfo(G,tc_fun(A,B)))]).