Mercurial Mercurial > hg > nominal2 / file revision
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | file | latest | revisions | annotate | diff | comparison | raw | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Nominal/Ex/TypeVarsTest.thy
author Christian Urban <urbanc@in.tum.de>
Fri, 27 Aug 2010 03:37:17 +0800
changeset 2440 0a36825b16c1
parent 2436 3885dc2669f9
child 2454 9ffee4eb1ae1
permissions -rw-r--r--
"isabelle make test" makes all major examples....they work up to supp theorems (excluding)

theory TypeVarsTest
imports "../NewParser" 
begin

atom_decl name
declare [[STEPS = 100]]

class s1
class s2

nominal_datatype ('a, 'b) lam =
  Var "name"
| App "('a::s1, 'b::s2) lam" "('a, 'b) lam"
| Lam x::"name" l::"('a, 'b) lam"  bind x in l

thm lam.distinct
thm lam.induct
thm lam.exhaust
thm lam.fv_defs
thm lam.bn_defs
thm lam.perm_simps
thm lam.eq_iff
thm lam.fv_bn_eqvt
thm lam.size_eqvt


end
nominal2