[過去ﾛｸﾞ] 関数型プログラミング言語Haskell Part16 (978ﾚｽ)
上下前次1-新
このｽﾚｯﾄﾞは過去ﾛｸﾞ倉庫に格納されています｡
次ｽﾚ検索 歴削→次ｽﾚ 栞削→次ｽﾚ 過去ﾛｸﾞﾒﾆｭｰ
746: 2011/12/19(月)15:35 AAS
金正日死んだのがそんなにショックなのか
747: 2011/12/19(月)17:29 AAS
正日がGHCコミッタだったという可能性がヒッグス粒子レベルで存在している？
748: 2011/12/19(月)17:36 AAS
諸君、そろそろ議論に戻りたまえ
749: 2011/12/19(月)17:57 AAS
742が言ってることは事実だからな
750: 2011/12/19(月)18:02 AAS
742乙
751: 2011/12/19(月)18:24 AAS
>>742が小学生やガキまたはそれに準ずるものという事が読み取れるわけですね
752: 2011/12/19(月)18:25 AAS
理解できない人間を病人と呼ぶ病気にかかってるから仕方がない
753(1): 2011/12/19(月)18:36 AAS
haskellでWEBアプリって簡単にでける？
作ってる奴いるか？
754: 712 2011/12/19(月)18:48 AAS
>>753
snap とかのフレームワークを使え
簡単かどうかは気分次第
755(1): 712 2011/12/19(月)18:51 AAS
>>740
そうですか
私も心が挫けそうで、もう諦め気味です
Windows 標準搭載のコマンドプロンプト以外のコンソールでもダメだったら諦めます
756: 2011/12/19(月)18:53 AAS
精神科医の春日武彦先生から統合失調症の前駆症状は「こだわり・プライド・被害者意識」と教えていただいたことがある。
「オレ的に、これだけはっていうコダワリがあるわけよ」というようなことを口走り、
「なめんじゃねーぞ、コノヤロ」とすぐに青筋を立て、「こんな日本に誰がした」というような他責的な文型でしか
ものごとを論じられない人は、ご本人はそれを「個性」だと思っているのであろうが、実は「よくある病気」なのである。
統合失調症の特徴はその「定型性」にある。
757: 2011/12/19(月)19:14 AAS
>>742
あなたの発言は傾聴に値する．是非これからは鳥あるいはコテハンをつけて発言して欲しい．
758: yuitest 2011/12/19(月)20:00 AAS
相手が会話の主体なのか、会話の内容が主体なのかという議論をするときの主体は何か
742は主体
759(1): 2011/12/20(火)11:32 AAS
やっとこさ新版 Hasklell Platform2011.4.0.0 がリリースされてたよー
ghc 7.0.4 で 7.2 ぢゃないんですね。
760: 712 2011/12/20(火)12:36 AAS
7.2 はライブラリの方がまだ追いついていない場合が多い
base のバージョンとかコンパイル仕様の変更とか
761: 712 2011/12/20(火)12:40 AAS
>>755
msys とかでもダメっぽいんで、もう諦めました
762: やんやん ◆yanyan72E. 2011/12/20(火)12:56 AAS
統合失調症に定型性なんてねーよ。
陽性症状、陰性症状、人によって症状は様々。
精神医学の専門書の一つでも読んでからそういうこと言えよ。
大雑把にいえば、心の中の自分と他人の境界に穴が開く病気だ。
だから、自分が思っていることが人の声として幻聴で聞こえたりする。
763: 2011/12/20(火)13:35 AAS
5年から１０年ぐらい前ぐらいに思考盗聴こえええ皆も気をつけろとか叫んでた人を結構みたけど
あれがそうだったのか・・・
764: 2011/12/20(火)13:50 AAS
Database.HDBC.MySQLのfromSqlでstringに変換するとasciiデータはputStrLnで表示出来るのですがunicodeは文字コードが表示されます。
まだunicodeに対応できていないのでしょうか?
765: 2011/12/20(火)15:03 AAS
unicodeも表示出来ました。
766: 2011/12/20(火)16:29 AAS
742がやってることはホームレスを無差別にいじめてる事と同じでしょ。
767(6): 2011/12/20(火)21:54 AAS
listAは重複がないリストとする。
listBは空でなく、順序は不明だがlistAの要素の連続になっている。
listAの要素であるxを渡された時、それがlistBと比較して前方にあるか
後方にあるか、それともlistBに含まれるかを判定したい。
例で書くと
listA = ["A","B","C","D","E",...]
listB = ["C","D","B"]
xが"E"なら、listBに含まれるB,C,Dに対して「後方」ということになる。
このとき、haskellらしい考え方だとどういうアプローチになる？
俺の手続き脳だと
1. xがlistBにあるかどうかを判別
2. xとlistBそれぞれの要素のlistA内での位置を調べる
3. 調べた位置を比較して「前方」「後方」を判定する
と考えたんだけど、ザ・手続きっぽくてダサいよなぁ、と思って。
768: 2011/12/20(火)22:49 AAS
こんな感じ？
filter (flip all listB . (/=)) listA
769: 2011/12/20(火)22:52 AAS
ごめん問題読んでなかった。取り除くんじゃないのな。
770(1): 2011/12/20(火)22:55 AAS
>>767
めっさ力技
data Pos = F | M | E deriving Show
getPos :: Eq a => [a] -> [a] -> a -> (Maybe Pos)
getPos listA listB = fmap f . (`lookup`listE) where
listC = map (`elem` listB) listA
listE = zip listA $ zip listC $ scanl1 (||) listC
f (True,_) = M
f (False,False) = F
f (False,True) = E
listA = [0,1,2,3,4]
listB = [2,3,1]
x=0
main = do
let g = getPos listA listB
print $ g 0
print $ g 1
print $ g 2
print $ g 3
print $ g 4
771(4): 2011/12/20(火)23:35 AAS
>>767
1. listAをlistA1 ++ [x] ++ listA2にわける
2. listA1とlistBのintersectionを取って判定
f listA listB x =
if y == 0 then 1 else if y == length listB then -1 else 0
where y = length $ takeWhile (/= x) listA `intersect` listB
772(1): 2011/12/21(水)01:20 AAS
>>767
f listA listB x = (elem x as, elem x listB) where as = takeWhile (not.flip elem listB) listA
773: 2011/12/21(水)08:25 AAS
>>771
(y == 0)のあとに(elem x listB)でもう一回場合分けが必要でない？
774: 2011/12/21(水)12:32 AAS
>>759
元々４月の予定だったよな……
775(1): 2011/12/21(水)12:43 AAS
>>767 の解法としていくつか提示された例は、
たとえば1ヶ月後とかに自分が読んでも、あるいは他人が読んでも、
どんな計算をして答えを求めているのか簡単に分かるもんなの？
上下前次1-新書関写板覧索設栞歴
あと 203 ﾚｽあります
ｽﾚ情報 赤ﾚｽ抽出 画像ﾚｽ抽出 歴の未読ｽﾚ
ぬこの手 ぬこTOP 0.015s