id:edvakfさんがやってるのを見かけたので久しぶりに。 cf. 急勾配の判定 - どう書く？org cf. 急勾配の判定 - Haskellで遊ぶよ どう書く？org にはこれをポストしたんだけど： import List steep xs = and $ zipWith (>) xs $ map sum $ tail $ tails xs $ …