$B6bC+!wG_B<8&$G$9!%(B
$B$A$g$$$HK\6H$NJ}$,K;$7$$J70O5$$K$J$C$F$-$^$7$?!%(B

> foldl' :: (a -> b -> a) -> a -> [b] -> a
> foldl' f a []     = a
> foldl' f a (x:xs) = (foldl' f $! f a x) xs
> 
> $B$3$3$G$b(B $! $B$H$$$&$"$d$7$$1i;;;R$,=P$F$-$^$7$?$,!"$3$l$O(B
> $ $B$H$$$&(B lisp $B$N(B apply $B$K$"$?$k1i;;;R$N%9%H%j%/%HHG$G$9!#(B
> 
> ($!) :: (a -> b) -> a -> b
> f $! x = x `seq` f x
> 
> $B$G$9!#$3$N(B seq $B$H$$$&4X?t$,FC2A$7$F$+$i!"(Bf x $B$rI>2A$7$F(B
> $B$=$NCM$rJV$9FCJL$J4X?t$G$9!#$3$l$O!"(BHaskell $B$N;EMM$K4^$^$l$F$$$^$9!#(B

 seq$B$G$9$+!%(Bx$B$rI>2A$7$F$+$i(Bf x$B$N7W;;$r9T$&$H$$$&$N$O!$(B
(f x)$B$+$i8+$?>l9g!$$3$3$@$1CY1dI>2A$G$O$J$$!$$H$$$&$3$H$J$N$G$7$g$&$+(B?
$B4{$KI>2A$5$l$?$b$N(B(x)$B$r0z?t$H$7$FEO$7$F$$$k$N$G!$(B
$B$=$&$J$N$+$J!$$H;W$C$?$N$G$9$,!%(B


> $B$H$$$o$1$G!"(BHaskell $B$G$OItJ,E*$K%9%H%j%/%H$JI>2A$rhttp://esmith.ss.ics.tut.ac.jp/kanaya)
    mailto:[EMAIL PROTECTED]


--
ML: [EMAIL PROTECTED]
$B;H$$J}(B: http://QuickML.com/

メールによる返信