HOL-Algebra complete for release Isabelle2003 (modulo section headers).
(* Title: HOLCF/Discrete1.thy
ID: $Id$
Author: Tobias Nipkow
License: GPL (GNU GENERAL PUBLIC LICENSE)
Discrete CPOs.
*)
Discrete1 = Discrete0 +
instance discr :: (type) po
(less_discr_refl,less_discr_trans,less_discr_antisym)
end