fact: Example ex2 : forall r2 n g, exec (("x",0)::("y",0)::("n",n)::nil) (un_annot (a_while (blt (avar "x")(avar "n")) (a_conj (pred "le" (avar "x"::avar "n"::nil)) (pred "pp" (avar "y"::avar "x"::nil))) (a_sequence (a_assign "x" (aplus (avar "x")(anum 1))) (a_assign "y" (aplus (avar "x")(avar "y")))))) r2 -> 0 <= n -> 2*(r2@g)"y"=(r2@g)"n"*((r2@g)"n"+1).
imports: little_w_string parser ZArith List String Lia