AskOverflow.Dev

AskOverflow.Dev Logo AskOverflow.Dev Logo

AskOverflow.Dev Navigation

  • 主页
  • 系统&网络
  • Ubuntu
  • Unix
  • DBA
  • Computer
  • Coding
  • LangChain

Mobile menu

Close
  • 主页
  • 系统&网络
    • 最新
    • 热门
    • 标签
  • Ubuntu
    • 最新
    • 热门
    • 标签
  • Unix
    • 最新
    • 标签
  • DBA
    • 最新
    • 标签
  • Computer
    • 最新
    • 标签
  • Coding
    • 最新
    • 标签
主页 / coding / 问题 / 79072335
Accepted
Yago
Yago
Asked: 2024-10-10 07:30:43 +0800 CST2024-10-10 07:30:43 +0800 CST 2024-10-10 07:30:43 +0800 CST

无法在 do 中将类型“IO”与“[]”匹配

  • 772

我是 Haskell 新手 :)。我想从 IO 中迭代读取一个元素,如果存在,则从列表中删除该元素。在其他情况下,重复读取直到输入的元素在列表中。我有以下代码:

import Data.List (delete)

main = do
let initialDieRoll = [23,45,98,34]
strength <- askStrength
let dieRollWithoutStrength = removeStrengthFromDieRollLoop strength initialDieRoll
print dieRollWithoutStrength

removeStrengthFromDieRollLoop :: Int -> [Int] -> [Int]
removeStrengthFromDieRollLoop = removeStrengthFromDieRoll

removeStrengthFromDieRoll :: Int -> [Int] -> [Int]
removeStrengthFromDieRoll strength dieRoll = do
if strength `elem` dieRoll then
  delete strength dieRoll
else do
  "Please, choose an element from the initial die roll"
  newStrength <- askStrength
  removeStrengthFromDieRollLoop askStrength dieRoll


askStrength :: IO Int
askStrength = do
putStr "Strength : "
readLn::IO Int

但是,当我请求新的强度时,出现以下错误:

Couldn't match type ‘IO’ with ‘[]’
  Expected: [Int]
  Actual: IO Int
In a stmt of a 'do' block: newStrength <- askStrength
In the expression:
do "Please, choose an element from the initial die roll"
   newStrength <- askStrength
   removeStrengthFromDieRollLoop askStrength dieRoll
In a stmt of a 'do' block:
  if strength `elem` dieRoll then
    delete st

最好的处理方法是什么?如何修复错误?如果值不在初始列表中,每次请求值循环的最佳方法是什么?谢谢。

loops
  • 1 1 个回答
  • 60 Views

1 个回答

  • Voted
  1. Best Answer
    chi
    2024-10-10T18:32:47+08:002024-10-10T18:32:47+08:00

    这是一些可以编译的代码。(不过我还没有运行过)

    removeStrengthFromDieRoll :: Int -> [Int] -> IO [Int]
    removeStrengthFromDieRoll strength dieRoll = do
      if strength `elem` dieRoll then
        return (delete strength dieRoll)
      else do
        putStrLn "Please, choose an element from the initial die roll"
        newStrength <- askStrength
        removeStrengthFromDieRoll newStrength dieRoll
    
    
    askStrength :: IO Int
    askStrength = do
       putStr "Strength : "
       -- You might need hFlush stdout here, I'm not sure.
       readLn :: IO Int
    

    一些关键方面:

    • 所有直接或间接执行 IO 的函数都必须具有以下形式的类型... -> IO something。因此,askStrength由于它调用,因此必须具有 IO 类型。putStr因此,removeStrengthFromDieRoll也必须具有 IO 类型。因此,如果您removeStrengthFromDieRoll在另一个函数中使用,则该函数仍必须具有 IO 类型,等等。“IO 是病毒式的”是一种常见的表述方式。

    • 如果需要打印字符串,则需要类似 的内容putStrLn。不能简单地使用字符串"Please, ...."。

    • 当您需要在 IO 内部返回,但只有一个非 IO 值(如delete strength dieRoll上面的列表)时,您需要使用return函数(或等效地pure)将其带入 IO 内部。请注意,return与 C、C++、Java 等中的不同,但在 Haskell 中仅用于转换someType为IO someType,以便可以在具有IO结果类型的函数中返回“纯”值。

    最后,IO 对于初学者来说一开始可能比较难掌握。我们都经历过这种情况。我建议你先学习一下 IO monad 教程,如果你还没有这样做的话:网上应该有很多这样的教程。

    • 2

