better config: parse file + crunch

src/types.ml

@@ -1,35 +1,3 @@
-module Config_types = struct
-  module Currency = struct
-    type t = {
-      enabled: [ `YES | `NO ];
-      code: string;
-      name: string;
-      fractional_input_digits: int;
-      fractional_normal_digits: int;
-      fractional_trailing_zero_digits: int;
-      alt_unit_names: (int * string) list;
-    }
-  end
-
-  module Coin = struct
-    type t = {
-      (* section_name: Name in the configuration file that defines this denomination *)
-      section_name: string;
-      value: Amount.t;
-      duration_withdraw: Ptime.Span.t;
-      duration_spend: Ptime.Span.t;
-      duration_legal: Ptime.Span.t;
-      fee_withdraw: Amount.t;
-      fee_deposit: Amount.t;
-      fee_refresh: Amount.t;
-      fee_refund: Amount.t;
-      cipher: [ (* `CS |*) `RSA ];
-      rsa_keysize: int; (* : int option (only if `RSA) *)
-      age_restricted: [ (*`YES|*) `NO ];
-    }
-  end
-end
-
 module Amount = struct
   include Amount