Update example of issue 116

examples/bts/116_array_access.mlw

@@ -4,12 +4,14 @@ module Test
   use mach.array.Array63
 
   constant d: Array.array int
-  constant e: Array63.array int
+  val e: Array63.array int
 
-(*  goal a: e[1] = 5*)
+  goal a: d[1] = 5
 
-  goal c: Array.([]) d 3 = 5
+  let f i =
+    e[i] <- 5;
+    e[i]
 
-(* goal g: Array63.([]) e 3 = 5 *)
+  goal c: d[3] = 5
 
 end

examples/bts/116_array_access/why3session.xml

@@ -2,8 +2,12 @@
 <!DOCTYPE why3session PUBLIC "-//Why3//proof session v5//EN"
 "http://why3.lri.fr/why3session.dtd">
 <why3session shape_version="5">
-<file name="../116_array_access.mlw" proved="true">
+<file name="../116_array_access.mlw">
 <theory name="Test">
+ <goal name="a">
+ </goal>
+ <goal name="VC f" expl="VC for f">
+ </goal>
  <goal name="c">
  </goal>
 </theory>