[過去ﾛｸﾞ] 関数型プログラミング言語Haskell Part33 (1002ﾚｽ)
上下前次1-新
抽出解除 ﾚｽ栞
このｽﾚｯﾄﾞは過去ﾛｸﾞ倉庫に格納されています｡
次ｽﾚ検索 歴削→次ｽﾚ 栞削→次ｽﾚ 過去ﾛｸﾞﾒﾆｭｰ
42: 2020/02/18(火)19:15:31.61 ID:MNdOSpyG(1) AAS
>>40
あざっす
>>41
コンバーターを作る前段階としてのパーサーなのでコンバーターとして完成したら公開する予定です
今はdo、コピペ多用で見苦しいことになってますしｗｗｗ
84(1): 2020/03/27(金)17:56:54.61 ID:gM1jKcLP(5/6) AAS
>>82
説明頼む
命令列って何なの？
176(1): 2020/04/04(土)17:30:47.61 ID:V7kxF8pu(1) AAS
haskellでやり過ぎなほど徹底的に宣言性にこだわってプログラムする実験をしてみたが、なかなか面白いぞ。
手続き的になりがちなゲームプログラミングでやってみると特に。
217: 2020/04/15(水)17:47:28.61 ID:/WUIZ9Nz(2/2) AAS
お礼書き忘れたすみません
回答ありがとうございますなんとか通ってもらいます
390(1): 2020/08/18(火)02:46:50.61 ID:rj5JRKyz(1) AAS
153行より前の部分がおかしいんでしょ
516(1): 2020/09/15(火)02:19:25.61 ID:PObv6BQ8(1) AAS
(a -> b) -> (m a -> m b)
m (a -> b) -> (m a -> m b)
(a -> m b) -> (m a -> m b)
こいつらは中央の->と左右の->を区別してないから数学的な意味が見えない
returnとjoinは->が一つしかないから問題ないが
600(1): 2020/12/04(金)21:16:59.61 ID:kdWDDBYk(1) AAS
これとかどう？
外部ﾘﾝｸ:github.com
655(1): 2021/01/20(水)16:39:30.61 ID:IzsyJlfZ(1/2) AAS
>>652
これでどうかな？
randInts2 :: [IO Int]
randInts2 =
iterate ( >>= const (randomIO :: IO Int) ) (randomIO :: IO Int)
main :: IO ()
main = do
a <- head randInts2
print a
702(1): 2021/02/03(水)14:08:13.61 ID:mxabq2OH(1) AAS
求めてないかもですがこんなふうならかけますね。
module Main where
import qualified Data.Array.Unboxed as AU
main = do
print $ comb6 !! 2000 !! 1000
print $ comb7_1 !! 1000 !! 1000
print $ comb7_2 1000 1000 AU.! ( 1000, 1000 )
comb6 = ((1 : (repeat 0)) :) $ zipWith (zipWith (+)) comb6 (map (0 :) comb6)
comb7_1 = (repeat 1 :) $ ([ 1 .. ] :)
$ (map (\x -> scanl (+) 1 $ tail x) $ tail comb7_1)
comb7_2 :: Int -> Int -> AU.Array ( Int, Int ) Integer
comb7_2 ly lx = comb7_2_table
where
comb7_2_table = AU.array ( ( 0, 0 ), ( ly, lx ) ) $ concatMap(\i -> map (f i) [ 0 .. lx ]) [ 0 .. ly ]
f 0 x = ( ( 0, x ), 1 )
f y 0 = ( ( y, 0 ), 1 )
f y x = ( ( y, x ) , comb7_2_table AU.! ( (y - 1), x ) + comb7_2_table AU.! ( y, (x - 1) ))
740: 2021/02/16(火)10:45:42.61 ID:AZNZAZhP(1) AAS
>>738
こういう話？
画像ﾘﾝｸ[png]:i.imgur.com
797: 2021/04/06(火)20:13:47.61 ID:sYlI8eNJ(1/3) AAS
ホントだ
怒られた
import qualified Data.Bool as B
data MyBool = True | False
instance Show MyBool where
show Main.True = "MyTrue"
show Main.False = "MyFalse"
main = do
print B.True
print Main.True
--print True ←ダメだって
943(1): 2021/11/14(日)21:26:09.61 ID:bsdXePE0(1) AAS
なんで消すの？
上下前次1-新書関写板覧索設栞歴
ｽﾚ情報 赤ﾚｽ抽出 画像ﾚｽ抽出 歴の未読ｽﾚ AAｻﾑﾈｲﾙ
ぬこの手 ぬこTOP 0.041s