Haskellに固定小数点演算子がありますか？

Question

私は最近、私はかなり頻繁に

（例えばf x == xこと）私はこれはかなり一般的な概念であると思ったので、私はそこに構築されるかもしれないと思う、それは固定点に到達するまで、ちょうど別の機能fを反復処理関数を記述することを気づきました

だから、私はそこにこれが組み込まれているのか、より一般的なものがあるのだろうと思っていましたか？

だから私は基本的にこれを探しています：私の検索用語がfixed pointまたは類似のものが含まれていたときに、私は唯一のfix機能への参照を見つけたので

fixedpoint f x= head . dropWhile(\y->y /= f y) $ iterate f x 

私は、トラブルこれをグーグルがありました。

Answer 1

機能には、記号Eq a => (a -> a) -> a -> aがあります。

Using hoogle to search for thatと一致するものはありません。最も近い一致はuntil

until :: (a -> Bool) -> (a -> a) -> a -> a

下地プレリュード

until p fがpが成立するまでfを適用した結果を得ています。

あなたはおそらく、あなたの関数を書くことを使用することができますが、/=を必要とするので、あなたはEq制約を必要としています。あなたが任意の補助機能のない短い表現をしたいので

場合

Answer 2

自分で書き込んでください。ダイレクトバージョンはdropWhileを使用するものより高速です。

Answer 3

あなたが探しているビルドでは、私は間違いなくこれは少し奇妙に見えるが、実際にはそれだけです

until=<<((==)=<<) :: Eq a => (a -> a) -> a -> a 

をお勧めすることができますuntil (\x -> f x == x) fに相当する無点は、f (g x) xが(f=<<g) xで2回表現できるという事実を利用しています。