fun童话

http://en.akinator.com/#

还是很准的。
我猜粟裕，出来朱德
我猜我导师，出来Your Boss ...

第一次真正碰到了数值精度问题。调试了我整整一个下午加一个晚上加半个上午……

integer, parameter :: NTOT3=1024*1024*1024
real :: mean
real, allocatable :: U(:)
integer I

allocate (U(NTOT3))

!... 读取U的部分

mean = 0.0
Do I = 1, NTOT3
  mean = mean + U(I)
Enddo
Write (*,*) mean/Real(NTOT3)

这样的做法是错误的。在叠加进行到一部分的时候，mean的值已经远远大于U(I)，以至于U(I)比mean的最小分辨还小，因此后面的叠加操作全部都没法执行了。

解决办法：对mean定义成real*8，最好是real*16类型

逛网络发现一个数学公式和相关证明。想法挺新奇的，不过不是太严谨，有时间再慢慢想想

 

要证明，n很大时，

 

证法如下：

根据分部积分，我们有

对于公式左边，当x很大时，假设dx=1，得到

http://www.matrix67.com/blog/

顺便引用一个只用直角尺任意N等分线段的方法：

 
 
  1. 作出矩形ABDC；
  2. 作出BC和AD的交点，它在AB上的垂足P₁就是AB的二等分点；
  3. 作出P₁C和AD的交点，它在AB上的垂足P₂就是AB的三等分点；
  4. 作出P₂C和AD的交点，它在AB上的垂足P₃就是AB的四等分点；
   ………

帅吧？我想了5分钟才明白怎么证明这个……

就是右上角那个@@

转自http://www.sxnsx.com/if-programming-languages-were-cars/

这是一个关于把计算机语言比作车的一系列老笑话的升级版. 我为这个列表加入了一些现代的语言. 欢迎你对此提出建议.
(作者还罗罗嗦嗦地讲了一些他对编程语言的一些见解和别人对他文章的看法….)

Ada 是辆坦克，一辆其貌不扬永不抛锚的坦克。如果你告诉别人你驾驶Ada，他们会禁不住大笑。不过话说回来，你会在战场上开跑车吗？[from Amit Dubey]

Assembly Language 只是个光秃秃的汽车引擎. 你得自己造车并且在他开起来的时候还得手工给他灌油,但是你要是小心照料他, 他的速度能快到像加了润滑油的闪电.

还有一种解释：Assembly Language:   你就是车.[From "Subterfug" off digg.com:]

Basic 是辆简单的车, 开着它去附近购物会很方便. 在菜鸟中曾经很流行, 它最近被裁减成一个shell并由一个龙头企业复刻, 新版Basic被设计成适应长途旅行, 和它最初的样子已经相差甚远. [from Przemyslaw Wrzos]

C 是一辆能开到难以置信的速度的跑车, 但每50英里就会抛锚一次.

Cobol 被认为是辆车.但是只有没自尊的驾驶员才会承认自己开过它.

C# 一种相当有竞争力的家用小货车. 只要你用了它, 那么你就再也不允许用它的竞争对手的产品了.

C++ 是一辆经过改装的C跑车, 有着一大堆额外特性. 它每250英里才抛锚一次, 但一旦发生这样的事, 没人能搞清楚到底是哪里出毛病了.

Eiffel 是辆内置了位操着法国口音的驾驶教练的车. 他将帮助你快速地识别错误并从你的错误中学到经验.但是你不要和他争辩,否则他就会侮辱你后再把你扔出车去. [From Daniel Prager with some embellishments]

Erlang 是一支车队, 它们以互相合作的方式把你挪到你想去的地方.但是为了用一只脚放在每一辆车内去驾驶它们, 你还必须好好练习下. 但是你要是学会了怎么样在糟糕的路面开车, 那么在其他路面开车对你来说将会变得非常困难. 需要补充一点的是, 因为你同时开着一大堆车, 所以车队里有几辆车抛锚了也没关系.

Forth 是辆你从宝宝时代DIY出来的车. 你自己的这辆车不管是看上去还是跑起来都不像别人的车.但是Forth注定只会倒着走.

Fortran 是辆相当原始的车; 当你只是开直道时他能跑得飞快.据说学驾驶Fortran将导致没法再学着开其他车型..

