bitterharvest https://blog.hatena.ne.jp/bitterharvest/ bitterharvest’s diary https://bitterharvest.hatenablog.com/ Haskellプログラミング講座（上級編：接着関数） １．出発駅と到着駅間の駅数を求める 出発駅から到着駅までのおよその所要時間はその間の駅数で分かる。まず同一路線の場合は駅に付けられた番号の差となる。従って、次のようになる。 stat0' :: Source -> Destination -> Int stat0' sor des = abs $ snd (snd sor) - snd (snd des) 路線が異なっているなどの誤った入力を受け付けないようにするために、ガードをつける。このようにすると、同一路線内での出発駅と到着駅の駅数を求める関数stat0は次のようになる。 stat0 :: Source -> Destination ->… 190 <iframe src="https://hatenablog-parts.com/embed?url=https%3A%2F%2Fbitterharvest.hatenablog.com%2Fentry%2F2014%2F10%2F12%2F213839" title=" 接着関数－路線網（出発駅と到着駅間の駅数） - bitterharvest’s diary" class="embed-card embed-blogcard" scrolling="no" frameborder="0" style="display: block; width: 100%; height: 190px; max-width: 500px; margin: 10px 0px;"></iframe> http://cdn-ak.f.st-hatena.com/images/fotolife/b/bitterharvest/20141012/20141012212612.png Hatena Blog https://hatena.blog 2014-10-12 21:38:39 rich https://bitterharvest.hatenablog.com/entry/2014/10/12/213839 1.0 100%