src/HOL/IMP/Com.thy
author wenzelm
Fri, 30 Oct 2020 23:43:08 +0100
changeset 72522 6e27af808c17
parent 58889 5b7a9633cfa8
permissions -rw-r--r--
more privileges for the sake of mysqldump (avoid workaround --no-tablespaces);

section "IMP --- A Simple Imperative Language"

theory Com imports BExp begin

datatype
  com = SKIP 
      | Assign vname aexp       ("_ ::= _" [1000, 61] 61)
      | Seq    com  com         ("_;;/ _"  [60, 61] 60)
      | If     bexp com com     ("(IF _/ THEN _/ ELSE _)"  [0, 0, 61] 61)
      | While  bexp com         ("(WHILE _/ DO _)"  [0, 61] 61)

end