检查数组是否具有所有唯一元素

问题描述

是否有任何核心 PureScript 库带有判断数组（或可折叠）是否具有唯一元素的谓词？

我搜索了一下，发现 nub 和 Data.Set 的 fromFoldable 将返回仅包含唯一元素的数据。

现在，我只是将经过 nub 的数组的长度与原始数组的长度进行比较，尽管这是一种快速而肮脏的方法，因为我不需要中间结果。

allUnique :: forall a. Ord a => Array a -> Boolean
allUnique xs = length xs == (length $ nub xs)

我想在重新创建轮子（可以这么说）之前，我会问这个（或类似的东西）是否已经存在。

解决方法

暂无找到可以解决该程序问题的有效方法，小编努力寻找整理中！

如果你已经找到好的解决方法，欢迎将解决方案带上本链接一起发送给小编。

小编邮箱:dio#foxmail.com (将#修改为@）