関数型プログラミング言語Haskell Part3

関数型プログラミング言語Haskell Part3 at TECH

■コピペモード
□スレを通常表示
□オプションモード
□このｽﾚｯﾄﾞのURL
■項目テキスト

800:デフォルトの名無しさん
 05/12/18 09:26:10 
>>798 
そうです。 
 
>>799 
言葉足らずですみません。

801:デフォルトの名無しさん
 05/12/18 11:11:46 
foldl (\x y->10 * x + (ord y - ord '0')) 0

802:デフォルトの名無しさん
 05/12/18 14:55:27 
浮動小数の桁数指定で最後の桁の次を四捨五入の場合は？

803:デフォルトの名無しさん
 05/12/18 15:29:40 
何の話？

804:デフォルトの名無しさん
 05/12/19 15:50:32 
roundN :: (RealFrac a, Integral b) => a -> b -> a 
roundN x n = 
    (frac (round (x * b))) / b 
    where b = 10 ^^ n 
          frac = fromRational . toRational

805:797
 05/12/20 01:34:36 
>>800 
誰だ君… 
 
>>798 
そうです。 
 
>>799 
言葉足らずですいみません。

806:デフォルトの名無しさん
 05/12/20 08:55:38 
Webで以下のような定義を見かけたのですが、 
 
data List a = Nil | Cons a (List a) 
 
instance Eq (List a) where 
  Nil       == Nil       = True 
  Cons x xs == Cons y ys = xs == ys 
  _         == _         = False 
 
Cons x xs == Cons y ys = xs == ys  
の部分って正しいの？ 
このままだと (Cons 1 (Cons 2 Nil)) == (Cons 1 (Cons 3 Nil)) 
が True になるんだけど・・・ 
かといって 
Cons x xs == Cons y ys = x==y && xs == ys  
とかすると、最初のほうの x==y で  
「add (Eq a) to the class or instance method `=='」 
とか怒られるんだけど、じゃーどう定義したらよいのか 
わかりまへん

次ページ