src/Tools/8bit/isa-patches/HOL/Prod.p
author paulson
Tue, 16 Jul 1996 15:49:46 +0200
changeset 1868 836950047d85
parent 1826 2a2c0dbeb4ac
permissions -rw-r--r--
Put in minimal simpset to avoid excessive simplification, just as in revision 1.9 of HOL/indrule.ML

types

('a, 'b) "ò"          (infixr 20)

translations

(type)  "x ò y"	== (type) "x * y" 

  "³(x,y,zs).b"   == "split(³x.³(y,zs).b)"
  "³(x,y).b"      == "split(³x y.b)"