No Such Blog or Diary

毎日朝から wake golf．納豆と味噌汁が美味い．でも流石に納豆ネコまんまはやりたくない．

そして，改行のみは空パターンにマッチ可能であったことに今更ながら気づいた．

-:\n \n
:"Hello"

の出力は HelloHello になる．改行のみは空文字列だと思いたいことが時々あるので，これは便利かもしれない．first match なマッチング戦略なので，改行のみを空と思いたくなければその上にパターン用意しとけばいいし．

音速遅いけどさっき気づいた．

でもPSP持ってない…　海腹川背の例がある以上名作のPSP移植（リメイク）に期待が持てない…　

しばらく見守ろう．よさげだったらPSP買う．

ところで，スクエニのEの字がcygwinの何かのアイコンにしか見えない気がしてきた．赤いcygwinアイコンって何に使われてたっけ？

今日は青５と青６で２時間走って終わり．

１時間目はUターンと乱れて置かれたパイロンスラロームとをやって，あとはいつものコースをくるくる．２車線使ったUターンは余裕だが，中央線よりから１車線幅のみでのUターンはしんどい．あとは半径小さく円を書き続けるの（エンドレスUターン）も速度と車体の倒し具合との感覚がまだ明確でないので難しかった．乱れたパイロンスラロームは教官のスピードには追いつけない．まあ，ぶつからず通過できりゃ問題ないわけだけど．

２時間目はみきわめだったので，ひたすらコースをくるくる．終わりが近づいてきたら苦手なものは何だと聞かれ，スラロームと答えて課題コースをくるくる．まだまだキビキビ感というかテンポが遅いというかなのだけど，とりあえず問題ないらしい．

んで，みきわめオッケーということで日曜日の卒業検定を申し込んで終了．雨降りそうなので急制動が恐い．

起きて朝飯食いながら wake golf して楽しく頭の体操．

最近気づいた wake golf で大事なこと：投げっぱなしジャーマン．

Haskell golf でも同じなのだけど，必要な出力が終わったらエラーで停止しても問題ないので，最後のエラー回避のためのコードは必要ない．エラーは投げっぱなしで．例えば，最後には空文字列になってしまうようなものはエラー回避に":"だけの行が必要となるが，こんなのは書くだけ無駄であると．

それに連動して，エラーで停止する前に必要な出力を負えなければならないので，string literal をアクションの前に置くようなスタイルにしておかないと投げっぱなしジャーマンできない（今のインタプリタがアクション部分を前方から処理してるから＆多分make的にそういうセマンティクスだからだけど）．

ということで，投げっぱなし Smileys Triangle.

:":\n:-":-)
.{1,65}:"\n$&"$&))

そして，sed の y コマンドのありがたみを感じる今日この頃．y のおかげで物事の大小比較が非常にコンパクトに書けていた気がする．今のところ wake で大小比較をコンパクトに実現する方法が思いついていないので，その辺をもっと修業しないとなかなかソート系に手が出ない．頑張ろう．

理由：「後ろブレーキの方が効きが鈍いから安定して停まれるでしょ」

今日の１時間目は青４ゼッケンで，回避と経路設定といつものコース周回と．

で，低速時に前ブレーキをチョンッと使ってしまうくせについてまた注意を受ける．停止状態から２ｍ進んで止まるだけに前ブレーキ使うな，後ろブレーキだけで十分だ，とか．ただ…，後ろで十分だからといって前を使ってはいけない理由になっていないわけで．まあ，積極的に使う理由もないのだけど．そして後ろブレーキで十分なら後ろブレーキの方が安定するというかスムーズというかカッコいいというかなのも納得出来る．

