src/HOLCF/sprod2.thy
author wenzelm
Tue, 12 Jan 1999 13:39:21 +0100
changeset 6089 4d2d5556b4f9
parent 243 c22b85994e17
permissions -rw-r--r--
signature BASIC_THM; theorem / axiom deriv: added tags; get/put_name_tags; type attribute;

(*  Title: 	HOLCF/sprod2.thy
    ID:         $Id$
    Author: 	Franz Regensburger
    Copyright   1993 Technische Universitaet Muenchen

Class Instance **::(pcpo,pcpo)po
*)

Sprod2 = Sprod1 + 

arities "**" :: (pcpo,pcpo)po

(* Witness for the above arity axiom is sprod1.ML *)

rules

(* instance of << for type ['a ** 'b]  *)

inst_sprod_po	"(op <<)::['a ** 'b,'a ** 'b]=>bool = less_sprod"

end