src/HOLCF/Sprod.ML
author huffman
Wed, 08 Jun 2005 00:18:26 +0200
changeset 16317 868eddbcaf6e
parent 16212 422f836f6b39
child 16699 24b494ff8f0f
permissions -rw-r--r--
added theorems less_sprod, spair_less, spair_eq, spair_inject
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
15576
efb95d0d01f7 converted to new-style theories, and combined numbered files
huffman
parents:
diff changeset
     1
efb95d0d01f7 converted to new-style theories, and combined numbered files
huffman
parents:
diff changeset
     2
(* legacy ML bindings *)
efb95d0d01f7 converted to new-style theories, and combined numbered files
huffman
parents:
diff changeset
     3
efb95d0d01f7 converted to new-style theories, and combined numbered files
huffman
parents:
diff changeset
     4
val less_sprod_def = thm "less_sprod_def";
efb95d0d01f7 converted to new-style theories, and combined numbered files
huffman
parents:
diff changeset
     5
val spair_def = thm "spair_def";
efb95d0d01f7 converted to new-style theories, and combined numbered files
huffman
parents:
diff changeset
     6
val sfst_def = thm "sfst_def";
efb95d0d01f7 converted to new-style theories, and combined numbered files
huffman
parents:
diff changeset
     7
val ssnd_def = thm "ssnd_def";
efb95d0d01f7 converted to new-style theories, and combined numbered files
huffman
parents:
diff changeset
     8
val ssplit_def = thm "ssplit_def";
efb95d0d01f7 converted to new-style theories, and combined numbered files
huffman
parents:
diff changeset
     9
val inst_sprod_pcpo2 = thm "inst_sprod_pcpo2";
16212
422f836f6b39 renamed strict, defined, and inject lemmas; renamed sfst2, ssnd2 to sfst_spair, ssnd_spair
huffman
parents: 16059
diff changeset
    10
val spair_strict = thm "spair_strict";
422f836f6b39 renamed strict, defined, and inject lemmas; renamed sfst2, ssnd2 to sfst_spair, ssnd_spair
huffman
parents: 16059
diff changeset
    11
val spair_strict1 = thm "spair_strict1";
422f836f6b39 renamed strict, defined, and inject lemmas; renamed sfst2, ssnd2 to sfst_spair, ssnd_spair
huffman
parents: 16059
diff changeset
    12
val spair_strict2 = thm "spair_strict2";
422f836f6b39 renamed strict, defined, and inject lemmas; renamed sfst2, ssnd2 to sfst_spair, ssnd_spair
huffman
parents: 16059
diff changeset
    13
val spair_strict_rev = thm "spair_strict_rev";
422f836f6b39 renamed strict, defined, and inject lemmas; renamed sfst2, ssnd2 to sfst_spair, ssnd_spair
huffman
parents: 16059
diff changeset
    14
val spair_defined_rev = thm "spair_defined_rev";
422f836f6b39 renamed strict, defined, and inject lemmas; renamed sfst2, ssnd2 to sfst_spair, ssnd_spair
huffman
parents: 16059
diff changeset
    15
val spair_defined = thm "spair_defined";
16317
868eddbcaf6e added theorems less_sprod, spair_less, spair_eq, spair_inject
huffman
parents: 16212
diff changeset
    16
val spair_eq = thm "spair_eq";
868eddbcaf6e added theorems less_sprod, spair_less, spair_eq, spair_inject
huffman
parents: 16212
diff changeset
    17
val spair_inject = thm "spair_inject";
15576
efb95d0d01f7 converted to new-style theories, and combined numbered files
huffman
parents:
diff changeset
    18
val Exh_Sprod2 = thm "Exh_Sprod2";
efb95d0d01f7 converted to new-style theories, and combined numbered files
huffman
parents:
diff changeset
    19
val sprodE = thm "sprodE";
16212
422f836f6b39 renamed strict, defined, and inject lemmas; renamed sfst2, ssnd2 to sfst_spair, ssnd_spair
huffman
parents: 16059
diff changeset
    20
val sfst_strict = thm "sfst_strict";
422f836f6b39 renamed strict, defined, and inject lemmas; renamed sfst2, ssnd2 to sfst_spair, ssnd_spair
huffman
parents: 16059
diff changeset
    21
val ssnd_strict = thm "ssnd_strict";
422f836f6b39 renamed strict, defined, and inject lemmas; renamed sfst2, ssnd2 to sfst_spair, ssnd_spair
huffman
parents: 16059
diff changeset
    22
val sfst_spair = thm "sfst_spair";
422f836f6b39 renamed strict, defined, and inject lemmas; renamed sfst2, ssnd2 to sfst_spair, ssnd_spair
huffman
parents: 16059
diff changeset
    23
val ssnd_spair = thm "ssnd_spair";
422f836f6b39 renamed strict, defined, and inject lemmas; renamed sfst2, ssnd2 to sfst_spair, ssnd_spair
huffman
parents: 16059
diff changeset
    24
val sfstssnd_defined = thm "sfstssnd_defined";
15576
efb95d0d01f7 converted to new-style theories, and combined numbered files
huffman
parents:
diff changeset
    25
val surjective_pairing_Sprod2 = thm "surjective_pairing_Sprod2";
16317
868eddbcaf6e added theorems less_sprod, spair_less, spair_eq, spair_inject
huffman
parents: 16212
diff changeset
    26
val less_sprod = thm "less_sprod";
868eddbcaf6e added theorems less_sprod, spair_less, spair_eq, spair_inject
huffman
parents: 16212
diff changeset
    27
val spair_less = thm "spair_less";
15576
efb95d0d01f7 converted to new-style theories, and combined numbered files
huffman
parents:
diff changeset
    28
val ssplit1 = thm "ssplit1";
efb95d0d01f7 converted to new-style theories, and combined numbered files
huffman
parents:
diff changeset
    29
val ssplit2 = thm "ssplit2";
efb95d0d01f7 converted to new-style theories, and combined numbered files
huffman
parents:
diff changeset
    30
val ssplit3 = thm "ssplit3";
efb95d0d01f7 converted to new-style theories, and combined numbered files
huffman
parents:
diff changeset
    31