src/HOLCF/IOA/ABP/Packet.thy
author wenzelm
Fri, 05 Oct 2001 21:49:59 +0200
changeset 11699 c7df55158574
parent 10215 1ead773b365e
child 12218 6597093b77e7
permissions -rw-r--r--
"num" syntax;

(*  Title:      HOLCF/IOA/ABP/Packet.thy
    ID:         $Id$
    Author:     Olaf Mueller
    Copyright   1995  TU Muenchen

Packets
*)

Packet = NatArith +

types

   'msg packet = "bool * 'msg"

constdefs

  hdr  :: 'msg packet => bool
  "hdr == fst"

  msg :: 'msg packet => 'msg
  "msg == snd"

end