module
type
BUREAU_DE_CHANGE =
sig
module
Euro : MONNAIE
module
Dollar : MONNAIE
val
euro_to_dollar : Euro.t -> Dollar.t
val
dollar_to_euro : Dollar.t -> Euro.t
end
;;