src/HOLCF/Sprod1.thy
author berghofe
Fri, 10 Dec 2004 16:48:01 +0100
changeset 15394 a2c34e6ca4f8
parent 14981 e73f8140af78
child 15567 60743edae74a
permissions -rw-r--r--
New code generator for let and split.

(*  Title:      HOLCF/sprod1.thy
    ID:         $Id$
    Author:     Franz Regensburger

Partial ordering for the strict product.
*)

Sprod1 = Sprod0 +

instance "**"::(sq_ord,sq_ord)sq_ord 

defs
  less_sprod_def "p1 << p2 == Isfst p1 << Isfst p2 & Issnd p1 << Issnd p2"

end