Mercurial Mercurial > repos > isabelle / 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.
src/HOLCF/ccc1.thy
author lcp
Tue, 25 Apr 1995 11:14:03 +0200
changeset 1072 0140ff702b23
parent 752 b89462f9d5f1
child 1168 74be52691d62
permissions -rw-r--r--
updated version

(*  Title: 	HOLCF/ccc1.thy
    ID:         $Id$
    Author: 	Franz Regensburger
    Copyright   1993 Technische Universitaet Muenchen

Merge Theories Cprof, Sprod, Ssum, Lift, Fix and
define constants for categorical reasoning
*)

ccc1 = Cprod3 + Sprod3 + Ssum3 + Lift3 + Fix +

consts
	ID 	:: "'a -> 'a"
	cfcomp	:: "('b->'c)->('a->'b)->'a->'c"

syntax	"@oo"	:: "('b->'c)=>('a->'b)=>'a->'c" ("_ oo _" [101,100] 100)
     
translations 	"f1 oo f2" == "cfcomp[f1][f2]"

rules

  ID_def	"ID ==(LAM x.x)"
  oo_def	"cfcomp == (LAM f g x.f[g[x]])" 

end
isabelle