对 drakeet 的一些话（内联）

就像没有万能药、人被杀就会死一样，现实就是现实；没有人生而知之，也很少有人天生被限制种种不能。只要你想做，你做的到；但在做到之前，要先付出精力和时间去学习、去尝试，如果失败了就再试一次、再试一次，直到成功。我知道这种策略听起来就很傻，很少有聪明人会真正这么做 — 他们会先想有没有直达的捷径、有没有不费力气不浪费时间的方法。

很不幸，真正聪明的人是极少数的，不过你也可以伪装聪明人：拿时间去换，比他们多花甚至十倍的时间去做某件事情，直到和他们一样为止。

吃力不讨好，这真是非常蠢的办法，所以有的人放弃、有的人又开始寻找永远找不到的捷径；而那个之前表现的最傻的人，即使花费了最多的时间，反而从人群中脱颖而出。因为他始终没有改变自己的志向、把时间花在了自己内心坚持的事情上。

人要铭记历史，因为历史给了我们经验和教训；历史也是我们比其他动物高级的多的多的原因 — 无须缓慢的自然选择，只需要很少的时间，查查自家的历史、看经验就可以了。

小到个人，大到国家亦是如此。

对于『千万家、万千人』国家来说，很多国家不能容忍的不是黑历史，而是找不到“黑历史”的解决方案。

对于国家来说，重要的不是想办法处理掉自己的黑历史，不让它被别人看到，而是站在历史和未来的交织点、曾经那个不完美的自己面前作出改变命运的决断。

真正的凤凰会终会站在历史的余烬上浴火重生，但不是焚书坑儒的那把火。

“黑历史”是曾经不完美的见证，但它对自己而言也不是没有用处的。一个优秀的人时常要复习一下自己的黑历史、记住自己曾经的误解、不确定，来为自己的未来提供一个完整的排除名单。错误不再重复第二遍。

非常简单的 DFS，深度优先搜索走迷宫。虽然深度优先搜索走迷宫的思路本身非常简单，仅仅是每个能到达的位置四处移动下试试，回溯出成功的路径而已。如果你不记录下试过走过不能走的点，就会不断重复山穷水尽，向后倒车，算法白白浪费计算的存储空间、处理的时间，这是错误的做法。

import Control.Applicative

data Move = U | D | L | R
 deriving (Eq, Show, Read, Enum)

type Map = [[Bool]]
type Point = (Int, Int)

type Hitsory a = [a]
type TracedRoute = (History Move)

dfs :: Map -> Point -> History Point -> Maybe TracedRoute
dfs map target history step
 | step == target = Just []
 | step `outbounds` map = Nothing
 | blocked or walked = Nothing
 | otherwise
 = firstJust (fmap try [Up, Down, Left, Right])
 where
   (x, y) = step
   blocked = not (map !! x !! y)
   walked = step `elem` history
   outbounds p m = let (px, py) = p
       in px >= length m or py >= length m !! px

tryDfs m t s = dfs m t [] s  

曾经独立战争的美国、现在依然被很多墙外的中国人自家看不起的中国，都是最鲜活的例子；他们都有过很严重的历史问题，但这些问题最终都在无数人和时间的努力下平复了，现在依然会有很多新问题、依然会有人为了解决问题而努力、依然会有人在一旁看着自己无法解决但真实存在的问题灰心但仅仅只是要命的灰心，甚至咒骂自己国家、自己民族的劣根性、依然会有人默默记录下这一切，以供未来参考。

你或许可以否定历史，但历史总是真实存在；它是你的一部分。而当错误第二次到来的时候，你可以指着自己的历史 — 看，应该这么办！ 看，这错误我 500 年前都犯过了！

而不是蒙圈在那里，不过说也许是要效仿日本政府美化、修正侵略历史的话，那我没话说。

当然这里有些讨论到政治的内容，我不希望每次一提到中国政府并且不是批判的话就会遭来『小粉红』的谴责，是的大部分人什么也做不了，但出于盲目的批判似乎又没有什么目的，只能说自己是努力过吧。但是即便看起来是再坏，总有好的一面有时候是不能强行抓去一道骂了的，所以请反色小粉红派噤声。

你又是怎么看那些曾经消息的呢？你不会忘记吗？你可以表达一下自己的观点吗？