相关问题

  • AWK - 在继续下一场比赛之前处理比赛

  • 我试图理解 TCL 中的递归,但每次递归完成时都会抛出错误

  • 有没有办法修复此代码或者我应该要求更改数据结构?

  • Golang 文本/模板序列范围

  • 在谷歌表格中没有脚本的情况下迭代循环++?

Sidebar

Stats

  • 问题 205573
  • 回答 270741
  • 最佳答案 135370
  • 用户 68524
  • 热门
  • 回答
  • Marko Smith

    Vue 3:创建时出错“预期标识符但发现‘导入’”[重复]

    • 1 个回答
  • Marko Smith

    为什么这个简单而小的 Java 代码在所有 Graal JVM 上的运行速度都快 30 倍,但在任何 Oracle JVM 上却不行?

    • 1 个回答
  • Marko Smith

    具有指定基础类型但没有枚举器的“枚举类”的用途是什么?

    • 1 个回答
  • Marko Smith

    如何修复未手动导入的模块的 MODULE_NOT_FOUND 错误?

    • 6 个回答
  • Marko Smith

    `(表达式,左值) = 右值` 在 C 或 C++ 中是有效的赋值吗?为什么有些编译器会接受/拒绝它?

    • 3 个回答
  • Marko Smith

    何时应使用 std::inplace_vector 而不是 std::vector?

    • 3 个回答
  • Marko Smith

    在 C++ 中,一个不执行任何操作的空程序需要 204KB 的堆,但在 C 中则不需要

    • 1 个回答
  • Marko Smith

    PowerBI 目前与 BigQuery 不兼容:Simba 驱动程序与 Windows 更新有关

    • 2 个回答
  • Marko Smith

    AdMob:MobileAds.initialize() - 对于某些设备,“java.lang.Integer 无法转换为 java.lang.String”

    • 1 个回答
  • Marko Smith

    我正在尝试仅使用海龟随机和数学模块来制作吃豆人游戏

    • 1 个回答
  • Martin Hope
    Aleksandr Dubinsky 为什么 InetAddress 上的 switch 模式匹配会失败,并出现“未涵盖所有可能的输入值”? 2024-12-23 06:56:21 +0800 CST
  • Martin Hope
    Phillip Borge 为什么这个简单而小的 Java 代码在所有 Graal JVM 上的运行速度都快 30 倍,但在任何 Oracle JVM 上却不行? 2024-12-12 20:46:46 +0800 CST
  • Martin Hope
    Oodini 具有指定基础类型但没有枚举器的“枚举类”的用途是什么? 2024-12-12 06:27:11 +0800 CST
  • Martin Hope
    sleeptightAnsiC `(表达式,左值) = 右值` 在 C 或 C++ 中是有效的赋值吗?为什么有些编译器会接受/拒绝它? 2024-11-09 07:18:53 +0800 CST
  • Martin Hope
    The Mad Gamer 何时应使用 std::inplace_vector 而不是 std::vector? 2024-10-29 23:01:00 +0800 CST
  • Martin Hope
    Chad Feller 在 5.2 版中,bash 条件语句中的 [[ .. ]] 中的分号现在是可选的吗? 2024-10-21 05:50:33 +0800 CST
  • Martin Hope
    Wrench 为什么双破折号 (--) 会导致此 MariaDB 子句评估为 true? 2024-05-05 13:37:20 +0800 CST
  • Martin Hope
    Waket Zheng 为什么 `dict(id=1, **{'id': 2})` 有时会引发 `KeyError: 'id'` 而不是 TypeError? 2024-05-04 14:19:19 +0800 CST
  • Martin Hope
    user924 AdMob:MobileAds.initialize() - 对于某些设备,“java.lang.Integer 无法转换为 java.lang.String” 2024-03-20 03:12:31 +0800 CST
  • Martin Hope
    MarkB 为什么 GCC 生成有条件执行 SIMD 实现的代码? 2024-02-17 06:17:14 +0800 CST

热门标签

python javascript c++ c# java typescript sql reactjs html

Explore

  • 主页
  • 问题
    • 最新
    • 热门
  • 标签
  • 帮助

Footer

AskOverflow.Dev

关于我们

  • 关于我们
  • 联系我们

Legal Stuff

  • Privacy Policy

Language

  • Pt
  • Server
  • Unix

© 2023 AskOverflow.DEV All Rights Reserve