let labels_loop_inv s = function
  | LogicLabel (None"Pre"-> Logic_const.pre_label
  | LogicLabel (None"Here"-> Cil2cfg.mk_logic_label s
  | LogicLabel (None, ("Old" | "Post")) as l -> raise (LabelError l)
  | l -> l