明日(8/31)、名駅付近でもくもく会をやります。

Scala座で発表するはずのスライドの作成状況が危機的になっております。
というわけで、明日(8/31)に名駅付近でもくもく会をやります。暇な人とか、逆にタスクがいっぱいある人とかは、一緒に作業しましょう。
いっしょに夏休みの宿題をかたづけましょう。

もくもく会とは

もくもく会とは喫茶店やカフェなどに集まって各自もくもくと勉強したり仕事したりする会です。家ではどうも仕事や勉強に集中できない、さぼってしまいがち…というフリーランスの人や学生の人におすすめです。気軽に参加（もしくは開催）してみてください。

もくもく会ポータルより。

場所・時間

参加方法

上記の場所と時間を参考にぶらっときて、ぶらっと帰っていくといいと思います。
異様な雰囲気を放つ集団なので、たぶん「待合せをしてるのですが...」と言うと案内してもらえると思います。「PCを広げてるの思うのですが..」と言えば完璧です。
ダメなときは[twitter:@mzp]にreplyをください。

ネットワークとか

  • CAFE Z-TRESに居る間は、電源と無線LANが使えます。
  • 三省堂CAFEに移動すると電源が使えなくなります。5人までならボクのPocketWifiをお貸しします。

参加するかもしれない人

  • [twitter:@mzp]
  • [twitter:@clairvy]
  • [twitter:@nobio0205]

漢数字への変換

Haskell 30分プログラム

30分プログラム、その798。数字から漢数字への変換をやってみました。
1以上1億未満の数字にのみ対応してます。

使い方

*Main> kanji 10
十
*Main> kanji 42
四十二
*Main> kanji 12345
一万二千三百四十五

ソースコード

import qualified System.IO.UTF8 as U

right  = ["", "一", "二","三","四","五","六","七","八","九"]
left = ["", "二","三","四","五","六","七","八","九"]
sep p xs ys  = ys ++ [ x ++ p ++ y | x <- xs, y <- ys]

xs = sep "万" (tail ys) ys
    where ys = foldl (\x p -> sep p left x) right ["十","百","千"]

kanji n = U.putStrLn (xs !! n)

参考