免费注册 查看新帖 |

Chinaunix

  平台 论坛 博客 文库
最近访问板块 发新帖
楼主: izhier
打印 上一主题 下一主题

自己写的练习题(yaht exercise 3.10) [复制链接]

论坛徽章:
95
程序设计版块每日发帖之星
日期:2015-09-05 06:20:00程序设计版块每日发帖之星
日期:2015-09-17 06:20:00程序设计版块每日发帖之星
日期:2015-09-18 06:20:002015亚冠之阿尔艾因
日期:2015-09-18 10:35:08月度论坛发贴之星
日期:2015-09-30 22:25:002015亚冠之阿尔沙巴布
日期:2015-10-03 08:57:39程序设计版块每日发帖之星
日期:2015-10-05 06:20:00每日论坛发贴之星
日期:2015-10-05 06:20:002015年亚冠纪念徽章
日期:2015-10-06 10:06:482015亚冠之塔什干棉农
日期:2015-10-19 19:43:35程序设计版块每日发帖之星
日期:2015-10-21 06:20:00每日论坛发贴之星
日期:2015-09-14 06:20:00
11 [报告]
发表于 2009-03-25 23:32 |只看该作者
原帖由 izhier 于 2009-3-25 20:44 发表
倒是和 C 的代码布局有点神似
感觉这样挺好的

一点都不好。Haskell 的类型可不仅仅是给编译器的,而且也是文档的很重要的一部分(许多时候看到类型就可以知道函数的用法甚至功能),把函数的类型和函数实现分开,不利于代码的阅读和理解。

另外,把类型和实现分的过远,也不利于代码的后续修改。

[ 本帖最后由 MMMIX 于 2009-3-25 23:33 编辑 ]

论坛徽章:
1
2015年辞旧岁徽章
日期:2015-03-03 16:54:15
12 [报告]
发表于 2009-03-26 09:10 |只看该作者
原帖由 Magicloud 于 2009-3-25 22:26 发表

呵呵,習慣先設計函數接口后做實現。

你说的那是模块化的时候。
可你这段代码,并不是模块呀。

而且即使是模块化,那函数体前的签名还是要有的。
反正我是记不住那么多函数,都是用的时候看到了才算,
像你这个风格,我就得跑前头重看一遍,麻烦。

论坛徽章:
0
13 [报告]
发表于 2009-03-26 09:18 |只看该作者
看来
haskell 的代码布局有点讲究
另开一帖,讲述一下,讨论讨论吧
愿闻其详

论坛徽章:
0
14 [报告]
发表于 2009-03-26 09:36 |只看该作者
原帖由 MMMIX 于 2009-3-25 23:32 发表

一点都不好。Haskell 的类型可不仅仅是给编译器的,而且也是文档的很重要的一部分(许多时候看到类型就可以知道函数的用法甚至功能),把函数的类型和函数实现分开,不利于代码的阅读和理解。

另外,把类型 ...

为什么急着否定别人呢。对于看了定义就可以知道大概功能的函数,在代码中查找它的定义才烦……
原帖由 flw 于 2009-3-26 09:10 发表

你说的那是模块化的时候。
可你这段代码,并不是模块呀。

而且即使是模块化,那函数体前的签名还是要有的。
反正我是记不住那么多函数,都是用的时候看到了才算,
像你这个风格,我就得跑前头重看一遍, ...

呵呵,很多时候我只需要查看定义来确定函数怎么用,集中起来对我就很方便。而查看实现时……我的编辑器会提示类型定义的……

论坛徽章:
95
程序设计版块每日发帖之星
日期:2015-09-05 06:20:00程序设计版块每日发帖之星
日期:2015-09-17 06:20:00程序设计版块每日发帖之星
日期:2015-09-18 06:20:002015亚冠之阿尔艾因
日期:2015-09-18 10:35:08月度论坛发贴之星
日期:2015-09-30 22:25:002015亚冠之阿尔沙巴布
日期:2015-10-03 08:57:39程序设计版块每日发帖之星
日期:2015-10-05 06:20:00每日论坛发贴之星
日期:2015-10-05 06:20:002015年亚冠纪念徽章
日期:2015-10-06 10:06:482015亚冠之塔什干棉农
日期:2015-10-19 19:43:35程序设计版块每日发帖之星
日期:2015-10-21 06:20:00每日论坛发贴之星
日期:2015-09-14 06:20:00
15 [报告]
发表于 2009-03-26 11:17 |只看该作者
原帖由 Magicloud 于 2009-3-26 09:36 发表

为什么急着否定别人呢。对于看了定义就可以知道大概功能的函数,在代码中查找它的定义才烦……

因为我觉得那种做法是不正确的。

BTW,区分下“函数类型声明”和“函数定义 or 函数实现”,要不然会把你自己搞糊涂的。
呵呵,很多时候我只需要查看定义来确定函数怎么用,集中起来对我就很方便。而查看实现时……我的编辑器会提示 ...

分开的坏处我上面已经说了,怎么平衡就看你自己的了。

论坛徽章:
0
16 [报告]
发表于 2009-04-09 15:14 |只看该作者
原来 yaht 后有答案!
贴出来答案的代码:

  1. module Main
  2.     where

  3. import IO

  4. main = do
  5.   nums <- getNums
  6.   putStrLn ("The sum is " ++ show (sum nums))
  7.   putStrLn ("The product is " ++ show (product nums))
  8.   showFactorials nums

  9. getNums = do
  10.   putStrLn "Give me a number (or 0 to stop):"
  11.   num <- getLine
  12.   if read num == 0
  13.     then return []
  14.     else do rest <- getNums
  15.             return ((read num :: Int):rest)

  16. showFactorials [] = return ()
  17. showFactorials (x:xs) = do
  18.   putStrLn (show x ++ " factorial is " ++
  19.             show (factorial x))
  20.   showFactorials xs

  21. factorial 1 = 1
  22. factorial n = n * factorial (n-1)
复制代码

论坛徽章:
1
2015年辞旧岁徽章
日期:2015-03-03 16:54:15
17 [报告]
发表于 2009-04-09 15:17 |只看该作者
那么关心书里面的答案干嘛。

论坛徽章:
0
18 [报告]
发表于 2009-04-09 15:18 |只看该作者
只是觉得答案的代码写的比较好

论坛徽章:
1
2015年辞旧岁徽章
日期:2015-03-03 16:54:15
19 [报告]
发表于 2009-04-09 15:20 |只看该作者
原帖由 izhier 于 2009-4-9 15:18 发表
只是觉得答案的代码写的比较好

好是相对的吧!
相对当时只看到那一节的人来说,也许确实不错。

论坛徽章:
0
20 [报告]
发表于 2009-04-09 15:21 |只看该作者
原帖由 flw 于 2009-4-9 15:20 发表

好是相对的吧!
相对当时只看到那一节的人来说,也许确实不错。

:wink:
您需要登录后才可以回帖 登录 | 注册

本版积分规则 发表回复

  

北京盛拓优讯信息技术有限公司. 版权所有 京ICP备16024965号-6 北京市公安局海淀分局网监中心备案编号:11010802020122 niuxiaotong@pcpop.com 17352615567
未成年举报专区
中国互联网协会会员  联系我们:huangweiwei@itpub.net
感谢所有关心和支持过ChinaUnix的朋友们 转载本站内容请注明原作者名及出处

清除 Cookies - ChinaUnix - Archiver - WAP - TOP