module Bureau_de_change : BUREAU_DE_CHANGE =    struct     module Euro = Float     module Dollar = Float     let un_euro_en_dollar = 0.95     let euro_to_dollar x = x /. un_euro_en_dollar     let dollar_to_euro x = x *. un_euro_en_dollar   end;;