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;;