isabelle: src/HOL/MiniML/Maybe.thy@ad834f39d878 (annotated)

1300 c7a8f374339b New theory: type inference for let-free MiniML nipkow parents: diff changeset	1	(* Title: HOL/MiniML/Maybe.thy
c7a8f374339b New theory: type inference for let-free MiniML nipkow parents: diff changeset	2	ID: $Id$
c7a8f374339b New theory: type inference for let-free MiniML nipkow parents: diff changeset	3	Author: Dieter Nazareth and Tobias Nipkow
c7a8f374339b New theory: type inference for let-free MiniML nipkow parents: diff changeset	4	Copyright 1995 TU Muenchen
c7a8f374339b New theory: type inference for let-free MiniML nipkow parents: diff changeset	5
c7a8f374339b New theory: type inference for let-free MiniML nipkow parents: diff changeset	6	Universal error monad.
c7a8f374339b New theory: type inference for let-free MiniML nipkow parents: diff changeset	7	*)
c7a8f374339b New theory: type inference for let-free MiniML nipkow parents: diff changeset	8
c7a8f374339b New theory: type inference for let-free MiniML nipkow parents: diff changeset	9	Maybe = List +
c7a8f374339b New theory: type inference for let-free MiniML nipkow parents: diff changeset	10
c7a8f374339b New theory: type inference for let-free MiniML nipkow parents: diff changeset	11	datatype 'a maybe = Ok 'a \| Fail
c7a8f374339b New theory: type inference for let-free MiniML nipkow parents: diff changeset	12
c7a8f374339b New theory: type inference for let-free MiniML nipkow parents: diff changeset	13	consts bind :: "['a maybe, 'a => 'b maybe] => 'b maybe" (infixl 60)
c7a8f374339b New theory: type inference for let-free MiniML nipkow parents: diff changeset	14
c7a8f374339b New theory: type inference for let-free MiniML nipkow parents: diff changeset	15	defs
c7a8f374339b New theory: type inference for let-free MiniML nipkow parents: diff changeset	16	bind_def "m bind f == case m of Ok r => f r \| Fail => Fail"
c7a8f374339b New theory: type inference for let-free MiniML nipkow parents: diff changeset	17
c7a8f374339b New theory: type inference for let-free MiniML nipkow parents: diff changeset	18	end

author	nipkow
	Fri, 17 Nov 1995 12:08:04 +0100
changeset 1337	ad834f39d878
parent 1300	c7a8f374339b
child 1376	92f83b9d17e1
permissions	-rw-r--r--