module Elimination_stack: Elimination_stack.S with type ('a,'b) reagent = ('a,'b) R.t
Elimination_stack.S
with type ('a,'b) reagent = ('a,'b) R.t