include "common/AST.ma".

axiom CostTag : String.

definition costlabel ≝ identifier CostTag.

(* For use in importing programs in intermediate languages. *)
definition costlabel_of_nat : nat → costlabel ≝ identifier_of_nat ?.

(* dpm: fix identifier/costlabel mismatch *)
axiom Identifier_of_costlabel: costlabel → Identifier.