let
mk_logic_label s =
LogicLabel
(
Some
s,
"wp!stmt_"
^(string_of_int s.sid))