Subst/AList.thy
author lcp
Fri, 19 Aug 1994 11:10:56 +0200
changeset 116 ab4328bbff70
parent 106 d27056ec0a5a
child 194 b93cc55cb7ab
permissions -rw-r--r--
HOL/subset.thy, equalities.thy, mono.thy: new HOL/Lfp.thy: now depends upon mono HOL/Gfp.thy: depends upon Lfp, not just mono

(*  Title: 	Substitutions/alist.thy
    Author: 	Martin Coen, Cambridge University Computer Laboratory
    Copyright   1993  University of Cambridge

Association lists.
*)

AList = List + 

consts

  alist_rec  :: "[('a*'b)list, 'c, ['a, 'b, ('a*'b)list, 'c]=>'c] => 'c"
  assoc      :: "['a,'b,('a*'b) list] => 'b"

rules

  alist_rec_def "alist_rec(al,b,c) == list_rec(al, b, split(c))"

  assoc_def     "assoc(v,d,al) == alist_rec(al,d,%x y xs g.if(v=x,y,g))"

end