src/HOL/HOLCF/IOA/ABP/Packet.thy
author wenzelm
Mon, 24 Oct 2022 20:37:32 +0200
changeset 76371 1ac2416e8432
parent 62002 f1599e98c4d0
permissions -rw-r--r--
tuned signature (again, amending f32ac01aef5e), e.g. relevant for Isabelle/DOF;

(*  Title:      HOL/HOLCF/IOA/ABP/Packet.thy
    Author:     Olaf Müller
*)

section \<open>Packets\<close>

theory Packet
imports Main
begin

type_synonym
  'msg packet = "bool * 'msg"

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

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

end