src/HOL/IMP/Com.thy
author huffman
Thu Aug 11 09:11:15 2011 -0700 (2011-08-11)
changeset 44165 d26a45f3c835
parent 43141 11fce8564415
child 45212 e87feee00a4c
permissions -rw-r--r--
remove lemma stupid_ext
nipkow@43141
     1
header "IMP --- A Simple Imperative Language"
clasohm@924
     2
nipkow@43141
     3
theory Com imports BExp begin
clasohm@924
     4
clasohm@924
     5
datatype
nipkow@43141
     6
  com = SKIP 
nipkow@43141
     7
      | Assign name aexp         ("_ ::= _" [1000, 61] 61)
nipkow@43141
     8
      | Semi   com  com          ("_;/ _"  [60, 61] 60)
nipkow@43141
     9
      | If     bexp com com     ("(IF _/ THEN _/ ELSE _)"  [0, 0, 61] 61)
nipkow@43141
    10
      | While  bexp com         ("(WHILE _/ DO _)"  [0, 61] 61)
clasohm@924
    11
clasohm@924
    12
end