1
(* Title: Option.thy
2
ID: $Id$
3
Author: Tobias Nipkow
4
Copyright 1994 TU Muenchen
5
6
Datatype 'a option
7
*)
8
9
Option = Arith +
10
datatype 'a option = None | Some 'a
11
end