前回Haskellで書いた、Combinationを求める関数 kaijo :: Integral a =>a->a kaijo k = foldr (*) 1 [1..k] combinate :: Integral a => a -> a -> a combinate n r = (kaijo n)`div`(kaijo r * kaijo (n-r)) 型クラスをまだよく理解していないのですが、コ…

今日は朝、そして夕方にそれぞれ試験が２つ。 情報通信と電磁気学。 どっちも微妙な出来だったなー。 いや、電磁気学は出来たけど、ボンミスしてそう。これで残るはあと8つ！電磁気学の試験が早めに終わったので、けんぴ、鮫と三人でキャンパス移動。 共通講…