这几天等着过鼠年好生犯困，就找了点资料，虽然现在还没有入门，俺已决定开始学习fp，锻炼锻炼已经有点僵硬的思维，发贴留念。
俺要作一只恶狼！
-
等级
本版专家分：205结帖率 94.44% -
想此版初开时，某曾发贴探询fp何意。如今3个多月过去，这里竟成了死地，嗯啊（摇头中……）
这几天等着过鼠年好生犯困，就找了点资料，虽然现在还没有入门，俺已决定开始学习fp，锻炼锻炼已经有点僵硬的思维，发贴留念。
俺要作一只恶狼！展开阅读全文
-
等级
本版专家分：205
-
-module(test).
-export([list_max/1]).
%%列表求最大值：
list_max([Head|Rest]) ->
list_max(Rest, Head).
list_max([], Res) ->
Res;
list_max([Head|Rest], Result_so_far) when Head > Result_so_far ->
list_max(Rest, Head);
list_max([Head|Rest], Result_so_far) ->
list_max(Rest, Result_so_far).
-
等级
本版专家分：205
-
[code=csdn]just test[/code]
-
等级
本版专家分：205
-
-module(test2).
-export([start/0, ping/2, pong/0]).
%%进程间发送消息
ping(0, Pong_PID) ->
Pong_PID ! finished,
io:format("ping finished", []);
ping(N, Pong_PID) ->
Pong_PID ! {ping, self()},
receive
pong ->
io:format("Ping received pong~n", [])
end,
ping(N - 1, Pong_PID).
pong() ->
receive
finished ->
io:format("Pong finished~n", []);
{ping, Ping_PID} ->
io:format("Pong receive ping~n", []),
Ping_PID ! pong,
pong()
end.
start() ->
Pong_PID = spawn(test2, pong, []),
spawn(test2, ping, [3, Pong_PID]).
ps.可以用register()为pong进程注册一个名字，就不用每次传递Pong_PID了。
-
等级
本版专家分：205
-
在分布式环境下测试了上述代码http://.../doc/getting_started/conc_prog.html#3.4
-
等级
本版专家分：205
-
-module(pping).
-export([start/1, ping/2, pong/0]).
ping(0, Pong_Node) ->
{pong, Pong_Node} ! finished,
io:format("ping finished~n", []);
ping(N, Pong_Node) ->
{pong, Pong_Node} ! {ping, self()},
receive
pong ->
io:format("Ping received pong~n", [])
end,
ping(N - 1, Pong_Node).
pong() ->
receive
finished ->
io:format("Pong finished~n", []);
{ping, Ping_PID} ->
io:format("Pong received ping~n", []),
Ping_PID ! pong,
pong()
end.
start(Ping_Node) ->
register(pong, spawn(pping, pong, [])),
spawn(Ping_Node, pping, ping, [3, node()]).
-module(ppong).
-export([start_ping/1, start_pong/0, ping/2, pong/0]).
ping(0, Pong_Node) ->
{pong, Pong_Node} ! finished,
io:format("ping finished~n", []);
ping(N, Pong_Node) ->
{pong, Pong_Node} ! {ping, self()},
receive
pong ->
io:format("Ping received pong~n", [])
end,
ping(N - 1, Pong_Node).
pong() ->
receive
finished ->
io:format("Pong finished~n", []);
{ping, Ping_PID} ->
io:format("Pong received ping~n", []),
Ping_PID ! pong,
pong()
end.
start_pong() ->
register(pong, spawn(ppong, pong, [])).
start_ping(Pong_Node) ->
spawn(ppong, ping, [3, Pong_Node]).
D:\et>erl -sname pong
Eshell V5.6 (abort with ^G)
(pong@cl)1> l(ppong).
{module,ppong}
(pong@cl)2> ppong:start_pong().
true
D:\et>erl -sname ping
Eshell V5.6 (abort with ^G)
(ping@cl)1> l(pping).
{module,pping}
(ping@cl)2> pping:start(pong@cl).
<5517.43.0>
(ping@cl)3> Pong received ping
(ping@cl)3> Ping received pong
(ping@cl)3> Pong received ping
(ping@cl)3> Ping received pong
(ping@cl)3> Pong received ping
(ping@cl)3> Ping received pong
(ping@cl)3> ping finished
(ping@cl)3> Pong finished
(ping@cl)3>
-
等级
本版专家分：205
-
测试《3.5 A Larger Example》通过，此处作个标记，计划以后用py作个界面包装一下。
-
等级
本版专家分：205
-
过年去了
-
等级
本版专家分：205
-
亲爱的CSDN用户pdvv，您好：您在CSDN发的《挖个坑，2008年慢慢填！》这个帖子：https://forum.csdn.net/PointForum/Manage/TopicManageView.aspx?forumID=dcf780eb-cb8e-49a4-97a3-28177824ec6a&topicID=37f6b5f7-6533-4d2f-92cf-aefeed6b5796&date=2008-1-18+15%3a27%3a49已经发出很长时间了，系统将会在一定时间进行强制结贴。强制结帖的帖子没有任何回复得分，同时不返回帖子分数。建议您尽快去结帖！如果这个帖子的回复中没有你满意的答案，你也可以做无答案结帖。 （如果点击本邮件中的网址无效，请将该网址复制并粘贴至浏览器的地址栏中）。----------------------------------------------------------------------- WWW.CSDN.NET - 中国最大的IT技术社区，为IT专业技术人员提供最全面的信息传播和服务平台用户服务支持：webmaster@csdn.net
sick! 88
-
等级
本版专家分：0 -
瞎搞！
-
等级
本版专家分：0
-
星辰技术社区:www.netcsharp.cn ,在这里,您不需要发帖,回帖,甚至是注册,您只需每天浏览下,即可获取最新的.NET技术信息~
我们的宗旨:以最快的速度为您提供最佳的解决方案
- 如果你也23岁
23 岁那年你正处在哪个状态？现在呢？ 我，23岁，应届毕业生。生活，工作，爱情都处于人生的低谷，一穷二白，一无所有，一事无成。 分享一下成长的建议吧。 匿名用户 23岁那年...就是去年...... 在22岁的时候...
- 缘 一篇文章 里面有很多喜欢的句子，日后阅读慢慢标记
缘 (2014-01-26 19:33:44)转载▼ 什么是缘？ 缘，就是不管你在地方，在什么环境下，冥冥之中总有一双无形的手在操控着你，让你无法摆脱，无从逃避。即所谓的命中注定吧。 佛经上说：“短短今生一面镜，前世多少...
- python实现《复仇者联盟4：终局之战》豆瓣网站、猫眼电影网站内影评数据的爬取
五一节之前上映了一部漫威号称十年布局的超级大片，据说老一代的英雄们有很多就要退出历史的舞台了，今天我们不是聊这一部电影的内容怎样，情节怎样，而是想基于爬虫来对豆瓣和猫眼电影两个网站中的影评数据进行采集...
- 阿里云的这群疯子
本文由公众号浅黑科技（ID：qianheikeji）授权转载世事安稳，岁月静好。电影里才有疯子。麦克墨菲在疯人院里带领一群精神病人揭竿而起，怼天怼地；饿了三天的黑皮为了抢...
- 70后.net老猿，尚能饭否？
距离上一次主动找工作，快到5年了，到现在的东家，是差不多3年前猎头挖过来的，而当时东家刚刚被欧洲一家有百年历史的跨国企业集团收购，所以我也就有幸成了一名“外企员工”，但是...
- 20本书让你迅速跟别人拉开差距
开场先留一片空白 ...有的人站在顶上鄙视来时的路，一个劲儿说金钱无用；更有一种人天天站在上面吓唬我们：“你们快点呀，通往塔顶的大门就要关上了”。 这如何能不加速我们的焦虑和对速度的追求？...
- 毕业两年后开贴！给应届毕业的DDMM们的建议（一）
首先希望大家不要吝啬，看了之后留下点只言片语也好，让我能将这个贴坚持坚持下来。 其次，贴里的观点全部来自我个人的生活观察和经历总结而形成，难免有失偏颇，因此欢迎有不同意见的朋友辩论，但请对事勿对人，...
- Bookmarks
Bookmarks 书签栏 tooltips提示效果，支持点击与经过显示，位置和效果可以自定义 - CSDN博客 ...疯狂的小萝卜头 - 博客园 ...【Kettle从零开始】第九弹之Kettle定时任务介绍 - RotKang - CSDN博客 ...
- 李沐：博士这五年
李沐，2008年毕业于上海交通大学计算机系,大学期间，曾在微软亚洲研究院担任实习生，大学毕业后，开始担任香港科技大学研究助理。 2011年，李沐加入百度，成为百度高级研发与开发人员，主要研究任务是“如何高效的...
- 23 岁那年你正处在哪个状态？现在呢？
23 岁那年你正处在哪个状态？现在呢？ 我，23岁，应届毕业生。生活，工作，爱情都处于人生的低谷，一穷二白，一无所有，一事无成。 分享一下成长的建议吧。 匿名用户 23岁那年...就是去年...... 在22岁的...
- 23岁那一年,我在做什么
23 岁那年你正处在哪个状态？现在呢？ 我，23岁，应届毕业生。生活，工作，爱情都处于人生的低谷，一穷二白，一无所有，一事无成。 分享一下成长的建议吧。 匿名用户 23岁那年...就是去年...... 在22岁...
- 二十三又是谁的二十三
23 岁那年你正处在哪个状态？现在呢？ 我，23岁，应届毕业生。生活，工作，爱情都处于人生的低谷，一穷二白，一无所有，一事无成。 分享一下成长的建议吧。 匿名用户 23岁那年…就是去年… 在22岁的时候我毕业，同时...
- 阿里云的这群疯子--深度好文请仔细看完
世事安稳，岁月静好。 电影里才有疯子。麦克墨菲在疯人院里带领一群精神病人揭竿而起，怼天怼地；饿了三天的黑皮为了抢一口面包被店主追上高架桥，末路狂奔；杰克和泰勒在午夜的搏击俱乐部里挥拳相向，...
- 经济
中国经济是怎么被玩垮的 一、中国经济奇迹是怎么来的 其实“土地下户”让老百姓从饿肚子到吃饱饭这个时期是最...你现在到街上随便找个农民工问问，十个有八个在小学时期都曾有过一小段这样的辉煌历史，所以...
- 有关于阿里云的历史-阿里云这群疯子
真正的疯子，从来不看电影。 他们把别人的目光变成聚光灯，把自己的生活变成真人...2008年9月，王坚加入阿里巴巴。 马云把他从微软亚洲研究院常务副院长的位置挖来，是因为阿里巴巴面临一个重大的危机——公司的“...
- [转]阿里云的这群疯子
原文链接 文/史中 世事安稳，岁月静好。...麦克墨菲在疯人院里带领一群精神病人揭竿而起，怼天怼地；饿了三天的黑皮为了抢一口面包被店主追上高架桥，末路狂奔；杰克和泰勒在午夜的搏击俱乐部里挥拳相向，...
- 阿里云的这群疯子 (共勉)
摘要： 欢呼与流泪的故事。梦想永在，自证预言。 编者按：10月16日，被云栖社区的伙伴史中的《浅黑科技》的一篇文章刷屏。分享给更多社区的读者。梦想永在，自证预言。 ...世事安稳，岁月静好。...
- 阿里云的这群疯子们
阿里云的这群疯子 原创： 史中 浅黑科技 浅黑科技 阿里云的这群疯子 文 | 史中 世事安稳，岁月静好。 ...麦克墨菲在疯人院里带领一群精神病人揭竿而起，怼天怼地；饿了三天的黑皮为了抢一口面包被店主追上高架桥...
- linux进程全解-3.4.linux应用编程和网络编程第4部分
本课程对linux中进程及其相关的各种知识做了系统性讲述，包括：进程的起始和环境、父子进程、exec族函数、守护进程、进程间通信等。学完本节后学生可以对进程的概念
- C#入门必看实力程序100个
C#入门必看含有100个例字,每个例子都是针对C#的学习关键知识点设计的,是学习C#必须知道的一些程序例子,分享给大家，需要的可以下载
- 学会在Linux上编译调试C++项目
本课程主要针对没有或者很少写过linux上C++程序的同学， 本课程会教你如何从0基础开始，安装配置ubuntu虚拟机、使用GCC编译普通程序、动态库、静态库，编写复杂项
- c语言项目开发实例
十个c语言案例 （1）贪吃蛇 （2）五子棋游戏 （3）电话薄管理系统 （4）计算器 （5）万年历 （6）电子表 （7）客户端和服务器通信 （8）潜艇大战游戏 （9）鼠标器程序 （10）手机通讯录系统
- 2020美赛特等奖A题8篇论文（可通过书签跳转）.pdf
2020美赛特等奖A题8篇论文
- 2019年美赛D题一等奖论文
2019年数模美赛D题一等奖论文中文版本与最终版本，这里面卢浮宫的疏散方法可以修改为任意一篇快速疏散论文，搞数模竞赛的同学可以进行下载学习。
- 2020美赛A题海温数据.zip
2020美赛a题海温数据，1877年至今，趁比赛还没结束上传赚点资源值 全球海洋温度影响某些海洋生物的栖息地质量。当温度变化太大，它们无法继续繁荣时，这些物种就会迁移到其他更适合它们现在和未来生活和繁殖成功的栖息地。其中一个例子就是美国缅因州的龙虾种群，它们正缓慢地向北迁移到加拿大，那里的海洋温度较低，为它们提供了更合适的栖息地。这种地理种群的转移可能会严重影响依赖海洋生物稳定性的公司的生计。 您的团队已被苏格兰北大西洋渔业管理协会聘请为顾问。该协会希望在全球海洋温度升高的情况下，更好地了解与苏格兰鲱鱼和鲭鱼从它们目前的栖息地苏格兰附近迁移有关的问题。这两种鱼类为苏格兰渔业做出了巨大的经济贡献。鲱鱼和鲭鱼种群分布位置的变化，可能会让规模较小的苏格兰渔业公司在经济上变得不切实际。这些公司使用渔船，但船上没有冷藏设备。
- 2020美赛C题做题经历+赛题相关资料+论文最终成稿.zip
这份内容是美赛我女票队参加美赛的做题全过程，包括论文终稿、一些零散部分、题目原题+翻译、代码、参考文献中英文。。。由于个人懒得整理成文，就一股脑的都扔给你，能看懂多少收获多少全凭造化，收一积分，算是认为内容值这个价吧，当然，如若觉得不值者，评论私聊包退。。。
- C语言--视频精讲
C语言作为被长期使用的编程语言，可以被运用到各种操作系统，游戏，开发中。本
- 2020美赛C题资料.zip
关于2020年数模美赛c题的，题目，数据，文献资料，一些代码，以及思路和感想。其中在感想部分谈及了C题两种解答方法的对比（评论处理方法，另一种是我们老师带的另外几队拿了H奖的）。我们对这次论文交的比较匆忙，摘要是在最后一点时间里赶出来的，文章很多细节部分都有些问题，特别是问题分析部分忘记放上去就交了，有点尴尬。本来对这次结果不抱太大希望，后来却拿了m奖（虽然对于拿o奖，f奖的大佬们来说这不算什么），但对于失误较多的我们来说已经比较满意了。希望我的分享能对美赛有兴趣的同学起到一些帮助。
- Java基础核心技术：面向对象编程(day05-day07)
本套Java视频完全针对初级学员，课堂实录，自发布以来，好评如潮！Java视频中注重与学生互动，讲授幽默诙谐、细致入微，覆盖Java基础所有核心知识点，同类Java视频中也是代码量大、案例多、实战性强的。同时，本Java视频教程注重技术原理剖析，深入JDK源码，辅以代码实战贯穿始终，用实践驱动理论，并辅以必要的代码练习。 通过20的课程学习，使学员掌握java核心语法、面向对象思想编程、异常处理、IO流、集合类、多线程、网络编程等。
- EXCEL VBA编程（excel办公高手必经之路）
宏基础 VBA编程基础 常用语句（分支、循环语句的基础及应用） VBA结合工作表的函数功能的应用等 如果