在Haskell中检测循环列表的能力会破坏语言的任何属性吗?

内容来源于 Stack Overflow,并遵循CC BY-SA 3.0许可协议进行翻译与使用

  • 回答 (2)
  • 关注 (0)
  • 查看 (44)

在Haskell中,有些列表是循环的:

ones = 1 : ones

另一些则不是:

nums = [1..]

还有这样的事情:

more_ones = f 1 where f x = x : f x

假设我们使用一个haskell实现,并对其进行内建函数的黑客攻击。isCycle :: [a] -> Bool的结构。内存表示争论的焦点。它返回True如果列表是物理循环的,并且False如果这个论点是有限长度的。否则,它将无法终止。

这个函数的存在会破坏语言的任何有趣的特性吗?

提问于
用户回答回答于

这个函数的存在会破坏语言的任何有趣的特性吗?

。Haskell表达式总是可以被其值替换。换句话说,它只取决于传递的参数,而不是其他任何东西。如果我们有

isCycle :: [a] -> Bool

正如所建议的,使用它的表达式将不再满足此属性。它们可以依赖于值的内部内存表示。因此,将违反其他法律。例如,Functor同一性法

fmap id === id

你可以区分onesfmap id ones,因为后者是无环的。编译器优化,如应用上述法律,将不再保留程序属性。

然而,另一个问题是函数

isCycleIO :: [a] -> IO Bool

IO允许操作检查和更改任何内容。

一个纯粹的解决方案可以是有一个内部区分两者的数据类型:

import qualified Data.Foldable as F

data SmartList a = Cyclic [a] | Acyclic [a]

instance Functor SmartList where
    fmap f (Cyclic xs) = Cyclic (map f xs)
    fmap f (Acyclic xs) = Acyclic (map f xs)

instance F.Foldable SmartList where
    foldr f z (Acyclic xs) = F.foldr f z xs
    foldr f _ (Cyclic xs) = let r = F.foldr f r xs in r

当然,它无法识别泛型列表是否是循环的,但是对于许多操作来说,保留以下知识是可能的Cyclic值。

热门问答

对象存储COS有没有日志功能?

Hyman Wang

腾讯云 · 高级产品经理 (已认证)

负责腾讯云游戏行业产品规划及发展。关注游戏行业生态,致力于腾讯内部游戏生态和技术能力开放,以及周边游戏生态资源整合。
推荐已采纳

你的cos 是否开通了 CDN 加速,如果开通了CDN 加速,可以去 CDN 的控制台下: (统计分析 --- 监控 )页面下拉到底部,可以通过 URL 查看流量情况。

对象存储里的视频能在线播放么?

Jinqn

腾讯 · 高级工程师 (已认证)

腾讯云COS前端开发
推荐

购买的云数据库里面有什么类型的数据库?有SQLserver吗?可以自己安装SQLserver吗?

帅的惊动我国计算机大神
推荐已采纳
云关系型数据库让您在云中轻松部署、管理和扩展的关系型数据库,提供安全可靠、伸缩灵活的按需云数据库服务。腾讯云关系型数据库提供 MySQL、SQL Server、MariaDB、PostgreSQL 数据库引擎,并针对数据库引擎的性能进行了优化。云关系型数据库是一种高度可用的托管服...... 展开详请

linux如何限制单一ip对服务器的日访问量?

小爱同学

腾讯云 · 技术支持 (已认证)

推荐
您根据当前网站规模和业务了解下【网站管家 WAF】,企业站点可有效抵御恶意攻击,垃圾访问。 图片.png 您反馈网站短信验证码被盗刷,也可结合自己业务,可自行部署iptables进行手动拦截。或其他方式 例如您的网站是nginx,在web配置文件中开启配置HttpLimitR...... 展开详请

兼容性测试只能上传apk测试的吗?

WeTest质量开放平台团队专注游戏,提升品质
推荐

目前不支持公众号的兼容测试,还请知晓

关于群自动解散的问题?

安稳

腾讯科技 · 工单技术支持 (已认证)

推荐
您好,临时群是没有的。云通信的群组只有私有群(Private)、公开群(Public)、聊天室(ChatRoom)、音视频聊天室(AVChatRoom)和在线成员广播大群(BChatRoom)这五种。 您说的这个需求,思路:创建群组时,服务端记录一下时间,到达约定解散的时间以后,...... 展开详请

所属标签

扫码关注云+社区