とはいえ，「後ろブレーキと前ブレーキで安全なのは後ろブレーキだ．何故なら後ろのほうが効きが鈍いからだ」ってのはどうなのだろうか？　重心の進行方向に対する力点とサスペンションの位置の違いのせいなんじゃないのかなぁとか．それを言っても肯定も否定もされず上の回答を頂いたのだけど…　タイヤしか考えない状態でも前後のブレーキの効きが違うのかどうか私は把握していない．そして，仮にバイクを後ろ向きに走らせたなら，どちらのブレーキがより効くのだろうか？　そしてどちらが安全なのだろうか？

もう一つ．色々邪魔が入るので直線で30km/h弱で走ったのだけど，出来るなら40km/h位の速度を出しなさいと言われた．まあ，交通を円滑にする必要があるのだから速度を出せるなら出すべきであるというその言葉には納得．が，その理由として「速度を出したほうが安定するんだから速度出せ」という言い方はどうなのだろうか？　20km/hも出ていれば十分安定して走行できる．故に安定のために40km/hを出せというのはおかしい．今ひとつ理路整然としない説明ばかりだったなぁという感想．

そういえば，コース周回中にすぐ後ろとかすぐ横を原付に乗って追っかけられたのだけど…　色々な点の確認だとは思うけれどそういうことするなら先に言っておいて欲しい．はっきり言って煽り耐性とか突然の危険への対処とかのテストかと思った．

ついでに，運転にはメリハリが大事だと言われたのだが，同様に指導にもメリハリは大事だよね，とか．常に淡々と同じ調子でしゃべるので，どれが重要なことなのかの重み付けが全く分からなかった．メリハリの利いた教官だとそこら辺が分かりやすくて安心なんだけどなぁ…　とりあえず今日の人とは色々と相性良くなかった気がする．

その次の時間はセット教習で，シミュレータ＋１時間の学科．危険な行動を取るNPCが沢山の世界を安全に動きまわるのが使命．でも１回死んだ！　左に停車中の車があり，対向車線には大きいトラックが来ていて，その右奥の小道から車が右折してきている，とかいう状況で右折車にあたった．ぶっちゃけ右奥の小道を認知していなかったのが原因．流石に道を認知していなかった以上，危険予測も何もあったものではない．事故の85%が認知に原因がある（他は判断ミスと操作ミス）ってのも非常に納得．ちなみに３人同時にシミュレータだったのだけど死んだの俺だけorz

さて，次回は青５でみきわめ一歩手前．スラロームとか一本道のバランス走行あたりかね．

wake がバージョンアップしてアクション部分でのエスケープが許可された．これは空白とか改行と入れるのに有効かなと．

ということで，ゴルフしたコードを書き換えた．ついでに，PCRE(ないしperl)の正規表現で^と$が文字列中のnewlineにどこでもマッチできることに気がついたので，それ関連で\nを置換しまくる．

char pyramid．前のは無駄ばかりだったけどだいぶすっきりした感じ．

:$<
([^ ]+)([^ ].*):$1\ $2
( *)\S(.*):$1$2\  "$&\n"
 +:

swap lines．アクションのエスケープと正規表現の^とで縮めた結果，murky-satyrさんに追いついた．

-:$<\n
(.+?)(^.+?\n)(.*):"$2$1"$3

追いつく前のは\nを付けるの面倒だなぁとかやってごちゃごちゃと：

-:$<
(.*?\n)(.*?)(\n|\Z)(.*):"$2\n$1"$4

あとはもう少し複雑そうなのをということで Half Sierpinski をば．なんとなく同じパターンがたくさん現れるので（下のl関数とu関数）…　そろそろ foldr とか map とかの高階関数が欲しくなってくるかなぁと思いつつ，実現すんのは（要素への区切り方というかリストの表現とかが結局）面倒だなぁとか思ってみたり．

-:$(x)
x:"#~"
c(.*?) *~(.*):"$1\n"c$2
.* {16}.:c$&
u(.*?)~(.*):"$1$(U$1)~"u$2
l(.*?)~(.*):"$1$1~"l$2
U.(.*):" "U$1
[A-z]*:
.+:$(l$&)$(u$&)