小编ama*_*loy的帖子

不匹配类型

我有这个代码的问题:

 rango2 :: Int -> [Int] -> [[Int]] -> [Int]
 rango2 a b list = if (verif (map(+list!!a!!2)(list!!a)) (map(-list!!a!!2)(list!!a)) (b)) then [1]
              else [0]

 verif :: [Int] -> [Int] -> [Int] -> Bool
 verif a b c = if ((c!!0 < ((a!!0)+1)) && (((c!!0)+1) > b!!0) && (c!!1 < ((a!!1)+1)) && (((c!!1)+1) > b!!1)) then True
          else False
Run Code Online (Sandbox Code Playgroud)

运行时,会产生以下错误:

Couldn't match type `Int' with `Int -> Int'
Expected type: [[Int -> Int]]
  Actual type: [[Int]]
In the first argument of …
Run Code Online (Sandbox Code Playgroud)

haskell

0
推荐指数
1
解决办法
62
查看次数

GHCi Haskell中的'it'变量是否会发生变异?

刚开始使用Haskell,据说Haskell有不可变的变量.那么为什么每次在GHCi提示符中输入表达式时,'it'变量都会改变其值?

GHCi, version 7.10.2: http://www.haskell.org/ghc/  :? for help
Prelude> 7*2
14
Prelude> it
14
Prelude> "foo"
"foo"
Prelude> it
"foo"
Prelude>
Run Code Online (Sandbox Code Playgroud)

haskell functional-programming ghci

0
推荐指数
1
解决办法
115
查看次数

天真的Haskell功能实现比"更智能"的解决方案更快?

所以我是Haskell的新手,我想弄清楚为什么我的天真实现实际上比我认为更智能的解决方案更快.

我正在尝试编写一个函数,给定一个String将返回一个Bool指示String是否使用一个且恰好是一个元音的函数.以下是我天真的实现:

singleVowel :: Maybe String -> Bool
singleVowel Nothing = False
singleVowel (Just s) = singleVowel (Just s) = length (nub $ filter (`elem` "aeiouyAEIOUY") s) == 1
Run Code Online (Sandbox Code Playgroud)

请注意,我过滤掉了元音集中没有的所有元素.然后,我使用该nub函数进行另一次传递,从筛选列表中删除重复项,并查看列表中是否只有1个元音.然后在最坏的情况下,此解决方案将使用O(n)内存和时间,因为它必须为筛选列表分配内存.

现在对于我的另一个解决方案,我决定使用递归并在每次递归调用时传递一个字符,以便在看到当前元音时跟踪当前元音.

singleVowelFaster :: Maybe String -> Bool
singleVowelFaster Nothing = False
singleVowelFaster (Just s) = singleVowelHelper s Nothing

singleVowelHelper :: String -> Maybe Char -> Bool
singleVowelHelper [] Nothing = False
singleVowelHelper [] _ = True
singleVowelHelper (x:xs) Nothing = if x …
Run Code Online (Sandbox Code Playgroud)

performance haskell lazy-evaluation

0
推荐指数
1
解决办法
114
查看次数

如何从C++管理ghci?

我有一个.hs文件,其中有一个Haskell函数.我的C++程序应该运行ghci,调用函数,然后将输出写入文本文件,然后退出ghci.我认为这可以轻松完成system(),我可以用它来管理终端,并做所有这些好事.但是当我执行时system("ghci"),C++程序暂停并等待我完成Haskelling.

如何从C++运行Haskell程序?

c++ terminal haskell function

0
推荐指数
1
解决办法
78
查看次数

列出Haskell中的项目

我在为基于文本的冒险游戏的Haskell中创建项目列表时遇到一些麻烦。

("cavern",
Room.Room { Room.name = "Cavern"
     , Room.description = ""
     , Room.directions = Map.fromList [
         (North, "hall") ]
     , Room.visited = False
     , Room.items = [
         Item.Item { Item.name = "Trident" } ]
     })
Run Code Online (Sandbox Code Playgroud)

是代码,我正在尝试向一个房间添加多个项目,但是我尝试过的任何方法似乎都无法在我使用的最接近的情况下正常工作

("cavern",
Room.Room { Room.name = "Cavern"
     , Room.description = ""
     , Room.directions = Map.fromList [
         (North, "hall") ]
     , Room.visited = False
     , Room.items = [
         Item.Item { Item.name = "Trident" } { Item.name = "Trident2" } ]
     })
Run Code Online (Sandbox Code Playgroud)

但这就是这样,所以最后一个项目块是房间中唯一的项目

haskell

0
推荐指数
1
解决办法
75
查看次数

Haskell,将函数与列表推导一起使用

我正在尝试完成以下任务:

slice :: Int -> Int -> [a] -> [a]
slice from to xs = take (to - from + 1) (drop from xs)

trimBoard :: Board -> Int -> Board
trimBoard s y = slice ((y*3)) (((y+1)*3)-1) s

getBox :: Board -> Int -> Int -> [Sequence]
getBox s y x = [ (trimBoard c x) | c <- (trimBoard s y)]
Run Code Online (Sandbox Code Playgroud)

具体来说,我试图运行一个函数,获取结果[[int]],然后将另一个函数映射到该结果上。这似乎令人讨厌,我需要使用“ lambda函数”和我完全无法阅读或理解的其他巫术的某种组合来进行这种适应。

有没有简单的方法可以做到,而这不需要7个月的数学函数语法课程?

如上所述,结果board是[[int]],而序列只是[int]。

它产生的错误是

sudoku.hs:139:19: error:
    • Couldn't match type ‘[Int]’ with ‘Int’
      Expected …
Run Code Online (Sandbox Code Playgroud)

haskell

0
推荐指数
1
解决办法
45
查看次数

如何从类型中获得价值

我有这种类型

type Card = (CardValue,Suite)
Run Code Online (Sandbox Code Playgroud)

我想写一个函数来显示基于Card.Suite值的颜色

colour :: Card -> Colour
colour card = if card.Suite == Spades then Red else Black
Run Code Online (Sandbox Code Playgroud)

这段代码仅说明了我想要实现的目标。我不知道如何从中真正获得套间价值Card(CardValue,Suite)

haskell functional-programming

-1
推荐指数
2
解决办法
81
查看次数

为首字母缩写写一个函数,但是我必须写什么条件才能帮助我从“apple apple”中得到“aa”

我在声明查找我的首字母缩略词的条件时遇到问题。我写的条件是:

  • 如果“head”为空白,则删除空格。
  • 如果 'head' 的下一个字母为空,则删除字母和尾部。
  • 如果“头”和“尾”是字母,我想要“头”。
  • 如果“头”是空白的,请给我下一个字母,因为这是首字母缩略词之一。

但是当遇到像“apple apple”这样的字母时,它会返回“apape”,因为我在处理第三个条件时遇到了问题。

acronym :: String -> String
acronym [] = []
acronym [x] = [x]
acronym (x:y:xs)
  | x == ' '  =  y : acronym xs -- remove if 'head' is blank(space)
  | y == ' '  =  acronym xs     -- remove both x and y if y is blank(space)
  | x `elem` ['a'..'z'] || x `elem` ['A'..'Z'] && y `elem` ['a'..'z'] || y `elem` ['A'..'Z']
              = x : acronym  xs
  | …
Run Code Online (Sandbox Code Playgroud)

haskell

-1
推荐指数
1
解决办法
66
查看次数

为什么(让x = x + 3 in fst(snd(x + 1,(5,x-2))))等于5

有人可以向我解释为什么这等于5?

let x = x+3 in fst (snd (x+1,(5,x-2)))
Run Code Online (Sandbox Code Playgroud)

haskell

-2
推荐指数
1
解决办法
112
查看次数

longs functiooon cloj

我正在尝试使用该longs功能,但它不起作用:

(println (longs 1 2 3))
Run Code Online (Sandbox Code Playgroud)

任何例子?

网站上的描述不是很好,这就是为什么我遇到问题 http://clojure.org/cheatsheet

谢谢

clojure

-5
推荐指数
1
解决办法
80
查看次数