Java 一辆家用小货车. 驾驭它十分轻松, 但是它开不快, 所以你不会因为它伤到自己了.

Haskell 是辆有着连帅都帅得那么帅的漂亮造型的车. 相传他在极端恶劣的地形也游刃有余. 当你想开始驾驶他的时候, 他并不是真的就是在路上向前跑; 相应地, 他不断复制自己和道路, 每次连续拷贝都将造成一点点前进. 用传统的方式驾驶他貌似是有可能的,但是你的数学知识不足以搞定.

Haskell 其实不是辆真正的车; 他是一台抽象的机器, 你可以对着他给出一个你想要的驾驶过程的细节描述. 然后你必须把这台抽象的机器放到另一个实际的机器里来真正地进行驾驶. 你没法推测这个实际的机器是怎么工作的. 还有一种能把多个抽象的机器汇编成一台单独的抽象的机器的方法, 这样你就可以把他放到实际的机器中去一条接着一条地做多次小小的巡游. [Monadic version]

Lisp 貌似是辆车, 但是只要优化一下你就把他变成了一架特技飞机或者一艘潜水艇

Lisp 最初它看上去一点都不像一辆车. 但是偶尔你能看见有人开它. 于是你决定对它作一些更多的了解直至你意识到它确实是辆车, 能造出更多车的车. 你把这份发现告诉你的朋友们,但是他们都嘲笑你并指出这些车看上去太古怪了. 不过你还是在车库里闲置了一辆Lisp, 期望有一天它们能主宰街道[from Paul Tanimoto]

Mathematica 一辆从Lisp那儿借来了不少优良设计的车, 却不偿还Lisp应得的. 她通过解决问题来选择最高效的路线到达目的地, 但是价格不菲.

Matlab 是一辆为新手设计来开短途的车. 通常开在和Mathematica差不多的道路上. 在这种路况上开它真是非常舒服, 但是你只要稍稍偏离路线, 这车就会变得难以驾驭,以致于老司机们都不承认它是辆车.

Ocaml 是一辆长得很性感的欧洲产汽车. 她跑得不像C那么快,但是永远不会抛锚.所以呢, 你可以在更短的时间内跑更多的路.但是呢,因为是辆法国车, 她所有的操作杆都不在它们应该在的位置上.

Perl 被认为是辆相当酷的车. 但是它的驾驶员手册实在是难以理喻. 所以一旦你能搞清楚怎么开perl, 那么你就开不了其他车了

PHP 是 Oscar Mayer Wienermobile(被认为是世界上最丑的汽车, 外形是一根热狗香肠, Oscar Mayer出品), 外观奇异, 难以操纵, 但是每个人都想开它. [from "CosmicJustice" off of digg.com]

Prolog 是辆全自动化汽车. 你只要告诉他你的目的地是怎么样的, 他就会为你做剩下的事. [Paul Graham补充道:]但是,指定大多数的目的地所花费的功夫大抵和开到那儿的功夫差不多.

Python 是一辆很适合初学者的车. 你甚至可以无证驾驶python. 除非你想飙车或者开车去危险地区, 否则你可能永远不必买另一辆车了.

Ruby 这种车型形成于perl, python和smalltalk在三叉路口发生撞车事故的时候.一个日本技工把它们的碎片捡起里然后凑合到一块儿,就成了一辆很多人认为比它们三的总和还好的车.
但是, 一个司机抱怨到Ruby的很多控制杆都是功能重复的, 一些冗余的操纵杆在不同的环境下坐着几乎一样的事情, 这让Ruby比想象中难开得多. 相传它正在被重新设计.

Smalltalk 原本是为初学者设计的一种小型汽车, 但是他也被设计成即使是老司机也乐于驾驶的车.他跑不了太快的, 但是你可以把它肢解了了并且改改他的零件来让他更加如你所愿. 它有个怪癖就是你不用真正地去驾驶它, 你只要给他发个消息来让他去哪去哪, 然后呢, 他要么就照你说的做了, 要么就告诉你他不知道你要他干什么..

Visual Basic 这辆车, 开着你. [from "yivkX360" on digg.com, no doubt channeling Yakov Smirnov]