为什么添加“Eq”类型约束而不使用“==”?

2024-03-30

因此,我有一个非常简单的函数,它接受两个参数:第一个是一小时(0 到 23 之间),第二个是一分钟(0 到 59 之间)。此函数返回小时加一分钟,并以漂亮的样式格式化小时。举例来说,hour 11 12 return 11 heures et 13 minutes。抱歉,该小时的法语格式。

所以,我在这个函数中使用show函数,参数需要是数字,所以我有类型声明(Num a, Show a) => a -> a -> String。但是,当我尝试该功能时,出现错误,GHC 告诉我添加Eq类型约束,但我不明白为什么我需要Eq在这种情况下类型约束。有代码(再次,对函数中使用的法文感到抱歉,但我认为如果您不理解函数名称和文本,这不是很重要):

heure :: (Num a, Eq a, Show a) => a -> a -> String
heure 23 59 = "Minuit"
heure 12 m  = "Midi et " ++ show (m+1) ++ " minutes"
heure h 59  = show (h+1) ++ " heures"
heure h m   = show h ++ " heures et " ++ show (m+1) ++ " minutes"

所以:如果我不使用Eq,我有一个错误,当我使用它时,我的代码是正确的。为什么?

谢谢您的解释!


你需要Eq约束,因为你正在检查是否h等于23 or 12以及是否m等于59。您正在使用模式匹配来完成此操作,而不是==,但是这种方式仍然需要与数字文字进行模式匹配Eq(与构造函数的模式匹配不同)。

本文内容由网友自发贡献,版权归原作者所有,本站不承担相应法律责任。如您发现有涉嫌抄袭侵权的内容,请联系:hwhale#tublm.com(使用前将#替换为@)

为什么添加“Eq”类型约束而不使用“==”? 的相关文章

