From: Prakash Countcham <Prakash.C<ountcham@im...>  20040825 14:24:39

Hello, It's not an important remark, but in bitSet.mli instead of the following lines : val intersect : t > t > unit (** [intersect s t] sets [s] to the intersection of the sets [s] and [t]. *) val unite : t > t > unit (** [intersect s t] sets [s] to the union of the sets [s] and [t]. *) val differentiate : t > t > unit (** [intersect s t] removes the elements of [t] from [s]. *) val differentiate_sym : t > t > unit (** [intersect s t] sets [s] to the symmetrical difference of the sets [s] and [t]. *) You should put : val intersect : t > t > unit (** [intersect s t] sets [s] to the intersection of the sets [s] and [t]. *) val unite : t > t > unit (** [unite s t] sets [s] to the union of the sets [s] and [t]. *) val differentiate : t > t > unit (** [differentiate s t] removes the elements of [t] from [s]. *) val differentiate_sym : t > t > unit (** [differentiate_sym s t] sets [s] to the symmetrical difference of the sets [s] and [t]. *) Friendly,  Prakash 