IOA/example/Action.thy
author nipkow
Fri, 02 Dec 1994 11:43:20 +0100
changeset 194 b93cc55cb7ab
parent 168 44ff2275d44f
permissions -rw-r--r--
small updates because datatype list is now used. In particular Nil -> []

(*  Title:      HOL/IOA/example/Action.thy
    ID:         $Id$
    Author:     Tobias Nipkow & Konrad Slind
    Copyright   1994  TU Muenchen

The set of all actions of the system
*)

Action = Packet +
datatype 'm action = S_msg ('m) | R_msg ('m)
                   | S_pkt ('m packet) | R_pkt ('m packet)
                   | S_ack (bool) | R_ack (bool)
                   | C_m_s | C_m_r | C_r_s | C_r_r ('m)
end