12章最後の問題

data Tree a = Leaf | Node (Tree a) a (Tree a) deriving Show

という型に対してrepeat,takeを実装する

data Tree a = Leaf | Node (Tree a) a (Tree a) deriving Show

repeatTree :: a -> Tree a
repeatTree x = Node (repeatTree x) x (repeatTree x)

takeTree :: Int -> Tree a -> Tree a
takeTree 0 _ = Leaf
takeTree (n+1) Leaf = Leaf
takeTree (n+1) (Node a b c) = Node (takeTree n a) b (takeTree n c)

replicateTree :: Int -> a -> Tree a
replicateTree n = takeTree n . repeatTree

型に対して適切に実装すればリストに対して操作するように自然に扱える。

プログラミングHaskell
Graham Hutton
オーム社 / ￥ 2,940 ()
在庫あり。

5章と6章が面白かった。最初の方は歴史的な背景。あと「うっかり」多め

AR三兄弟の企画書
川田十夢
日経BP社 / ￥ 1,470 ()
在庫あり。

• 優れたアイデアには遠心力と求心力がある
• 現象の輪郭をなぞるのがパクリ、本質の輪郭をなぞるのが創作
• ライバル財とノンライバル財

ちなみに個人的には拡張現実という呼び方よりは強化現実のほうがしっくりきます。現実に新たなレイヤーを載せて拡張するというイメージよりは現実にうまく溶けこんで欲しい。6章の音の話もそんな気が。

10章は改めて読みなおしてみて、面白いなぁと。

プログラミングHaskell
Graham Hutton
オーム社 / ￥ 2,940 ()
在庫あり。

写経して問題解くとやっぱその分理解が深まるなぁ。

この調子で残り二章の問題解いたら、RWHの二周目でもしようかな。

Real World Haskell―実戦で学ぶ関数型言語プログラミング
Bryan O'Sullivan,John Goerzen,Don Stewart
オライリージャパン / ￥ 3,990 ()
在庫あり。

昼飯食べながら職場のマシンで試したときにはサクっとできたのに、家のマシンではトラブリまくった。

• virtualhostでaliasが効かないのに小一時間悩んだ
  • 結局わからなくてmercurial用のhostnameを用意するという力技で解決した
• abort: HTTP Error 500: Permission denied: .hg/store/lock
  • permissionを緩めた。なんか負けた気がするが。

入門Mercurial Linux/Windows対応
藤原 克則
秀和システム / ￥ 2,310 ()
在庫あり。

本にはそこら辺の設定があまり書かれていなかったので以下を参考にした。

• gitやめてmercurialとtortoiseHGをインストール
• mercurial で wsgi を使うときの設定
• modwsgi

なんかめんどい。

入門Git
濱野 純(Junio C Hamano)
秀和システム / ￥ 2,310 ()
在庫あり。

イライラしながらWebDAVの設定したりとかしているうちに娘が寝てしまった。そしていまだに解決しないのでもうどうでも良くなってきた。こんな事だったら、娘に不条理クイズを出しながら一緒に寝とくべきだったな。

そもそも、そこまで頑張る話じゃない気がしてきたので、もうどうでもよくなった。

GitはGitHubがあって便利だ！とか思ってたけど、とりあえず公開できないドキュメントとはGitHubに置けなくてとたんにめんどくさくなるということを理解した。職場内とか家庭内とかHTTPをまたがない場合にはたいして問題じゃなかったのに。

そういう場合にはお手軽Mercurialのほうがいいのかなぁ。

入門Mercurial Linux/Windows対応
藤原 克則
秀和システム / ￥ 2,310 ()
在庫あり。

それともSSHでゴニョゴニョするのを頑張るべきか。

どっちにしろ、チャネルは用意しておかないといけないなぁと思った。

これは面白いすね。400ページ近くあるのに一気に読んだ。

• 第１章　インターネットは
• 第２章　ITは世の中をよくする？
• 第３章　お金があれば幸せ？
• 第４章　日本文化は素晴らしい？
• 第５章　起業と就職、どちらがいい？
• 第６章　政治で日本はよくなる？
• 第７章　若者は日本を変えられる？

そこまで言うか！
勝間 和代；堀江 貴文；西村 博之
青志社 / ￥ 1,575 ()
在庫あり。

• 「言われたとおりに仕事をして、努力しました。だから報われるべき」(西村)
  • これは組合好きには多いですね
• 薪を運んで本を読んでいた二宮金次郎が偉いという話があるじゃないですか。実際に彼が何の成果をあげたかは、みんな実は知らない。「努力することが素晴らしい」で終わっている。本来であれば「努力したから彼はこういう結果を残せました」ってのがあるはず(西村)
• 食事は油と砂糖が入っていればなんだって美味しいんだよ(堀江)
• 感じは読めたほうがいいけど書けなくたっていい(堀江)
• 基本的に社員は自分が一番不得意な役職で固まるようになっています(西村)

先週行った御殿場アートクラフトフェア

明天のサンドウィッチとREFSのお弁当が美味しかった。

最近採れるのは茄子と唐辛子と甘長美人とオクラくらいか。オクラはちょっと勢いが落ちてる感じ。

ゴーヤは虫に食われ始めたり枯れ始めてきたのでそろそろ終わりかなーと。根を抜いてやった。

あとは種取りをして処分する予定。

ブロッコリーは虫害がひどくて育てるのは苦労するらしい。いろいろ難しいなぁ。

来週ちょっとカインズでもいって寒冷紗とか色々見に行こうかな。

須津渓谷の大棚の滝で水遊び。たまたまヒトがいないタイミングで撮ったけど、かなりのヒトが遊びに来ていた(BBQとか)。

BBQやりたいなぁ

いつもメタモに行く面子が北海道とか九州行っちゃたりと離れ離れになったりとか、良く予定にしてた面子もドタキャンでまぁどうすっかなぁ？と3秒くらい悩んだのだけど、ま、どうせ現地で単独行動なんだしいいかなぁと。

あと、最近体力なくて朝までキツイっしょ（21:30には寝てるし）且つ次の日は家族でどっかに行こうと言われてたので、タイムスケジュール見たらThe Album Leafは聞きたかったけど、それ以外で狙ってたのは早い時間に固まってたので早く切り上げるのもありかなということで急遽ノンアルコール。

そもそもフェスでもクラブでも水だけって生まれてはじめただったが、意外に楽しめた。結局気持ちいタイミングの時にはやっぱ気持ちイイし。トイレに並ぶというオーバーヘッドも抑えられてお得かもとか思ったが、やっぱテント張ってダラダラすんのも気持ちイイなぁ。

プラネットは今年はShingo2ちょっと聴いてたくらい。

ルナーで前のひとがシャボン玉飛ばしてたので撮った。デリック・メイのときだったかな。デリック・メイは最初はオオー！とか思ったけど、途中で飽きてしまったなぁ。僕はグリッチとかブレークビーツとかそういうのが好きなんだな。というわけで、drum'n'bassのとこに戻っていった。

でもって日が変わる前に退散。ここ数年、ドラムンなステップふんでるとすぐ足が痛くなっちゃうんだよなぁ。もうちょっと体力つけないとなぁと。

田中フミヤはやっぱ最高だ。そっからのデリック・メイの流れが良かった。それ以外はほとんどdrum'n'bassのとこにいたという予定調和。

来年もいけたらいいなー