src/HOLCF/Discrete1.thy

HOL-Real -> HOL-Complex

(*  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