src/HOLCF/Discrete1.thy

added "locale", "print_locale", "print_locales";

(*  Title:      HOLCF/Discrete1.thy
    ID:         $Id$
    Author:     Tobias Nipkow
    License:    GPL (GNU GENERAL PUBLIC LICENSE)

Discrete CPOs.
*)

Discrete1 = Discrete0 +

instance discr :: (term)po
  (less_discr_refl,less_discr_trans,less_discr_antisym)

end