sig
  val map : Mapper.mapper -> Syntax.equation_desc -> Syntax.equation_desc
end