doc-src/Tutorial/Misc/Types.thy

minor updates to pre-2002 release

Types = Main +
types number       = nat
      gate         = bool => bool => bool
      ('a,'b)alist = "('a * 'b)list"
end