(wip) example: formalization of Why3 term API

examples/in_progress/why3_logic/term/why3session.xml

@@ -9,7 +9,7 @@
 </theory>
 <theory name="Ls" sum="d41d8cd98f00b204e9800998ecf8427e">
 </theory>
-<theory name="Term" sum="ddbc28b7f2fe9a580e03e892dc4bc3fb">
+<theory name="Term" sum="4a7d61a3f4a3792bfc97b177c2b61c32">
  <goal name="WP_parameter fused_alt" expl="VC for fused_alt">
  <transf name="split_goal_wp">
   <goal name="WP_parameter fused_alt.1" expl="1. assertion">

examples/in_progress/why3_logic/ty.mlw

@@ -295,7 +295,7 @@ module Ty
     ensures { equalizer s.Mtv.domain s.Mtv.bindings result.Mtv.bindings }
     (* Invariant. *)
     ensures { forall x. result.Mtv.domain x ->
-      ty1.cty_d (result.Mtv.bindings x) }
+      cty1.cty_d (result.Mtv.bindings x) }
     (* Failure. *)
     raises { TypeMismatch _ -> forall f.
       (forall x. s.Mtv.domain x ->

examples/in_progress/why3_logic/ty/why3session.xml

@@ -7,7 +7,7 @@
 <file name="../ty.mlw" expanded="true">
 <theory name="Tv" sum="d41d8cd98f00b204e9800998ecf8427e">
 </theory>
-<theory name="Ty" sum="564071bf524906e6be082b8cfe54c50b" expanded="true">
+<theory name="Ty" sum="17320dd31f9e83f405ff9085004af149">
  <goal name="WP_parameter ty_match_sure" expl="VC for ty_match_sure">
  <transf name="split_goal_wp">
   <goal name="WP_parameter ty_match_sure.1" expl="1. precondition">
@@ -29,10 +29,10 @@
   <proof prover="0"><result status="valid" time="0.05" steps="8"/></proof>
   </goal>
   <goal name="WP_parameter ty_match_sure.7" expl="7. postcondition">
-  <proof prover="0"><result status="valid" time="0.06" steps="11"/></proof>
+  <proof prover="0"><result status="valid" time="0.06" steps="10"/></proof>
   </goal>
   <goal name="WP_parameter ty_match_sure.8" expl="8. unreachable point">
-  <proof prover="0"><result status="valid" time="0.07" steps="19"/></proof>
+  <proof prover="0"><result status="valid" time="0.07" steps="18"/></proof>
   </goal>
  </transf>
  </goal>