let label_name = function
  | LogicLabel (None, l) -> l
  | _ -> Wp_parameters.fatal "Unexpected non-logical label"