module type Full_AI_Lattice_with_cardinality = sig .. end
sig
end
include Eva_lattice_type.AI_Lattice_with_cardinal_one
include Eva_lattice_type.With_Diff
include Eva_lattice_type.With_Diff_One
include Eva_lattice_type.With_Enumeration