src/HOL/SMT_Examples/SMT_Tests.thy
changeset 57994 68b283f9f826
parent 57696 fb71c6f100f8
child 58061 3d060f43accb
equal deleted inserted replaced
57993:c52255a71114 57994:68b283f9f826
     6 
     6 
     7 theory SMT_Tests
     7 theory SMT_Tests
     8 imports Complex_Main
     8 imports Complex_Main
     9 begin
     9 begin
    10 
    10 
    11 smt_status
       
    12 smt2_status
    11 smt2_status
    13 
    12 
    14 text {* Most examples are taken from various Isabelle theories and from HOL4. *}
    13 text {* Most examples are taken from various Isabelle theories and from HOL4. *}
    15 
    14 
    16 
    15 
   586   "p = \<lparr> cx = 3, cy = 4, black = True \<rparr> \<longrightarrow>
   585   "p = \<lparr> cx = 3, cy = 4, black = True \<rparr> \<longrightarrow>
   587      p \<lparr> cy := 4 \<rparr> \<lparr> black := True \<rparr> \<lparr> cx := 3 \<rparr> = p"
   586      p \<lparr> cy := 4 \<rparr> \<lparr> black := True \<rparr> \<lparr> cx := 3 \<rparr> = p"
   588   "p = \<lparr> cx = 3, cy = 4, black = True \<rparr> \<longrightarrow>
   587   "p = \<lparr> cx = 3, cy = 4, black = True \<rparr> \<longrightarrow>
   589      p \<lparr> black := True \<rparr> \<lparr> cx := 3 \<rparr> \<lparr> cy := 4 \<rparr> = p"
   588      p \<lparr> black := True \<rparr> \<lparr> cx := 3 \<rparr> \<lparr> cy := 4 \<rparr> = p"
   590   using point.simps bw_point.simps
   589   using point.simps bw_point.simps
   591   by smt+ (* smt2 FIXME: bad Z3 4.3.x proof *)
   590   sorry (* smt2 FIXME: bad Z3 4.3.x proof *)
   592 
   591 
   593 lemma
   592 lemma
   594   "\<lparr> cx = 3, cy = 4, black = b \<rparr> \<lparr> black := w \<rparr> = \<lparr> cx = 3, cy = 4, black = w \<rparr>"
   593   "\<lparr> cx = 3, cy = 4, black = b \<rparr> \<lparr> black := w \<rparr> = \<lparr> cx = 3, cy = 4, black = w \<rparr>"
   595   "\<lparr> cx = 3, cy = 4, black = True \<rparr> \<lparr> black := False \<rparr> =
   594   "\<lparr> cx = 3, cy = 4, black = True \<rparr> \<lparr> black := False \<rparr> =
   596      \<lparr> cx = 3, cy = 4, black = False \<rparr>"
   595      \<lparr> cx = 3, cy = 4, black = False \<rparr>"