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