随机推荐

  • 在 Java 和 C# 中计算 SHA-1 哈希值

    在 Java 和 C 中计算 SHA 1 哈希值 我正在尝试在 C 应用程序中复制 Java 应用程序的逻辑 其中一部分涉及生成密码的 SHA 1 哈希值 不幸的是我无法从 Java 和 C 获得相同的结果 C Output 64 0a b
  • NotImplementedError:frozendict 不支持“更新” - Odoo v8

    我的 Odoo v8 模块上有以下代码 api multi def button generate wh doc self context self context partner self env res partner res for
  • 使用多个 log4net 文件记录器

    我有文件附加器 FileA FileB 和 FileC 我将 FileA 添加到根元素 因为我希望它成为一个包罗万象的元素 下面将详细介绍 我将 FileB 和 FileC 用于特定消息 并为每个附加程序创建命名记录器 在代码中 我加载用于
  • 为什么使用预编译头(C/C++)?

    为什么要使用预编译头 读了这些回复 我怀疑我对它们所做的事情有点愚蠢 pragma once Defines used for production versions ifndef PRODUCTION define eMsg x x Sh
  • 找不到 microsoft.sqlserver.batchparser.dll

    我编写了一个 asp net Web 应用程序 它使用 SMO 针对 SQL Server 2008 来运行一些数据库脚本 它引用这些程序集 位于 C Program Files Microsoft SQL Server 100 SDK A
  • qt5中MainWindow是用自身初始化的吗?

    我尝试学习 qt 5 但不明白一件事 Qt Creator 默认创建这两个文件 主窗口 h ifndef MAINWINDOW H define MAINWINDOW H include
  • 在 Laravel 迁移中向现有表添加新列

    我想在现有表中添加一些新列users在拉拉维尔 我已经用谷歌搜索了这一点 并在这些搜索之后我已经使用命令创建了迁移php artisan make migration add columns to users add columns to
  • 为什么 Swing 线程模型被认为是错误的?应该如何理解? [关闭]

    很难说出这里问的是什么 这个问题是含糊的 模糊的 不完整的 过于宽泛的或修辞性的 无法以目前的形式得到合理的回答 如需帮助澄清此问题以便重新打开 访问帮助中心 help reopen questions 我多次听说 Java Swing 线
  • 使用图像映射创建不规则形状的 HTML 链接?

    我必须创建这种奇怪的蜂窝式导航 理想情况下 当用户悬停在每个 蜂窝 上时 它会改变颜色 也许是透明的橙色覆盖物或其他东西 我做了一个有点工作的 JS Fiddle 但不知道如何突出显示悬停时的形状 我已经很长时间没有看到使用图像映射了 但这
  • 如何取消设置嵌套 foreach 中的每个数组?

    我有一段多维数组输出 如下所示 Array 0 gt Array item gt null count gt 0 child gt Array Dagadu Bocah gt Array item gt Dagadu Bocah count
  • 如何在 adb (android) 中使用 Bash 而不是 Shell?

    我目前正在使用 adb 终端访问我的数据库文件 但是 我只能使用以下命令访问终端 adb shell 我想从 sh 切换到 bash 因为它对于某些快捷方式来说更方便 我怎么做 我不认为 adb 有 bash 选项 如果你输入adb hel
  • 如何使用 Apache Poi 在折线图中设置轴标签

    我正在尝试使用 java 和 Apache POI 自动创建报告 我快要完成了 但找不到如何在 XSSFChart 中设置轴标签 我已经找到了如何设置图表的标题 Apache POI 设置 Excel 图表标题 https stackove
  • SlideToggle 高度为“跳跃”

    我的 jQueryslideToggle 实验 谁能告诉我为什么我打开盒子时会 跳动 前半部分他们滑动 其余部分他们 跳跃 Thanks 约翰内斯 对我有帮助的是 overflow hidden 到那个切换
  • Android NDK:使用预编译静态库进行链接

    我正在尝试将 Jnetpcap 移植到 Android 以便使用它来解析 pcap 文件 Jnetpcap 是使用 JNI 的 libpcap 的 java 包装器 我已经使用 android 的源代码树将 libpcap 编译为静态库 当
  • 需要 EJB 3.1 Singleton + JPA + JSF 设计建议

    给定 简单的 JSF web 应用程序 无 Seam 让 JSF bean 调用几个 EJB 而 EJB 又加载并保存 JPA 实体 我想要的是使用 Singletonejb 和注入的注释EntityManager 代替 EntityMan
  • 将分析仪连接到 Howler sound

    我已经尝试将分析仪连接到 Howler 声音一段时间了 但没有成功 我像这样创建我的嚎叫声音 var sound new Howl urls media sounds genesis mp3 然后我使用 Howler 全局上下文创建分析器
  • 如何防止应用程序被标记为可疑

    我有一个使用 Visual Studio 2012 用 C 编写的 NET 应用程序 我通过自己的网站推广该应用程序并提供下载 在 Chrome 中下载它时 我收到一条消息 指出我的应用程序 不常下载 可能很危险 此外 当我下载自己的应用程
  • 处理 ListView 中的 MouseMove、MouseDown、MouseUp 事件以拖动无边框表单

    我在用着MouseMove MouseUp MouseDown移动无边界表单的事件 如此处的示例 它工作得很好 但对于 ListView 只有当我单击列表中的项目 其文本 时它才有效 如果我单击不包含项目的 ListView 的空间 它将不
  • 警告:javax.persistence.spi::未找到有效的提供程序

    我收到警告 WARNING javax persistence spi No valid providers found 我有带有 JPA 注释的代码 但我只需要它们与 JOOQ 一起使用 如何去掉这个警告呢 添加我的 gradle 文件
  • 为什么添加“Eq”类型约束而不使用“==”?

    因此 我有一个非常简单的函数 它接受两个参数 第一个是一小时 0 到 23 之间 第二个是一分钟 0 到 59 之间 此函数返回小时加一分钟 并以漂亮的样式格式化小时 举例来说 hour 11 12 return 11 heures et