[•\ަ : ‘S‚Ä ÅV50 1-99 101- 201- 301- 401- 501- 601- 701- 801- 901- 1001- 2ch.sc‚Ìread.cgi‚Ö]
Update time : 10/10 00:15 / Filesize : 342 KB / Number-of Response : 1029
[‚±‚̃XƒŒƒbƒh‚Ì‘‚«ž‚Ý‚ð휂·‚é]
[{” ŋߗ§‚Á‚½ƒXƒŒ•”M‚¢ƒXƒŒˆê—— : {” ŋߗ§‚Á‚½ƒXƒŒ^‹LŽÒ•ʈꗗ] [—ÞŽ—ƒXƒŒƒbƒhˆê——]


ªƒLƒƒƒbƒVƒ…ŒŸõA—ÞŽ—ƒXƒŒ“®ì‚ðC³‚µ‚Ü‚µ‚½A‚²–À˜f‚ð‚¨Š|‚¯‚µ‚Ü‚µ‚½

ŠÖ”Œ^ƒvƒƒOƒ‰ƒ~ƒ“ƒOŒ¾ŒêHaskell Part33



1 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ [2020/02/10(ŒŽ) 18:17:36 ID:L6eYQqyh.net]
ŠÖ”Œ^ƒvƒƒOƒ‰ƒ~ƒ“ƒOŒ¾Œê Haskell ‚ɂ‚¢‚ÄŒê‚éƒXƒŒ‚Å‚·B

Haskell Language(ŒöŽ®ƒTƒCƒg)
https://www.haskell.org/
“ú–{Haskellƒ†[ƒU[ƒOƒ‹[ƒv - Haskell-jp
https://haskell.jp/

‘OƒXƒŒ
ŠÖ”Œ^ƒvƒƒOƒ‰ƒ~ƒ“ƒOŒ¾ŒêHaskell Part32
https://mevius.5ch.net/test/read.cgi/tech/1548720347/

509 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2020/09/09(…) 22:27:03 ID:M9aZojkl.net]
IDE‚͉½‚ª‚¨‚·‚·‚ßH

510 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2020/09/10(–Ø) 02:20:35 ID:6Lrmk0HC.net]
‚ç‚Á‚«‚å

511 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2020/09/10(–Ø) 08:33:57.45 ID:OHVt/ux7.net]
‰´‚à•·‚«‚½‚¢‚¯‚ÇVScode‚¶‚áh‚¢H

512 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2020/09/10(–Ø) 13:10:19.99 ID:he9lsIhb.net]
>>500
—‰ð‚µ‚½“r’[‚É‚±‚ñ‚È‚µ‚å[‚

513 –¼‘OFà‚È‚¢‚±‚ƂŃh‚â‚Á‚Ä‚½‚Ì‚©‚Æâ–]‚·‚邿B []
[‚±‚±‰ó‚ê‚Ă܂·]

514 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2020/09/11(‹à) 22:58:53.84 ID:dNbZ7rGGn]
ƒfƒL‚él‚قǃtƒŠ[ƒ‰ƒ“ƒX‰»‚·‚éHš“­‚«•û‰üŠv
https://www.youtube.com/watch?v=ALflcwYOJtQ
”NŽû890–œ‰~ˆÈ‰º‚͎Љï‚Ì‚¨‰×•¨šéx‚³‚ê‚é˜J“­ŽÒ
https://www.youtube.com/watch?v=CAp-ZrJpF54
éx‚³‚ꂽ‚­‚È‚©‚Á‚½‚ç•׋­‚µ‚ëš‘¼l‚̃‹[ƒ‹‚Í‘¹‚ð‚·‚é
https://www.youtube.com/watch?v=s176O6qKuPw
’ê•Ó‚Ì99“‚͈궒ê•Óš10”NŒã‚ªŒ©‚¦‚È‚¢“¯—»‚½‚¿
https://www.youtube.com/watch?v=4Mfiwn2sPD8
‰Ò‚¬‚½‚¯‚ê‚Γ­‚­‚Èš4ç–œ‰~‚Û‚Á‚¿‚à‰Ò‚°‚È‚¢‚̂͂ȂºH
https://www.youtube.com/watch?v=Fi7bILN4wes
ƒTƒ‰ƒŠ[ƒ}ƒ“Žvl‚łׂ͖©‚ç‚È‚¢——R
https://www.youtube.com/watch?v=iW6oAo0q0ZI
‚ÅA–³E‚͉҂¢‚Å‚é‚ÌHšYouTubeŽû‰v‚̓Aƒz‚É‚à•ª‚©‚è‚â‚·‚¢
https://www.youtube.com/watch?v=md0WPAsfarY

515 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ [2020/09/12(“y) 10:38:44.00 ID:A2+hHxph.net]
[•ª”ƒ‚ƒiƒh](https://ncatlab.org/nlab/show/Grothendieck+group+of+a+commutative+monoid)

“úí¶Šˆ‚Å‚à–Ú‚É‚·‚é`2 / 3`‚̂悤‚È•ª”•\‹L‚̓‚ƒiƒh‚ɂȂÁ‚Ä‚¢‚éB
‹zŽûŒ³‚Ì–â‘肪‚ ‚é‚Ì‚ÅAƒlƒ^‚Æ‚µ‚Ă͈ø‚«ŽZ`2 - 3`‚Ì•û‚ªˆµ‚¢‚â‚·‚¢‚ªA
ˆø‚«ŽZ‚Ìê‡A`2 - 3 = - 1`‚̂悤‚ÉŒvŽZ‚µ‚Ä‚µ‚Ü‚Á‚½Œ‹‰Ê‚ªŽg‚í‚êA
“úí¶Šˆ‚łͶX‚µ‚¢ƒ‚ƒiƒh•\‹L‚Í‚ ‚Ü‚èŽg‚í‚ê‚È‚¢B‚»‚Ì“_A•ª”‚Å‚ÍA
’¼Ï‚©‚ç‚̃Rƒ“ƒXƒgƒ‰ƒNƒ^[‚ð‚à‚ë‚ÉŽg‚Á‚½Š¿‚È•\Œ»‚ª
“úí¶Šˆ‚Ì’†‚ÅŽg‚í‚ê‚Ä‚¢‚éB

•ª”‚ÍAƒ‚ƒiƒh‚ðŽg‚¤‚±‚Æ‚ÆAƒ‚ƒiƒh‚ð—‰ð‚·‚邱‚Ƃ͕ʕ ‚Æ‚¢‚¤
—Ç‚¢—á‚ɂȂÁ‚Ä‚¢‚é‹C‚ª‚·‚éB•ª”‚ªƒ‚ƒiƒh‚ɂȂÁ‚Ä‚¢‚邱‚Æ‚ª¶‚«‚Ä‚­‚é‚Ì‚ÍA
ƒVƒXƒeƒ€‚ª‚»‚ê‚È‚è‚É•¡ŽG‚ɂȂÁ‚Ä‚©‚ç‚¶‚á‚È‚¢‚©‚ÆŽv‚¤B’ŠÛ‰»‚É‚Í
ƒRƒXƒg‚ª‚©‚©‚é‚Ì‚ÅA‚»‚̃RƒXƒg‚ÉŒ©‡‚Á‚½Œ©•Ԃ肪•K—v‚ɂȂ邪A
ƒVƒXƒeƒ€‚ªŠÈ’P‚¾‚ÆA’ŠÛ‰»‚̃RƒXƒg‚ðƒyƒC‚Å‚«‚È‚¢B

•ª”ƒ‚ƒiƒh‚Í—L–¼‚È—á‚Ȃ̂ÅA‰½ˆ‚©‚̃uƒƒO‚ÅЉ‚ê‚Ä‚¢‚邯Žv‚¤‚ªA
Œ©‚½‚±‚Æ‚ª‚È‚¢‚Ì‚ÅA‘‚¢‚Ă݂½Bƒz[ƒ€‚ª‰ÂŠ·ƒ‚ƒmƒCƒh‚ÌŒ—‚Ȃ̂ÅA
ƒIƒŒƒIƒŒƒ‚ƒiƒh‚ɂȂÁ‚Ä‚µ‚Ü‚¤‚ªAƒ‚ƒiƒh‘¥‚Ì`QuickCheck`‚͂ł«‚é‚Ì‚ÅA
Œ—˜_‚Ì—ûK‚ɂȂ邩‚à‚µ‚ê‚È‚¢B

516 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2020/09/12(“y) 20:26:45.44 ID:TbuoUVLB.net]
‚ÍH‰½Œ¾‚Á‚Ä‚ñ‚Ì

517 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ [2020/09/13(“ú) 08:12:50.88 ID:Tso/1gLY.net]
‚ÐH‰½Œ¾‚Á‚Ä‚ñ‚Ì



518 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2020/09/13(“ú) 14:14:05.81 ID:7XfXIlf2.net]
>>509
return ‚Æ >>= ‚͉½‚ɂȂé‚ñ‚Å‚·‚©H

519 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2020/09/13(“ú) 15:14:54.14 ID:Gippd8g0.net]
‚µ‚ç‚È‚¢‚¯‚Ç
return x = x / x
‚®‚ç‚¢‚µ‚©’è‹`‚Å‚«‚È‚³‚»‚¤

520 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ [2020/09/13(“ú) 21:12:53.92 ID:Tso/1gLY.net]
‚ÓH‰½Œ¾‚Á‚Ä‚ñ‚Ì

‰ÂŠ·ƒ‚ƒmƒCƒh‚ÌŒ—‚ÍW‡‚ÌŒ—‚Ì
[•”•ªŒ—](https://ncatlab.org/nlab/show/subcategory)‚¾‚ªA
W‡‚ÌŒ—‚ł͂Ȃ¢B‚µ‚½‚ª‚Á‚ÄA•ª”ƒ‚ƒiƒh‚ÍA
Haskell‚Ì`Monad`‚̃Cƒ“ƒXƒ^ƒ“ƒX‚ɂȂç‚È‚¢B
—Ⴆ‚ÎAŽŸ‚̂悤‚ÈŽÀ‘•‚ðl‚¦‚邯A

``` code
newtype Bunsu a = Bunsu {
runBunsu :: (a, a)
} deriving (Show, Functor)

instance (Eq a, Semigroup a) => Eq (Bunsu a) where ...
instance (Semigroup a) => Semigroup (Bunsu a) where ...
instance (Monoid a) => Monoid (Bunsu a) where ...
instance (Monoid a) => Group (Bunsu a) where ...

bunsu_pure :: (Monoid a) => a -> Bunsu a
bunsu_pure = ...
```

”›‚è`Monoid a`‚ªŽ×–‚‚ð‚µ‚ÄA`Bunsu`‚Í`Applicative`‚̃Cƒ“ƒXƒ^ƒ“ƒX‚É
‚Å‚«‚È‚¢B‚»‚ê‚Å‚àA’Êí‚ÌŠÖ”‚ÌŒ`‚łȂç`bunsu_pure`‚Æ`bunsu_join`‚Í
‘‚¯‚é‚Ì‚ÅAƒ‚ƒiƒh‘¥‚̃`ƒFƒbƒN‚͂ł«‚éB‚½‚¾‚µA`Bunsu`‚ÍA
‰ÂŠ·ƒ‚ƒmƒCƒh‚ÌŒ—‚ł̃‚ƒiƒh‘¥‚Í–ž‚½‚·‚ªAW‡‚ÌŒ—‚ł̃‚ƒiƒh‘¥‚Í–ž‚½‚³‚È‚¢B

Ž¿–â‚Ö‚Ì’¼Ú‚Ì“š‚¦‚Í”ð‚¯‚é‚ªA‰ÂŠ·ƒ‚ƒmƒCƒh‚ÌŒ—‚Ål‚¦‚È‚¢‚Æ
“š‚¦‚Í“¾‚ç‚ê‚È‚¢B

521 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ [2020/09/13(“ú) 23:57:07.12 ID:Tso/1gLY.net]
‚ÖH‰½Œ¾‚Á‚Ä‚ñ‚Ì

‚à‚µ‚©‚·‚邯A‰½Œ¾‚Á‚Ä‚ñ‚Ì‚ª‘O‚Ì“Še‚É‚©‚©‚Á‚¿‚á‚Á‚½‚©‚à‚µ‚ê‚È‚¢B
‰½‚àl‚¦‚¸‚ÉA‰½Œ¾‚Á‚Ä‚ñ‚Ì‚¨‚¶‚³‚ñƒvƒŒƒC‚ðŠy‚µ‚ñ‚Å‚¢‚邾‚¯‚Ȃ̂ÅA
‹C‚É‚µ‚È‚¢‚łقµ‚¢B

‚‚¢‚łȂ̂ÅB
`return x = x / x`‚Æ‚¢‚¤‘I‘ð‚ÍAW‡‚ÌŒ—‚Å‚ÍAŽæ‚肤‚é—Bˆê‚Ì‘I‘ðŽˆ‚©‚à
‚µ‚ê‚È‚¢BŽ©•ª‚à‘¼‚ÉŽv‚¢‚‚©‚È‚¢B‚µ‚©‚µA‰ÂŠ·ƒ‚ƒmƒCƒh‚ÌŒ—‚Å‚ÍA
‘¼‚É‚à‘I‘ðŽˆ‚ª‚ ‚éB‚»‚ê‚àŠÜ‚ß‚ÄA
[‹LŽ–](https://ncatlab.org/nlab/show/Grothendieck+group+of+a+commutative+monoid)
‚É‘S‚Ä‘‚¢‚Ä‚ ‚éB‘¼lŽ–‚Ȃ̂ŒfŒ¾‚µ‚Ä‚µ‚Ü‚¤‚ªA‚±‚Ì‹LŽ–‚æ‚èÚ‚µ‚¢
•ª”ƒ‚ƒiƒh‚̉ðà‚Í’n‹…ã‚ɂ͑¶Ý‚µ‚È‚¢B‚µ‚©‚µA”ß‚µ‚¢‚©‚ÈA
Haskell‚̉ðà‹LŽ–‚Æ“¯‚¶‚ÅA

* ‚í‚©‚él‚ɂ͂킩‚邪A
* ‚í‚©‚ç‚ñl‚ɂ͂Ȃé‚قǂ킩‚ç‚ñ

‚Æ‚¢‚¤‚¢‚‚à‚̃pƒ^[ƒ“‚ɂȂÁ‚Ä‚¢‚邯Žv‚¤B‰ðàˆÄŒ‚Ìh–½‚©‚à‚ËB

522 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2020/09/14(ŒŽ) 02:32:09.85 ID:TxRaIMAU.net]
>>=‚͉½‚Å‚·‚©H

523 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2020/09/14(ŒŽ) 02:44:47.64 ID:SnB9iMGf.net]
Œ—˜_‚í‚©‚ç‚ñ‚©‚ç‚È‚ñ‚à‚í‚©‚ç‚ñ

524 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2020/09/14(ŒŽ) 16:41:03.56 ID:TxRaIMAU.net]
Monad ‚Æ‚¢‚¤ŠT”O‚ª”Šw‚ÌŒ—˜_‚Ì Monad ‚©‚ç—ˆ‚é‚̂͂悭‰ðà‚ªŒ©‚‚©‚é‚ñ‚Å‚·‚ªAApplicative (àMonoidal) ‚ɂ‚¢‚Ă͔Šw‚©‚ç‚̈Ӗ¡•t‚¯‚ªŒ©‚‚©‚è‚Ü‚¹‚ñ
ƒRƒŒ”Šw“I‚ɂ͂Ȃñ‚È‚ñ‚Å‚·‚©H

525 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2020/09/14(ŒŽ) 23:29:35.74 ID:XfiH3m4/.net]
‚»‚̂܂܂¶‚á‚ñ@ƒAƒvƒŠƒJƒeƒBƒuƒtƒ@ƒ“ƒNƒ^[
‚È‚ñ‚¾‚©‚çA‚»‚̂܂ܓú–{Œê–ó‚ł悭‚Ë
‚‚܂èAŠÖŽè@ƒvƒƒOƒ‰ƒ}[‚ɂƂÁ‚ÄŽg‚¢‚â‚·‚­‚µ‚½‚¾‚¯

‚Æ‚±‚ë‚ÅAhApplicative (àMonoidal)h‚Ȃ̂©H
‚±‚Á‚¿‚Ì•û‚ª‚¢ˆÓ–¡•s–¾‚È‚ñ‚¾‚ª
ƒ‚ƒmƒCƒh‚Á‚ĈӖ¡‚È‚çAàƒ‚ƒiƒh@‚Ì•û

ƒ‚ƒiƒCƒh‘¥ƒ‚ƒmƒCƒh‘¥@ƒ‚ƒiƒh‚Ì•û‚ÍAŽ©ŒÈŠÖŽè‚Á‚ÄðŒ‚ª•t‚­‚¾‚¯

‚µ‚ç‚ñ‚¯‚Ç

526 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2020/09/15(‰Î) 00:17:11.21 ID:wUKRYY2O.net]
>>519
‚Ü‚¾Ž©•ª‚ŃnƒbƒLƒŠŠm‚©‚ß‚½‚킯‚¶‚á‚È‚¢‚ñ‚Å‚·‚¯‚Ç
Applicative ‚Æ Monoidal ‚Í“¯Œ^‚È‚ñ‚¾‚»‚¤‚Å‚·

https://qiita.com/Guvalif/items/7f893d9a078e03c9e425

‚Ü‚¾‚±‚Á‚¿‚͂ǂ¤‚¢‚¤ˆÓ–¡‚Åg“¯Œ^h‚ɂȂé‚Ì‚©‚í‚©‚Á‚Ă܂¹‚ñ‚¯‚Ç
”Šw“I‚ȈӖ¡‚Å‚ÌMonad‚͉pŒê‚Ìwiki‚ÉÚ‚µ‚­à–¾‚ªÚ‚Á‚Ăī
https://en.m.wikipedia.org/wiki/Monad_(category_theory)
‚±‚ÌFormal Definition‚ª‚Ü‚³‚ÉHaskell‚̃‚ƒiƒh‘¥‚ÉŒq‚ª‚Á‚Ä‚¢‚­‚̂͊m‚©‚߂܂µ‚½
–â‘è‚ÍApplicative‚ÍŒ—˜_‚̂ǂ̊T”O‚ÉŠY“–‚·‚é‚Ì‚©‚Ìà–¾‚ªƒTƒbƒpƒŠŒ©‚‚©‚ç‚È‚¢‚ñ‚Å‚·

527 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2020/09/15(‰Î) 02:19:25.61 ID:PObv6BQ8.net]
(a -> b) -> (m a -> m b)
m (a -> b) -> (m a -> m b)
(a -> m b) -> (m a -> m b)
‚±‚¢‚‚ç‚Í’†‰›‚Ì->‚ƶ‰E‚Ì->‚ð‹æ•Ê‚µ‚ĂȂ¢‚©‚甊w“I‚ȈӖ¡‚ªŒ©‚¦‚È‚¢

return‚Æjoin‚Í->‚ªˆê‚‚µ‚©‚È‚¢‚©‚ç–â‘è‚È‚¢‚ª



528 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2020/09/15(‰Î) 10:15:51.98 ID:TeSbfrM9.net]
>>521
‚»‚¤AHaskell‚ÌŒ—˜_‚ª‚ç‚݂̘b‚Í‚»‚Ìg™p‘ÎÛh(exponential object)‚ª—‚Þ‚Ì‚ª‚â‚₱‚µ‚¢
‚µ‚©‚µFunctor‚Í“–‘R‚Æ‚µ‚ÄMonad‚à™p‘ÎÛ‚ð—p‚¢‚È‚¢‚ÅŒ`Ž®‰»‚³‚ê‚Ä‚é(‚Æ‚¢‚¤‚æ‚èŒvŽZ˜_‚Ì¢ŠE‚ւ̉ž—p‚Ì‚¸‚Á‚ƈȑO‚©‚ç‚ ‚é)
Applicative(=Monoid?)‚͂ǂâ‚Ë‚ñ‚Æ‚¢‚¤˜b‚È‚ñ‚Å‚·
Œ—˜_‚Ì¢ŠE‚ł͂Ȃ©‚Á‚½‚à‚Ì‚ªŒvŽZ˜_‚Ì¢ŠE‚É“±“ü‚³‚ê‚Ä‚©‚çl‚¦o‚³‚ꂽ‚à‚ñ‚È‚ñ‚Å‚·‚©‚Ë‚¥H

529 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2020/09/16(…) 01:31:29.62 ID:yuR5T5xB.net]
strong lax monoical functor

530 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2020/09/16(…) 22:12:52.40 ID:CfmtxJKj.net]
ƒ‚ƒmƒCƒhŒ—‚Æ‚©ƒ‚ƒmƒCƒh‘ÎÛ‚Æ‚©‚ ‚ñ‚Ì‚¾‚¯‚ÇAƒ‚ƒmƒCƒh(ƒ‚ƒmƒCƒ_ƒ‹)ŠÖŽè‚Á‚Ä‚Ì‚à‚ ‚ñ‚Ì‚Ë

“ǂދC‚Í–³‚¢‚ñ‚¾‚¯‚ÇAƒAƒvƒŠƒJƒeƒBƒuŠÖŽè‚ƃ‚ƒmƒCƒ_ƒ‹‚w‚w‚ª“¯Œ^‚Á‚Ă͖̂³‚¢‚ÆŽv‚¤‚ª
‚Á‚Ä‚¨‚à‚Á‚½‚¯‚ÇAŠÖŽè“¯Žm‚È‚ñ‚¾‚©‚çA‚¢‚­‚‚©ðŒ‚‚¯‚ê‚΃‚ƒiƒh‚ƃ‚ƒmƒCƒh‚Ý‚½‚¢‚ÈŠÖŒW‚à‚ ‚肤‚é‚ñ‚©‚ÈH

‚ ‚Æ‚ÍAƒJƒ“Šg’£A”ºA••Õ«i‹ÉŒÀ‚¾‚Á‚¯Hj@‚ǂꂩ‚©‚瑊ŒÝ‚ɕϊ·o—ˆ‚邾‚Á‚¯H‚Ý‚½‚¢‚È‚à‚ñH

‚Ç‚¿‚ç‚É‚µ‚ëA’è‹`‚̘b‚Å–Ê”’‚݂͖³‚¢‚Ƃ͎v‚¤‚Ì‚¾‚ª

531 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2020/09/17(–Ø) 10:32:26.07 ID:2a8IoKJu.net]
Œ©‚‚¯‚½

https://qiita.com/Guvalif/items/7f893d9a078e03c9e425

‚±‚̃TƒCƒg‚Ìl‚ª‚܂Ƃ߂½pdf‚É‘‚¢‚Ä‚ ‚é
‚Ƃ͌¾‚Á‚Ä‚à‚â‚Í‚èclosed category‚͉¼’肵‚Ä‚é
‚â‚Á‚Ï‚èapplicative‚Ímonad‚ƈá‚Á‚Äg“à•”ƒzƒ€h‚ðŽ‚½‚È‚¢Œ—‚ł͒è‹`‚Å‚«‚È‚¢‚ñ‚¾‚ë‚È
g“à•”ƒzƒ€h‚à‚ÂŒ—‚Åmonoidal functor‚É<*>‚ð’è‹`‚·‚é‚̂͂í‚è‚ÆŠÈ’P‚¾‚¯‚Ç«
F(X) ~ F(Y^X)
¨F(X~Y^X) (coherence)
¨F(Y) (F(eval))
https://en.m.wikipedia.org/wiki/Monoidal_functor
pure‚ª‘S‘R‚Å‚«‚ñ‚È‚Ÿ‚ÆŽv‚Á‚Ä‚½‚çgstrongh‚Æ‚¢‚¤ðŒ‚©‚çpure‚ªì‚ê‚é‚ñ‚¾‚È
‚Ü‚ŸHaskell‚ÄŒ—‚̘b‚·‚邯‚«‚ÍHASK‚ÄŒ¾‚¦‚ê‚΂¢‚¢‚ñ‚¾‚©‚çƒRƒŒ‚ł킩‚Á‚½‚±‚Ƃɂµ‚æ

532 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ [2020/09/28(ŒŽ) 01:41:48.03 ID:0EuZ+v5t.net]
[Promise](https://developer.mozilla.org/ja/docs/Web/JavaScript/Reference/Global_Objects/Promise)
‚̬‚³‚¢—á‘è‚Ì[html](https://pastebin.com/yxSRyg2u)‚ðƒAƒbƒv‚µ‚½B
async/await‚ÍPromise‚Ì‚¨•‚¯•¶–@‚ɂȂÁ‚Ä‚¢‚邪A‚»‚ê‚͈µ‚Á‚Ä‚¢‚È‚¢BŽÀsŠÂ‹«‚ÍA
[RStudio](https://rstudio.com/products/rstudio/)‚©‚ç
[Node.js](https://nodejs.org/ja/)‚ðŒÄ‚Ño‚µ‚Ä‚¢‚éB

533 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ [2020/10/12(ŒŽ) 16:08:54.17 ID:Wx/lfAmjI]
’§í‚·‚é”nŽ­‚Æ‚µ‚Ķ‚«‚é‚©H”á”»‚¾‚¯‚·‚éŽG‹›‚Æ‚µ‚ÄŽ€‚Ê‚©H
https://www.youtube.com/watch?v=4jlQlo1oC3E
“z—êE‚ÉA‚­šŽ©‚ç“z—ê‚ð‘I‚ñ‚Å•s–ž‚ðŒ¾‚¤‹ð‚©‚³
https://www.youtube.com/watch?v=loD5ukKsZOk
ƒoƒJ‚Íéx‚³‚êÅ’á’À‹à‚ŃRƒLŽg‚í‚ê‚éš•¨‰¿‚Æ‚©ŠÖŒW‚È‚µ
https://www.youtube.com/watch?v=sQMrMfqdgrQ
•׋­‚µ‚È‚¢‚©‚ç“z—êl¶šŽÀ‹Æ‚Æl‚ðŽc‚·l¶“NŠw
https://www.youtube.com/watch?v=on2gURXi4Ks
³ŽÐˆõ“ÁŒ ‚ªuƒuƒ‰ƒbƒNŽÐˆõv‚ð¶‚Þš³ŽÐˆõ‚Í‘i‚¦•ú‘è
https://www.youtube.com/watch?v=lSW1vc8-qMg
u‚ÅA”NŽû‚ÍHv‚Æ•·‚­ƒoƒJ‚Ƃ͇‚í‚È‚¢ŽÐ’·‹Æ
https://www.youtube.com/watch?v=nEELEUhBLDk

534 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2020/10/14(…) 04:31:41.26 ID:+VLXbnA3.net]
>>20
ƒ[ƒhƒJƒEƒ“ƒg‚̃ƒWƒbƒN‚ª•sŽv‹c‚¿‚á‚ñ‚¾‚ÆŽv‚Á‚½‚¯‚ǃ[ƒh‚Ƌ󔒂̊֌W‚ª
"abc dd "‚Ý‚½‚¢‚Ès‹V‚ª—Ç‚¢‘Ž®‚¶‚á‚È‚¢‚Æ‚¾‚߂Ȃñ‚¾‚È
" "ˆê•¶ŽšƒXƒy[ƒX‚Ń[ƒh”‚ª1‚ɂȂÁ‚Ä‚µ‚Ü‚¤‚Ý‚½‚¢‚È
countFile :: String -> (Int, Int, Int)
countFile s =
let (cs, ws, ls, _) = foldl' go (0, 0, 0, False) s
in (cs, ws, ls)
where
go :: (Int, Int, Int, Bool) -> Char -> (Int, Int, Int, Bool)
go (cs, ws, ls, wasSpace) c =
let addLine | c == '\n' = 1
| otherwise = 0
addWord | wasSpace = 0
| isSpace c = 1
| otherwise = 0
in (cs + 1, ws + addWord, ls + addLine, isSpace c)

535 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ [2020/10/31(“y) 09:11:59.11 ID:UJYxitvT.net]
walk.northcol.org/haskell/adts/
>‘㔓Iƒf[ƒ^Œ^ialgebraic data typej‚Æ‚ÍC}‚̂悤‚É–Ø\‘¢‚Å•\Œ»‚³‚ê‚é’l‚©‚ç‚È‚éƒf[ƒ^Œ^‚Ì‚±‚Ƃł·D

•K‚¸–Ø\‘¢‚ÉŒÀ’肳‚ê‚é‚ñ‚¾‚낤‚©H
OOP‚ł̓IƒuƒWƒFƒNƒgƒOƒ‰ƒt‚ª‚ ‚èƒlƒbƒgƒ[ƒN‚ɂȂ肤‚邪A
Haskell‚Å‚Íâ‘΂ɖ؂Æl‚¦‚Ä—Ç‚¢‚ÌH

536 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2020/10/31(“y) 12:29:50.75 ID:cEs7BAmA.net]
‚¢‚¢‚ñ‚¶‚á‚È‚¢H
Œ^‚Ì‘S‘͕̂¶–¬Ž©—R•¶–@‚Å‹K’肳‚ê‚éƒNƒ‰ƒX‚¾‚©‚ç–Ø‚ɂȂéŠóƒKƒX

537 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ [2020/10/31(“y) 12:34:33.57 ID:fxcwqRC2.net]
‚±‚̖؂Ȃñ‚Ì–Ø‚«‚Ì‚±‚é–Ø



538 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2020/10/31(“y) 12:37:07.03 ID:CAmth+XY.net]
Œ©‚½‚±‚Æ‚à‚È‚¢–؂ł·‚©‚ç
“ÆŽ©ŽÀ‘•‚̃oƒO‚ªo‚é‚Å‚µ‚傤

539 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2020/10/31(“y) 13:17:41.17 ID:cEs7BAmA.net]
‚Å‚à‚æ‚­‚æ‚­l‚¦‚½‚çHaskell‚̃f[ƒ^Œ^‚Á‚Äu“WŠJ‚Å‚«‚é•\Œ»‚ª‚ЂƂ‚à‚È‚¢ƒf[ƒ^Œ^v‚à‚ ‚肤‚é‚ñ‚¾‚È
–³ŒÀ‚̖؂ɂȂé

data InfiniteSequence = IS {car :: Int, cdr :: InfiniteSequence}

arithSeq a d = IS a $ arithSeq (a+d) d

term 0 (IS x y) = x
term n (IS x y) = term (n-1) y

main = print $ term 10 $ arithSeq 5 3
----
53

540 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ [2020/10/31(“y) 13:26:01.44 ID:UJYxitvT.net]
Ä‹A“I‚ȃf[ƒ^Œ^‚̓Oƒ‰ƒt‚ɂł«‚é‚̂łÍH

541 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2020/10/31(“y) 13:37:30.03 ID:B0ELcd4k.net]
ÅI“I‚É–\‘–‚µ‚È‚¢‚Å“WŠJ‚ª’âŽ~‚·‚é‚à‚Ì‚¾‚¯‚ðƒf[ƒ^Œ^‚ƌĂԂȂ炻‚¤‚¾‚¯‚ÇAiterate (+4) 5 ‚Å‚·‚ç–³ŒÀ‚̖؂ɂȂÁ‚Ä‚µ‚Ü‚¤

542 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2020/10/31(“y) 21:13:27.13 ID:3k5Im+3l.net]
haskell‚Ì”z—ñ‚͑㔓Iƒf[ƒ^Œ^‚ł΂Ȃ¢‚Ì‚©H

543 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2020/10/31(“y) 22:07:18.29 ID:XiPKdEPZ.net]
foldr‚Ȃǂ̈ø”‚Ì‚±‚Æ‚ð‘㔓I‚ÆŒ¾‚Á‚Ä‚¢‚½‚悤‚È‹C‚ª‚·‚é
ˆø”‚Í(:)‚Æ[]‚Å‚à‚¢‚¢‚µ
(+)‚Æ0‚Å‚à‚¢‚¢

ˆø”‚ð“n‚·‚ÆŠÖ” [a] -> b ‚ª•Ô‚Á‚Ä‚­‚邪
‚±‚ê‚ÍŠÖ”‚Æ‚¢‚¤‚æ‚èOOP‚ÌŒp³ŠÖŒW‚̂悤‚ȈóÛ

544 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2020/10/31(“y) 22:34:53.43 ID:B0ELcd4k.net]
Haskell ‚̃f[ƒ^Œ^‚ÍÄ‹A‚ð‹–‚·‚©‚ç‚È
‚Ç‚¤‚µ‚Ä‚àuI’[‹L†(‘å•¶Žš‚©‚çŽn‚Ü‚éData constructet) ‚ð–Ø\‘¢‚É•À‚ׂ½‚à‚Ìv‚Æ‚¢‚¤à–¾‚ð‚µ‚½‚¢‚Ȃ疳ŒÀƒOƒ‰ƒt‚ðŽg‚í‚´‚é‚ð‚¦‚È‚¢

545 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ [2020/11/01(“ú) 07:14:51.56 ID:fIYIMdhR.net]
walk.northcol.org/haskell/lists/#_%E3%83%AA%E3%82%B9%E3%83%88%E3%81%AE%E7%95%B3%E8%BE%BC%E3%81%BF

‚Pjfoldr (+) 0 [1, 2, 3]
(+)‚ƃJƒbƒR‚ª‚‚­——R‚ÍH

‚Qjmap' f = foldr (\x a -> f x : a) []
x‚Í[]‚ÌŠe—v‘fHa‚͉½H

546 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2020/11/01(“ú) 08:58:44.92 ID:Srz4hpJo.net]
1)
walk.northcol.org/haskell/operators/#_%E4%B8%AD%E7%BD%AE%E3%81%A8%E5%89%8D%E7%BD%AE%E3%81%AE%E5%88%87%E3%82%8A%E6%9B%BF%E3%81%88

2)
‚±‚̂܂܂¾‚ƑΉž‚·‚é’l‚ª‘¶Ý‚µ‚È‚¢‚Ì‚ÅA­‚µ‘‚«Š·‚¦‚é
map' f xs = foldr (\x a -> f x : a) [] xs
x‚Íxs‚ÌŠe—v‘fAa‚ÍÅŒã‚Ì—v‘f‚Å‚Í[]‚ÅA
‚»‚êˆÈ‘O‚ÍŒã‚ë‚Ì—v‘f‚É(\x a -> f x : a)‚ð“K—p‚µ‚½Œ‹‰Ê

547 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2020/11/01(“ú) 09:15:58.91 ID:v6ASK7zT.net]
>>539
>
> ‚Pjfoldr (+) 0 [1, 2, 3]
> (+)‚ƃJƒbƒR‚ª‚‚­——R‚ÍH

+ ‚ª‚È‚¢‚Æ+‚Í’†’u‰‰ŽZŽq‚Å
(foldr + 0) [1, 2, 3]
‚ɂȂé
(+)‚ª‚ ‚邯•’ʂ̊֔‚Æ‚µ‚Äfoldr‚̈ö”‚Æ‚µ‚ĉðŽß‚³‚ê‚é

> ‚Qjmap' f = foldr (\x a -> f x : a) []
> x‚Í[]‚ÌŠe—v‘fHa‚͉½H

[]‚Ífoldr‚Ì‘æ3ˆö”‚Æ“¯‚¶Œ^‚Ì‹óW‡
a ‚Í–³–¼”Ÿ”(\x a -> f x : a)‚Ì‘æ2ˆö”
’è‹`‚É]‚Á‚Ämap' sin [] [5,6]] ‚͂킩‚è‚â‚·‚­(\x a -> sin x : a)‚ð’†’u‰‰ŽZŽq++++‚Å‘‚­‚Æ(‚·‚Ȃ킿x ++++ a = (sin x) : a‚Æ‚·‚邯)

map' sin [] [5,6]
= 5 ++++ ( 6 ++++ [] )
= 5 ++++ ( (sin 6) : [] )
= 5 ++++ [ (sin 6) ]
= [ (sin 5) : [ (sin 6) ]
= [ (sin 5) , (sin 6) ]

‚ƂȂé



548 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2020/11/01(“ú) 10:14:49.54 ID:1eMkmBeN.net]
ˆö”Hˆø”‚ł͂Ȃ­?
Haskell—pŒê‚Ȃ̂©‚È

549 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2020/11/01(“ú) 10:21:30.53 ID:Srz4hpJo.net]
1)
foldr + 0 [1,2,3]
‚Æ‘‚¢‚½ê‡Au+v‚æ‚èŠÖ”“K—p‚̂ق¤‚ª—D懈ʂª‚‚¢‚Ì‚ÅA
foldr + (0 [1,2,3])
‚ƉðŽß‚³‚ê‚éB
‚‚܂èA0‚Æ‚¢‚¤ŠÖ”‚ð[1,2,3]‚Æ‚¢‚¤ˆø”‚É“K—p‚µ‚½‚à‚Ì‚ÆAfoldr‚ð‘«‚µŽZ‚·‚邯‚¢‚¤ˆÓ–¡‚ƂȂé

2)
‹ï‘Ì—á
map' f [1,2,3] = foldr (\x a -> f x : a) [1,2,3]
3”Ô–Ú‚Ì’l
(\x a -> f x : a) 3 [] = f 3 : [] = [f 3]
2”Ô–Ú‚Ì’l
(\x a -> f x : a) 2 [f 3] = f 2 : [f 3] = [f 2, f 3]
1”Ô–Ú‚Ì’l
(\x a -> f x : a) 1 [f 2, f 3] = f 1 : [f 2, f 3] = [f 1, f 2, f 3]

550 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2020/11/01(“ú) 10:25:40.23 ID:Srz4hpJo.net]
‚¨‚Á‚ÆA‹ï‘Ì—á‚Ìufoldr (\x a -> f x : a) [1,2,3]v‚Í
ufoldr (\x a -> f x : a) [] [1,2,3]v‚ÌŒë‚è

551 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2020/11/01(“ú) 10:36:13.55 ID:B/d//mYI.net]
‚¢EEEˆø”

552 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2020/11/01(“ú) 10:54:46.55 ID:z/eHKN3/.net]
ˆø”‚Å‚·
orz
•’igˆö”h‚Ì•û‚ªŽg‚¤l‚Ȃ̂ł¤‚Á‚©‚肵‚½orz

553 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2020/11/01(“ú) 11:03:53.67 ID:93fSMn/e.net]
‚±EEEˆö”

554 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2020/11/01(“ú) 11:05:28.12 ID:z/eHKN3/.net]
‚±H

555 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2020/11/01(“ú) 11:11:25.51 ID:4+fLUvoM.net]
‚¾cˆö”

556 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2020/11/01(“ú) 12:57:34.37 ID:9/8GaKcH.net]
‚Ђ«‚·‚¤

557 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2020/11/01(“ú) 15:22:11.82 ID:N8AW169o.net]
ˆø”‚ðu‚Ђ«‚·‚¤v‚Ɠǂނ̂ÍA“¯‰¹ˆÙ‹`Œê‚Ƃ̬“¯‚ð”ð‚¯‚é‚½‚߂̊µ—p“ǂ݂¾‚ÆŽv‚Á‚Ä‚½
‰»Šwi‚΂¯‚ª‚­jA•@oi‚Ñ‚­‚¤j‚Ý‚½‚¢‚È



558 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ [2020/11/01(“ú) 15:24:45.41 ID:BdB3gM+x.net]
•Ԃ茌

559 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2020/11/01(“ú) 17:34:03.38 ID:S9fsJ+JS.net]
Parameter‚Æarguments‚̈Ⴂ‚ª‚æ‚­‚í‚©‚ç‚È‚¢

560 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2020/11/01(“ú) 17:44:50.76 ID:5aO2zs3I.net]
https://qiita.com/yuba/items/141bdb2df407ee37417f

‚¾‚Á‚Ä‚æ

561 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2020/11/01(“ú) 17:59:46.68 ID:S9fsJ+JS.net]
‚æ‚­‚í‚©‚ç‚ñ‚µˆê‚Á‚Ä‚±‚Æ‚©

562 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2020/11/02(ŒŽ) 00:43:34.64 ID:TnMF05Pn.net]
Ž¿–â‚Å‚·
‚±‚̃TƒCƒg‚ÅNum instance‚ðDeriving‚·‚é˜b‚ªo‚Ă܂µ‚½

https://qiita.com/HirotoShioi/items/8a6107434337b30ce457

ŽÀÛ‚±‚̃y[ƒW‚ÌŽŸ‚̃R[ƒh‚Í‚¤‚¿‚̊‹«‚Å‚à’Ê‚è‚Ü‚·
Haskell Online Compiler [ghc-8.4.4]
Copyright (c) The University of Glasgow

{-# LANGUAGE GeneralizedNewtypeDeriving #-}

newtype Quantity = Quantity Int
deriving (Eq, Ord, Num, Show)

a = Quantity 2
b = Quantity 6

totalQuantity :: Quantity
totalQuantity = a + b
-- Quantity 8

‚µ‚©‚µŽŸ‚Í’Ê‚è‚Ü‚¹‚ñ
’Ê‚·Ž–‚͂ł«‚Ü‚·‚©H

import Text.ParserCombinators.Parsec
import Text.Parsec (Parsec)

newtype ParserInt = PI (Parser Int) deriving (Num)

563 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2020/11/02(ŒŽ) 00:43:43.72 ID:TnMF05Pn.net]
---- ƒGƒ‰[ƒƒbƒZ[ƒW
Haskell Online Compiler [ghc-8.4.4]
Copyright (c) The University of Glasgow

Compiling your program...

[1 of 1] Compiling Main ( prog.hs, prog.o )

prog.hs:6:47: error:
• No instance for (Num (Parser Int))
arising from the 'deriving' clause of a data type declaration
Possible fix:
use a standalone 'deriving instance' declaration,
so you can specify the instance context yourself
• When deriving the instance for (Num ParserInt)
|
6 | newtype ParserInt = PI (Parser Int) deriving (Num)
| ^^^

564 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2020/11/02(ŒŽ) 21:44:04.17 ID:aBc5dqas.net]
‚±‚¤‚·‚è‚á–³—‚â‚è’Ê‚·‚±‚Ƃ͂ł«‚邯‚ÇA
‚»‚à‚»‚àƒp[ƒT“¯Žm‚Ì‘«‚µŽZ“™X‚łǂ¤“®‚¢‚Ä—~‚µ‚¢‚Ì‚©•ª‚©‚ç‚ñ‚©‚ç
‚܂Ƃà‚ȃCƒ“ƒXƒ^ƒ“ƒX錾‚ª‘‚¯‚ñ

{-# LANGUAGE FlexibleInstances #-}
instance Num (Parser Int) where
@x + y = x
@x * y = x
@abs x = x
@signum x = x
@negate x = x
@fromInteger n = return 0

565 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2020/11/02(ŒŽ) 23:56:16.57 ID:Zq9JUsOb.net]
>>558
Œ³‚͕ʃXƒŒ‚Éo‚Ä‚½–â‘è‚Å
u—^‚¦‚ç‚ꂽ•¶Žš—ñ‚Ì’†‚Ågtrick‚Æ"treath‚Ç‚Á‚¿‚ªæ‚Éo‚Ä‚­‚é‚©”»’肹‚æv
‚È‚ñ‚Å‚·
‚Ƃ肠‚¦‚¸parser‚ð—^‚¦‚éŠÖ”‚Æ‚µ‚Ä
makeP = mconcat . map ( manyTill anyChar . char )
‚łł«‚Ü‚µ‚½
ƒRƒŒ‚ð—Ⴆ‚Î"abc"‚Éapply‚·‚邯mtl = manyTillAac=anyChar‚Æ‚µ‚Ä
(mtl ac $ char 'a') <> (mtl ac $ char 'b') <> (mtl ac $ char 'c'>
‚Æ‚¢‚¤parser‚ɂȂèƒRƒŒ‚Éhiajklbcn‚Æ‚¢‚¤•¶Žš—ñ‚ðparse‚·‚邯hijkl‚Æabc‚ªoŒ»‚·‚é‚·‚é‚܂łɓǂݔò‚΂µ‚½•¶Žš—ñ‚ð•Ô‚µ‚Ä‚­‚ê‚Ü‚·
‚»‚ê‚Å‚¨‘è‚Ì“š‚¦‚Æ‚µ‚Äparse‚ÌŒ‹‰Ê‚ð
lastInd x s = case ( runParser ( makeP x ) () "" s ) of
Left _ -> ( [ 2, 0 ] , x )
Right y -> ( [ 0, length $ x ++ y ], x )
‚̂悤‚É‚µ‚Älength‚Å”‚¦‚½‚ñ‚Å‚·
‚µ‚©‚µ‚¿‚å‚Á‚Æç’·‚È‚©‚ñ‚¶‚ª‚µ‚Ü‚·
‚»‚à‚»‚à“ǂݔò‚΂µ‚½•¶Žš—ñ‚È‚ñ‚©—~‚µ‚¢‚킯‚ł͂Ȃ­“ǂݔò‚΂µ‚½•¶Žš”‚ª—~‚µ‚¢‚¾‚¯‚¾‚©‚ç‚Ù‚ñ‚Æ‚Í
Parser String Œ^‚ł͂Ȃ­—Ⴆ‚Î
length <$> ( manyTill anyChar ( char 'x')
‚Æ‚©‚ÌParser Int‚Å\•ª‚Å‚·
–â‘è‚̓RƒŒ‚ð‚Ç‚¤‚â‚Á‚ÄŒq‚°‚Ä‘˜a‚ð•Ô‚·ƒRƒ“ƒrƒl[ƒ^‚ðì‚낤‚©‚Æ‚¢‚¤‚Æ‚±‚ë‚È‚ñ‚Å‚·
Parser String‚ÍmonoidŒ^‚ðŽ‚Á‚Ä‚é‚Ì‚Åmconcatˆê”­‚ÅŒq‚°‚ç‚ê‚é‚ñ‚Å‚·‚ªParser Int‚ÍNumŽ‚Á‚ĂȂ¢‚Ì‚Åsumˆê”­‚ÅŒq‚°‚邯‚¢‚¤‚킯‚ɂ͂¢‚©‚È‚¢‚ñ‚Å‚·
‚È‚ñ‚Æ‚©‚Å‚«‚È‚¢‚©‚Æ’T‚µ‚Ä‚Ý‚é‚Æ‚È‚ñ‚©uNum‚ðderiving‚·‚év‚Æ‚¢‚¤‹LŽ–‚ðŒ©‚Â‚¯‚ÄA‚¨AƒRƒŒ‚Å‚¢‚¯‚È‚¢‚©‚ÆFX‚â‚Á‚Ă݂½‚ñ‚Å‚·‚ª‚â‚Í‚èParser Int‚Éderivingˆê”¯‚ÅNum“ü‚ê‚é•û–@Œ©‚‚©‚ç‚È‚­‚ĂȂñ‚Æ‚©‚È‚ç‚ñ‚à‚ñ‚©‚Æ

566 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2020/11/03(‰Î) 01:59:40.73 ID:WdkpFDBO.net]
‚í‚´‚í‚´Num‚̃Cƒ“ƒXƒ^ƒ“ƒX‚É‚µ‚È‚­‚Ä‚àA‚±‚ê‚Å‚¢‚¢‚̂łÍ
makeP = fmap sum . mapM ( fmap length . manyTill anyChar . char )

567 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2020/11/03(‰Î) 10:26:04.44 ID:qaG2IpUi.net]
>>560
‚¤‚ñA‚Ü‚Ÿ•Ê‚ÉNum‚̃Cƒ“ƒXƒ^ƒ“ƒX“ü‚ê‚È‚­‚Ä‚à‚±‚Ì–â‘è‚̘b‚¾‚¯‚Ȃ炢‚­‚ç‚Å‚à•û–@‚Í‚ ‚邯Žv‚¤‚ñ‚¾‚¯‚ÇA‚»‚à‚»‚àƒ‚ƒiƒh‚Á‚Ä‚à‚±‚¤‚¢‚¤Žž‚Ì‚½‚߂ɂ ‚é‚ñ‚¶‚á‚È‚¢‚Ì‚©‚ȂƎv‚Á‚Ä
—Ⴆ‚Î(+)‚È‚ç Num a,Functor f ‚̂Ƃ« Num (f a)‚ÍŽ©‘R‚ɂ͓±o‚Å‚«‚È‚¢A‚È‚º‚È‚ç fmap (+) ‚Í f a -> f ( a - > a ) ‚ɂȂÁ‚Ä‚µ‚Ü‚¤
‚µ‚©‚µ Applicative f ‚È‚ç lifaA2 (+) ‚ªƒsƒbƒ^ƒŠ f a -> f a -> f a ‚ɂȂÁ‚ÄŽ©‘R‚ɃLƒŒƒC‚É Num (f a) ‚ª“±o‚Å‚«‚é
‚¾‚©‚ç‚·‚²‚­—˜_“I‚ɂ͎©‘R‚Ȃ̂ɕû–@‚ª‚È‚¢‚͉̂½ŒÌ‚È‚ñ‚¾‚낤‚Æ
‚Æ‚¢‚¤‚©deriving (...) ‚Ì (...) ‚É‚©‚¯‚é‚â‚‚ƃ_ƒ‚Ȃ₂̊ª‚í‚©‚ç‚È‚¢
ŽÀ—p–{ˆÊ‚ł悭Žg‚¤‚â‚‚¾‚¯—pˆÓ‚³‚ê‚Ä‚é‚ɉ߂¬‚È‚¢‚Ì‚©‚ÈH



568 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2020/11/03(‰Î) 11:32:34.46 ID:WdkpFDBO.net]
ˆê‰žANum (f a)‚Í“±o‚Å‚«‚邯‚ÇA‚»‚ê‚Å’è‹`‚µ‚½(+)‚¾‚Æ
ŒðŠ·‘¥(x + y = y + x)‚ª¬‚è—§‚Â•ÛØ‚ª‚È‚¢‚©‚ç‚¶‚á‚È‚¢‚©‚Ë‚¥
(ƒp[ƒT‚̇”Ô‚ð“ü‚ê‘Ö‚¦‚½ê‡‚ðl‚¦‚邯‚í‚©‚è‚â‚·‚¢)

{-# LANGUAGE FlexibleInstances #-}
instance (Num a, Applicative f) => Num (f a) where
@x + y = (+) <$> x <*> y
@x * y = (*) <$> x <*> y
@abs x = abs <$> x
@signum x = signum <$> x
@negate x = negate <$> x
@fromInteger n = pure $ fromInteger n

569 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2020/11/03(‰Î) 11:50:57.17 ID:hn8kPJNe.net]
>>562
‚È‚é‚Ù‚ÇA•¶–@“I‚É’Ê‚Á‚Ä‚àˆÓ–¡“I‚É•¶–@‚É‚Ío‚Ä‚±‚È‚¢"Num rule"‚ª•âž‚³‚ê‚È‚¢‚©‚çƒ_ƒ‚Á‚ÄŽ–‚Ȃ̂©‚ÈH
‚Ü‚Ÿ¡‚Íclass‚̃ƒ“ƒoŠÖ”‚ÌŽ©•ª‚ª—˜—p‚·‚é‚â‚‚¾‚¯’è‹`‚·‚é•K—v–³‚­‚È‚Á‚½‚Ý‚½‚¢‚¾‚©‚çŽè‚Å‘‚¢‚Ä‚à‚¢‚¢‚ñ‚¾‚¯‚ÇA>>556‚̗Ⴞ‚Æ

newtype Eval a = Eval (ReaderT Env (ExceptT String Identity) a)
deriving (Functor, Applicative, Monad, MonadReader Env, MonadError String)

‚Æ‚©‚Ímonad translater‰z‚µ‚ɂł«‚邵

newtype Quantity = Quantity Int
deriving (Eq, Ord, Num, Show)

‚à‚Å‚«‚é‚̂ɂȂñ‚Å Parser (Int) ‚Í‚ ‚©‚ñ‚Ë‚ñ‚Æ
‚È‚ñ‚©ƒvƒ‰ƒNƒ}‚‚¯‚½‚ç‚¢‚¯‚ñ‚à‚ñ‚©‚Æ
Num ‚­‚ç‚¢‚Ȃ炢‚¢‚¯‚Ç Floating ‚Æ‚©‚¾‚ÆŽSŒ€‚ɂȂÁ‚Ä‚µ‚Ü‚¤

570 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2020/11/03(‰Î) 18:12:46.66 ID:oSP8TPsC.net]
‚±‚̘b‚Ì–Ê”’‚¢‚Æ‚±‚ë‚Í
Parser Int‚Æ‚¢‚¤Œ^‚ð錾‚·‚錾Œê‚Æ
‚»‚à‚»‚àŒ^‚ð錾‚µ‚È‚¢Œ¾Œê
‚Ç‚Á‚¿‚ª¶ŽY«‚‚¢‚©‚Á‚Ä‚±‚Æ‚¾‚æ

571 –¼‘OF!id:ignore mailto:sage [2020/11/06(‹à) 20:16:57.19 ID:uZSEyxFl.net]
stack‚­‚ñ‚³‚ŸAƒRƒ“ƒpƒCƒ‰‚̃_ƒEƒ“ƒ[ƒh‚ª200MB‹­‚ ‚é‚ñ‚¾‚©‚çA’ᑬ‰ñü‚Í“r’†‚ÅØ’f‚³‚ê‚邯‚©‚æ‚­‚ ‚è‚»‚¤‚È‚±‚Æ‚¶‚á‚ñ
ƒTƒXƒyƒ“ƒhEƒŒƒWƒ…[ƒ€‹@”\“‹Ú‚Í•K{‚¶‚á‚È‚¢‚Ì‚©‚Ë
‚«‚傤‚Ñyoutube-dl‚Å‚³‚¦Œü‚±‚¤‚ÉØ’fForbidden‚³‚ê‚Ăࡂ܂Ń_ƒEƒ“ƒ[ƒh‚µ‚½•ª‚ÍŽc‚Á‚Ä‚ÄAÄ“xƒ_ƒEƒ“ƒ[ƒh‚ðŠJŽn‚µ‚½Û‚ɂ͓r’†‚©‚çŽc‚è‚Ì•”•ª‚ðƒ_ƒEƒ“ƒ[ƒh‚·‚悤‚ÉŽn‚Ü‚é‚Á‚Ă̂ɂ³
‰¼‚É205.86 MiB / 205.87 MiB‚܂ŗˆ‚ÄØ’f‚³‚ꂽê‡
ƒŠƒgƒ‰ƒC‚·‚邯0 MiB / 205.87 MiB ‚©‚炾‚È‚ñ‚Ä‚¨ŒÝ‚¢•sK‚É‚È‚é‚ÆŽv‚í‚È‚¢‚Ì‚©H
‚±‚Á‚¿‚ͬŒ÷‚·‚é‚܂ʼni‰“‚ÉŒJ‚è•Ô‚·‚ñ‚¾‚¼H@‚Þ‚µ‚ë‚»‚Á‚¿‚Ì•û‚ª‚»‚¿‚ç‚ɂƂÁ‚Ä‚à–À˜f‚¶‚á‚ñ
‚»‚ê‚Æ‚à’ᑬ‰ñü‚ÍŽ€‚Ë‚Á‚Ä‚¢‚¤·•Ê“IŽv‘z‚ðŽ‚Á‚Ä‚¢‚é‚Ì‚©‚ËH

572 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2020/11/08(“ú) 11:31:57.94 ID:Bx8aZf2L.net]
ˆê•ûTeX‚ÍisoƒCƒ[ƒW‚ðŽg‚Á‚½

573 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2020/11/08(“ú) 13:05:47.79 .net]
ƒpƒ^[ƒ“ƒK[ƒh‚̕ϔ‚Ì‘©”›‚͋NJ“I‚Ȃ̂ł·‚ªA‘S‚Ä‚Ìꇂŋ¤’Ê‚µ‚ÄŽg—p‚µ‚Ăقµ‚¢‘©”›‚͂ǂ¤‚â‚è‚Ü‚·‚©H

574 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2020/11/09(ŒŽ) 01:15:49.21 ID:4MQyK7K1.net]
>>567
Ž¿–â‚̈Ӗ¡‚ª‚æ‚­•ª‚©‚ç‚È‚¢‚Ì‚¾‚ªAƒR[ƒh—á‚ðo‚¹‚éH
‚±‚ñ‚È•—‚É‘‚¯‚½‚ç‚¢‚¢‚Ì‚ÉA‚Ý‚½‚¢‚ÈB

575 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2020/11/09(ŒŽ) 19:55:38.03 .net]
rootsInternal :: Quadratic -> Double -> Roots

rootsInternal q d

@= let

@@@@two_a@@@= 2.0 * (a q)

@@@@realpart@@= - (b q) / two_a

@@@@dside d@@= (sqrt d) / two_a

@@@@dpart@@@= dside d

@@@@complexpart = dside (-d)

@@in if d==0

@@@@then@@@-- Discriminant is zero, (single) root is real

@@@@@@Root $ realpart :+ 0

@@@@else

@@@@if d<0

@@@@then@@@-- Discriminant is negative, roots are complex

@@@@@@Roots (realpart :+ complexpart) (realpart :+ (-complexpart))

@@@@else@@@-- Discriminant is positive, all roots are real

@@@@@@Roots ((realpart + dpart) :+ 0) ((realpart - dpart) :+ 0)


‚Ìlet ` in ‚Ý‚½‚¢‚Ȃ̂ð

rootsInternal q d
@|@d==0@@@= ...
@|@d<0@@@@= ...
@|@otherwise@= ...

‚Ý‚½‚¢‚È‘‚«•û‚ÌŽž‚É‚à‚â‚肽‚¢‚ñ‚Å‚·

576 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2020/11/09(ŒŽ) 19:58:42.43 .net]
‚¨‚Á‚Æ–³—p‚ȉüs‚ªˆêX“ü‚Á‚¿‚á‚Á‚½BBB

577 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2020/11/09(ŒŽ) 20:20:48.18 ID:UhW/CkjO.net]
>>569-570
where ‚Åo—ˆ‚È‚©‚Á‚½‚Á‚¯H‚¾‚ß‚¾‚Á‚½‚©‚ÈH



578 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2020/11/09(ŒŽ) 21:00:20.89 .net]
‚ A‚Å‚«‚Ü‚µ‚½B
‚¨‘›‚ª‚¹‚µ‚Ü‚µ‚½i////)

579 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2020/11/11(…) 19:20:13.76 ID:qheOKxfd.net]
³Ši•]‰¿‚ɂ‚¢‚ÄŽ¿–â‚Å‚·

‚ЂƂ‚̈ø”‚µ‚©‚È‚¢ŠÖ” f ‚ð³Ši•]‰¿‚·‚邯‚«‚É‚Í

f $! x

‚ł悢‚悤‚Å‚·‚ª2ˆø”‚Ìꇂ͂ǂ¤‚·‚é‚ñ‚Å‚·‚©H

( f $! x ) $! y

‚Å x, y ‚ðæ‚É“WŠJ‚µ‚Ä‚­‚ê‚Ü‚·‚©H
—Ç‚³‚°‚È‚ñ‚Å‚·‚ª‚Ç‚¤Šm‚©‚ß‚½‚à‚Ì‚â‚ç
‚È‚ñ‚©³Ši•]‰¿‚Æ’x‰„•]‰¿‚ÅŠi’i‚ÉŒvŽZ—Ê‚ª•Ï‚í‚é f ‚Ì—á‚Á‚Ä‚ ‚è‚Ü‚·‚©H

580 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2020/11/11(…) 21:38:04.29 ID:TR1bVb0l.net]
’x‰„•]‰¿‚ª‚È‚­‚Ä‚àGC‚̓ƒ‚ƒŠ‰ð•ú‚ð’x‚点‚Ä‚¢‚é
GC‚ð‚¢‚¶‚é‚É‚ÍIO‚ª•K—v

$!‚ðŽg‚¤‚̂ɂୂȂ­‚Æ‚àƒ‚ƒiƒh‚ª•K—v‚Æl‚¦‚é‚Ì‚ªŽ©‘R‚Ȃ̂łÍH
x' <- return $! x
y' <- return $! y
return $! (f x' y')

581 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2020/11/11(…) 22:07:05.86 ID:F87BSTFR.net]
>>574
‚»‚¤‚È‚ñ‚Å‚·‚©H
‚Ƃ肠‚¦‚¸ƒ‚ƒiƒh‚ÅŽŽ‚µ‚Ă݂܂·
“e‚É‚àŠp‚ɂೊi•]‰¿‚Æ’x‰„•]‰¿‚Å‚±‚ñ‚ȂɌvŽZ‚̉ñ”‚ªˆá‚Á‚Ä‚­‚é‚Á‚Ă̂Ȃñ‚©‚²‘¶’m‚È‚¢‚Å‚·‚©H
—Ⴆ‚Îdp‚Ì—á‚ÅFibonacci‚ð

f 0 = 0
f 1 = 1
f n = (f $ n-1) + (f $ n-2)

‚Æ

f' 0 = (0,1)
f' n = (a+b,a) where (a,b) = f' (n-1)
f = fst . f'

‚Å”ä‚ׂ邯–Ú‚ÉŒ©‚¦‚ÄŒvŽZ—Ê‚ªˆá‚¤‚Ý‚½‚¢‚È“z‚Åu³Ši•]‰¿‚ªŒø‚¢‚Ä‚év‚Á‚Ä–Ú‚ÉŒ©‚¦‚Ă킩‚邿‚¤‚ȗႪ‚ ‚邯‚ ‚肪‚½‚¢‚ñ‚Å‚·‚ª

582 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ [2020/11/12(–Ø) 14:57:12.09 ID:+Y5HOlnE.net]
³Ši•]‰¿‚Æ’x‰„•]‰¿‚ÅŒvŽZ—Ê‚ª•Ï‚í‚邯‚¢‚¦‚Îtarai‚¶‚á‚ËH

583 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2020/11/12(–Ø) 23:16:18.57 ID:G64JuFLE.net]
ۂɂȂé‚à‚̂ł¢‚¢‚¶‚á‚ñ

584 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2020/11/13(‹à) 06:27:56.29 ID:ewlhvLCU.net]
trace ‚â unsafePerformIO ‚Å•]‰¿‡‚𒲂ׂç‚ê‚È‚¢‚©‚È

585 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2020/11/13(‹à) 12:04:46.50 ID:oAmrFI5R.net]
‚݂Ȃ³‚ñî•ñ‚ ‚肪‚Æ‚¤‚²‚´‚¢‚Ü‚·
¡‚ñ‚Æ‚±ƒqƒ}‚ÈŽž‚É‚â‚Á‚Ă݂½ŽÀŒ»‚Í

cube x = x*x*x

a x = case x of
0 -> 0
1 -> 1
_ -> ( a $ x -1 ) + ( a $ x - 2 )

main = do
tA <- getCPUTime
print $ cube $ a 38
tB <- getCPUTime
print $ tB - tA

‚Æ

print $ cube $ a 38 ¨ print $ a 38

‚Ì”äŠr
Œ‹‰Ê
----
59722225363795389930809
3801127096000
----
39088169
3514055718000

‚±‚Ì’ö“x‚¾‚ƃRƒ“ƒpƒCƒ‰‚ªŸŽè‚Ƀƒ‚‰»‚µ‚Ä‚­‚ê‚邿‚¤‚Å·‚ª‚łȂ¢orz
‚Ü‚¾ƒ^ƒ‰ƒC‚Æ‚©‚ÍŽŽ‚µ‚ÄŒ©‚Ă܂¹‚ñ
Žæ‚è‹}‚¬‚²•ñ‚Ü‚Å

586 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2020/11/16(ŒŽ) 23:33:39.07 ID:bCg5e61i.net]
>>573
‚à‚¤‚Æ‚Á‚­‚É‰ðŒˆ‚µ‚½‚©‚à‚µ‚ê‚Ü‚¹‚ñ‚ªA•]‰¿‚̇‚Í trace ŠÖ”‚Å‚àŠm”F‚Å‚«‚Ü‚·B

import Debug.Trace

g :: Int -> Int -> Int
g x y = trace ("g") (x + y)

main :: IO ()
main = do
let a = trace ("a") 1
let b = trace ("b") 2
let c = (g $! a) $! b
putStrLn $ show c

‚±‚ê‚ðŽÀs‚·‚ê‚ÎAb a g 3 ‚̇‚Éo—Í‚³‚ê‚Ü‚·B
³Ši•]‰¿‚³‚ê‚Ä‚¢‚邯Œ¾‚¦‚Ü‚·B

‚¿‚Ȃ݂ÉA($!) ‚ð ($) ‚ɕς¦‚ê‚ÎAg a b 3 ‚̇‚Éo—Í‚³‚ê‚Ü‚·B

587 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2020/11/18(…) 01:05:30.21 ID:VzwFaHaO.net]
>>580
ƒCƒ„A‚Ü‚¾•±“¬’†‚Å‚·
‚¨‚§A‚»‚ñ‚ȕ֗˜‚È‚à‚Ì‚ª
Žg‚Á‚Ă݂܂·



588 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ [2020/11/21(“y) 23:31:14.57 ID:ak7brOTq.net]
Haskell‚̓‰ƒCƒuƒ‰ƒŠ‚Ì’†g‚ð”`‚­‚Æ
Template Haskell‚ð‹ìŽg‚µ‚½
ƒOƒbƒ`ƒƒƒOƒ`ƒƒ‚ÌŽÀŽ¿•ÊŒ¾Œê‚Ý‚½‚¢‚ȃR[ƒh‚ªƒUƒ‰‚Ȃ̂ª‚È‚ŸEEE
…–ʉº‚Ì”’’¹ó‘Ô‚¶‚á‚Ë[‚©

589 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2020/11/22(“ú) 16:59:26.57 ID:gt3QNmmg.net]
ƒSƒ~ƒ‰ƒCƒuƒ‰ƒŠŽg‚¤‚Ì‚â‚߂ėǂ¢‚â‚Âì‚Á‚ÄŒöŠJ‚µ‚Ä‚­‚ê

590 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2020/11/22(“ú) 17:19:45.03 ID:MRtbpg3I.net]
ÝŠw’†‚©ŠwZo‚½‚Ă̌oŒ±ó‚¢“z‚µ‚©’S‚¢Žè‚ª‚¢‚È‚¢‚Ì‚¾‚낤‚©‚ç‚»‚ñ‚È‚à‚ñ‚È‚ñ‚¾‚낤

ƒˆŠÖ”Œ^Œ¾Œê‚ÍŠw¶‚ª‚©‚©‚é‚Í‚µ‚©‚Ý‚½‚¢‚È‚à‚Ì‚Å
‚₪‚ÄŒvŽZ‹@‰ÈŠw‚ÌŒ»ó‚Éâ–]‚µ‹Ž‚Á‚Ă䂭
Œ»Ý‚̃Rƒ“ƒsƒ…[ƒ^[‚͎葱‚«Œ^‚ÉÅ“K‰»‚³‚ê‚Ä‚¢‚é‚Ì‚¾

591 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2020/11/22(“ú) 18:37:00.71 ID:36XuvgN2.net]
’Pƒ‚ÉŠÖ”Œ^Œ¾Œê‚ª‚í‚©‚él‚ª­‚È‚·‚¬‚é‚©‚ç‚¶‚á‚È‚¢‚ÌH

592 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2020/11/22(“ú) 20:14:41.06 .net]
‹”òŽÔ“}‚ÆU‚è”òŽÔ“}‚Ì“¬‚¢‚Í‘±‚­

593 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ [2020/11/22(“ú) 23:16:18.31 ID:b60g3zenS]
‚Ý‚¸‚Ù‚ªT‹x3“úE4“ú‚𓱓üA•›‹Æ‚àƒIƒbƒP[‚ÉI‚½‚¾‚µ‹‹—¿‚Í80“A60“‚ɉº‚ª‚邪A‚ ‚È‚½‚È‚ç‚Ç‚¤‚·‚éH
https://www.excite.co.jp/news/article/Jcast_kaisha_396186/
‚Ý‚¸‚ÙFG T‹x3`4“ú§“±“ü‚Ö VŒ^ƒRƒƒi‚Å“­‚«•ûŒ©’¼‚µ
https://www3.nhk.or.jp/news/html/20201006/k10012651181000.html
•›‹ÆOKŽž‘ãI‰SŽÒ‚Él‹C‚Ì•›‹Æ‚ðŽŽ‚µ‚Ă݂ÄcƒƒŠƒbƒgEƒfƒƒŠƒbƒg‚Æ‚Í
https://news.yahoo.co.jp/articles/2a38649705f3257595512daee1a073c231affc51
u˜J“­ŽžŠÔ‚ÌŒ©’¼‚µv‚Éæ•Ú‚ð‚‚¯‚½ ‚Ý‚¸‚ÙƒtƒBƒiƒ“ƒVƒƒƒ‹ƒOƒ‹[ƒv
https://blogos.com/article/490192/
‹‹—¿ƒ_ƒEƒ“‚ÌŠë‹@‚𕛋ƂŃJƒo[‚µ‚½‚¢c•›‹Æ‚µ‚Ä‚¢‚él‚͂ǂñ‚ÈŽdŽ–‚Å‚¢‚­‚ç‰Ò‚¢‚Å‚¢‚é‚ÌH
https://news.yahoo.co.jp/articles/e56796283f3e4feea64cb3042ea7b4d7c01714e4
•›‹Æ‚ð‰ïŽÐ‚É•ñ‚µ‚È‚¢——RTOP3A3ˆÊ‰ïŽÐ‚ª‹ÖŽ~‚µ‚Ä‚¢‚éA2ˆÊ’m‚³‚ê‚Ä‚¢‚È‚¢A1ˆÊ‚ÍH
https://dime.jp/genre/990902/
•›‹Æ”NŽû1‰­’´‚Ìmoto‚³‚ñ‚É•·‚¢‚½Iu–{‹Æv‚Ŭ‰Ê‚ðã‚°‚ÄŽ©•ª‚ÌŽsꉿ’l‚ð‚‚ß‚é•û–@
https://ddnavi.com/interview/679189/a/
ƒtƒŠ[ƒ‰ƒ“ƒXŒü‚¯•ñV‘¦“ú•¥‚¢ƒT[ƒrƒXwæ•¥‚¢x‚ª‘å‹K–ÍƒŠƒjƒ…[ƒAƒ‹‚µ³Ž®ƒŠƒŠ[ƒX
https://prtimes.jp/main/html/rd/p/000000042.000047439.html
‘“àÅ?‹‰I•›‹ÆEƒtƒŠ[ƒ‰ƒ“ƒXƒGƒ“ƒWƒjƒA‚É“Á‰»‚µ‚½AŽdŽ–’T‚µ‚Ì‹?ƒAƒvƒŠ
wdoocyJob(ƒh[ƒV[ƒWƒ‡ƒujxAiOS”ŃAƒvƒŠ‚ð2020”N10ŒŽ6“úi?jƒŠƒŠ[ƒX
https://prtimes.jp/main/html/rd/p/000000005.000038976.html

594 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2020/11/23(ŒŽ) 02:58:53.25 ID:v8DPq2Nr.net]
ƒCƒ„A‚Ü‚Ÿƒˆ‚É‘¬“x‚Æ‚©Œø—¦‚Æ‚©l‚¦‚½‚çŽè‘±‚«Œ^Œ¾Œê‚Ì•û‚ª—DˆÊ‚Ȃ̂͂»‚Ì’Ê‚è‚Å‚µ‚åH
‚¾‚Á‚ÄŒ»Ý‚ÌŒvŽZ‹@‚ªƒmƒCƒ}ƒ“Œ^‚̎葱‚«Œ^‚̈—‚ð‚·‚é‚½‚ß‚ÉÝŒv‚³‚ê‚Ä‚é‚ñ‚¾‚©‚ç
‚»‚è‚áƒoƒŠƒoƒŠ‚Ƀ`ƒ…[ƒjƒ“ƒO‚µ‚½‚çŽè‘±‚«Œ^Œ¾Œê‚É‚Íâ‘Ο‚ĂȂ¢

595 –¼‘OF
‚»‚ÌŽž‘㎞‘ã‚ÌÅV‚ÌŒvŽZ‹@‚Ì«”\‚ðƒtƒ‹Šˆ—p‚µ‚È‚¢‚Ƃł«‚È‚¢‚悤‚Ȉ—‚Í“––ÊŠÖ”Œ^Œ¾Œê‚Ìo”Ԃ͉ñ‚Á‚Ä‚±‚È‚¢
‚µ‚©‚µ‚»‚±‚܂ł̈—‚łȂ¢‚È‚ç‚â‚Í‚èŠÖ”Œ^Œ¾Œê‚ÌŠˆ–ô‚Å‚«‚éê–Ê‚ào‚Ă͂­‚邾‚낤‚¯‚ÇA‚µ‚©‚µ—Ⴆ‚»‚¤‚È‚Á‚½‚Æ‚µ‚Ä‚àŽè‘±‚«Œ^Œ¾Œê‚àŠÖ”Œ^Œ¾Œê‚à—¼•û—Õ‹@‰ž•ςɎg‚¢‚±‚È‚¹‚邿‚¤‚É‚È‚é‚Æ‚È‚é‚Æ’†X“‚¢‚©‚çAŒ‹‹Ç‚Ç‚¿‚ç‚©‘I‚Ô‚È‚çŽè‘±‚«Œ^Œ¾Œê‚Æ‚¢‚¤Ž–‚ɂȂÁ‚Ä‚µ‚Ü‚¤
‚µ‚΂炭‚ÍŠÖ”Œ^Œ¾Œê‚ªŽÀ–±‚Ìê–ʂŃoƒŠƒoƒŠŽg‚í‚ê‚邿‚¤‚ɂȂé‚̂͒†X“‚¢
“––ÊŒ¤‹†ŽÒ‚Æ‚©AƒTƒ“ƒf[ƒvƒƒOƒ‰ƒ}[‚ÌŽï–¡‚Ì¢ŠE‚Å‚µ‚©o”Ô‚È‚¢‚©‚à‚µ‚ê‚È‚¢
[]
[‚±‚±‰ó‚ê‚Ă܂·]

596 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2020/11/23(ŒŽ) 03:10:25.23 ID:i6Fa5mHr.net]
•À—ñ•Àsˆ—‚ðŒ^‚Å•\‚¹‚é•Ó‚èA‹­—͂Ȃñ‚¾‚¯‚ǂȂŸ

597 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2020/11/23(ŒŽ) 03:19:37.79 ID:vzAx9TtB.net]
Redit‚ðŒ©‚Ä‚é‚ÆAHaskeller‚Ì‹l‚àŒ‹\‚ ‚é‚ñ‚¾‚ª



598 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2020/11/23(ŒŽ) 12:02:25.91 ID:B9DSaA3p.net]
‹”òŽÔ‚ÆU‚è”òŽÔ‚Æ‚¢‚¤‚̂͊ë‹@Š´‚ª‘«‚è‚È‚¢
ƒKƒ\ƒŠƒ“ŽÔ‚Æ“d‹CŽ©“®ŽÔ‚¾
ŒÂl‚ÌAE‚¶‚á‚È‚­‚ĉïŽÐ‚ªŠÛ‚²‚ƒׂê‚郊ƒXƒN‚ð‘z’è‚·‚邽‚߂̌¤‹†‚¾‚æ

599 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2020/11/23(ŒŽ) 13:19:57.85 ID:XIoHPhIo.net]
ˆê‹å‚Å‚«‚½I

wŽŸ‚É—ˆ‚éx
Œ¾‚í‚ꑱ‚¯‚Ä
”\”N
i—ˆ‚È‚¢j

600 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2020/11/23(ŒŽ) 13:27:42.48 ID:izonrGpC.net]
‹ß–¢—ˆ
¡‚ƂȂÁ‚Ä‚Í
ŒÃL‚¢

601 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2020/11/23(ŒŽ) 13:29:17.88 ID:XIoHPhIo.net]
>>593
‚¢‚¢‚ËI

602 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2020/11/23(ŒŽ) 14:40:17.74 ID:B9DSaA3p.net]
V‚µ‚¢‚È‚ñ‚ĉR‚‚­‚æ‚èŒÃ‚¢‚à‚̂͌¢‚à‚̂Ƃµ‚Ĉµ‚¤—ðŽj‚âŒÃ•¶‚Ì•û‚ª³‚µ‚¢

603 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2020/11/23(ŒŽ) 20:51:18.66 .net]
ŠÖ”Œ^Œ¾Œê‚ðˆ—‚·‚邽‚ß‚ÉÝŒv‚³‚ꂽƒRƒ“ƒsƒ…[ƒ^‚Á‚Ăǂñ‚È\‘¢‚È‚ñ‚¾‚ë

604 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2020/11/23(ŒŽ) 21:33:53.00 ID:B9DSaA3p.net]
‚Ý‚ñ‚È‚ª”ŠwD‚«‚ÅŽ©ŒÈŒ[”­Œ™‚¢‚Ȃ͈̂—‘¬“x‚¶‚á‚È‚­‚Ä
‰R‚ð‚‚©‚È‚¢‚©‚Ç‚¤‚©‚Ì–â‘è

605 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2020/11/24(‰Î) 01:11:11.02 ID:wCic/rFb.net]
>>596
LISPƒ}ƒVƒ“‚Æ‚¢‚¤‚à‚Ì‚ª‚©‚‚Ă ‚è‚Ü‚µ‚½‚È‚ 

606 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2020/11/24(‰Î) 03:49:22.53 ID:EBaS3Lgi.net]
JAVAƒ`ƒbƒv‚ªŽÀŒ»‚³‚ê‚Ä‚ê‚΃Xƒ^ƒbƒNƒ}ƒVƒ“‚¾‚©‚çFORTHÅ‹­‚¾‚Á‚½‚̂łÍ

607 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2020/11/24(‰Î) 21:00:48.17 ID:BgPUrN9t.net]
‘¬“x‚ÍŽÀ‚Í‚»‚±‚Ü‚Åd—v‚¶‚á‚È‚¢
”òs‹@‚©‚烃“ƒeƒiƒ“ƒXƒnƒbƒ`Žæ‚蜂¢‚ĉ½kgŒy—ʉ»‚µ‚Ü‚µ‚½‚Á‚ÄŒ¾‚Á‚½‚Æ‚±‚ë‚ÅAŽdŽ–D‚«’è—Ê•]‰¿D‚«‚Ȃɂ킩‚ªA‚í‚©‚è‚â‚·‚¢”ŽšŒ©‚ÄŠì‚Ô‚¾‚¯‚ÅAŽÀÛ‚Í‚»‚ñ‚ÈŠð‚µ‚¢˜b‚¶‚á‚È‚¢
‚Æ‚¢‚¤‚©‚»‚à‚»‚à‚à‚Á‚Æ’x‚¢ƒXƒNƒŠƒvƒgŒ¾Œê‚Í—¬s‚Á‚Ă邵



608 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2020/11/24(‰Î) 21:12:41.51 .net]
Haskell ‚ŃQ[ƒ€ŠJ”­‚µ‚½‚¢‚ñ‚Å‚·‚ª
FRP ‚ÍŽ€–Å‚µ‚¿‚á‚Á‚½‚ÌH

609 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2020/11/24(‰Î) 21:44:37.33 ID:2dUwtFIm.net]
>>601
Ž€–ł̈Ӗ¡‚ª‚æ‚­•ª‚©‚ç‚ñ‚ªA–â‘è‚È‚­Žg‚¦‚éB
stackage‚É‚à‚ ‚é‚Å‚µ‚åB

‚»‚ê‚Í‚»‚¤‚ÆA‚È‚ñ‚ʼn‚ß‚©‚ç“‚¢FRP‚ðŽg‚¨‚¤‚Æ‚·‚é‚ÌH
•’ʂɑf’¼‚ÉÝŒv‚µ‚Äì‚Á‚Ă݂ê‚΂¢‚¢‚Ì‚ÉB

610 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2020/11/30(ŒŽ) 15:39:12.43 ID:nSv/4rn0.net]
bind‰‰ŽZŽq‚Ì–¼‘O‚Ì—R—ˆ‚Á‚ĂȂÉH
‚È‚É‚à‘©”›‚µ‚ĂȂ­‚ËH

611 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2020/11/30(ŒŽ) 17:26:29.13 ID:+w97lXkL.net]
a >>= b
‚ªdo‹L–@‚Å
do
x <- a
b x
‚Ý‚½‚¢‚ɂȂ邩‚ç‚¶‚á‚ËH

612 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2020/11/30(ŒŽ) 21:06:13.38 ID:qo5X+4ip.net]
(>>) ‚±‚ê‚à bind ‚ÆŒ¾‚¤‚æ

613 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ [2020/12/02(…) 00:25:53.39 ID:E6FeESB6.net]
‚±‚±‚Å•·‚¢‚Ä‚¢‚¢‚Ì‚©‚í‚©‚ç‚È‚¢‚¯‚Çc
Nix‚Ì‚¢‚¢ƒ`ƒ…[ƒgƒŠƒAƒ‹‚Æ‚©‚Á‚Ä‚ ‚éH

614 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2020/12/04(‹à) 21:16:59.61 ID:kdWDDBYk.net]
‚±‚ê‚Æ‚©‚Ç‚¤H

https://github.com/Gabriel439/haskell-nix

615 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ [2020/12/05(“y) 12:39:37.62 ID:Na39OKS5.net]
ƒuƒƒO‘‚¢‚Ä‚½‚ç”Þ—‚Æ–³—¿‚ÅŠCŠO—¯Šw‚Æ‚¢‚¤–¼‚̃f[ƒg‚És‚¯‚½˜by‰e‹¿—Í‚â‚΂¢z
https://www.youtube.com/watch?v=Y8Q1z3Mi7BQ
Žá‚¢‚¤‚¿‚©‚çl‚ðŒÙ‚Á‚½‚èA”C‚¹‚éƒNƒZ‚ð‚‚¯‚é‚ׂ«——R‚Æ‚ÍH
https://www.youtube.com/watch?v=6yAvDQxhldI
y‘Î’kzƒCƒ“ƒtƒ‹ƒGƒ“ƒT[ƒ}[ƒPƒeƒBƒ“ƒO‚É300–œ‰~“Ë‚Áž‚ñ‚ł݂½Œ‹‰Ê...
https://www.youtube.com/watch?v=AMjWD0F8PLQ
Žû“ü‚ðã‚°‚½‚¯‚ê‚ÎAŽ©•ª‚̉e•ªg‚ðì‚é‚ׂµ
https://www.youtube.com/watch?v=V3Kc-lUxH88
•׋­‚Ì‚½‚ß‚É10“úŠÔ‚Å21ŒÂ‚̃AƒvƒŠ‚ðì‚Á‚½˜by‰SŽÒŽž‚̃vƒƒOƒ‰ƒ~ƒ“ƒOŠwKz
https://www.youtube.com/watch?v=JkN5kmR9dgk
ŠwZ‚ł͋³‚¦‚Ä‚­‚ê‚È‚¢‚±‚Ƃ̒†‚ɂ͂¨•󂪖°‚Á‚Ä‚¢‚é
https://www.youtube.com/watch?v=oq92u9nJ7FY
ƒuƒƒK[‚©‚çƒXƒeƒbƒvƒAƒbƒv‚µ‚Ä‚¢‚­‚½‚߂ɕK—v‚ȃXƒLƒ‹
https://www.youtube.com/watch?v=F6qsOyRIaQE

616 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ [2020/12/05(“y) 23:01:31.80 ID:gIoCKCst.net]
>>607
‚·‚²‚¢—Ç‚³‚°B‚ ‚肪‚Æ‚¤

617 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2020/12/05(“y) 23:45:36.72 ID:gZAhFzLL.net]
>>608
‚·‚²‚¢—Ç‚³‚°B‚ ‚肪‚Æ‚¤



618 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2020/12/06(“ú) 02:18:39.34 ID:HA18eG30.net]
>>608
ƒOƒ

619 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ [2020/12/08(‰Î) 09:15:41.98 ID:VKXi32Vk.net]
ŽÀÛ‚É‚¿‚å‚Á‚Æ‚µ‚½ƒvƒƒOƒ‰ƒ€‘‚¢‚Ä‚Ý‚é‚Æ
ƒƒ‚ƒŠŽü‚è‚ÌÅ“K‰»‚ª¢“ï‚È‚ñ‚¾‚æ‚È‚±‚ÌŒ¾ŒêB

‚µ‚©‚àÅ“K‰»‚Ì•ûŒü«‚ªƒAƒ‹ƒSƒŠƒYƒ€‚̉ü—ǂł͂Ȃ­
Œ¾Œê“Á—L‚̃{ƒgƒ‹ƒlƒbƒN‚̉ñ”ð‚ªƒƒCƒ“‚ɂȂ邩‚ç
ƒR[ƒh‚ðŒ©‚Ä‚àÅ“K‰»‚̈Ó}‚ª•ª‚©‚è‚É‚­‚­‚Ä
ˆêŒ©–³‘Ê‚Éç’·‚É‹Lq‚µ‚Ă邾‚¯‚ÉŒ©‚¦‚éƒR[ƒh‚ªo—ˆã‚ª‚éB

620 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2020/12/08(‰Î) 11:08:46.52 ID:EAPrHNYX.net]
Å“K‰»‚̈Ó}‚È‚ñ‚ÄPython‚Æ“¯‚¶‚Å‚¢‚¢
ƒ‰ƒCƒuƒ‰ƒŠ‚Í‘S•”C‚Å‘‚¢‚Ämain‚¾‚¯Haskell‚Å‘‚¯

621 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2020/12/08(‰Î) 12:02:52.73 ID:mZ7rlOd+.net]
ˆêŽžŠú‚ ‚ñ‚ȂɃ‚ƒiƒh‚Ì‹LŽ–‚Æ‚©‘‚©‚ê‚Ü‚­‚Á‚½‚Ì‚ÉAŋ߷‚èオ‚è‚ÉŒ‡‚¯‚é
Haskell»ƒAƒvƒŠ‚àŠé‹Æ‚ªÌ—p‚µ‚½‚Á‚Ęb‚à‚Ù‚Æ‚ñ‚Ç•·‚©‚È‚¢‚¯‚ÇA‹C‚Ì‚¹‚¢H
ë‚Á‚½‚Æ‚±‚ë‚ÅŽg‚í‚ê‚Ä‚é‚ñ‚©‚È

622 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2020/12/08(‰Î) 13:07:23.14 ID:EAPrHNYX.net]
Œ¾ŒêŠÖŒW‚È‚­Šé‹Æ‚ªì‚Á‚½ƒAƒvƒŠ‚𔃂Á‚½‚±‚Æ‚ª‚Ù‚Æ‚ñ‚ǂȂ¢
ŒÂl‚ª‘‚¢‚½–{‚𔃂¤‚±‚Ƃ͂ ‚é

623 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2020/12/08(‰Î) 13:30:45.48 ID:xvXTXIvz.net]
‚Ü‚Ÿ‚È‚ñ‚¾‚©‚ñ‚¾Haskell‚ÍŽÀ—p«‚Æ‚¢‚¤‚æ‚èA‚â‚͂蔊wŒ¤‹†‚̈êŠÑ‚ÌF‡‚¢‚ª‹­‚¢‚©‚ç‚È‚Ÿ

624 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2020/12/08(‰Î) 13:52:48.29 ID:CqCSsxMG.net]
ˆêŠÂ‚Å‚ÍH
”Šw‚Ì‘O‚É‘Œê‚ÌŒ¤‹†‚ð‚µ‚½‚Ù‚¤‚ª‚æ‚¢‚̂łÍH

625 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2020/12/08(‰Î) 15:02:11.16 ID:xvXTXIvz.net]
‚¨‘O‚͂܂¸Ž©•ª‚ÌlŠÔ«‚ðŒ©’¼‚¹
ø‚è‚¶‚á‚È‚­ƒ}ƒW‚Å

626 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2020/12/09(…) 01:52:25.38 ID:6n7tUtuW.net]
HaskellŽ©‘͖̂ʔ’‚­‚Ä–{‚â‹LŽ–‚à“ǂނ¯‚ÇA‚È‚ñ‚©‘‚­‹C‹N‚«‚È‚¢‚ñ‚¾‚æ‚È
‚Å‚à‘¼‚ÌŒ¾Œê‚ÅŠÖ”Œ^—R—ˆ‚Ì‹@”\‚ª’ljÁ‚³‚ꂽ‚Æ‚«‚Éu‚ A‚±‚êHaskell‚Å‚â‚Á‚½‚Æ‚±‚낾Iv‚Á‚ĂȂê‚é

627 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ [2020/12/17(–Ø) 17:53:27.84 ID:9eI2x+Uu.net]
Haskell‚Åx = x + 1‚ðIORefŽg‚킸‹[Ž—“I‚ÉÄŒ»B
(ŽÀۂɂ͑ã“ü‚ł͖³‚­AŒ‹‰Ê‚ðƒ‰ƒ€ƒ_Ž®‚Ì“¯–¼‚̕ϔ‚É“n‚µ‚Ă邾‚¯)

main = do let x = 0
print x
x <- inc x
print x
x <- inc x
print x

inc n = return (n + 1)

ƒ‚ƒiƒhŽ®‚Ì‘‚«•û‚¾‚Æ‚±‚¤‚È‚éB

main = do let x = 0 in print x >> inc x >>= \x -> print x >> inc x >>= \x -> print x

inc n = return (n + 1)

‚³‚ç‚É>>=‰‰ŽZŽq‚ð()‚ň͂ñ‚ÅŠÖ”‚É‚·‚邯‚±‚¤‚È‚éB

main = (>>=) ((>>=) (do let x = 0 in print x >> inc x) (\x -> print x >> inc x)) (\x -> print x)

inc n = return (n + 1)



628 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ [2020/12/17(–Ø) 17:53:45.49 ID:9eI2x+Uu.net]
ƒ‚ƒiƒh–³‚µ‚¾‚¯‚ÇAC‚ÅÄŒ»‚·‚邯‚±‚ñ‚ÈŠ´‚¶B(ƒXƒ^ƒbƒNÁ”ï‚·‚邯‚Ç)

#include <stdio.h>

int inc(const int);
int f(const int);

int main(void)
{
const int x = 0;
printf("%d\n",f(f(x)));
return 0;
}

int inc(const int x)
{
return (x + 1);
}

int f(const int x)
{
printf("%d\n",x);
return inc(x);
}

629 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2020/12/18(‹à) 19:59:30.35 ID:PXMujPNr.net]
–Ú“I‚ªŽÀ—p‚¾‚낤‚ªŒ¤‹†‚¾‚낤‚ªIORef‚ÍŽg‚Á‚Ä‚¢‚¢‚¼
IORef‚ÍŽè’i‚Ȃ̂ÅA‹ï‘Ì“I‚È–Ú“I‚Ɉˑ¶‚µ‚È‚¢

630 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ [2020/12/19(“y) 08:53:57.33 ID:56QZYgov.net]
‹CŽ‚¿‚͂悭‚í‚©‚éBŽ©•ª‚à‰‚ß‚ÄdoŽ®‚Ì’è‹`‚ðŒ©‚½ŽžA‚¨‚§‚§‚§‚ƂȂÁ‚½B
‚Æ‚¢‚¤‚킯‚ÅA‚¢‚ÂdoŽ®ƒpƒ‰ƒ_ƒCƒX‚ª“oꂵ‚½‚Ì‚©ƒAƒqƒ‹‘ÌŒ±‚µ‚Ă݂½B
[When was do-notation introduced?](https://www.reddit.com/r/haskell/comments/8rkrgq/)

> Haskell 1.3 adopted Jonesfs gdo-notation,h which was itself derived
from John Launchburyfs paper on lazy imperative programming (Launchbury, 1993).

Ž©•ª‚Ìê‡AHaskell‚ð’m‚é‘O‚ÉAMoggi‘åæ¶‚̘_•¶‘ÌŒ±‚ðˆêŒ‚‚Å”s‘Þ‚µ‚½Žž‚É
‚¨‚§‚§‚§‚µ‚½Šo‚¦‚ª‚ ‚éB

* Notions of computation and monads
in [Eugenio Moggi Publications](https://person.dibris.unige.it/moggi-eugenio/publications.html)

@‹³ã‚Ì——R‚ÅAƒV[ƒPƒ“ƒg}‚ª‘‚©‚ꂽ‘•¨‘ÌŒ±‚͂ł«‚È‚¢‚ªAK‚¢‚È‚±‚Æ‚ÉA
ʼn‚̃V[ƒPƒ“ƒg}‚ÉdoŽ®‚炵‚«‚à‚Ì‚ª‘‚¢‚Ä‚ ‚éBƒiƒE‚ȃ„ƒ“ƒO‚ÌŒ¾—t‚Å‚Í
ŽŸ‚̂悤‚É‚È‚é‚ÆŽv‚¤B

``` haskell
kleisli_extension :: (Monad t) => (a -> t b) -> (t a -> t b)
kleisli_extension f c = do
x <- c
f x
```

¡‚à˜_•¶‚ɉ½‚ª‘‚©‚ê‚Ä‚¢‚é‚©‚í‚©‚ç‚È‚¢‚ªA‚»‚ÌŽž‚ÍA<em>‚¨‚§‚§‚§A
ƒvƒƒOƒ‰ƒ~ƒ“ƒOŒ¾Œê‚Á‚Ä”Šw“I‚É‘¨‚¦‚ç‚ê‚é‚ñ‚¾</em>‘ÌŒ±‚ð‚µ‚½‹L‰¯‚ª‚ ‚éB
ˆê”Ê‚ÉAކã‚̃vƒƒOƒ‰ƒ~ƒ“ƒOŒ¾Œê‚ÆŽÀ“­‚·‚é‚à‚̂Ƃ̊Ԃɂ͖œ•¨‚Ì’·é‚ª
‚ ‚é‚Ì‚ÅAHaskell‚ÌdoŽ®‚à‚·‚²‚¢”­–¾‚ÆŽv‚¤‚ªA‚»‚Ì‹Z–@‚ÌœŽq‚ÍAŠù‚É
[“¯Žž‘½”­“I](https://www.youtube.com/watch?v=FMmCJ6-uu3M)‚É”­Œ©‚³‚ê‚Ä
‚¢‚½‚Ì‚©‚à‚µ‚ê‚È‚¢B—ðŽjŠGŠª‘ÌŒ±‚Å‚ÍA
[A History of Haskell](https://misreading.chat/2020/10/27/)‚à–Ê”’‚©‚Á‚½B

631 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ [2020/12/20(“ú) 18:18:16.88 ID:FMam64CT.net]
ƒlƒ^‚ð”qŽØ‚µ‚ÄAŽŸ‚̃R[ƒh‚ðl‚¦‚éB

``` haskell
inc :: (Applicative f) => Int -> f Int
inc n = pure (n + 1)

lhs :: (Int -> () -> String) -> Int -> IO String
lhs dump x = do
y <- inc x
z <- print y
pure $ dump y z

rhs :: (Int -> () -> String) -> Int -> IO String
rhs dump x = inc x >>= \y -> dump y <$> print y

lhs ((.) show . (,)) 123 >>= print
rhs ((.) show . (,)) 123 >>= print

lhs (const . const "hello") 123 >>= print
rhs (const . const "hello") 123 >>= print
```

632 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ [2020/12/20(“ú) 18:18:58.94 ID:FMam64CT.net]
IOƒ‚ƒiƒh‚ðP“™ƒ‚ƒiƒh‚É·‚µ‘Ö‚¦‚ÄAR‚ɈÚA‚·‚éB

``` {r raskell}
do = pure = id = function (a) a;
const = function (a) function (ab) a;
`%.%` = function (bc, ab) function (a) bc (ab (a));
`%$%` = function (ab, a) ab (a);
`%>>%` = function (a, ab) ab (a);

inc = function (n) n + 1;
caty = function (a) cat (a, "\n", sep = "");

lhs = function (dump) function (x) do ({
y <- inc (x);
z <- caty (y);
pure %$% dump (y) (z);
});

rhs = function (dump) function (x) {
inc (x) %>>% (function (y) dump (y) %$% caty (y));
};

lhs (function (y) function (z) list (y, z)) (123) %>>% print
rhs (function (y) function (z) list (y, z)) (123) %>>% print

lhs (const %.% const ("hello")) (123) %>>% print;
rhs (const %.% const ("hello")) (123) %>>% print;
```

R‚ÍŠÖ”‚̈ø”‚ð–ⓚ–³—p‚É’x‰„•]‰¿‚·‚é‚Ì‚ÅAÅŒã‚Ì`rhs`‚¾‚¯‚ªHaskell‚Æ
ˆÙ‚Ȃ铮ì‚ð‚·‚éBR‚Ì’x‰„•]‰¿‚Ì—á‚Æ‚µ‚Ă͔ώG‰ß‚¬‚邪AHaskell‚ÌIOƒ‚ƒiƒh
‚ƃTƒCƒhƒoƒCƒTƒCƒh‚É”äŠr‚Å‚«‚é—á‚ɂȂÁ‚Ä‚¢‚éB

633 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/01/05(‰Î) 09:39:14.86 ID:b/Fw/Z0P.net]
‚Ó‚ÆŽv‚Á‚½B

aŒ^‚Ì2ŽŸŒ³”z—ñ‚ª•K—v‚ɂȂÁ‚½ŽžA
[[a]] ‚â Array (Int, Int) a ‚ł͂Ȃ­A
(Int, Int) -> a ‚ª^‚Áæ‚ÉŽv‚¢•‚‚©‚Ô‚È‚çA
‚»‚¢‚‚͊֔Œ^‚ɂǂÁ‚Õ‚èƒnƒ}‚Á‚Ä‚é‚ÈA‚ÆB

634 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ [2021/01/08(‹à) 14:54:16.81 ID:QDat+Qoy.net]
ŠÖ”Œ^‚Í•À—ñˆ—‚É‹­‚¢‚Æ‚¢‚¤˜b‚ð•·‚­‚¯‚Ç
fpga‚Ì‚ˆÊ‡¬‚ªCŒ¾Œê‚Ås‚í‚ê‚Ä‚¢‚é——R‚͉½‚Å‚·‚©H

haskell‚ł̂ˆÊ‡¬‚âgpgpu‚͂ǂ¤‚È‚Á‚Ä‚¢‚Ü‚·‚©H
ŽÀ—p‚³‚ê‚Ä‚¢‚Ü‚·‚©H

635 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ [2021/01/08(‹à) 15:09:45.01 ID:QDat+Qoy.net]
Haskell‚Ìl‹C‚͉¡‚΂¢‚Ü‚½‚͉º~‹C–¡B
‚È‚º–¢—ˆ‚Å‚ ‚é‚Í‚¸‚ÌHaskell‚ͨ‚¢‚ðŽ‚½‚È‚¢H
ŽÀÛŽg‚Á‚Ä‚él’B‚̈óۂ͂ǂ¤‚È‚ÌH

https://www.reddit.com/r/haskell/comments/iaxx7x/thoughts_on_how_to_measure_haskells_popularity/
https://trends.google.com/trends/explore?q=%2Fm%2F03j_q&date=all#TIMESERIES
https://insights.stackoverflow.com/trends?tags=haskell

636 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ [2021/01/08(‹à) 15:22:31.00 ID:QDat+Qoy.net]
Haskell‚̓AƒJƒfƒ~ƒbƒN‚ÈŒ¾Œê‚¾‚Á‚Ä‚¢‚¤‚¯‚Ç
ƒAƒJƒfƒ~ƒbƒN‚Èl‚ª‚â‚邱‚Æ‚ª‘½‚¢‹@ŠBŠwK‚ÅPython‚ªL‚Ñ‚½
•À—ñˆ—‚É‹­‚¢‚È‚ç‹@ŠBŠwK‚Ìs—ñˆ—‚ªHaskell‚Ås‚í‚ê‚Ä‚à—Ç‚©‚Á‚½‚ñ‚¶‚á‚È‚¢‚ÌH

637 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/01/08(‹à) 18:33:26.91 ID:rDTYcDTI.net]
Haskell‚Í•Às•À—ñ‚ðŠy‚É‘‚¯‚é‚̂ł ‚Á‚Ä‘¬‚­‘‚­‚̂Ɍü‚¢‚Ä‚¢‚é‚킯‚ł͂Ȃ¢i–Å’ƒ‹ê’ƒŒü‚¢‚Ä‚¢‚È‚¢–ó‚Å‚à‚È‚¢‚ªƒn[ƒhƒEƒFƒA‚ɋ߂¢‘g‚ɂ͑¬“x‚ÅŸ‚‚̂͑å•Ïj
‚»‚µ‚ÄDNN‚Í“à•”ˆ—‚ªƒeƒ“ƒ\ƒ‹‰‰ŽZ‚Å‚±‚»‚ ‚邯‚ǃCƒ“ƒ^[ƒtƒFƒCƒX‚Å‚»‚±‚܂łނ«o‚µ‚̃eƒ“ƒ\ƒ‹‰‰ŽZ‚ð‚·‚é‚̂͑½‚­‚È‚¢

‚Ȃɂæ‚èƒAƒJƒfƒ~ƒbƒN‚͈ꖇŠâ‚ł͂Ȃ­“–‘RFX•‚ªL‚­‚Ä
Haskell‚ªƒAƒJƒfƒ~ƒbƒN‚ƌĂ΂ê‚銈Ȃ͌¾Œêˆ—Œn‚âŒ^—˜_A‚»‚ÌŽÀ‘•‚Ì•ª–ì
•Às•À—ñ‚ªŠy‚É‘‚¯‚é‚Á‚Ă̂͂»‚Ì—¬‚ê‚©‚ç‚­‚éAŠÖ”‚̃ˆ«‚ƃ\ƒtƒgƒEƒFƒAƒgƒ‰ƒ“ƒUƒNƒVƒ‡ƒiƒ‹ƒƒ‚ƒŠ‚̬‰Ê
‹@ŠBŠwKŒn‚ÌŒ¹—¬‚ɂȂé“à‚̉摜ˆ—Œn‚Å‚ÍC++‚âmatlab‚ªA“ŒvŒn‚ÍR‚âmatlab‚ªŽg‚í‚ê‚Ä‚Änumpy‚Æ‹¤‚É™X‚ÉPython‚ɈÚs‚µ‚Ä‚«‚½
‚¿‚å‚Á‚Ɖº‚̃ŒƒCƒ„[‚ÌBLAS‚âƒVƒ~ƒ…ƒŒ[ƒVƒ‡ƒ“‚Å‚ÍC++‚ÆFortranAŒã‚ÉGPGPU‚̓ơê‚Å¡‚Å‚ÍPython‚©‚çŒÄ‚΂ê‚éŒ`‚ÅŽg‚í‚ê‚Ä‚é–ó‚¾



638 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/01/09(“y) 00:06:52.64 ID:cFb9Tw8T.net]
‹@ŠBŠwK‚͂ǂÁ‚Õ‚èHŠw•ª–삾‚©‚çƒAƒJƒfƒ~ƒbƒN‚Æ‚¢‚¤ˆóÛ‚Í­‚È‚¢ƒCƒ[ƒW‚ ‚邪

639 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ [2021/01/09(“y) 16:47:47.44 ID:gjIQ6YZR.net]
haskell‚ɂ‚¢‚Ä’²‚ׂĂé‚ñ‚¾‚¯‚Ç
ŠÖ”‚̇¬‚ÍŠÖ”A‚̕Ԓl‚ÆŠÖ”B‚̈ø”‚ÌŒ^‚ªˆê’v‚·‚邯‚©‚ÌðŒ‚ª•K—vH
‰ðà‹LŽ–‚ÉuŠÖ”‚̓tƒ@ƒ“ƒNƒ^‚Å‚·v‚Æ‚©‘‚©‚ê‚Ä‚é‚ñ‚¾‚¯‚Ç
”CˆÓ‚ÌŠÖ”‚ð‡¬‚Å‚«‚é‚킯‚¶‚á‚È‚¢‚æ‚ËH

640 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/01/09(“y) 17:24:37.63 ID:Xoihvk5Y.net]
>>632
ŠÖ”‡¬‚̃VƒOƒlƒ`ƒƒ‚ðŒ©‚ê‚Εª‚©‚é
(.) :: (b -> c) -> (a -> b) -> a -> c
"b‚©‚çc‚Ö‚ÌŠÖ”"‚Æ"a‚©‚çb‚Ö‚ÌŠÖ”"‚ðŽó‚¯Žæ‚èA"a‚©‚çc‚Ö‚ÌŠÖ”"‚ð•Ô‚·ŠÖ”‚ªŠÖ”‡¬

641 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/01/10(“ú) 13:23:32.27 ID:/oGn2fPm.net]
EFunctor‚Í‚ŠKƒJƒCƒ“ƒh‚̃Nƒ‰ƒX‚Å‚·
E“ñ•Ï”‚ÌŒ^\’zŽq(->)‚ð•”•ª“K—p‚µ‚½‚à‚Ì‚ªFunctor‚̃Cƒ“ƒXƒ^ƒ“ƒX‚ɂȂè‚Ü‚·
‚±‚Ìà–¾‚ðÈ—ª‚µ‚½‚çˆÓ–¡‚ª‚í‚©‚ç‚È‚¢‚æ‚Ë

642 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ [2021/01/11(ŒŽ) 01:34:20.58 ID:OwjnhqSv.net]
’´‘åì‰ß‚¬‚邯‚Ç

[Entropy and Diversity](https://golem.ph.utexas.edu/category/2020/12/entropy_and_diversity_on_the_a.html)

643 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ [2021/01/11(ŒŽ) 11:54:49.85 ID:TrSsUTEh.net]
>>632
ŠÖ”‡¬‰Â”\«‚̘b‚ÆŠÖ”‚ªŠÖŽè‚Å‚ ‚邱‚Ƃ͑S‚­ŠÖŒW‚È‚¢‚¼

644 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ [2021/01/11(ŒŽ) 13:43:32.73 ID:nJc/cTVc.net]
Haskell@@@@Œ—˜_
=====================
ŠÖ”@@@@@@ŽË
Functor@@@@ŠÖŽè
Reader r @@@HomŠÖŽè

645 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ [2021/01/11(ŒŽ) 16:14:02.10 ID:nJc/cTVc.net]
H–{I‚¦‚½‚­‚ç‚¢‚̉SŽÒ‚ªA’†‹‰ã‹‰‚»‚êˆÈã‚ð–ÚŽw‚·‚½‚߂̃[ƒhƒ}ƒbƒv‚Á‚Ä‘å‘Ì‚±‚ñ‚ÈŠ´‚¶H
‚킽‚µ‚Í‘S•”ƒ}ƒXƒ^[‚µ‚½‚킯‚¶‚á‚È‚­‚ÄAŠEŒG‚ł悭•·‚­‚̂łȂñ‚©d—v‚»‚¤‚­‚ç‚¢‚̃mƒŠw

’†‹‰
EFreeƒ‚ƒiƒh
EProfunctor optics
EƒRƒ‚ƒiƒh
ECustom Prelude

㋉
EŒ^ƒŒƒxƒ‹ƒvƒƒOƒ‰ƒ~ƒ“ƒO
EExtensible Effects
EIndexed Monads
ETemplate Haskell

646 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/01/11(ŒŽ) 23:19:18.98 ID:N3ahWSVP.net]
‚Ü‚¸‰½‚æ‚èæ‚ÉƒAƒvƒŠì‚낤‚æB
æl‚½‚¿‚̓AƒvƒŠ‚ðì‚è‚Ü‚­‚é‰ß’ö‚ÅA
–𗧂ƒeƒNƒjƒbƒN‚âŠT”O‚ð•Ò‚Ýo‚µ‚Ä‚«‚½‚Ì‚¾‚©‚çB

647 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/01/12(‰Î) 00:18:20.62 ID:5J1t5Bxr.net]
Haskel‚Œ‚Í“NŠw‚Å‚ ‚èA“NŠw‚©‚ç‚͉½‚à¶‚Ü‚ê‚È‚¢



648 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ [2021/01/12(‰Î) 01:04:23.78 ID:exO7rD20.net]
>>639
‚±‚±‚ł̖â‘è‚ÍHaskell‚Ì“Sl‚ɂȂ邽‚߂̃[ƒhƒ}ƒbƒv‚Å‚ ‚Á‚ÄA
Haskell‚ŃAƒvƒŠ‚ðì‚ê‚邿‚¤‚ɂȂ邽‚߂̃[ƒhƒ}ƒbƒv‚ł͂Ȃ¢

649 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/01/12(‰Î) 01:51:40.85 ID:pX8tczV2.net]
>>641
‚»‚¤‚©A—]Œv‚ÈŽ–‚¾‚Á‚½A‚·‚܂Ȃ¢

650 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/01/12(‰Î) 09:05:11.74 ID:IiGdAufF.net]
“NŠw‚©‚ç‚Í–@‚ª¶‚Ü‚ê‚Ü‚·‚ªc

651 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/01/12(‰Î) 10:08:30.41 ID:fccMRI32.net]
‰½‚©‚ð¶‚܂Ȃ¯‚ê‚΂Ȃç‚È‚¢‚Æ‚¢‚¤‚͓̂¹“¿‚©H
‚»‚Ì“¹“¿‚©‚ç‘S‚Ä‚ªŽn‚Ü‚é‚Ì‚©

652 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/01/13(…) 04:05:16.97 ID:A4IGUr+p.net]
ƒIƒ^ƒN‚Ì‚±‚¤‚¢‚¤‰ï˜bƒNƒ\ƒLƒ‚‚¢

653 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/01/13(…) 10:09:05.37 ID:o5CAyZYI.net]
ƒLƒ‚‚¢‚Æ‚¢‚¤Š´î‚©‚ç
Š´î‚Æ’m«‚Ì•ª’f‚ª¶‚Ü‚ê‚é

654 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/01/13(…) 10:21:18.95 ID:8kUJEegp.net]
Haskell ‚ŃJƒbƒR‚æ‚­‘¬‚¢ƒvƒƒOƒ‰ƒ€‘‚«‚½‚¢‚ñ‚Å‚·‚ªA‚Ç‚¤Œ¾‚¤•ª–삪Œü‚¢‚Ă܂·‚©H

655 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/01/13(…) 21:12:21.98 ID:DinE+zFR.net]
>>647
ƒpƒYƒ‹ƒ\ƒ‹ƒo[

656 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/01/13(…) 22:41:38.73 ID:CNkC++cr.net]
Š´î‚Íæ“üŠÏ‚©‚ç¶‚¶
æ“üŠÏ‚ðŽ•ž‚·‚邱‚ƂŒm«‚ÉŽŠ‚é

657 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/01/14(–Ø) 00:13:44.79 ID:JY+VfWVO.net]
‚Å‚àæ“üŠÏ‚̃ƒŠƒbƒg‚̓Xƒs[ƒh‚¾‚©‚ç
‘¬“x‚ÌÅ“K‰»‚Ý‚½‚¢‚ÈŒš‘O‚ð—pˆÓ‚·‚ê‚Î’m«‚Æ’m«‚̑Γ™‚ÈŠÖŒW‚ɂ͂Ȃé

Œš‘O‚̓Lƒ‚‚¢‚Æ‚©–{‰¹‚ªƒJƒbƒRƒCƒC‚Æ‚©Œ¾‚¢o‚³‚È‚¢ŒÀ‚è



658 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/01/14(–Ø) 07:11:45.05 ID:UC/QgsCt.net]
Š´î‚Ì‚½‚߂̒m«‚ªHŠw
’m«‚Ì‚½‚߂̒m«‚ª—Šw

659 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/01/14(–Ø) 08:24:32.45 ID:mp+NLhBe.net]
‚È‚ñ‚©‚₽‚çƒ|ƒGƒ€‚ð‘‚«‚½‚ª‚郌ƒX‚ª‘‚¦‚½‚È

660 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/01/14(–Ø) 10:42:33.32 ID:ApYxPV7C.net]
‰¹‚⃊ƒYƒ€‚ðƒfƒUƒCƒ“‚µ‚Ä‚é‚Ì‚©
‰¹“ǂł«‚È‚¢Œ¾•¶•sˆê’vŒ¾Œê‚ª‚ ‚ê‚ÎAƒfƒUƒCƒ“‚Ƙ_—“I\‘¢‚𕪗£‚Å‚«‚»‚¤

661 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ [2021/01/15(‹à) 04:12:13.96 ID:NAFJshBl.net]
‚±‚êˆÓŒ©Š„‚ê‚Ă邯‚ǂǂÁ‚¿‚ª³‚µ‚¢‚ÌH
—LޝŽÒ”ŒN‚Ì‚²ˆÓŒ©‚ðŽf‚¢‚½‚¢
https://www.quora.com/Is-functional-programming-most-likely-to-survive-transitions-to-different-CPU-architectures-like-post-von-neumann-ones

662 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/01/15(‹à) 10:43:33.32 ID:l3Q+U92p.net]
ŠÖ”Œ^‚ðM‚¶‚邯‚¢‚¤‚æ‚èƒIƒuƒWƒFƒNƒgŽwŒü‚ð‹^‚¤‚ׂ«
ƒIƒuƒWƒFƒNƒgŠÔ‚Ì’ÊM‚ª‚½‚¾‚ÌŠÖ”ŒÄ‚Ño‚µ‚©‚çŒy—ʃXƒŒƒbƒh‚ɕςí‚Á‚½‚ç‚Ç‚¤‚Ȃ邩“™

663 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/01/15(‹à) 20:09:59.52 ID:SSKXVcKf.net]
>>655
d‚½‚­‚È‚éB

664 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/01/16(“y) 10:01:48.97 ID:fPN57ROF.net]
fixŠÖ”‚Í least-defined ‚È•s“®“_‚ðŒ©‚Â‚¯‚é‚»‚¤‚¾‚¯‚ÇA
‚±‚Ì least-defined ‚Á‚Ăǂ¤‚¢‚¤ˆÓ–¡H

665 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/01/16(“y) 10:43:22.09 ID:lq2o0P8I.net]
‚¨‚ê‚Ìæ“üŠÏ‚É‚æ‚邯ƒ|ƒCƒ“ƒ^‚ÌzŠÂ‚ÌŽüŠú‚ªÅ¬

666 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/01/20(…) 07:45:01.78 ID:0A31ygkk.net]
‘½•ª‚Å‚«‚È‚¢‚ñ‚¾‚낤‚ȂƎv‚¢‚‚Ž¿–â‚Å‚·
‚ ‚éƒy[ƒW‚Å—”‚ð‚¢‚Á‚Ï‚¢’²’B‚·‚é•û–@‚Å‚±‚ñ‚Ȃ̂ ‚è‚Ü‚µ‚½

randIntsList = let
getOne rec = ( return . ( : rec ) )
=<< ( randomIO :: IO Int )
in iterate ( >>= getOne ) ( return [ ] )

main = do
a <- ( return . head ) =<< randIntsList !! 100
print a

ƒRƒŒ‚Í‚à‚¿‚ë‚ñ‚¤‚Ü‚­s‚«‚Ü‚µ‚½
‚Å‚àƒRƒŒ‚¿‚å‚Á‚Æ•s–ù‰õ‚Å‚·
IO [ Int ] ‚Æ‚©‚ŗႦ‚Î

randInts :: IO [ Int ]
randInts = do
hd <- ( randomIO :: IO Int )
tl <- randInts
return $ hd : tl

main = do
a <- ( return . head ) =<< randInts
print a

‚Æ‚©‚Å‚ ‚ç‚©‚¶‚ߎg‚¤”‚ðŽw’肵‚È‚¢‚ÅD‚«‚È‚¾‚¯‚Æ‚Á‚Ä‚­‚邯‚©‚Å‚«‚È‚¢‚à‚ñ‚Å‚µ‚傤‚©H
ã‚Ì‚ÍGHC‚ÅŽQÆ‚·‚邯ŽÀsŽžƒGƒ‰[o‚Ü‚·

667 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/01/20(…) 14:24:39.71 ID:7SUaJKsz.net]
‚‚¢‚³‚Á‚«ŠÖ”“IƒvƒƒOƒ‰ƒ~ƒ“ƒO‚̘b‘肵‚Ä‚½‚ª
‚â‚Á‚Ï‚è’Ê‚¶‚È‚¢‚È

ŠÖ”H‚»‚è‚áŠÖ”‚­‚ç‚¢•’ʂɑ‚­‚æ‚Ëw
•›ì—pH•K—v‚È‚ço‚È‚¢‚悤‚É‘‚¯‚΂¢‚¢‚ñ‚¶‚á‚È‚¢‚ÌH‚Ç‚¤‚Å‚à‚æ‚­‚È‚¢H
ƒˆŠÖ”‚Ìl‚¦•ûH‚»‚ñ‚Ȃ̂¢‚ç‚È‚¢‚æ‚Ëw
•”•ª“K—pH¡‚܂ł»‚ñ‚Ȃ̕K—v‚ɂȂÁ‚½‚±‚ƂȂ¢‚È‚ w ‚»‚ñ‚Ȃ̉½‚ÉŽg‚¤‚ñ‚¾H

‚Ü‚ Œ¾‚í‚ê‚Ă݂ê‚Î’N‚ɂłà‚í‚©‚邿‚¤‚È—˜“_‚ð’ñަ‚Å‚«‚È‚¢‚Á‚Ă̂͊m‚©‚É‚ ‚邪EE
—˜“_‚ª‚È‚¢‚È‚çD‚݂͈̔͂ŕЕt‚¯‚ç‚ê‚¿‚á‚Á‚½‚È



668 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/01/20(…) 15:57:32.54 ID:ztk5BuHj.net]
‚¢‚ç‚È‚¢‚ÆŽv‚¤l‚ÍŽg‚í‚È‚¯‚ê‚΂¢‚¢‚µ‹C‚É‚µ‚È‚¯‚ê‚΂¢‚¢‚Á‚Ä‚¾‚¯‚¾‚æ‚Ë

669 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/01/20(…) 16:39:30.61 ID:IzsyJlfZ.net]
>>659
‚±‚ê‚łǂ¤‚©‚ÈH
randInts2 :: [IO Int]
randInts2 =
iterate ( >>= const (randomIO :: IO Int) ) (randomIO :: IO Int)
main :: IO ()
main = do
a <- head randInts2
print a

670 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/01/20(…) 17:07:44.96 ID:aAR5bcpB.net]
>>660
‚¢‚í‚ê‚Ă݂ê‚ÎhaskellG‚é‚܂ł±‚¤‚¢‚¤“Á’¥‚ª‹ƒ‚­‚Ù‚Ç‚¤‚ꂵ‚¢‚È‚ñ‚ÄŽv‚Á‚ĂȂ©‚Á‚½‚È‚Ÿcc

671 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/01/20(…) 17:39:40.94 ID:kKr2IDUq.net]
>>660
—˜“_‚ð’ñަ‚Á‚Ä‚¢‚¤‚©Lisp‚ÆHaskell‚̈Ⴂ‚ð’ñަ‚·‚é•K—v‚ª‚ ‚é
Lisp‚Ì—˜“_‚ðÄŒ»‚·‚邾‚¯‚È‚çPython‚Å\•ª‚È‹C‚ª‚·‚é

‚µ‚©‚µHaskell‚ðÄŒ»‚Å‚«‚é‚à‚Ì‚ª‚Ü‚¾o‚Ä‚±‚È‚¢
‚»‚ê‚ÍŠÖ”Œ^‚¶‚á‚È‚­‚ÄÓIŒ^‚Ìà–¾‚ð‚µ‚È‚¢‚ƈӖ¡‚ª•ª‚©‚ç‚È‚¢‚ÆŽv‚¤‚¯‚Ç

672 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/01/20(…) 18:38:17.88 ID:apYLuAz7.net]
>>662
‚ ‚肪‚Æ‚¤‚²‚´‚¢‚Ü‚·
‚»‚¤‚È‚ñ‚Å‚·
¡‚̂Ƃ±‚ë‚»‚ꂵ‚©‰ðŒˆô‚È‚¢‚ñ‚Å‚·
‚µ‚©‚µŠó–]‚Å‚Í IO [ Int ] ‚Å‚ ‚Á‚Ä—~‚µ‚¢‚ñ‚Å‚·
ƒCƒ[ƒW‚Æ‚µ‚Ă͂±‚¤‚Å‚·
‚ ‚éŠÖ” f ‚ª‚ ‚Á‚Ä—”‚Å‹““®‚ª•Ï‚í‚Á‚Ä—~‚µ‚¢
‚à‚¿‚ë‚ñÅI“I‚É‚ÍIOƒ‚ƒiƒh‚ðŽg‚í‚È‚¢‚Æ‚µ‚傤‚ª‚È‚¢
‚µ‚©‚µFX‚¢‚¶‚Á‚Ä‚é’iŠK‚ł̓‚ƒiƒh”킹‚È‚¢‚Å‘ã‚í‚è‚É‹[Ž——”–³ŒÀ”z—ñ psuedRand :: [ Int ] ‚Ý‚½‚¢‚Ȃ̂ðH‚킹‚Ä

f a b c psuedRand

‚Ý‚½‚¢‚ɌĂÑo‚µ‚ÄFXŠæ’£‚Á‚ÄAÅŒã‚ÌÅŒã‚ÉIOƒ‚ƒiƒh‚ÅŽÀ’n‚É

@( return . f a b c ) =<< realRand

‚ÉØ‚è‘Ö‚¦‚é‚Ý‚½‚¢‚ÈŽ–‚ª‚Å‚«‚È‚¢‚©‚ȂƎv‚Á‚½‚ñ‚Å‚·
f ‚ªŽg—p‚·‚é—”‚ª‚ ‚é’ö“x‚í‚©‚é‚̂ŕʂɖ³ŒÀ—ñ‚łȂ­‚Ä‚à‚¢‚¢‚Á‚¿‚á‚¢‚¢‚ñ‚Å‚·‚¯‚Ç
¡ˆê•àƒ‚ƒiƒh‚É•ï‚Ü‚ê‚Ä‚éŠÖ”‚¢‚Á‚Ï‚¢o‚Ä‚­‚é‚ÌD‚«‚¶‚á‚È‚¢‚ñ‚Å‚·‚æ
’ʂ̃zƒ€ƒy‚Æ‚©Œ©‚Ă邯‚Þ‚µ‚ëƒoƒ“ƒoƒ“ƒ‚ƒiƒh‚Å‚­‚é‚ñ‚Ç‚¢‚½•û‚ª‚¢‚¢‚Ý‚½‚¢‚Ȃ̂à‚Ý‚é‚ñ‚Å‚·‚¯‚ǂ˂¥

673 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/01/20(…) 18:57:39.14 ID:IzsyJlfZ.net]
>>665
‚»‚¤‚Ȃ̂©‚ B
‚·‚܂Ȃ¢A‰´‚ł͕͗s‘«‚̂悤‚¾B

674 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/01/20(…) 19:04:15.17 ID:apYLuAz7.net]
>>666
‚¢‚¦‚¢‚¦A‚ ‚肪‚Æ‚¤‚²‚´‚¢‚Ü‚·
l‚¦‚Ä‚¢‚½‚¾‚¢‚ÄŠ´ŽÓ‚Å‚·🙏

675 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/01/20(…) 20:02:19.54 ID:kKr2IDUq.net]
head‚âtail‚Ì–ß‚è’l‚ÌŒ^‚ÍIO‚ł͂Ȃ¢‚Á‚Ä錾‚µ‚Ă邩‚ç
ƒŠƒXƒgˆ—’†‚ÉrandomIO‚ª‚Å‚«‚È‚©‚Á‚½‚Æ‚µ‚Ä‚à•sŽv‹c‚ł͂Ȃ¢
Œ^‚ð錾‚·‚é‚Á‚Ä‚»‚¤‚¢‚¤‚±‚Æ‚æ

676 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/01/20(…) 21:15:09.40 ID:jArj32vs.net]
>>665
‚â‚肽‚¢Ž–‚Ì–{Ž¿‚ª‚¢‚Ü‚¢‚¿•ª‚©‚è‚Ü‚¹‚ñB
2“_Šm”F‚µ‚Ü‚·B

‚ЂƂ‚ßB
Œ‹‹Ç‚̂Ƃ±‚ë¡‚Í [a] Œ^‚Ì—”‚ð•Ô‚·ŠÖ”‚ðì‚肽‚¢‚̂łµ‚傤‚©B
‚»‚ê‚Æ‚àAIO [a] Œ^‚Ì—”‚ð•Ô‚·ŠÖ”‚ðì‚肽‚¢‚̂łµ‚傤‚©B
‚Í‚½‚Ü‚½A—¼•û‚Å‚µ‚傤‚©B

‚Ó‚½‚‚ßB
ŠJ”­ŠÂ‹«‚Å‚Í
> f a b c psuedRand

–{”Ԋ‹«‚Å‚Í
> @( return . f a b c ) =<< realRand

‚Æ‚¢‚¤Ž–‚Å‚µ‚傤‚©B
‘OŽÒ‚̓ˆŠÖ”‚ÌŽ®AŒãŽÒ‚Í IO ƒ‚ƒiƒh‚𔺂¤Ž®‚Å‚·B
‚±‚ê‚ÍA–{”Ԋ‹«‚Å IO ƒ‚ƒiƒh‚ÈŠÖ”‚ðAŠJ”­ŠÂ‹«‚ł̓ˆŠÖ”‚ÅŠJ”­‚·‚邯‚¢‚¤Ž–‚Å‚·‚æ‚ËB
ŠJ”­ŠÂ‹«‚ð–{”Ԋ‹«‚É‚·‚éÛ‚É‚ÍAŒãŽÒ‚ÌŽ®‚ðŒÄ‚Ño‚µ‚Ä‚¢‚éŠO‘¤‚ÌŠÖ”‚àA
ƒˆŠÖ”‚©‚ç IO ƒ‚ƒiƒh‚É‘‚«Š·‚¦‚é‚̂łµ‚傤‚©B
‚ ‚Ü‚è‚¨Š©‚ß‚µ‚Ü‚¹‚ñB
–{”Ԋ‹«‚Å IO ƒ‚ƒiƒh‚ÈŠÖ”‚ÍAŠJ”­Žž‚à IO ƒ‚ƒiƒh‚ÅŠJ”­&ƒeƒXƒg‚µ‚½•û‚ª—Ç‚¢‚ÆŽv‚¢‚Ü‚·B
ŠÂ‹«‚ªˆá‚Á‚Ä‚àƒCƒ“ƒ^[ƒtƒF[ƒX(Œ^ƒVƒOƒlƒ`ƒƒ)‚Í‚»‚낦‚½•û‚ª—Ç‚¢‚Å‚·B
Ž–î‚ª‚¨‚ ‚è‚Ȃ̂ÅA‚ ‚­‚܂Ŏ„‚ÍŠ©‚߂Ȃ¢‚Æ‚¢‚¤‚¾‚¯‚Å‚·‚¯‚ÇB

677 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/01/20(…) 21:21:29.93 ID:apYLuAz7.net]
>>668
‚Ü‚Ÿ‚»‚¤‚Å‚·‚Ë
‚Å‚«‚ñ‚à‚ñ‚͂ł«‚ñ‚̂łµ‚傤‚Ë
‚½‚¾o—ˆ‚é‚©o—ˆ‚È‚¢‚©‚Ì”»’肪‚Ü‚¾‚Ü‚¾Ž©•ª‚ÌŽÀ—Í•s‘«‚łł«‚È‚¢‚Ì‚©AŽÀÛ‹ÖŽ~‚³‚ê‚ĂĂł«‚È‚¢‚©‚Ì‚©”»’f‚ª‚‚©‚È‚¢‚ñ‚Å‚·

>>669
‚â‚͂肻‚¤‚È‚ñ‚Å‚µ‚傤‚Ë
‚Ü‚¾‚Ü‚¾‰SŽÒ‚Å‚¢‚܂ЂƂƒ‚ƒiƒh‚Å•ï‚Ü‚ê‚Ä‚é‚Ì“éõ‚Ý‚ª‚È‚¢‚Ì‚Å”ð‚¯‚ê‚é‚È‚ç”ð‚¯‚½‚¢‚ÆŽv‚Á‚Ä‚µ‚Ü‚¢‚Ü‚·
‚±‚Ìꇂ̓‚ƒiƒh‚ÅÅI“I‚É‚­‚é‚Þ‚È‚ç”ð‚¯‚ç‚ê‚Ä‚à”ð‚¯‚é‚ׂ«‚ł͂Ȃ¢‚̂łµ‚傤‚Ë



678 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/01/20(…) 21:52:28.04 ID:kKr2IDUq.net]
>>670
Œ^‚ð‘‚©‚È‚¢Œ¾Œê‚à•’Ê‚É‘¶Ý‚·‚é‚Ì‚ÅAŒ^‚𖳎‹‚·‚é•û–@‚ª‚ ‚Á‚Ä‚à‚»‚ê‚à•sŽv‹c‚ł͂Ȃ¢

679 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/01/20(…) 23:15:01.74 ID:Sb+ElJSJ.net]
>>671
‚Ü‚Ÿ¡‰ñ‚̂͒ú‚߂܂·
o—ˆ‚é‚̂Ȃ猩‚‚¯‚½ƒzƒ€ƒy‚Ìl‚ªÐ‰î‚µ‚Ä‚­‚ê‚Ä‚½‚¾‚낤‚µ

680 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/01/21(–Ø) 00:38:31.39 ID:HkuQh/W6.net]
>>660
•›ì—p‚Æ‚©ƒˆŠÖ”‚̘b‚Í’P‘̃eƒXƒg‚̘b‘è‚Æ—‚ß‚½‚¢‚Ë
‚»‚ꂪ’Ê‚¶‚È‚©‚Á‚½‚ç’m‚ç‚ñ
•”•ª“K—p‚Æ‚¢‚¤‚©‚ŠKŠÖ”‚̘b‚Í
ƒR[ƒ‹ƒoƒbƒN‚Æ‚©ƒCƒeƒŒ[ƒ^‚̂悤‚Èuˆ—‚Ì’ŠÛ‰»v‚ª
‹É‚߂đ‚«‚â‚·‚­‚È‚é‚Æ‚¢‚¤‚悤‚Șb‚łǂ¤‚©

681 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ [2021/01/21(–Ø) 06:01:52.78 ID:mwzMDOkA.net]
Haskell‚ÅŒµ‚µ‚­«”\‚ðÅ“K‰»‚µ‚悤‚Æ‚·‚邯
’ŠÛ“I‚ȂƂ±‚ë‚ÅŽÀ‘•‚ðˆÓޝ‚µ‚½ƒR[ƒh‚ð‘‚­‚±‚ƂɂȂÁ‚Ä‹ê˜J‚·‚é
‚Ý‚½‚¢‚ȃŒƒrƒ…[‚ª‚ ‚Á‚½

Haskell‚̓xƒ“ƒ`Œ‹‰Ê—Ç‚¢‚悤‚ÉŒ©‚¦‚Ä
‚»‚ÌŽè‚ÌuŽÀ‘•‚ðˆÓޝ‚µ‚½ƒR[ƒhv‚ªƒxƒ“ƒ`—p‚É‘‚©‚ê‚é‚©‚ç‚Å
ŽÀÛ‚ÍŠ„‚Æ’x‚߂Ȃñ‚¾‚È

682 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/01/21(–Ø) 06:07:07.88 ID:LkrjH2wS.net]
>>674
‚»‚̃Œƒrƒ…[‚ÌURL‚ð“\‚Á‚Ä‚¢‚½‚¾‚¯‚È‚¢‚Å‚µ‚傤‚©

683 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ [2021/01/21(–Ø) 06:30:57.22 ID:mwzMDOkA.net]
https://stackoverflow.com/questions/35027952/why-is-haskell-ghc-so-darn-fast
‚±‚Ì•Ó
> thanks for the link.
80 lines is what I called "low-level style of programming not much different than
programming in C itself." . "the higher level code",
that would be the "stupid" fmap (length &&& length .
words &&& length . lines) readFile.
If that was faster than (or even comparable to) C,
the hype here would be totally justified then.
We still need to work hard for speed in Haskell as in C, is the point.

>>612‚à‚»‚ñ‚È‚±‚Æ‚ð‚©‚¢‚Ä‚é

684 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ [2021/01/21(–Ø) 06:38:11.58 ID:mwzMDOkA.net]
ˆÈ‰º‚ÌŒµ–§‚Æ‚¢‚¤‚̂͒x‰„•]‰¿‚¶‚á‚È‚­‚·‚邯‚¢‚¤Ž–‚¾‚낤H
‚µ‚©‚àuƒvƒƒtƒ@ƒCƒ‹‚ð쬂µ‚ĉü‘Pv‚͈ê“xƒAƒvƒŠ‚ð‘‚¢‚Ä‚©‚çŽÀs‚Ì—lŽq‚ðŠÏŽ@‚µ‚ÄÅ“K‰»‚µ‚Ä‚¢‚­‚Æ‚¢‚¤Ž–‚¾‚낤B
’ŠÛ“I‚ÉHaskell‚炵‚­‘‚¢‚Ä‚¢‚«‚Ȃ葬‚¢‚Æ‚¢‚¤‚킯‚ł͂Ȃ¢‚Æ‚¢‚¤Ž–‚¾B
ƒvƒƒtƒ@ƒCƒ‰[‚Ń{ƒgƒ‹ƒlƒbƒN‚ð“Á’肵‚Ä“ÁŽê‚ȃR[ƒh‚ɕς¦‚Ä‚¢‚¯‚Α¬‚­‚È‚éA‚ÆB

„‚Í‚¢A‘ӑĂ͂¨‚»‚ç‚­ƒiƒC[ƒu‚ÈHaskell‚ª’x‚¢Å‘å‚Ì——R‚Å‚ ‚èA
Å“K‰»‚³‚ꂽHaskell‚Å‚³‚¦‘¬“x‚Ì“_‚ÅM—Ђł«‚È‚¢‰Â”\«‚ª‚ ‚è‚Ü‚·B
‚»‚Ì‚½‚ßAƒpƒtƒH[ƒ}ƒ“ƒX‚ªd—v‚ȃAƒvƒŠƒP[ƒVƒ‡ƒ“‚ɂ͂¨Š©‚ß‚µ‚Ü‚¹‚ñB
OCaml‚Ì•û‚ª“K‚µ‚Ä‚¢‚Ü‚·BŒJ‚è•Ô‚µ‚ɂȂè‚Ü‚·‚ªA
Haskell‚ðBangPatterns‚ȂǂŌµ–§‚É‚·‚邱‚Ƃ͂»‚ê‚قǓ‚­‚ ‚è‚Ü‚¹‚ñB
‚Ü‚½AƒR[ƒh‚̓ǂݎæ‚è‚â•ێ炪“‚­‚Ȃ邱‚Æ‚à‚ ‚è‚Ü‚¹‚ñB
‚µ‚½‚ª‚Á‚ÄAƒpƒtƒH[ƒ}ƒ“ƒX‚ª–]‚Ü‚µ‚¢‚ªA’x‚¢ƒvƒƒgƒ^ƒCƒv‚Å‚à–â‘肪‚È‚¢ê‡‚ÍA
Haskell‚ª”ñí‚É—Ç‚¢‘I‘ð‚Å‚·B‚¤‚Ü‚­‹@”\‚·‚é‚à‚Ì‚ðˆê‚ɃnƒbƒN‚µ‚Ä‚©‚çA
ƒvƒƒtƒ@ƒCƒ‹‚ð쬂µ‚ĉü‘P‚µ‚Ü‚·B

685 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ [2021/01/21(–Ø) 08:18:51.22 ID:mwzMDOkA.net]
‚±‚¤‚¢‚¤”Fޝ
EHaskell‚̓R[ƒh‚¾‚¯‚Å‚ÍÅ“K‰»ƒ|ƒCƒ“ƒg‚ðŒ©‚Â‚¯‚ê‚È‚¢
EÅ“K‰»‚µ‚½‚ç•ςȃR[ƒh‚ɂȂé
E•’Ê‚ÌHaskellƒR[ƒh‚̓xƒ“ƒ`‚Å‘¼Œ¾Œê‚ÉŽS”s‚·‚é

686 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ [2021/01/21(–Ø) 09:21:08.07 ID:mwzMDOkA.net]
‚±‚ê‚à
EÅ“K‰»‚Ì•û–@‚ªˆ—ŒniGHC)ŽŸ‘æ‚ÅŒˆ‚Ü‚èAƒvƒƒOƒ‰ƒ}[‚Ì”Fޝ“à‚É–³‚¢B
GHC‚ɑ΂µ‚ĂЂ½‚·‚çƒgƒ‰ƒCƒAƒ“ƒhƒGƒ‰[

687 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/01/21(–Ø) 21:44:08.46 ID:AWFMWVQb.net]
EHaskell‚ª—~‚µ‚©‚Á‚½ƒ|ƒWƒVƒ‡ƒ“‚͂Ȃñ‚©Python‚ɂƂç‚ê‚Ä‚µ‚Ü‚Á‚½



688 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/01/22(‹à) 00:20:12.86 ID:IysdrbOG.net]
Haskell‚ÆPython‚ÍŽ—‚Ä‚¢‚È‚¢‚©‚ç—¼•ûŽg‚Á‚Ä‚àDRY‚Ɉᔽ‚µ‚È‚¢

Ž—‚½‚à‚Ì“¯Žm‚Å“é‚ꇂ¢AˆÙŽ¿‚È‚à‚Ì“¯Žm‚𕪒f‚·‚é‚â‚‚ÍM—p‚Å‚«‚È‚¢‚ª
Python‚ÍŽ—‚½‚à‚Ì“¯Žm‚Å‚µ‚Á‚©‚è‹£‘ˆ‚µ‚Ķ‚«Žc‚Á‚½‚â‚‚¾‚©‚çM—p‚Å‚«‚é

689 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/01/22(‹à) 01:34:45.31 ID:Zh6FWeVu.net]
python‚ª‚È‚©‚Á‚½‚Æ‚µ‚Ä‚àhaskell‚ª‚»‚̃|ƒWƒVƒ‡ƒ“‚ɂȂ邱‚Ƃ͂Ȃ©‚Á‚½‚¾‚낤

690 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/01/22(‹à) 02:27:11.57 ID:XLcorGPG.net]
—~‚µ‚©‚Á‚½Haskell
EŒ^‚ðÅ‘åŒÀ‚ÉŠˆ—pAƒoƒO‚ª–³‚¢‚±‚Æ‚ð•ÛØ‚µ‚‚Ž©‘R‚ÉCŒ¾Œê•À‚݂̫”\‚ào‚é

691 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/01/22(‹à) 08:04:15.32 ID:RWrydEj5.net]
Haskeller‚̃Lƒ‚ƒIƒ^u¼¸ÞÈÁ¬§v

692 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/01/22(‹à) 12:35:37.28 ID:Erx3tlcS.net]
Xˆ«‚È•\Œ»‚ª“¾ˆÓ‚È“z‚Á‚ÄAãY—í‚È•\Œ»‚¾‚ƃ|ƒGƒ€‚Æ‚©Œ¾‚í‚ê‚é‹°•|‚ðø‚ç‚ꂽŒ‹‰Ê‚Ȃ̂©‚È‚Æ
‚Ó‚ÆŽv‚Á‚½

693 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ [2021/01/22(‹à) 18:29:59.60 ID:WeFjBpWyB]
ƒfƒL‚él‚قǃtƒŠ[ƒ‰ƒ“ƒX‰»‚·‚éHš“­‚«•û‰üŠv
https://www.youtube.com/watch?v=ALflcwYOJtQ
”NŽû890–œ‰~ˆÈ‰º‚͎Љï‚Ì‚¨‰×•¨šéx‚³‚ê‚é˜J“­ŽÒ
https://www.youtube.com/watch?v=CAp-ZrJpF54
éx‚³‚ꂽ‚­‚È‚©‚Á‚½‚ç•׋­‚µ‚ëš‘¼l‚̃‹[ƒ‹‚Í‘¹‚ð‚·‚é
https://www.youtube.com/watch?v=s176O6qKuPw
’ê•Ó‚Ì99“‚͈궒ê•Óš10”NŒã‚ªŒ©‚¦‚È‚¢“¯—»‚½‚¿
https://www.youtube.com/watch?v=4Mfiwn2sPD8
‰Ò‚¬‚½‚¯‚ê‚Γ­‚­‚Èš4ç–œ‰~‚Û‚Á‚¿‚à‰Ò‚°‚È‚¢‚̂͂ȂºH
https://www.youtube.com/watch?v=Fi7bILN4wes
ƒTƒ‰ƒŠ[ƒ}ƒ“Žvl‚łׂ͖©‚ç‚È‚¢——R
https://www.youtube.com/watch?v=iW6oAo0q0ZI
u“ªŽg‚¦‚æ•n–Rlv‚ÉŽv‚¤AQ‚ĂĂà‹à“ü‚éƒVƒXƒeƒ€‚ðì‚él
https://www.youtube.com/watch?v=VEB6M_s6abs

694 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/01/23(“y) 13:17:02.46 ID:u7XOzuV6.net]
>>672
ListT ‚ðŽg‚¦‚΂Ǝv‚Á‚½‚¯‚Ç‚¾‚ß‚¾‚Á‚½B
EŽQl
https://blog.mudatobunka.org/entry/2018/01/03/233314
EŽcŠ[


695 –¼‘OF module Rand2 where

-- stack install list-t
-- stack exec ghci

import Control.Monad.IO.Class ( liftIO )
import ListT ( ListT, toList )
import System.Random ( Random(randomIO, randomRIO) )

t1 :: ListT IO Int
t1 = return 3

t2 :: ListT IO Int
t2 = liftIO (randomIO :: IO Int)

t3 :: ListT IO [Int]
t3 = repeat <$> t2

output :: ListT IO [Int] -> IO ()
output t3 = do
li0 <- toList t3
print $ take 10 $ head li0
[]
[‚±‚±‰ó‚ê‚Ă܂·]

696 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/01/23(“y) 22:12:27.68 ID:u7XOzuV6.net]
>>687
‚Å‚«‚½[I
module Rand2 where

-- stack install list-t
-- stack exec ghci

import Control.Monad.IO.Class ( liftIO )
import ListT ( ListT, toList, cons, take )
import System.Random ( Random(randomIO) )

t2 :: ListT IO Int
t2 = liftIO (randomIO :: IO Int)

t3 :: ListT IO Int
t3 = do
x <- t2
cons x t3

output :: IO ()
output = do
li <- toList $ ListT.take 10 t3
print li

{-
*Rand2> output
[7616927328998369033,6970782903781268443,-1509938769401207081,-2789264750098693865,-6524417077297424569,8403979199680420436,-3097298192134792937,-2736699795503652525,-4754186463647322678,5658901448509988002]
-}

697 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ [2021/01/24(“ú) 10:57:12.77 ID:EEhZoft7.net]
Ž©•ª‚Ì—‰ð‚ªª–{“I‚ÉŠÔˆá‚Á‚Ă邩‚à‚µ‚ê‚ñ‚¯‚Ç
haskell‚Í錾Œ^‚ÅŽÀŒø‡˜‚ª’è‚Ü‚Á‚Ä‚¢‚È‚¢‚Ý‚½‚¢‚Șb‚ð•·‚¢‚½‚ñ‚¾‚¯‚Ç
do‹L–@‚Í•’Ê‚Éã‚©‚牺‚ÉŽÀs‚³‚ê‚邯‚¢‚¤ƒCƒ[ƒW‚ɂȂé‚ÌH

main = do
x <- readLn
x2 <- readLn

‚±‚¤‚¢‚¤•—‚É‘‚¢‚½ê‡Aʼn‚É“ü—Í‚µ‚½‚à‚Ì‚ªx‚É“ü‚èA‚»‚̇”Ô‚Í“ü‚ê‘Ö‚¦‚ê‚È‚¢‚Í‚¸
do‹L–@‚͂قƂñ‚Ç–½—ߌ^‚¶‚á‚È‚¢‚ÌH

IOƒ‚ƒiƒh‚Æ‚©‚É“ü—Í‚³‚ê‚Ä‚¢‚­ƒAƒNƒVƒ‡ƒ“—ñ‚Í‚»‚̇”Ô‚ð“ü‚ê‘Ö‚¦‚ê‚È‚¢‚æ‚ËH
‚Ç‚ñ‚ÈŠ´‚¶‚ŃR[ƒfƒBƒ“ƒO‚³‚ê‚Ă邩’m‚ç‚È‚¢‚¯‚Ç
•›ì—p‚ª‚ ‚邯‚±‚낳͇”Ô‚ð“ü‚ê‘Ö‚¦‚ê‚È‚¢‚Í‚¸A‘¦‚¿–½—ߌ^‚Ƒ巂Ȃ¢‚Í‚¸



698 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/01/24(“ú) 12:14:30.84 ID:3w4a632B.net]
>>688
‚¨‚¨A‚Å‚«‚é‚ñ‚Å‚·‚©IH
‚·‚°[
Žc”O‚È‚ª‚ç‚¢‚ÜListTŽg‚¦‚È‚¢‚̂Ŋ‹«®—‚µ‚Ä‚â‚Á‚Ă݂܂·

699 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/01/24(“ú) 13:21:27.07 ID:vsDmG4Mq.net]
>>689
do‹L–@‚Æ‚¢‚¤Œ¾Œê‹@”\‚ÍAã‚©‚牺‚Ö‚Ì–½—߂̎Às‚ð‹Lq‚·‚é‚à‚̂ł͂Ȃ¢
ƒ‚ƒiƒh‚Ì‘g‚݇‚킹•û‚ð錾‚µ‚Ä‚¢‚邾‚¯
IO‚̂悤‚ȃ‚ƒiƒh‚Ì’è‹`‚ɑ΂µ‚Ă͂½‚Ü‚½‚Ü–½—ߌ^Œ¾Œê‚̂悤‚ɂȂ邾‚¯
Œ¾ŒêƒŒƒxƒ‹‚Å–½—ß‚ðã‚©‚牺‚ÖŽÀs‚µ‚Ä‚¢‚é‚킯‚ł͂Ȃ¢

700 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ [2021/01/24(“ú) 15:49:32.04 ID:EEhZoft7.net]
‚¶‚á‚ •W€“ü—Í‚©‚ç—ˆ‚½•¶Žš—ñ‚Ì1s–Ú‚Æ2s–ڂ𕪂¯‚Ĉµ‚¤‚ɂ͂ǂ¤‘‚­‚ÌH

701 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/01/24(“ú) 16:19:42.60 ID:QSDOehpN.net]
ListT.toList‚̈ø”‚ɂ͗LŒÀ‚ÌƒŠƒXƒg‚µ‚©“n‚¹‚È‚¢‚ñ‚¾‚낤‘½•ª
Œ»‚É
li <- toList t3
print (take 10 li)
‚ł͂Ȃ­
li <- toList $ ListT.take 10 t3
print li
‚Æ‘‚¢‚Ä‚ ‚é

702 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/01/24(“ú) 16:51:40.79 ID:o8L11MsB.net]
>>693
> ListT.toList‚̈ø”‚ɂ͗LŒÀ‚ÌƒŠƒXƒg‚µ‚©“n‚¹‚È‚¢‚ñ‚¾‚낤‘½•ª
> Œ»‚É
> li <- toList t3
> print (take 10 li)
> ‚ł͂Ȃ­
> li <- toList $ ListT.take 10 t3
> print li
> ‚Æ‘‚¢‚Ä‚ ‚é

Šm”F‚µ‚½‚Æ‚±‚ëA‚¨‚Á‚µ‚á‚é’Ê‚èA
‘OŽÒ‚ł͉ž“š‚ª•Ô‚Á‚Ä‚«‚Ü‚¹‚ñ‚Å‚µ‚½B
iListT.repeat ‚Å‚à“¯‚¶Œ‹‰Ê‚¾‚Á‚½‚Ì‚ÅAt3 ‚ªˆ«‚¢‚̂ł͂Ȃ¢‚Å‚·j

> ListT.toList‚̈ø”‚ɂ͗LŒÀ‚ÌƒŠƒXƒg‚µ‚©“n‚¹‚È‚¢‚ñ‚¾‚낤‘½•ª
‚±‚ê‚Ň‚Á‚Ä‚¢‚邯Žv‚¢‚Ü‚·B

703 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/01/24(“ú) 23:50:31.64 ID:3w4a632B.net]
‚â‚Á‚ς薳—‚È‚ñ‚Å‚·‚©‚Ë‚¥H
—Ⴆ‚Έȉº‚Í’Ê‚é‚̂ŠhIO –³ŒÀƒŠƒXƒgh ‚ªŒ´—“I‚É–³—‚Ȃ킯‚ł͂Ȃ¢‚Ƃ͎v‚¤‚ñ‚Å‚·‚¯‚Ç

list = return $ repeat '3'

main = do
x <- list
print $ take 10 x

‰½‚ª‚Ç‚¤ˆá‚¤‚à‚ñ‚È‚ñ‚Å‚µ‚傤H

704 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/01/25(ŒŽ) 09:17:23.58 ID:xOoQiCMv.net]
‚·‚¢‚Ü‚¹‚ñ
–³ŒÀƒ‰ƒ“ƒ_ƒ€®”—ñ‚ÌŒ‚Å‚·‚ª•û–@‚ª‚ ‚è‚Ü‚µ‚½
‚Æ‚¢‚¤‚©System.Random‚Ì’†‚Éʼn‚©‚ç—pˆÓ‚³‚ê‚Ă܂µ‚½
Ž©ì‚щƒ“ƒ_ƒ€—LŒÀ—ñì‚Á‚Ä‚¨‚ç‚ꂽ•û‚̃uƒƒOŒ©‚‚¯‚½‚̂Ŗ³ŒÀ—ñ‚È‚ñ‚Ä—pˆÓ‚³‚ê‚ĂȂ¢‚Æ‚·‚Á‚©‚èŽv‚¢ž‚ñ‚ł܂µ‚½
ˆÈ‰º‚Ì•û–@‚Å1`10‚Ì’·‚³100‚Ì—”—ñ‚ªŠÈ’P‚Éì‚ê‚邿‚¤‚Å‚·
‘æˆêˆø”‚É’l‚͈̔ÍA‘æ“ñˆø”‚É—”‚ÌŽí‚ðŽdž‚݂܂·
—”‚ÌŽí‚Í
mkStdGen :: Int -> StdGen
‚â
getStdGen :: IO StdGen
newStdGen :: IO StdGenSource
‚Å쬂·‚ê‚Ηǂ¢‚悤‚Å‚·
—”‚ÌŒ^‚ÍInt‚¾‚¯‚łȂ­Double‚Ȃǂłàì‚ê‚邿‚¤‚Å‚·

----
import System.Random

randomInts :: StdGen -> [ Int ]
randomInts = randomRs (1,10)

main = do
ris <- ( return . randomInts ) =<< getStdGen
print $ take 100 ris

705 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/01/25(ŒŽ) 09:36:17.94 ID:lGPRZ7j1.net]
Ží‚ª IO ‚¾‚©‚çA
randomRs ‚Ì–ß‚è‚Í [a] ‚È‚ñ‚¾‚Ë

706 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/01/25(ŒŽ) 11:51:44.88 ID:crCxtFmd.net]
ƒ‰ƒCƒuƒ‰ƒŠ‚͈ËL‚Å‚·‚ªA”Šw‚͈ËL‚Å‚·‚©H‚Á‚Ä‚¢‚¤’è”Ô‚Ì‚ ‚ꂾ‚È

707 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/01/25(ŒŽ) 13:32:32.62 ID:/TZZteD8.net]
>>692
newStdGen :: IO StdGenSource
ªƒƒƒ^w
ƒRƒsƒy‚·‚邯‚æ‚­‚ ‚é‚íw



708 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/01/25(ŒŽ) 13:33:07.46 ID:/TZZteD8.net]
ˆÀ‰¿ƒ~ƒX>>696

709 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/01/27(…) 00:16:50.20 ID:UiZI3fhW.net]
dp ‚ÌŽ¿–â‚Å‚·
haskell ‚Ådynamic programing ‚·‚é•û–@‚Ì—á‚ÅFibonacci”—ñ‚ÌŒvŽZ‚ð

fib = 0:1:( zipWith ( + ) ( drop 0 fib ) ( drop 1 fib ) )

‚ÅŒvŽZ‚³‚¹‚邯‚¢‚¤ƒeƒNƒjƒbƒN‚ðЉ‚Ä‚¢‚éƒy[ƒW‚ª‚ ‚Á‚ĂȂé‚قǂȂŸ‚ÆŠ´S‚µ‚Ü‚µ‚½
‚Å“¯‚¶ƒeƒNƒjƒbƒNŽg‚Á‚Äcomb6 !!i !! j‚ª“ñ€ŒW”C[i, j]‚ɂȂé”z—ñ

comb6 = ( ( 1 : ( repeat 0 ) ) : )
$ zipWith ( zipWith ( + ) ) comb6 ( map ( 0 : ) comb6 )

‚ðì‚Á‚Ă݂܂µ‚½
ƒRƒŒ‚Í‚¤‚Ü‚­‚¢‚«‚Ü‚·
comb6 !! 2000 !! 1000
‚Æ‚©‚àˆêu‚ÅŒvŽZ‚µ‚Ä‚­‚ê‚Ü‚·
‚Åcomb7 !! i !! j ‚ª“ñ€ŒW”C[ i+ j, i ]‚ƂȂé”z—ñcomb7‚ð

comb7 = ( ( repeat 1 ) : )
$ zipWith ( zipWith ( + ) )
( comb7 )
( tail $ map ( 1 : ) $ comb7 )

‚Æ’è‹`‚µ‚Ä‚â‚Á‚Ä‚Ý‚é‚ÆAcompile‚܂ł͒ʂé‚̂ł·‚ªŽÀscomb!!1!!0‚·‚邯<<loop>>‚ÆŒ¾‚í‚ê‚ÄŽ~‚Ü‚Á‚Ä‚µ‚Ü‚¢‚Ü‚·
‚µ‚©‚µŽèŒvŽZ‚Å“WŠJ‚µ‚Ă݂Ăàloop‚µ‚ĂȂ¢‚ÆŽv‚¤‚ñ‚Å‚·‚¯‚ǂǂ±‚ª‚¨‚©‚µ‚¢‚Ì‚©‚í‚©‚è‚Ü‚¹‚ñ
‚ǂȂ½‚©‚í‚©‚è‚Ü‚¹‚ñ‚Å‚µ‚傤‚©H

710 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/01/27(…) 11:32:01.04 ID:fGEABlaN.net]
comb7 = x : xs
xs = zipWith f comb7 ys
ys = tail zs
zs = map g comb7
zs = map g (x : xs)
= g x : map g xs
ys = tail (g x : map g xs)
= map g xs
xs = zipWith f comb7 (map g xs) -- ‚±‚±‚Å(map g xs)‚̃pƒ^[ƒ“ƒ}ƒbƒ`‚ª‚Å‚«‚È‚¢

711 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/01/27(…) 12:36:29.90 ID:UiZI3fhW.net]
>>702
‚ ‚肪‚Æ‚¤‚²‚´‚¢‚Ü‚·
‚µ‚©‚µ‚Ç‚¤‚àƒpƒ^[ƒ“ƒ}ƒbƒ`‚ÉŽ¸”s‚µ‚Ă邿‚¤‚ł͂Ȃ¢‚悤‚Å‚·
ŽÀÛƒRƒ“ƒpƒCƒ‰‚ÍŒ^„˜_‚ɬŒ÷‚µ‚Ă邿‚¤‚ÉŒ©‚¦‚Ü‚·‚µA–¾Ž¦“I‚É
comb7 :: [[ Int ]]
‚ð“ü‚ê‚Ä‚àƒ_ƒ‚Å‚·
ŽÀsŽž‚̃Gƒ‰[ƒƒbƒZ[ƒW‚à
Non-exhaustive patterns
‚ł͂Ȃ­
prog : << loop >>
‚ª•\ަ‚³‚ê‚Ä‚¢‚Ü‚·

712 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/01/27(…) 13:52:31.92 ID:fGEABlaN.net]
‚±‚¤‚¢‚¤Žž‚ÍŽ©•ª‚Ìl‚¦‚ÉŽ©M‚ðŽ‚Â‚±‚Æ‚à•K—v
’N‚©‚ªƒGƒ‰[ƒƒbƒZ[ƒW‚ðŒ©‚Ä‚¢‚éi‚Ü‚½‚ÍŒ©‚Ä‚¢‚È‚¢j‚Ì‚ðŒ©‚½‚©‚ç‚Æ‚¢‚Á‚ÄŠÈ’P‚Él‚¦‚ð•Ï‚¦‚È‚¢•û‚ª‚¢‚¢

713 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ [2021/02/01(ŒŽ) 00:47:55.98 ID:TMv1Um3B5]
ŒÂlŠJ”­‚ÌWebƒAƒvƒŠ‚ªƒcƒCƒbƒ^[¢ŠEƒgƒŒƒ“ƒh1ˆÊ‚ɂȂÁ‚½‚¯‚Ç‚¢‚ë‚¢‚ëh‚©‚Á‚½˜b
vdeep.net/chocobox-back-story
y•›‹ÆzŒÂlƒAƒvƒŠŠJ”­‚ÌLŽû“ü‚ðŒöŠJ‚µ‚Ü‚·(?2020/11)
https://cranklog.xyz/1586/
ƒAƒvƒŠŠJ”­‚ðŒÂl‚œƊw‚µ‚ÄŽû“ü‚𓾂é•û–@‚ðŒ»–ðƒGƒ“ƒWƒjƒA‚ª“O’ê‰ðà
https://yaba-blog.com/individual-development/
yŒÂlŠJ”­1”NU‚è•Ô‚èzƒŠƒŠ[ƒX‚µ‚½‚V‚‚ÌWebƒT[ƒrƒX‚Ì”½È“_‚Æ—ˆ”N‚ÌŠˆ“®‚ɂ‚¢‚Ä
https://yukio.site/2019-web-services/
ŒÂlŠJ”­‚̃AƒvƒŠ‚ʼn҂®‚̂͂»‚ñ‚Ȃɓ‚¢‚Ì‚©‚ÈH
https://blog.httqs.com/log/101
ŒÂlŠJ”­ŽÒi•›‹ÆƒTƒ‰ƒŠ[ƒ}ƒ“j‚̃AƒvƒŠLŽû“ü‚ðŒöŠJ
https://sastd.com/developer-ad-revenue/
ƒAƒvƒŠŠJ”­‚͉҂°‚È‚¢H‚æ‚­‚ ‚銨ˆá‚¢‚⌾‚¢–ó‚ð“O’ê”á”»‚µ‚Ă݂é
https://apps.jp.net/introduction/excuse/
ŒÂl‚ªƒAƒvƒŠŠJ”­‚ÅŽû“ü‚𓾂é•û–@‚Í‚S‚ÂB‚¾‚ªŠÃ‚­‚È‚¢I
https://programming-school-hikaku.jp/column/application-make-money

714 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/02/02(‰Î) 01:48:19.32 ID:yyMOWUoH.net]
fix‚Ì’è‹`‚Í fix f = let x = f x in x ‚ƂȂÁ‚Ä‚¢‚Ü‚·‚ªA
‚±‚Ì x Ž©‘Ì‚ÍÄ‹A“I‚É’è‹`‚³‚ê‚Ä‚¢‚邯Œ¾‚¦‚Ü‚·‚©H

715 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/02/02(‰Î) 16:19:31.38 ID:ErrealWs.net]
>>701
xs0 = repeat 1
xs1 = zipWith (+) xs0 (0:xs1)
xs2 = zipWith (+) xs1 (0:xs2)
xs3 = zipWith (+) xs2 (0:xs3)

‚±‚ñ‚ÈŠ´‚¶‚Ɍ•ʂɒè‹`‚·‚ê‚Ίm‚©‚ÉŒvŽZ‚Å‚«‚é‚Ì‚ÅA
comb7 !! 1 ‚ðŒvŽZ‚·‚é‚Ì‚Écomb7 !! 1 ‚ª•K—v‚¾‚¼‚Æ‚¢‚¤“_‚ð
“{‚Á‚Ä‚¢‚邿‚¤‚È‹C‚ª‚·‚é‚Ì‚¾‚ªŠm‚©‚È‚±‚Ƃ͌¾‚¦‚È‚¢A‚·‚Ü‚Ê

comb6 !! n ‚ÍŒvŽZ‚·‚é‚Ì‚É comb !! (n-1) ‚Ìî•ñ‚¾‚¯‚Å\•ª‚ȂƂ±‚낪ˆá‚¤‚Ì‚Å

716 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/02/02(‰Î) 17:58:42.89 ID:AZLuBdJH.net]
>>706
Ä‹A“I‚ÆŒ¾‚¤‚͖̂Ø\‘¢‚ð‘z’肵‚Ä‚¢‚é‹C‚ª‚·‚é
‚»‚̃R[ƒh‚̓Oƒ‰ƒtŠÈ–ñ‚Ì‚½‚߂ɂ»‚¤‚È‚Á‚½‚̂ŖØ\‘¢‚Å‚àÄ‹A“I‚Å‚à‚È‚¢‚ÆŽv‚¤

717 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/02/02(‰Î) 22:40:39.64 ID:LQ6cge6d.net]
>>707
‚ ‚肪‚Æ‚¤‚²‚´‚¢‚Ü‚·
Ž„‚à‘½•ª‚»‚ꂪŒ´ˆö‚©‚ȂƎv‚¢Žn‚߂Ă܂·
ˆê‰ñ–Ú‚Ìcomb7 !! 1 ‚Æ“ñ‰ñ–ڂł͑±‚­“YŽš‚ª! !!2 ‚©‚ç !!1 ‚ÉŒ¸‚Á‚Ä‚é‚̂ł·‚ªHaskell‚Í‚»‚ñ‚ÈŽ–‚ÍŠ¨ˆÄ‚¹‚¸‚Éucomb7 !! 1‚Ì“WŠJ‚Ì’†‚Écomb7 !! 1‚ªo‚Ä‚«‚½‚©‚çƒAƒEƒgv‚ÆŒ¾‚Á‚Ä‚é‚Ì‚©‚È‚Æ
‚‚܂è‚Í‚±‚ÌŽè‚Ì“ñd‘Q‰»Ž®‚ÍHaskell‚Í‚»‚̂܂܃YƒoƒŠ‚ł͓ǂñ‚Å‚­‚ê‚È‚¢‚ñ‚Å‚µ‚傤‚Ë



718 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/02/03(…) 00:23:45.54 ID:QKvl77B6.net]
comb7 !! 1 ‚ðŒvŽZ‚·‚é‚É‚Í length comb7 >= 2 ‚̂悤‚È‚à‚Ì‚ª•K—v‚¾‚¼
‚Å‚à’·‚³‚Í1‚©‚à‚µ‚ê‚È‚¢‚©‚çƒAƒEƒg‚Æ‚¢‚¤”»’f‚ͳ‚µ‚¢
ƒI[ƒo[ƒ‰ƒ“‚·‚邿‚è‚æ‚Á‚Û‚Ç‚¢‚¢

719 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/02/03(…) 14:08:13.61 ID:mxabq2OH.net]
‹‚߂ĂȂ¢‚©‚à‚Å‚·‚ª‚±‚ñ‚Ȃӂ¤‚Ȃ炩‚¯‚Ü‚·‚ËB
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) ))

720 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ [2021/02/04(–Ø) 23:30:39.86 ID:OAJDFKMl5]
ƒTƒ‰ƒŠ[ƒ}ƒ“‚Ì“w—͎͂‘ŽY‚ɂȂç‚È‚¢B
https://www.youtube.com/watch?v=3FLjm0Sn-2U
ƒlƒbƒg‚ʼn҂°‚È‚¢Žc”O‚Èl‚Ì“Á’¥
https://www.youtube.com/watch?v=sV_eyPfB7Wk
yŒp‘±Ÿ—˜z‘±‚¯‚Ä‚¢‚邤‚¿‚ÉAŽü‚è‚ÍŸŽè‚ÉÁ‚¦‚Ä‚¢‚«‚Ü‚·B
https://www.youtube.com/watch?v=oe8rHWFlmVc
yŠëŒ¯z¡‚·‚®“¦‚°‚ëIƒ„ƒo‚¢‰ïŽÐ‚Ì“Á’¥10‘IB
https://www.youtube.com/watch?v=N0JBhysIlzc
u‚ë‚­‚ɕ׋­‚µ‚Ä‚±‚È‚©‚Á‚½ƒoƒJv‚ª¡“ú‚©‚ç‚·‚ׂ«‚±‚ÆB
https://www.youtube.com/watch?v=3EUDu38W1Mw
ƒoƒJ‚Íu•K—v“w—Í—Êv‚ðŒ©Œë‚éB
https://www.youtube.com/watch?v=RG6_qkPhCuo

721 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/02/04(–Ø) 22:24:53.84 ID:w5MK0dgi.net]
>>711
‚ ‚肪‚Æ‚¤‚²‚´‚¢‚Ü‚·
ŽQl‚É‚³‚¹‚Ä‚¢‚½‚¾‚«‚Ü‚·
‚»‚¤‚Å‚·‚Ë
‚à‚¤ˆê‚‰“ǫ‚ª—~‚µ‚¢Š´‚¶‚ª‚µ‚Ü‚·
Œ³X‚Ì–â‘èˆÓޝ‚Æ‚µ‚Ă͎„‚͉“ǫ‚Ì‚‚¢ƒR[ƒh‚ª—v‹‚³‚ê‚邱‚Æ‚ª‘½‚¢‚̂ł·
—Ⴆ‚ÎFibonacci”—ñ‚Å‚ ‚ê‚Î

f n = ( f $ n -1 ) + ( f $ n - 2 )

‚ɉ“ǫ‚É‚¨‚¢‚Ă܂³‚é‚à‚̂͂Ȃ¢‚̂ł·‚ªA‚à‚¿‚ë‚ñ‚±‚ê‚ł͒x‚­‚ÄŽg‚¢•¨‚ɂȂè‚Ü‚¹‚ñ
‚Ȃ̂ŎÀ—p«‚à‘½­‚Í‚È‚è‚Æ‚à‹‚ß‚é‚Ȃ炠‚é’ö“x‚͉“ǫ‚ð‹]µ‚É‚¹‚´‚é‚𓾂Ȃ¢‚̂ł·‚ªA‚Ç‚¤‚¢‚¤•û–@‚ª‚¢‚¢‚Ì‚¾‚낤‚Æ‚¢‚¤‚Ì‚ªƒe[ƒ}‚Ȃ̂ł·
‚Å‚½‚Ü‚½‚ÜFibonacci‚ÌꇂÉ
f = 0 : 1 : ( zipWith ( + ) f $ tail f )
‚Æ‚¢‚¤‚Ì‚ðŒ©‚Â‚¯‚ăRƒŒ’†X‚¢‚¢‚È‚ÆAdp‚ÅŒvŽZ‚µ‚Ä‚é‚Ì‚Égƒƒ‚h‚ð‚·‚é‚½‚߂̕s—v‚Ȏ葱‚«‚ð‘‚­•K—v‚ª‚È‚­AHaskell‚Ìgcall by needh‚Ì‹@”\‚ð‚¤‚Ü‚­—˜—p‚µ‚ÄdpŒvŽZ‚³‚¹‚Ă邯‚±‚ë‚É‚¿‚å‚Á‚ÆšX‚Á‚½‚à‚Ì‚Å
‚łǂꂭ‚ç‚¢ƒRƒŒ‚Å‚¢‚¯‚é‚Ì‚©‚ȂƓñd”—ñ‚ð‚â‚Á‚Ă݂½‚炤‚Ü‚­‚¢‚©‚È‚­‚ÄA‚Ç‚¤‚µ‚½‚à‚ñ‚©‚È‚Æ
‚Ü‚ŸƒRƒŒ‚Í‚µ‚傤‚ª‚È‚¢‚Ì‚©‚à‚µ‚ê‚Ü‚¹‚ñ‚¯‚Ç

722 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/02/05(‹à) 00:47:44.85 ID:hZ1aOePg.net]
>>713
•ûŒü«ˆá‚¤‚©‚ȂƎv‚¢‚‚‘‚¢‚½‚ñ‚Å‚·‚ª‚â‚Á‚Ï‚èˆá‚¢‚Ü‚µ‚½‚ËBޏ—炵‚Ü‚µ‚½B
¡X‚Ç‚¤‚Å‚à‚¢‚¢‚Å‚·‚ª‚¿‚å‚Á‚ƊԈႦ‚½‚̂Œù³‚¾‚¯‚³‚¹‚Ä‚­‚¾‚³‚¢B
comb7_1 = (repeat 1 :) $ (map (scanl (+) 1 . tail) $ comb7_1)

723 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/02/05(‹à) 01:12:53.20 ID:gzN36RyX.net]
“ǂނƂ¢‚¤–Ú“I
‰Â“Ç«‚Ì’á‚¢ƒR[ƒh‚ðA“ǂނ±‚ƂȂ­‹p‰º‚·‚邯‚¢‚¤Žè’i

‚±‚Ì–Ú“I‚ÆŽè’i‚ª‚·‚®“ü‚ê‚©‚í‚Á‚Ä‚µ‚Ü‚¤Œ»Û‚à‚Ü‚½[‚È–â‘肾

724 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/02/05(‹à) 06:11:52.56 ID:5jF91Ui3.net]
‘¬‚³‚ð‹‚ß‚Änconc‚Ý‚½‚¢‚È‚à‚ñ‚¾‚È

725 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/02/05(‹à) 19:44:21.42 ID:DBOaHn9B.net]
>>713
‚»‚Ì’x‚­‚ÄŽg‚¢•¨‚ɂȂç‚È‚¢ŒvŽZ‚ðA
‰Â“Ç«‚ð‚ ‚Ü‚è‹]µ‚É‚µ‚È‚¢‚Ŕ𑬂ɂ·‚é•û–@‚ÉA
ƒƒ‚‰»(memoization)‚Æ‚¢‚¤ƒeƒNƒjƒbƒN‚ª‚ ‚è‚Ü‚·B
(‚»‚Ì‘ã‚í‚èA“–‘Rƒƒ‚ƒŠ‚ðŽg‚¢‚Ü‚·)

ƒƒ‚‰»ŠÖ” memoize ‚ª—pˆÓ‚³‚ê‚Ä‚¢‚ê‚ÎA
n ”Ԗڂ̃tƒBƒ{ƒiƒbƒ`”‚ð‹‚ß‚éŠÖ” fib ‚Í
ŽŸ‚̂悤‚É‘‚¯‚Ü‚·B

-- ƒƒ‚‰»
fib :: Int -> Integer
fib = fix (memoize . fib')

-- ƒtƒBƒ{ƒiƒbƒ`ŒvŽZ‚Ì–{‘Ì
fib' :: (Int -> Integer) -> Int -> Integer
fib' f 0 = 0
fib' f 1 = 1
fib' f n = f (n-1) + f (n-2)

ƒƒ‚‰»ŠÖ”‚ð’ñ‹Ÿ‚·‚éƒpƒbƒP[ƒW‚ÍFX‚ ‚è‚Ü‚·B
‚Ü‚½Aƒƒ‚‰»‚ÌŽd‘g‚݂̊î‘b‚â–{Ž¿‚ðŠw‚Ñ‚½‚¢‚̂ȂçA
ŽŸ‚Ì‚²‚­’Z‚¢ƒuƒƒO‹LŽ–‚ª‚¨‚·‚·‚߂ł·B
https://kseo.github.io/posts/2017-01-14-memoization-in-hasekll.html
‚±‚Ì‹LŽ–‚ÌÅŒã‚Ì fibMemo ŠÖ”‚ɂ‚¢‚ÄA
“K“–‚Ȭ‚³‚È’l‚É“K—p‚³‚¹‚½‚à‚Ì‚ð
Ž©•ª‚Ńm[ƒg‚É“WŠJ‚µ‚Ä‚Ý‚é‚Æ‚¢‚¢‚Å‚·B

726 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/02/05(‹à) 20:00:27.08 ID:DBOaHn9B.net]
>>717
‚·‚¢‚Ü‚¹‚ñB
ŠÌt‚Ì memoize ŠÖ”‚Ì’è‹`‚ð‘‚«–Y‚ê‚Ü‚µ‚½B

memoize :: (Int -> a) -> (Int -> a)
memoize f = (map f [0 ..] !!)

æ‚ÉЉ‚½‹LŽ–‚É‚±‚ê‚𓱂­‰ß’ö‚âA
‚æ‚葬‚­‚æ‚èˆê”ʉ»‚·‚é•û–@‚ðŠw‚Ñ‚½‚¢l‚ÖŒü‚¯‚½
URLЉڂÁ‚Ä‚¢‚Ü‚·B

727 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/02/06(“y) 09:10:00.64 ID:8eeMDweD.net]
>>717
‰ðà‚ ‚肪‚Æ‚¤‚²‚´‚¢‚Ü‚·
‚â‚͂胃‚‰»‚·‚邵‚©‚È‚¢‚ñ‚¾‚ÆŽv‚¢‚Ü‚·
–â‘è‚Í‚»‚ꂪƒvƒƒOƒ‰ƒ}‚ª–¾Ž¦“I‚ÉŽ©•ª‚Å‚â‚ç‚È‚¢‚Æ‚¢‚¯‚È‚¢‚Ì‚©AƒRƒ“ƒpƒCƒ‰‚ªŽ©•ª‚Å‚â‚Á‚Ä‚­‚ê‚é‚Ì‚©‚Ì·‚È‚ñ‚¾‚ÆŽv‚¢‚Ü‚·
Haskell‚̓ˆ‚Ècall by name‚ł͂Ȃ­Acall by need‚̃VƒXƒeƒ€‚Ì’†‚Ƀƒ‚‰»‚ð”õ‚¦‚Ä‚¢‚ăvƒƒOƒ‰ƒ}‚ªƒƒ‚‰»‚·‚邿‚¤‚É‘‚¢‚ĂȂ­‚Ä‚àŸŽè‚Ƀƒ‚‰»‚Å‚«‚é‚à‚Ì‚ðƒƒ‚‰»‚µ‚Ä‚­‚ê‚é‚Ì‚ª‚·‚²‚¢‚Æ‚±‚¾‚ÆŽv‚¤‚ñ‚Å‚·‚¯‚ÇA—Ⴆ‚Î>>713‚Ì2”Ô–Ú‚Ì—á‚ÅʼnŒ©‚½Žžu‚È‚ñ‚Å‚±‚Ì’è‹`Ž®‚Ńƒ‚‰»‚ªŒø‚­‚ñ‚¾Hv‚Æ‚³‚Á‚Ï‚è‚í‚©‚ç‚È‚©‚Á‚½‚Ì‚ªAŽÀ‚ÍHaskell‚Ìcall by need‚̃VƒXƒeƒ€‚ð‚¤‚Ü‚­—˜—p‚µ‚Ä‚é‚炵‚¢‚Ƃ킩‚Á‚½‚Ì‚ªÅ‰‚È‚ñ‚Å‚·
‚Å“ñd‚Ì‘Q‰»Ž®‚¾‚Æ‚¤‚Ü‚­‚¢‚©‚È‚¢‚È‚Æ
‚à‚¿‚ë‚ñ“ñd‚Ì‘S†‚«‚Å‚àãŽè‚­suffix‚ÌŽæ‚è•û‚ð•Ï‚¦‚½‚è‚·‚邯“¯—l‚Ì•û–@‚Ńƒ‚‰»‚Å‚«‚é‚ñ‚Å‚·‚¯‚ÇA‚»‚ê‚ł͌‹‹ÇuHaskell‚Ì‹@”\‚ð—˜—p‚µ‚Ä–¾Ž¦“I‚Ƀƒ‚‰»‚ðŽw’è‚·‚邱‚ƂȂ­‚‘¬‰»‚µ‚½vŽ–‚ɂ͂Ȃè‚Ü‚¹‚ñ
‚Ü‚ŸƒRƒŒ‚Í‚µ‚傤‚ª‚È‚¢‚ñ‚Å‚µ‚傤‚Ë
‚Ç‚ñ‚ÈŒvŽZ‚àí‚Ƀƒ‚‰»‚µ‚Äí‚É“¯‚¶•]‰¿Ž®‚ð2“xˆµ‚¤Ž–‚ð–h‚¢‚Å‚½‚ç‚»‚ñ‚Ȃ̋t‚ÉŽg‚¢•¨‚ɂȂè‚Ü‚¹‚ñ‚©‚ç‚Ë



728 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/02/06(“y) 20:56:07.58 ID:tGZHMqQF.net]
Haskell‚ªuƒ„ƒo‚»‚¤v‚Á‚ĕΌ©‚¾‚¯‚ÅŒh‰“‚³‚ê‚Ä‚é‚Ì‚©‚È‚µ‚¢c
“¯‹‰¶‚É‚à•z‹³‚µ‚½‚¢

729 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/02/06(“y) 21:00:00.51 ID:xuEfQm7n.net]
>>720
•z‹³‚Æ‚¢‚¤Œ¾—tŽ©‘ÌA“Æ‘P“I‚ʼnŸ‚µ•t‚¯‚ª‚Ü‚µ‚­Š´‚¶‚ç‚ê‚錴ˆö‚ɂȂÁ‚Ă邯Žv‚¤‚æB
‘ŠŽè‚ª‚¢‚₪‚ç‚È‚¢’ö“x‚Éhaskell‚Ì—Ç‚³‚â–Ê”’‚³‚ð“`‚¦‚Ä‚»‚ê‚Å‚à‘ŠŽè‚ª‹»–¡‚ð‚Ђ©‚ê‚È‚¢‚È‚çA‚»‚êˆÈã‚Í‚â‚߂Ƃ«‚ÈB

730 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/02/06(“y) 21:12:54.72 ID:HlAr7yEc.net]
>>719
¡‰ñ‚̘b‚Ì–{Ž¿‚ł͂Ȃ¢‚Ì‚ÅA‚Ö[‚»‚¤‚È‚ñ‚¾A
’ö“x‚É•·‚¢‚Ä‚­‚ê‚ê‚΂¢‚¢‚̂ł·‚ªA

>>713 ‚Ì2”Ô–Ú‚Ì—á‚Æ‚ÍA

f = 0 : 1 : zipWith (+) f (tail f)

‚Ì‚±‚Ƃłµ‚傤‚©B
‚à‚µ‚»‚¤‚È‚çA‚±‚ê‚̓ƒ‚‰»‚ł͂Ȃ¢‚Å‚·‚æB
(‚±‚̃eƒNƒjƒbƒN‚ð‚È‚ñ‚ƌĂԂ̂©‚Í’m‚è‚Ü‚¹‚ñ‚ª)

ƒƒ‚‰»‚Æ‚¢‚¤‚̂͊ȒP‚É‚¢‚¦‚ÎA
ŠÖ”‚Ì“¯‚¶ˆø”‚ɑ΂·‚é2“x–Ú(ˆÈ~)‚Ì“K—p‚É”õ‚¦‚ÄA
‚»‚̈ø”‚ɑ΂·‚é1“x–Ú‚ÌŠÖ”‚Ì’l‚ð‚»‚Ìˆø”‚ƃyƒA‚É‚µ‚Ä
‚Ç‚±‚©‚Ƀƒ‚‚µ‚Ä‚¨‚­‚±‚Ƃł·B

ƒ|ƒCƒ“ƒg‚ÍA2“x–ÚˆÈ~‚É”õ‚¦‚邱‚Ƃł͂Ȃ­A
ˆø”‚ÆŠÖ”’l‚̃yƒA‚ðƒƒ‚‚µ‚Ä‚¨‚­‚±‚Ƃł·B

‚»‚ê‚𓥂܂¦‚ÄA>>713 ‚Ì2”Ô–Ú‚Ì—á‚É‚¨‚¢‚ÄA
‚ł͉½‚ªŠÖ”‚ÅAˆø”‚ÆŠÖ”’l‚̃yƒA‚͂ǂ±‚Ƀƒ‚‚³‚ê‚Ä‚¢‚é‚©A
l‚¦‚Ă݂Ă­‚¾‚³‚¢B


‚½‚¾AŒ¾—t‚̈Ӗ¡‚ÍŽž‘ã‚Æ‹¤‚ɕω»‚µ‚Ä‚¢‚­‚à‚̂Ȃ̂ÅA
¡‚Í‚±‚ê‚àL‹`‚Ƀƒ‚‰»‚ÆŒ¾‚¤‚±‚ƂɂȂÁ‚Ä‚¢‚é‚̂łµ‚½‚çA‚·‚¢‚Ü‚¹‚ñB
Ž„‚Ì•û‚ª•׋­•s‘«‚Å‚·B

731 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/02/07(“ú) 08:28:27.99 ID:kgbg5mk/.net]
>>717‚Ì•û‚ªzipwithŽg‚Á‚½‚à‚Ì‚æ‚è“ǂ݂₷‚­‚Ä—y‚©‚É‚¢‚¢‚È
‚±‚Á‚¿‚Ì‘‚«•û‚Ì•û‚ª‚à‚Ă͂₳‚ê‚Ăقµ‚¢‚í

732 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/02/07(“ú) 10:58:25.84 ID:nblMEePQ.net]
‹v‚µ‚Ô‚è‚ÉHaskell(Servant)G‚Á‚Ă݂½‚¯‚Ç
‘Š•Ï‚í‚炸Žô•¶‚̂悤‚ȃeƒ“ƒvƒŒ[ƒgƒ}ƒNƒ‚Æ‚©ƒRƒ“ƒpƒCƒ‹’Ê‚·‚½‚ß‚¾‚¯‚Ì—H—ìŒ^‚Æ‚©•\‚Éo‚Ä‚«‚Ä‚¢‚é‚Ì‚Ë
‚±‚¤‚¢‚¤‚ÌŒã‚ë‚ɉB‚µ‚½ŽÀ‘•‚ª‚Ù‚¿‚¢(¥ัƒÖ¥ั)

733 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ [2021/02/07(“ú) 21:10:43.40 ID:B3cRggdVq]
“{‚éE޶‚é•¶‰»‚ÍAˆÀŒŽ‹‹•’·ŽžŠÔ˜J“­‚ÌØ
https://www.youtube.com/watch?v=-FZ-W08t9vM&t=173s
•׋­‚µ‚È‚¢ŽÐˆõšŽdŽ–‚Ì‚½‚ß‚Ì“ŠŽ‘‚ð‚µ‚È‚¢l‚½‚¿
https://www.youtube.com/watch?v=Zg6N7a_h8AE
ƒoƒJ‚ª‹N‹Æ‚µ‚½‚ñ‚Å‚·šƒoƒJ‚ªŽÐ’·‚ɂȂé‰ß’ö
https://www.youtube.com/watch?v=WT3pvyhpazk
Žž‹‹10”{·‚͕׋­‚Æ“w—Í‚¾‚¯‚Å·‚ª‚‚­šÅ‘å100”{·I
https://www.youtube.com/watch?v=AHZjacip9Y4
ƒhƒŠ[ƒ€ƒLƒ‰[š–²‚ÌŽÀŒ»‚ð‰ž‰‡‚·‚élA‘jŽ~‚·‚él
https://www.youtube.com/watch?v=ZoVXtIxhqTU
”NŽû‚P‰­‰~‚Íu‚Å‚«‚Á‚±‚È‚¢v‚ð‚â‚è‹‚°‚½lš10–œlA‹â‚Ì‚—ˆ‚½I
https://www.youtube.com/watch?v=3t9nQgcIzLw

734 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/02/07(“ú) 19:10:10.31 ID:Ae+USThM.net]
>>724
ŽŽ‚µ‚Éì‚Á‚Ă݂ê‚΂¢‚¢‚̂łÍH

‚»‚¤‚¢‚¤‹C‚É“ü‚ç‚È‚¢—H—ìŒ^‚ð
‚Ƃ肠‚¦‚¸1‚‚¾‚¯Œã‚ë‚ɉB‚µ‚Ă݂ÄA
Žg‚¢‚â‚·‚¢‚©ŽŽ‚µ‚Ă݂ê‚΂¢‚¢‚ÆŽv‚¤B

—Ç‚³‚»‚¤‚È‚çA‚±‚±‚â GitHub ‚Å’ñˆÄ‚·‚邯‚©B

735 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/02/07(“ú) 21:05:48.19 ID:kgbg5mk/.net]
Servanth‚¢‚©‚祔ñ‚¨Šè‚¢‚µ‚½‚¢

736 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/02/08(ŒŽ) 03:22:56.40 ID:lr3qr0Kv.net]
>>708
ƒŒƒX‚ª’x‚­‚È‚è‚Ü‚µ‚Ä‚·‚¢‚Ü‚¹‚ñB
x‚Ì’è‹`‚ÉxŽ©g‚ðŽQÆ‚µ‚Ä‚¢‚Ü‚·‚ªA‚»‚ꂾ‚¯‚Å‚Í
Ä‹A“I‚É’è‹`‚³‚ê‚Ä‚¢‚邯‚ÍŒ¾‚¦‚È‚¢‚Æ‚¢‚¤‚±‚Ƃł·‚©B

—Ⴆ‚ÎŽŸ‚ÌŠÖ” f ‚ÍÄ‹A“I‚É’è‹`‚µ‚Ä‚¢‚邯ŠF‚ªŒ¾‚¢‚Ü‚·B
f n = if n == 0 then 1 else n * f (n-1)

‚±‚ê‚Æ >>706 ‚Ì x ‚Ƃ͉½‚ªˆá‚¤‚̂łµ‚傤‚©B

737 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/02/08(ŒŽ) 07:06:31.27 ID:aZaTrcsy.net]
>>728
fix x ‚Íx‚Ì’è‹`‚¶‚á‚È‚­‚Äfix‚Ì’è‹`‚Å‚Í



738 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/02/08(ŒŽ) 09:04:48.35 ID:THE6D9/g.net]
>>729
fix’è‹`‚Ì’†‚Åletß‚ðŽg‚Á‚Ä’è‹`‚³‚ê‚Ä‚¢‚éx‚̘b‚Å‚·B

739 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/02/08(ŒŽ) 12:31:08.86 ID:hFpKnaPX.net]
>>717
ƒŠƒXƒgŽg‚Á‚½ƒƒ‚‰»‚Ì—‰ð‚ɂ͂¢‚¢‚ñ‚Å‚·‚¯‚ÇA‚»‚Ì—á‚àŽÀ‚Í’x‚¢‚ñ‚Å‚·‚æ‚ËB!!‚ªO(n)‚Ȃ̂ÅB
module Main where
import Data.Function
import qualified Data.Vector as V
main = do
let memo = fibMyMemo 50000
print $memo 50000
print $fibMemo 50000
fibMyMemo l = fib
where
fib = ((V.map f $ V.enumFromN 0 (l + 1)) V.!)
f 0 = 0 :: Integer
f 1 = 1
f n = fib (n -1) + fib (n -2)
memoize f = (map f [0 ..] !!)
fib f 0 = 0
fib f 1 = 1
fib f n = f (n - 1) + f (n - 2)
fibMemo = fix (memoize . fib)

740 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/02/08(ŒŽ) 18:33:31.66 ID:USGkiU7i.net]
>>728
ƒ}ƒWƒ‡ƒŠƒeƒB‚ƃ}ƒCƒmƒŠƒeƒB‚̈Ⴂ‚Æ‚©A‡–@‚ƃOƒŒ[‚̈Ⴂ‚̂悤‚È‚à‚Ì‚¾‚ÆŽv‚¦‚΂¢‚¢‚¾‚ë

Ä‹A“I‚ÈŠÖ”‚ÆÄ‹A“I‚ÈŒ^‚͂悭’m‚ç‚ê‚Ä‚¢‚é
ˆê•ûAŠÖ”‚Å‚àŒ^‚Å‚à‚È‚¢ƒP[ƒX‚Í–¢’m‚̃EƒCƒ‹ƒX‚̂悤‚È‚à‚Ì‚Å
Šù‘¶‚Ì‚à‚̂Ɠ¯‚¶‚¾‚Æ‚·‚®Œˆ‚߂‚¯‚é‚͔̂»’f‚ª‘‰ß‚¬‚é‹É˜_

741 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/02/08(ŒŽ) 20:09:46.17 ID:xtdfQPSv.net]
>>731
‚»‚¤‚Å‚·‚ËB

‚Ȃ̂ÅAŽÀÛ‚Í Trie –؂Ńƒ‚‚·‚é MemoTrie ‚ªŒø—¦—Ç‚¢‚ÆŽv‚¢‚Ü‚·B

742 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ [2021/02/09(‰Î) 17:58:55.95 ID:czfvLw+x2]
ƒAƒXƒyƒ‹ƒK[ÇŒóŒQ‚Æ‚‹@”\Ž©•ÂÇ
u”½•œ‰^“®v‚ÆuŒÀ’肳‚ꂽ•¨Ž–‚Ö‚Ì‚±‚¾‚í‚èE‹»–¡v

‚R‚‚Ìf’fŠî€
‡@l‚Ƃ̂â‚èŽæ‚èAŠÖ‚í‚肪“‚¢iŽÐ‰ï«‚ÌáŠQj
‡AƒRƒ~ƒ…ƒjƒP[ƒVƒ‡ƒ“‚ª‚Æ‚è‚É‚­‚¢iƒRƒ~ƒ…ƒjƒP[ƒVƒ‡ƒ“‚ÌáŠQj
‡B‹»–¡Es“®‚̕΂èA‚±‚¾‚í‚èiŒÀ’è“I‚Ès“®E‹»–¡E”½•œs“®j

ASDiŽ©•ƒXƒyƒNƒgƒ‰ƒ€ÇAƒAƒXƒyƒ‹ƒK[ÇŒóŒQj‚ÌÇó
ו”‚ɂƂç‚í‚ê‚Ä‚µ‚Ü‚¢AÅŒã‚܂਎–‚ð‹s‚·‚邱‚Æ‚ªo—ˆ‚È‚¢
Ž‹ü‚ª‚ ‚¢‚É‚­‚­A•\–R‚µ‚¢
Ø‚è‘Ö‚¦‚ª‹êŽèAŒˆ‚Ü‚Á‚½ƒpƒ^[ƒ“‚ƈႤ‚Æá’ᛂð‹N‚±‚·AW’c‚ł̊ˆ“®E—V‚Ñ‚ª‹êŽèB

743 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/02/10(…) 06:55:43.73 ID:w+SbAYAx.net]
>>732
‚·‚¢‚Ü‚¹‚ñAŒ‹‹Ç‚̂Ƃ±‚ëA‚Ç‚¤‚¢‚¤Ž–‚Å‚µ‚傤H

744 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/02/10(…) 10:35:38.44 ID:tXb64EJq.net]
–@—¥‚â‘Pˆ«‚Ì”»’f‚̳‚µ‚³‚ð‹^‚¤‚̂Ɠ¯‚¶ƒŒƒxƒ‹‚̉ù‹^“I‚ÈŽvl‚ª
”Šw‚âƒfƒoƒbƒO‚É‚à•K—v‚Æ‚¢‚¤‚±‚Æ‚©‚È

745 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/02/10(…) 11:17:11.88 ID:tXb64EJq.net]
ÓIŒ^‚ÍÅ‹­‚Æ‚©ƒKƒxƒRƒŒ‚ÍÅ‹­‚Æ‚©‚¢‚¤l‚¦‚ª
‹^‚í‚ê‚邿‚¤‚ɂȂÁ‚½‚͔̂¼•ª‚®‚ç‚¢Haskell‚ªŒ´ˆö‚¾‚æ‚Ë

746 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/02/10(…) 13:30:33.82 ID:em7GM66H.net]
>>732©‚±‚¢‚‚܂¾‚¢‚½‚Ì‚©
‹CŽ‚¿ˆ«‚·‚¬‚é

747 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/02/10(…) 14:18:45.17 ID:tXb64EJq.net]
‚±‚±‚Í–³—¿‚¾‚µ‚±‚ñ‚È‚à‚ñ‚¾‚ë
—Ç‚¢‚à‚݂̂͂ñ‚È‰Û‹à‚³‚ê‚é



748 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/02/11(–Ø) 14:43:11.06 ID:/UgD5Hp7.net]
’n–‚̹‘¿‚à‹àŽŸ‘æ
‚¾‚ª“V‘‚Ö‚ÌŒ¾‹y‚͂Ȃ¢

749 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/02/11(–Ø) 16:56:32.70 ID:zBw+qxbZ.net]
‚Ë‚¦Aw“ü~
‚Ђå‚Á‚Æ‚µ‚ÄHaskell‚ÍA‚«‚Ý‚ª“¯‚¶’n–‚ðŒJ‚è•Ô‚·–ˆ‚É
‹­—͂ȃtƒŠ[ƒ\ƒtƒg‚ɂȂÁ‚Ä‚¢‚Á‚½‚ñ‚¶‚á‚È‚¢‚Ì‚©‚¢

750 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/02/13(“y) 21:17:16.21 ID:kqsb0S1y.net]
ˆ«–ðƒLƒƒƒ‰‚ɂ͒˜ìŒ “™‚̃Rƒ“ƒvƒ‰ƒCƒAƒ“ƒX‚ðˆÓޝ‚³‚¹‚邯Ž×‹C‚ª”²‚¯‚Ä‚µ‚Ü‚¤
“¤’mޝ

751 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/02/14(“ú) 18:40:01.75 .net]
‚È‚º Haskell ƒXƒŒ‚̓[ƒhƒTƒ‰ƒ_ bot ‚É‘_‚í‚ê‚Ä‚µ‚Ü‚¤‚Ì‚©

752 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/02/14(“ú) 20:59:33.34 ID:2j5v2BhK.net]
>>743
ƒlƒbƒg‚Ì·•Ê”­Œ¾‚ð”rœ‚·‚é“w—Í‚·‚ç‚â‚ç‚È‚¢l‚ª‚¢‚é‚©‚ç
ƒ[ƒhƒTƒ‰ƒ_‚Æ‚â‚ç‚ð”rœ‚·‚é“w—͂Ȃñ‚Ä’N‚à‚â‚ç‚È‚¢‚͓̂–‚½‚è‘O‚¾‚¼
‚±‚ñ‚ÈŠÈ’P‚È‚±‚Æ‚ª‚È‚º—‰ð‚Å‚«‚È‚¢‚ñ‚¾

753 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/02/14(“ú) 21:27:29.30 ID:A1oxlP1a.net]
731‚̓[ƒhƒTƒ‰ƒ_‚ȃŒƒX‚¤‚º‚¥‚È‚Ÿ‚­‚ç‚¢‚̈Ӗ¡‚µ‚©‚È‚­ƒ[ƒhƒTƒ‰ƒ_‚ȃŒƒX‚ª‘¶Ý‚µ‚Ä‚µ‚Ü‚¤——R‚ðŽÀÛ‚É‹^–â‚ÉŽv‚Á‚Ä‚¢‚é‚킯‚ł͂Ȃ¢‚Æ‚¢‚¤ŠÈ’P‚È‚±‚Æ‚ª‰½ŒÌ‚í‚©‚ç‚È‚¢‚Ì‚©

754 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/02/14(“ú) 21:49:22.17 ID:2j5v2BhK.net]
731‚ÍA‚¤‚º‚¥‚È‚ŸˆÈŠO‰½‚àl‚¦‚ĂȂ©‚Á‚½‚Æ‚¢‚¤‚Ì‚©
‚»‚ê‚Í·•ʈӎ¯‚µ‚©‚È‚¢â‘Έ«‚¶‚á‚È‚¢‚©

755 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/02/15(ŒŽ) 01:08:13.78 ID:Qrz9kKC+.net]
‚à‚Á‚ÆŠë‹@Š´‚ðŽ‚Á‚½‚Ù‚¤‚ª‚¢‚¢‚æ
•ꑌê‚Ì“Á’¥‚܂Ńlƒ`ƒlƒ`‚¢‚¶‚ç‚ꂽ‚çŠO‘Œê‚Í‚±‚í‚­‚ÄŽg‚¦‚È‚¢‚¾‚낤
‰pŒê‚ª‚Å‚«‚È‚¢‚ƃvƒƒOƒ‰ƒ~ƒ“ƒO‚à‚Å‚«‚È‚¢

756 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/02/15(ŒŽ) 17:23:26.09 ID:Mv5LolEs.net]
‚È‚ñ‚©‚±‚̃XƒŒ‰ï˜b‚ªŠš‚݇‚í‚È‚¢‚æ‚È
>>744©‚±‚¢‚‚Ƃ©–¾‚ç‚©‚É“ª‚¨‚©‚µ‚¢‚µ
‚±‚¤‚¢‚¤lŠO‰»‚¯•¨‚ª‚¤‚¶‚Ⴄ‚¶‚á‚¢‚é‚©‚çu“Á‹Z‚̓Rƒ~ƒ…ƒjƒP[ƒVƒ‡ƒ“”\—͂ł·v‚Ý‚½‚¢‚ȃSƒ~•¶Œn‚ªŽÐ‰ï‚Å’²Žq‚Éæ‚èŽn‚ß‚é‚ñ‚¾‚낤‚È

757 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/02/15(ŒŽ) 18:24:29.13 ID:Qrz9kKC+.net]
ƒRƒ~ƒ…—͂̈«—p‚ðŽ~‚ß‚é•û–@‚ňê”ÔŽg‚¦‚»‚¤‚Ȃ̂ͧŒÀŽžŠÔ‚𖳂­‚·‚±‚Æ‚¾
5•b‚Å“š‚¦‚³‚¹‚邿‚¤‚È–â‘è‚Å‚àŽžŠÔ‚̃‹[ƒ‹‚𖳎‹‚µ‚Ä‚µ‚Ü‚¦‚Î
‚»‚̃Sƒ~•¶Œn‚Á‚Ă₂̔\—Í‚ð‹[Ž—“I‚ɃRƒs[‚Å‚«‚é



758 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/02/15(ŒŽ) 19:02:15.47 ID:3zpQr6lX.net]
Haskell‚̘b‚ÍH

759 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/02/15(ŒŽ) 20:58:35.44 ID:Qrz9kKC+.net]
Ŭ•s“®“_‚ð’è‹`‚·‚锼‡˜‚Ì’è‹`‚ª‚È‚¢
‚»‚ê‚ÆuÄ‹Av‚Ì’è‹`‚ª‚È‚¢

760 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/02/16(‰Î) 10:45:42.61 ID:AZNZAZhP.net]
>>750
‚±‚¤‚¢‚¤˜bH
ttps://i.imgur.com/oKvfp6x.png

761 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/02/16(‰Î) 12:56:19.11 ID:VICwQMLs.net]
Ž¿–â‚È‚ñ‚Å‚·‚ª,
https://levelup.gitconnected.com/functional-dynamic-programming-with-haskell-top-down-and-bottom-up-7ccade222337
‚̈ê”Ôã‚̃R[ƒh“à23-25s–Ú‚Ì
iMinusOne <- cdRecursiveTD (i-1) stArr
iMinusTwo <- cdRecursiveTD (i-2) stArr
writeArray stArr i ( (i-1) * ( iMinusOne + iMinusTwo ) )
‚Ì•”•ª‚ð“Y‚¦ŽšŽg‚Á‚Ä
for j = 1 to 2
xs !! j <- cdRecursiveTD (i-j) stArr
writeArray stArr i ( (i-1) * ( sum xs ) )
‚Ý‚½‚¢‚É‘‚­•û–@‚Á‚Ä‚ ‚è‚Ü‚¹‚ñ‚©‚ËH

762 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/02/16(‰Î) 15:13:16.20 ID:VICwQMLs.net]
‚·‚݂܂¹‚ñŽ©ŒÈ‰ðŒˆ‚µ‚Ü‚µ‚½
ˆê‰žŒ‹‰Ê“\‚Á‚Ä‚¨‚«‚Ü‚·
cdRecursiveTD i stArr = do
____v <- readArray stArr i
____when (v == -1) $ do
______xsm <- newSTRef []
______forM_ [1,2] $ \j -> do
________x <- cdRecursiveTD (i-j) stArr
________modifySTRef xsm (x:)
______xs <- readSTRef xsm
______writeArray stArr i ( (i-1) * ( sum xs ) )
____readArray stArr i

763 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/02/16(‰Î) 15:27:24.80 ID:twhDC3NA.net]
xs <- mapM (\j -> cdRecursiveTD (i - j) stArr) [1 .. 2]
writeArray stArr i ((i - 1) * sum xs)
‚±‚ê‚ł悭‚È‚¢‚Å‚·‚©[H

764 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/02/16(‰Î) 15:32:43.34 ID:VICwQMLs.net]
>>755
‚»‚Á‚¿‚Ì•û‚ª—y‚É—Ç‚¢‚Å‚·‚Ëc
‚ ‚肪‚Æ‚¤‚²‚´‚¢‚Ü‚·

765 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/02/17(…) 14:02:08.57 ID:YPZ4jTJ4.net]
map f [1,1,1,2]‚̂悤‚Éd•¡‚Ì‘½‚¢ƒŠƒXƒg‚ª‚ ‚Á‚½‚ç
f‚ÌŽÀ‘•‚ð•Ï‚¦‚é¨—Í‚ÆƒŠƒXƒg‚Ì\‘¢‚ð•Ï‚¦‚騗͂̑ˆ‚¢‚ð‚Ç‚¤‚â‚Á‚Ä‰ðŒˆ‚Å‚«‚é‚©‹C‚ɂȂé

766 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/02/17(…) 16:20:43.74 ID:mAFPwKeZ.net]
ˆê‰ñSetŒ^‚É‚µ‚Ä‚©‚çList‚É–ß‚·

767 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/02/17(…) 16:22:11.25 ID:mAFPwKeZ.net]
‚à‚¿‚ë‚ñƒŠƒXƒg‚Ì—v‘f‚̌”Œ¸‚Á‚Ä—Ç‚¢ê‡‚̘b‚¾‚¯‚Ç



768 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/02/17(…) 22:40:59.85 ID:0SJ3Yct4.net]
>>757
‹ï‘Ì“I‚È–â‘èó‹µ(—á)‚ªŽ¦‚³‚ê‚È‚¯‚ê‚ÎAŽŸ‚̂悤‚ȉ½‚É‚Å‚à“–‚Ă͂܂é
ŽŠ‹É“–‚½‚è‘O‚̂‚܂ç‚È‚¢‰ñ“š‚µ‚©‚Å‚«‚È‚¢‚ÆŽv‚¤‚ªB

–Ú“IAŠJ”­ƒŠƒ\[ƒX(ŽžŠÔ‚âÝ”õAŽ‘—¿A”ï—p‚È‚Ç)A
ŠJ”­ŽÒ‚Ì”\—͂⃂ƒ`ƒx[ƒVƒ‡ƒ“Aƒƒ“ƒe‚Ì—eˆÕ‚³‚ȂǂðA
—D懈ʂðl—¶‚µ‚½‚¤‚¦‚Åo—ˆ‚邾‚¯‹qŠÏ“I‚É•]‰¿‚µŒˆ’è‚·‚éB

‘ˆ‚¤‚Æ‚¢‚¤‚±‚Æ‚ÍA—D懈ʂâ•]‰¿Šî€‚ª’è‚Ü‚Á‚Ä‚¢‚È‚¢‚Æ‚¢‚¤‚±‚ƂȂ̂ÅA
‚Ü‚¸‚Í‚»‚ê‚ç‚ð˜b‚µ‡‚Á‚ÄA‚ ‚é‚¢‚Íã‚Ì—§ê‚ÌŽÒ‚ªƒoƒVƒb‚ÆŒˆ‚ß‚éB

769 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/02/18(–Ø) 09:29:03.36 ID:8Wc99cSo.net]
‚È‚ñ‚©‚µ‚傤‚à‚È‚¢˜b‚È‚ñ‚Å‚·‚¯‚ǃEƒ`‚̊‹«‚ÅŽŸ‚ª’Ê‚è‚Ü‚·

test x = case x of
_ | odd x -> 1
oyherwise -> 0

main = do
print $ test 123
print $ test 456

‚È‚ñ‚©Î‚Á‚Ä‚µ‚Ü‚¢‚Ü‚µ‚½

770 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/02/18(–Ø) 09:31:00.46 ID:8Wc99cSo.net]
‚ AƒCƒ„ˆá‚¤
Ѝˆá‚¢‚Å‚µ‚½
‚·‚¢‚Ü‚¹‚ñ

771 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/02/18(–Ø) 10:58:11.75 ID:jy6gqPJ4.net]
>>760
‹qŠÏ“I‚È–Ú“I‚Æ‚¢‚¤‚͓̂‚·‚¬‚Ä’N‚É‚à•ª‚©‚ç‚È‚¢
—Ⴆ‚ÎŒÂl“I‚ÈŽØ‹à‚ðŒ¸‚ç‚·‚±‚ƂƑ‚ÌŽØ‹à‚ðŒ¸‚ç‚·‚±‚Ƃ͂ǂ¿‚炪‹qŠÏ“I–Ú“I‚©

‚»‚¤‚ł͂Ȃ­A–Ú“I‚ÍŽåŠÏ‚ÅŒˆ‚ß‚ÄOK‚Æ‚¢‚¤‚È‚ç
‚»‚ê‚ÍŒ‹\–Ê”’‚¢“š‚¦‚Å‚ ‚Á‚ÄA‚‚܂ç‚È‚¢“š‚¦‚Å‚Í‚È‚¢

772 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/02/18(–Ø) 11:50:05.23 ID:6bd12mxo.net]
>>763
Œ¾—t‚ª‘«‚肸AŒë‰ð‚³‚¹‚½‚悤‚Å\‚µ–ó‚È‚¢B

‹qŠÏ“I‚És‚¤‚Ì‚ÍA–Ú“I‚ð’è‚߂邱‚Ƃł͂Ȃ­‚ÄA
¡‚â‚낤‚Æ‚µ‚Ä‚¢‚鎖‚ª’è‚ß‚½–Ú“I‚ɇ‚Á‚Ä‚¢‚é‚Ì‚©•]‰¿‚·‚邱‚ÆB

f‚ÌŽÀ‘•‚ð•Ï‚¦‚邱‚Æ‚ª–Ú“I‚ɇ‚Á‚Ä‚¢‚é‚Ì‚©A
‚»‚ê‚Æ‚àƒŠƒXƒg\‘¢‚ð•Ï‚¦‚é•û‚ª‚æ‚臂Á‚Ä‚¢‚é‚Ì‚©B

–Ú“I‚Æ‚¢‚¤‚̂͗lX‚ ‚邿‚ËB
Œ©•·‚«‚µ‚½V‚µ‚¢‹Zp‚ðƒ‰ƒt‚É•]‰¿‚·‚邽‚ß‚Ì
ƒgƒCƒvƒƒOƒ‰ƒ€‚ðì‚邱‚Æ‚ª–Ú“I‚¾‚Á‚½‚èA
ŽŸ‚ÌƒŠƒŠ[ƒX‚Ńƒ‚ƒŠŽg—p—Ê‚ð10%팸‚·‚邱‚Æ‚¾‚Á‚½‚èB

‹qŠÏ“I‚É•]‰¿‚·‚邱‚Æ‚ðˆÓޝ‚µ‚È‚¢‚ÆA‹C•ª‚╵ˆÍ‹C‚É—¬‚³‚ê‚ÄA
ƒƒ‚ƒŠŽg—p—Ê‚ð—}‚¦‚é–Ú•W‚ªA‚¢‚‚̊Ԃɂ©ˆ—‘¬“xŒüã‚É‚·‚è‘Ö‚í‚Á‚Ä‚½‚è‚·‚éB

‚Ü‚½A–Ú•W‚Í•]‰¿‚·‚éˆê€–Ú‚É‚·‚¬‚È‚¢B
ƒŠƒŠ[ƒXŽžŠú‚ðŽç‚é•û‚ª—D懈ʂª‚‚¢ó‹µ‚à‚ ‚éB
‚¾‚©‚çA‚à‚ë‚à‚ëŠÜ‚߂ċqŠÏ“I‚É•]‰¿‚·‚éB

‹t‚É‚»‚¤‚¶‚á‚È‚¢‚ÆAf‚ÆƒŠƒXƒg‚Ç‚¿‚ç‚ð•Ï‚¦‚é‚Ì‚©‚È‚ñ‚ÄAŒˆ‚߂悤‚ª‚È‚¢‚ÆŽv‚¤B

773 –¼‘OF–¼–³‚µ‚³‚ñ mailto:sage [2021/02/18(–Ø) 15:29:22.47 ID:jy6gqPJ4.net]
>>764
‹C•ª‚╵ˆÍ‹C‚É—¬‚³‚ê‚Ü‚­‚é‚܂őz’肵‚Ä‚¨‚­‚Ì‚ª—Ç‚¢ì킾‚æ
—¬‚³‚ê‚È‚¢‚悤‚É‘Îô‚·‚é‚̂őz’è‚·‚é•K—v‚͂Ȃ¢‚Ý‚½‚¢‚È—‹ü‚ÍŠë‚È‚¢

774 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/02/25(–Ø) 20:48:36.35 ID:zWeVIvWn.net]
‚ ‚é‘ÎÛ‚ªƒ‚ƒmƒCƒh‚©‚Ç‚¤‚©‚ð–â‚¤Ž¿–â‚Å‚·B

2‚Â‚ÌƒŠƒXƒg‚Ì‚¤‚¿—v‘f‚Ì­‚È‚¢•û‚ÌƒŠƒXƒg‚ð‚»‚Ì‚Ü‚Ü•Ô‚·A
“¯‚¶—v‘f”‚È‚ç‚摤‚ÌƒŠƒXƒg‚ð‚»‚Ì‚Ü‚Ü•Ô‚·ŠÖ” f :: [a] -> [a] -> [a] ‚ª‚ ‚邯‚µ‚Ü‚·B
‚±‚±‚ÅA‚ ‚éŒ^a‚ÌƒŠƒXƒg‘S‘Ì‚ÌW‡[a]‚ÆA‚»‚Ìã‚Ì“ñ€‰‰ŽZf‚Ƃ̑g([a], f)‚̓‚ƒmƒCƒh‚𬂷‚Å‚µ‚傤‚©B

Ž„‚ÍŽŸ‚̂悤‚ÉA‚±‚ê‚̓‚ƒmƒCƒh‚ł͂Ȃ¢‚Æl‚¦‚Ü‚·B

‚±‚̃‚ƒmƒCƒh«‚ðl‚¦‚邯‚«A‚»‚Ì’PˆÊŒ³‚ÌŒó•â‚Æ‚µ‚ÄA
‚à‚µW‡‚É–³ŒÀƒŠƒXƒg‚ðŠÜ‚߂Ȃ¢‚̂Ȃç‚ÎÅ‘å—v‘f”‚ÌƒŠƒXƒg‚ðA
–³ŒÀƒŠƒXƒg‚ðŠÜ‚ß‚é‚̂ł ‚ê‚Ζ³ŒÀƒŠƒXƒg‚ðŽæ‚è‚Ü‚·B
‘¼‚Él‚¦‚悤‚ª‚ ‚è‚Ü‚¹‚ñB

‚µ‚©‚µA‚Ç‚¿‚ç‚É‚µ‚Ä‚à’PˆÊŒ³‚̈êˆÓ«‚ªØ–¾‚Å‚«‚Ü‚¹‚ñB
xsAys ‹¤‚ÉÅ‘å—v‘f”‚ÌƒŠƒXƒgA‚ ‚é‚¢‚Í–³ŒÀƒŠƒXƒg‚Å‚ ‚èA‚©‚ xs /= ys ‚ð–ž‚½‚·‚à‚Ì‚Í(Œ^a‚É‚æ‚Á‚Ä‚Í)‚¢‚­‚ç‚Å‚à‚ ‚è‚Ü‚·B

‚æ‚Á‚ÄA([a], f) ‚̓‚ƒmƒCƒh‚ł͂Ȃ¢‚Æl‚¦‚Ü‚·‚ªA‚±‚ê‚ͳ‚µ‚¢‚Å‚µ‚傤‚©B

ƒ‚ƒmƒCƒh‚Ì’è‹`‚ÉÆ‚炵‡‚킹‚é‚̂ł͂Ȃ­A
ƒ‚ƒmƒCƒh‚È‚ç‚ÎØ–¾‚Å‚«‚é‚Å‚ ‚낤’è—‚ªØ–¾‚Å‚«‚È‚¢‚±‚ƂɈö‚Á‚Ä‚¢‚é‚Ì‚ªA
‚È‚ñ‚Æ‚à‹CŽ‚¿ˆ«‚¢‚̂ł·‚ªEEE

‚»‚à‚»‚àƒ‚ƒmƒCƒh«‚ð–₤‚É‚Í ([a], f) ‚Ì’è‹`‚ªžB–†‚Ȃ̂łµ‚傤‚©B

775 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/02/25(–Ø) 21:30:50.20 ID:hQOL6Vl7.net]
ƒ‚ƒmƒCƒh‚ł͂Ȃ¢‚Ɉê•[

776 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/02/26(‹à) 01:35:18.34 ID:7R2bTCy0.net]
ƒŠƒXƒg‚ɂ͓¯‚¶—v‘f‚ª‰½ŒÂ‚à“ü‚Á‚Ä‚à‚¢‚¢‚ñ‚¾‚©‚ç’PˆÊŒ³‚ɂȂ蓾‚é‚͖̂³ŒÀƒŠƒXƒg‚¾‚¯‚Å‚µ‚å
‚ ‚é–³ŒÀƒŠƒXƒg‚ð’PˆÊŒ³e‚Æ‚·‚邵‚©‚È‚³‚»‚¤
‚±‚±‚Å‚à‚¤1‚–³ŒÀƒŠƒXƒga‚ð—pˆÓ‚µ‚Äf a e‚µ‚½‚ça•Ô‚³‚¸‚É—v‘f‚̌””äŠr‚·‚鎞“_‚ÅۂɂȂ邩‚烂ƒmƒCƒh‚ɂȂç‚È‚¢‚ÆŽv‚¤

777 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/02/26(‹à) 02:07:21.86 ID:Drny41hT.net]
Œ^‚ÍW‡‚ł͂Ȃ¢
’l‚ÍŒ³‚ł͂Ȃ¢
ƒvƒƒOƒ‰ƒ€ã‚ÌŠÖ”‚Í”Šw“I‚ȈӖ¡‚ł̊֔‚ł͂Ȃ¢

Haskell‚Í”Šw‚ł͂Ȃ¢



778 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/02/26(‹à) 10:03:43.32 ID:W2dsUZYE.net]
ƒ‚ƒmƒCƒh‚Å‚àW‡˜_‚Å‚àAŒö—‚ª‘½‰ß‚¬‚ÄŒö—‚ª‹U‚ɂȂé‚È‚ç
Œö—‚ðŒ¸‚ç‚¹‚΂¢‚¢‚¶‚á‚ñ

779 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/02/26(‹à) 10:24:37.14 ID:nFSf/y++.net]
>>766
‚Ü‚¸’PˆÊŒ³‚Ì’è‹`‚©‚çAes‚ª[a]‚Ì’PˆÊŒ³‚Å‚ ‚é‚È‚çA”CˆÓ‚Ìxs‚ɑ΂µ‚Ä
f es xs == xs
f xs es == xs
‚ð–ž‚½‚·A‚Æ‚¢‚¤‚Æ‚±‚ë‚Í‚¢‚¢‚æ‚Ë(‚䂦‚Ées‚ÍA”CˆÓ‚Ìxs‚æ‚è—v‘f”‚ª‘å‚«‚­‚È‚¯‚ê‚΂¢‚¯‚È‚¢)

‚±‚Ì‚±‚Æ‚©‚ç’¼Ú”ñ‘¶Ý‚ðŒ¾‚¤•û‚ª‚±‚Ìꇂ͖¾‰õ‚¾‚ÆŽv‚¤‚¯‚ÇA
u‚ ‚é—v‘f‚ª’PˆÊŒ³‚È‚ç‚΂»‚ꂪˆêˆÓ‚Å‚ ‚év‚Í‚·‚®‚ÉŒ¾‚¦‚é‚©‚ç
”w—–@‚É‚æ‚è’PˆÊŒ³‚ª‘¶Ý‚µ‚È‚¢A‚łೂµ‚¢˜_Ø‚¾‚ÆŽv‚¤

‚à‚µ‚±‚̉‰ŽZf‚ɑ΂µ‚ă‚ƒmƒCƒh‚ð\¬‚·‚é‚È‚çA
(>>768‚Ƃقړ¯‚¶‚±‚Æ‚ðŒ¾‚¤‚ª) length es == ‡ ‚È‚é—v‘f‚ð1‚ÂŒˆ‚ß‚Ä
(‘S‚Ă̗LŒÀƒŠƒXƒg) ¾ {es}
‚Ý‚½‚¢‚ÈW‡‚Ìã‚łȂ猾‚¦‚»‚¤
‚¿‚á‚ñ‚ÆŒ©‚ĂȂ¢‚¯‚ÇŒ‹‡—¥‚à‚»‚ê‚Á‚Û‚­U‚é•‘‚Á‚Ä‚»‚¤ []
[‚±‚±‰ó‚ê‚Ă܂·]

781 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/02/26(‹à) 11:29:42.18 ID:s/eVhYHX.net]
>>768
>>771
‚¨“ñ•û‚̈ӌ©‚ðŽQl‚ÉA‚à‚¤ˆê“x‚æ‚­l‚¦‚Ă݂܂·B
‚ ‚肪‚Æ‚¤‚²‚´‚¢‚Ü‚µ‚½B

782 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ [2021/03/14(“ú) 16:53:23.31 ID:XMH1AJguA]
ƒAƒvƒŠ‚ÌŽ‹’®—¦‚ª‚í‚©‚é@‚ꑲ‹N‹Æ‰Æ‚̓Ƒn—Í
https://www.nikkei.com/article/DGXMZO46695580Y9A620C1000000/
‚P–œl‚ÌŽáŽÒ‚ðŽx‰‡IƒCƒ“ƒ^[ƒ“‚ª“ú–{‚ð•Ï‚¦‚é‚©‚àIH@glowship‚ÌŽá‚«‘n‹ÆŽÒE‘«—§‘ì–玃Cƒ“ƒ^ƒrƒ…[
https://sogyotecho.jp/glowship-adachi-interview/
‹N‹Æ‚ŬŒ÷‚·‚éƒLƒƒƒŠƒAŒ`¬‚ÌŽd•û‚Æ‚ÍH Œ³ƒvƒƒTƒbƒJ[‘IŽè‚Å‹N‹Æ‰Æ‚Ì—é–ØŒ[—Sނɕ·‚¢‚½
https://sogyotecho.jp/career-development/
”NŽû3,000–œ’´‚¦!?ŒÂlŠJ”­‚Ŗׂ©‚Á‚Ä‚¢‚éŠCŠOƒRƒ~ƒ…ƒjƒeƒBƒTƒCƒg5‘II
https://note.com/taishikato/n/n7809a8ed3ffc
Ž©•ª‚ÌŽ‹–ì‚Íu¢‚Ì’†‚Ì0.001%v‚ÆŽ©Šo‚¹‚æBƒrƒWƒlƒXƒ`ƒƒƒ“ƒX‚ð’Í‚Þ4‚‚ÌKе
https://headlines.yahoo.co.jp/hl?a=20200511-00010001-srnijugo-life
l‚Í‚±‚¤‚·‚ê‚Îgƒnƒ}‚éhAŒ¹—¬‚̓Q[ƒ}[Ž‹“_‚ÌuK‚¹v
https://project.nikkeibp.co.jp/behealth/atcl/feature/00005/012100006/
’N‚à‚ªƒIƒŠƒWƒiƒ‹ƒAƒvƒŠ‚ðì‚ê‚鎞‘ã‚ÖBƒXƒ^[ƒgƒAƒbƒvŽx‰‡‚És—Í‚µ‚Ä‚«‚½‹N‹Æ‰Æ‚ÌŒ´“®—͂ƂÍ
https://fukuoka.startupnews.jp/post/nappstechnologies/
2”NŠÔ‚Å23‰­‰~‚ð’²’BB22΂̎В·‚ªŒê‚égƒXƒ^[ƒgƒAƒbƒv‹N‹Æh
https://superceo.jp/tokusyu/manga/100736

783 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/03/18(–Ø) 15:12:33.23 ID:4AdjqCpZ.net]
‚È‚ñ‚©Å‹ßƒvƒƒOƒ‰ƒ~ƒ“ƒO‚Ìî•ñƒlƒbƒg‚Å‹™‚Á‚Ă邯”ŠwŠî‘b˜_‚Ì‹L†‚炵‚«‚à‚ÌA‰¡–_‚Ìã‚ɂȂñ‚©–½‘è‚炵‚«•¶Žš—ñ‚ª•À‚ñ‚Å‚é“z‚ª‚ß‚¿‚á‚ß‚¿‚áo‚Ä‚­‚é‚ñ‚Å‚·‚¯‚ÇAŠ®‘S‚Éæ‚è’x‚ê‚Ü‚µ‚½
‚È‚ñ‚©‚ ‚Ì‹L†‚̈Ӗ¡‰ðà‚µ‚Ă邢‚¢‹³‰È‘‚Æ‚©ƒTƒCƒg‚Æ‚©‚ ‚è‚Ü‚¹‚ñ‚©H

784 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/03/18(–Ø) 19:10:51.45 ID:lKavXNN6.net]
>>774
‚±‚̂悤‚ÈŽ®‚Å‚·‚©H

P -> Q P
--------------
Q

‚±‚ê‚ÍA‰¡ü‚Ìã‚̘_—Ž®(‚±‚Ì—á‚ÌꇂÍ2‚‚̘_—Ž®)‚ð‘O’ñ‚Æ‚·‚邯A
‚¢‚­‚‚©‚Ì„˜_‹K‘¥‚ðŽg‚¦‚Ή¡ü‚̉º‚̘_—Ž®‚ª“±‚¯‚éA
‚Æ‚¢‚¤ˆÓ–¡‚Å‚·B

˜_—Šw‚Ì‹³‰È‘(“I‚ȉðàƒTƒCƒg)‚Ȃ烌ƒxƒ‹‚Ì‚’á‚ÉŠÖ‚í‚炸‚Ç‚ê‚Å‚àÚ‚Á‚Ä‚¢‚Ü‚·‚ªA
‚Ç‚ê‚Å‚àŽ®Ž©‘̂̈Ӗ¡‚ɂ‚¢‚Ă͂±‚Ì’ö“x‚Ìà–¾‚µ‚©–³‚¢‚ÆŽv‚¢‚Ü‚·‚æB
—Ⴆ‚Î
https://abelard.flet.keio.ac.jp/person/takemura/class/2013/3-print-nk.pdf

’m‚肽‚¢‚±‚Æ‚ªˆá‚Á‚Ä‚¢‚½‚炲‚ß‚ñ‚È‚³‚¢B

785 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/03/18(–Ø) 19:28:09.20 ID:wWeTTUcP.net]
>>775
‚ ‚肪‚Æ‚¤‚²‚´‚¢‚Ü‚·
ƒMƒŠƒMƒŠ‚»‚Ì}Œ`‚̈Ӗ¡‚͂킩‚è‚Ü‚·
–â‘è‚Í‚»‚ê‚ÆƒvƒƒOƒ‰ƒ~ƒ“ƒO‚Ì—˜_‚ª‚Ç‚¤ŠÖ‚í‚Á‚Ă邩‚̂Ƃ±‚È‚ñ‚Å‚·
‘½•ªƒJƒŠ[ƒnƒ[ƒh‘Ήž‚Æ‚¢‚¤‚â‚‚¾‚ÆŽv‚¤‚ñ‚Å‚·‚ª
ƒRƒŒ‚È‚ñ‚©–ð‚É—§‚‚à‚ñ‚È‚ñ‚Å‚·‚©‚Ë‚¥H

786 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/03/18(–Ø) 20:21:41.37 ID:lKavXNN6.net]
>>776
‚ß‚¿‚á‚ß‚¿‚áo‚Ä‚­‚邯‚¢‚¤Ž–‚Å‚·‚Ì‚ÅA
‚»‚̃y[ƒW‚ÌURL‚ð‚¢‚­‚‚©‹“‚°‚Ä‚­‚ê‚Ü‚¹‚ñ‚©B

‚»‚¤‚·‚ê‚ÎA‚à‚µ‚©‚µ‚½‚çA‚Ç‚¤ŠÖ‚í‚Á‚Ä‚¢‚é‚Ì”cˆ¬‚Å‚«‚ÄA
à–¾A‚ ‚é‚¢‚͉ðàƒy[ƒW‚â‘ЂÌЉ‚Å‚«‚é‚©‚à‚µ‚ê‚Ü‚¹‚ñB

787 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/03/18(–Ø) 20:27:07.75 ID:gebFut6o.net]
—Ⴆ‚΃vƒƒOƒ‰ƒ€‚ðƒŠƒtƒ@ƒNƒ^ƒŠƒ“ƒO‚·‚邯‚«AC³‘OŒã‚ł̋““®ˆê’v‚ðØ–¾‚Å‚«‚½‚è‚·‚邼
‚·‚²‚¢🤗
(ˆË‘¶Œ^‚̂Ȃ¢Haskell‚Å‚Ío—ˆ‚È‚¢‚©‚çidris‚̗Ⴞ‚¯‚Ç)

https://keens.github.io/blog/2020/12/22/idrisdeizongatawotsukattashoumeinyuumon/

‚â‚肽‚¢‚±‚Æ‚ª”Šw^˜_—Šw‚̕׋­‚Æ‚©‚È‚çcoq‚̂ق¤‚ª‚悳‚°



788 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/03/18(–Ø) 23:49:21.36 ID:wWeTTUcP.net]
>>777
‚»‚¤‚Å‚·‚Ë
—Ⴆ‚Îcall by name‚Æcall by need‚̈Ⴂ‚𒲂ׂ悤‚ÆŽv‚Á‚½Žž‚Éo‚Ä‚«‚½

https://reader.elsevier.com/reader/sd/pii/S1571066104000222?token=1C1ACCAE69D33669B7D36179C932FC14DD80723B2FD5B3080E3B1EDED9228FC6A9A6AC347668843625B7154C276B7B4C

‚È‚ñ‚©ƒoƒŠƒoƒŠo‚Ä‚«‚Ü‚·
‚È‚ñ‚Ì‚±‚Á‚¿‚á‚Æ

>>166
coq‚à‚æ‚­•·‚«‚Ü‚·‚æ‚Ë
‚È‚ñ‚©‚¨‚·‚·‚߂̋³‰È‘‚Æ‚©‚ ‚è‚Ü‚·‚©H

789 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/03/19(‹à) 00:48:13.30 ID:H+hZ3f68.net]
ƒJƒŠ[ƒnƒ[ƒh‘Ήž‚Á‚Ä—v‚Í
True => True = True
True => False = False
False => True = True
False => False = True
‚ª
{’PW‡->’PW‡}=’PW‡ (’PW‡‚©‚ç’PW‡‚Ö‚ÌŽÊ‘œ‚͈ê’ʂ肾‚¯)
{’PW‡->‹óW‡}=‹óW‡ (’PW‡‚©‚ç‹óW‡‚Ö‚ÌŽÊ‘œ‚Í‘¶Ý‚µ‚È‚¢)
{‹óW‡->’PW‡}=’PW‡ (‹óW‡‚©‚ç”CˆÓ‚ÌW‡‚Ö‚ÌŽÊ‘œ‚͈ê’Ê‚è(‹óŽÊ‘œ))
{‹óW‡->‹óW‡}=’PW‡ (ã‚É“¯‚¶)
‚ƑΉž‚µ‚Ä‚é‚Á‚ÄŠ´‚¶‚Æ‘¨‚¦‚ê‚Ηǂ¢‚Ì‚©‚ÈH
wikipedia“Ç‚ñ‚Å‚à‚ ‚ñ‚܂藉ð‚Å‚«‚È‚¢

790 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/03/19(‹à) 01:58:47.96 ID:MuA020tT.net]
–¼‘OŒÄ‚Ño‚µ‚̈Ӗ¡‚ª•ª‚©‚è‚Ü‚¹‚ñ

791 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/03/19(‹à) 02:07:37.96 ID:FHn+Zz2I.net]
>>779
Œ‹‹Ç‚̂Ƃ±‚ë’m‚肽‚¢‚±‚Ƃ͉½‚Å‚·‚©H

ƒJƒŠ[ƒnƒ[ƒh“¯Œ^‘Ήž‚ƃvƒƒOƒ‰ƒ€‚Ƃ̊֌W«‚Å‚·‚©H
‚»‚ê‚Æ‚àAƒJƒŠ[ƒnƒ[ƒh“¯Œ^‘Ήž‚ªƒvƒƒOƒ‰ƒ€‚̉½‚ɖ𗧂‚̂©‚Å‚·‚©H
‚»‚ê‚Æ‚àAcall by name ‚Æ call by need ‚Ƃ̈Ⴂ‚Å‚·‚©B
‚»‚ê‚Æ‚àA‚»‚̘_•¶‚Ì“à—e‚Å‚·‚©B
(‚»‚Ìê‡APDF‚Ì5ƒy[ƒW–Ú‚Ü‚ÅA‚‚܂艡ü‚ÌŽ®‚ª“oê‚·‚é•”•ª‚܂ł͂¿‚á‚ñ‚Æ—‰ð‚Å‚«‚Ä‚¢‚邯Žv‚Á‚Ä‚¢‚¢‚̂ł·‚©H)

‚»‚ê‚Æ‚àA‘S‚­•ʂ̂±‚Ƃł·‚©H

‚Ƃ肠‚¦‚¸’m‚肽‚¢‚±‚Æ‚ðƒsƒ“ƒ|ƒCƒ“ƒg‚ɬ‚³‚­ˆê‚‚Éi‚èA
‚»‚ê‚ð‹ï‘Ì“I‚ÉŽ¿–₵‚Ä‚¢‚½‚¾‚¯‚邯•‚©‚è‚Ü‚·B


‚Æ‚±‚ë‚ÅA>>781 ‚ÍŒ³‚ÌŽ¿–âŽÒ‚³‚ñ‚Å‚·‚©H

792 –¼‘OF768 mailto:sage [2021/03/19(‹à) 02:15:59.36 ID:MuA020tT.net]
>>782
‚²‚ß‚ñ‚È‚³‚¢
–l‚Í•Êl‚ÅŠ„‚螂݂ł·

793 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/03/19(‹à) 03:08:33.55 ID:FHn+Zz2I.net]
>>783
’x‰„•]‰¿‚ðŽÀŒ»‚·‚é•]‰¿í—ª‚Ì’†‚ÉA•K—vŒÄ‚Ño‚µ(call by need)‚Æ–¼‘OŒÄ‚Ño‚µ(call by name)‚ª‚ ‚è‚Ü‚·B

•K—vŒÄ‚Ño‚µ‚Íhaskell‚ªÌ‚Á‚Ä‚¢‚éí—ª‚ÅA
ˆê“x•]‰¿‚µ‚½’l‚ðŽg‚¢‰ñ‚µ‚Ä–³‘ʂȌĂÑo‚µ‚ð–h‚®‚à‚̂ł·B

ˆê•ûA–¼‘OŒÄ‚Ño‚µ‚Í“¯‚¶’x‰„•]‰¿‚Å‚àA•]‰¿‚µ‚½’l‚ð‹L‰¯‚¹‚¸A•K—v‚Ȃ牽“x‚Å‚à“¯‚¶•]‰¿ˆ—‚ð‚·‚é‚à‚̂ł·B

794 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/03/19(‹à) 09:49:18.16 ID:pEtEADGt.net]
>>782
‚»‚¤‚Å‚·‚Ë
‘½•ª‘ΉžŽ©‘̂͂킩‚邯Žv‚¢‚Ü‚·
‚µ‚©‚µŽÀÛƒJƒŠ[ƒnƒ[ƒh‘Ήž‚ÅŠî‘b˜_‚Ì¢ŠE‚ÉŽ‚Á‚Äs‚­‚±‚Ƃ̌ø—p‚ª‚æ‚­‚í‚©‚è‚Ü‚¹‚ñ
Šî‘b˜_‚Ì¢ŠE‚ÉŽ‚Á‚Ä‚¢‚Á‚ÄŠî‘b˜_‚ł悭’m‚ç‚ꂽ‚È‚ñ‚©‚Ì’è—‚ªŽg‚¦‚邯‚©‚¢‚¤‚킯‚Å‚à‚È‚³‚»‚¤‚Å‚·‚µ
ʼn‚Ícall by need‚ÌŽÀ‘•‚̘bA‚·‚Ȃ킿call by need‚ł͓WŠJ‚³‚ꂽ•]‰¿Ž®‚É“¯‚¶expression‚ªo‚½‚Æ‚«A‚»‚Ì“à—e‚ð•ÛŽ‚µ‚Ä“¯‚¶•]‰¿‚ð‰½“x‚àŒJ‚è•Ô‚·‚Ì‚ð–h‚®‚炵‚¢‚Å‚·‚ªA‚à‚¿‚ë‚ñ‚Ç‚ñ‚È•]‰¿‚Å‚à‰½‚Å‚à‚©‚ñ‚Å‚àƒƒ‚‚·‚é‚킯‚ł͂Ȃ¢‚悤‚Ȃ̂ÅAŒ‹‹ÇŽ©•ª‚ÅŽè‘O‚Ńƒ‚‰»‚·‚é•K—v‚ª‚Å‚½‚肵‚Ü‚·
‚Ç‚¤‚¢‚¤Žž‚Ícall by need‚̃ƒ‚‰»‚ªŒø‚¢‚Ăǂ¤‚¢‚¤ê‡‚ÍŒø‚©‚È‚¢‚Ì‚©‚æ‚­‚í‚©‚ç‚È‚¢‚̂Ō»ó‚Íg‚â‚Á‚Ă݂éh‚µ‚©‚È‚¢‚µA‚â‚Á‚Ă݂ÄãŽè‚­‚¢‚©‚È‚­‚Ä‚àA‚È‚ñ‚©ãŽè‚¢‘‚«•û‚·‚ê‚΂â‚Á‚Ä‚­‚ê‚é‚Ì‚©A‚͂Ȃ©‚炾‚߂Ȃ̂©A‚»‚Ì”»•Ê‚à‚‚«‚Ü‚¹‚ñ

795 –¼‘OF768 mailto:sage [2021/03/19(‹à) 11:58:13.56 ID:f7aaFMxN.net]
>>784
‚ ‚肪‚Æ‚¤‚²‚´‚¢‚Ü‚·

‚±‚̂Ƃ«‚Ìu–¼‘Ov‚Ȃ̂ł·‚ªAޝ•ÊŽq‚̂悤‚È‚à‚̂łȂ­A•]‰¿EŠÈ–ñ‘O‚ÌuŽ®‚ÌŽš–Êv“I‚ȈӖ¡‚Ȃ̂ł·‚©‚Ë

796 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/03/19(‹à) 13:27:51.17 ID:5FIf9nG9.net]
ÓIŒ^‚̃AƒCƒfƒA‚Í
ŽÀsŽž‚Ì¢ŠE‚Å‚â‚Á‚Ä‚¢‚½‚±‚Æ‚ðƒRƒ“ƒpƒCƒ‹Žž‚Ì¢ŠE‚ÉŽ‚Á‚Äs‚­‚±‚Æ‚¾‚©‚ç
‚±‚̃AƒCƒfƒA‚ªíޝ‚ɂȂç‚È‚¢ŒÀ‚è“®“IŒ^‚ÌŽž‘ã‚ÍI‚í‚ç‚È‚¢‚¾‚낤

797 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/03/20(“y) 08:58:16.14 ID:Hmrg9tvu.net]
>>785
ƒvƒƒOƒ‰ƒ€‚Ì¢ŠE‚É‚¨‚¢‚ÄA‚ ‚鎖•¿‚Ì«Ž¿‚âAŽ–•¿A‚ÆŽ–•¿B‚ÌŠÔ‚ÌŠÖŒW‚𒲂ׂ½‚¢‚Æ‚«A
ƒvƒƒOƒ‰ƒ€‚Ì¢ŠE‚Ì’†‚ł͂Ȃ©‚È‚©‚¤‚Ü‚­Œ©‚¦‚Ä‚±‚È‚¢ê‡‚ª‚ ‚éB
‚»‚ñ‚ȂƂ«A ƒJƒŠ[ƒnƒ[ƒh“¯Œ^‘Ήž‚É‚æ‚Á‚Ä–â‘è‚ð˜_—‚Ì¢ŠE‚Ɉڂ·‚ÆA
Œ©’Ê‚µ‚ª—Ç‚­‚È‚èA’²‚ׂ₷‚­‚Ȃ邱‚Æ‚ª‚ ‚éB
‚»‚¤‚¢‚¤ˆÓ–¡‚ł͖𗧂¿‚Ü‚·B
Ž¿–âŽÒ‚³‚ñ‚ª—Ꭶ‚µ‚½˜_•¶‚ª‚Ü‚³‚É‚»‚ê‚Å‚·B

ˆê•ûA‰½‚©‚ðì‚邽‚߂ɃvƒƒOƒ‰ƒ€‚ð‚·‚é(Œ»ê‚Ì)l‚½‚¿‚ɂƂÁ‚Ä‚ÍA‚Æ‚­‚ɖ𗧂‚±‚Ƃ͖³‚¢‚ÆŽv‚¢‚Ü‚·B
–ð—§‚Á‚½˜b‚ðˆêØ•·‚«‚Ü‚¹‚ñB

Ž¿–âŽÒ‚³‚ñ‚ªA–¼‘OŒÄ‚Ño‚µ‚ȂǂÌu«Ž¿‚âŠÖŒWv‚ðŠwp“I‚É[‚­’m‚肽‚­‚Ä’²‚ׂĂ¢‚é‚̂ł ‚ê‚ÎA–𗧂‚Ǝv‚¢‚Ü‚·B

Ž©ì‚̃vƒƒOƒ‰ƒ€Œ¾Œê‚Å–¼‘OŒÄ‚Ño‚µ‚ðŽÀ‘•‚µ‚½‚­‚Ä’²‚ׂĂ¢‚é‚̂ł ‚ê‚ÎA–ð—§‚¿‚Ü‚¹‚ñ‚ËB
•ʂ̘_•¶‚É“–‚½‚Á‚½•û‚ª‚¢‚¢‚ÆŽv‚¢‚Ü‚·B



798 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/03/20(“y) 09:35:36.64 ID:IEpiSEKy.net]
>>788
‚»‚¤‚È‚ñ‚Å‚·‚©
“‚¢‚Å‚·‚Ë
haskell ‚Ì call by need ‚̃VƒXƒeƒ€‚ª‚Ç‚¤‚¢‚¤‹ï‡‚ÉŽÀ‘•‚³‚ê‚Ă邩’²‚ׂ悤‚Æ‚·‚邯‚Ù‚ÚŠmŽÀ‚ɃJƒŠ[ƒnƒ[ƒh‘Ήž‚ªo‚Ä‚«‚Ü‚·
ƒ{ƒ`ƒ{ƒ`•׋­‚·‚邵‚©‚È‚³‚»‚¤‚Å‚·‚Ë
‚»‚à‚»‚àcall by need‚̃ƒ‚‰»‚̘b‚Íhaskell ƒRƒ“ƒpƒCƒ‰‚ÌŽÀ‘•‚̘b‚Ȃ̂Åhaskell‚ÌŒ¾ŒêŽ©‘̂̃ŒƒMƒ…ƒŒ[ƒVƒ‡ƒ“‚ɂ͂ЂƂ‚àÚ‚Á‚ĂȂ¢(‚‚܂èghc‚ł̓ƒ‚‰»‚ªŒø‚¢‚Ä‘‚¢‚¯‚Ǖʂ̃VƒXƒeƒ€‚ł͒x‚¢‚Æ‚¢‚¤Ž–‚à‚ ‚肤‚邵•¶‹åŒ¾‚¦‚È‚¢)‚̂Ōø‚­‚©Œø‚©‚È‚¢‚©ŽŽ‚µ‚Ă݂邵‚©‚È‚¢‚Ì‚ª•s–ù‰õ‚È‚ñ‚Å‚·‚æ‚Ë‚¦

799 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/03/20(“y) 10:00:16.31 ID:1F8CRKpv.net]
>>789
‚»‚ê‚È‚ç graph reduction ‚ÌŽÀ‘•‚𒲂ׂ½•û‚ª—Ç‚¢‚ÆŽv‚¢‚Ü‚·B

800 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/03/20(“y) 10:28:51.32 ID:Hmrg9tvu.net]
>>786
‚·‚¢‚Ü‚¹‚ñAcall by name ‚Æ‚¢‚¤–¼Ì‚Ì—R—ˆ‚Í•ª‚©‚ç‚È‚¢‚Å‚·B
‚¢‚܂܂ŋC‚É‚µ‚½‚±‚Æ‚à‚È‚©‚Á‚½‚Å‚·B

801 –¼‘OF768 mailto:sage [2021/03/20(“y) 12:05:15.57 ID:WUxvQvbt.net]
>>791
‚ ‚肪‚Æ‚¤‚²‚´‚¢‚Ü‚·
‚±‚¿‚炱‚»A‚½‚Ñ‚½‚Ñ‚·‚݂܂¹‚ñ

ƒ}ƒ“ƒK‚̃ZƒŠƒt‚Ì‚±‚Æ‚ðuƒl[ƒ€v‚Æ‚¢‚¤‚炵‚¢‚Ì‚ÅA‘‚¢‚½Žš–Ê‚ð‚¢‚¤‚Ì‚©‚È‚Æl‚¦‚½‚è
name ‚ð˜a‰pE‰p‰pŽ«“T‚Å’²‚ׂĂàAŒ‹‹Ç‚µ‚Á‚­‚è‚«‚Ü‚¹‚ñ‚Å‚µ‚½

ƒXƒŒ‰˜‚µ‚·‚݂܂¹‚ñ‚Å‚µ‚½

802 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/03/20(“y) 14:58:31.86 ID:5ytd1i+3.net]
ƒJƒŠ[ƒnƒ[ƒh“¯Œ^‘Ήž‚Æ‚©‚Á‚ÄA‹@ŠBŠwK‚¾‚̃A[ƒLƒeƒNƒ`ƒƒ‚¾‚̃lƒbƒgƒ[ƒN‚¾‚̃Aƒ‹ƒSƒŠƒYƒ€‚¾‚̂Ƃ¢‚Á‚½HŠw“I‚ʼnž—p“I‚Å–Ú“IˆÓޝ‚Ì’è‚Ü‚Á‚½‰½‚©‚Ì–ð‚É—§‚‚½‚߂ɔ­–¾‚³‚ꂽ‚à‚̂Ƃ¢‚¤‚æ‚è‚àA—Šw“I‚ÅŠî‘b“I‚È’P‚È‚éd—v‚ÈŽ–ŽÀ‚Æ‚¢‚¤•µˆÍ‹C‚ ‚é‹C‚ª‚·‚é

803 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/03/21(“ú) 00:15:43.04 ID:5CEWIvha.net]
‹M‹à‘®‚ÆŠúŒÀ‚‚«ƒ|ƒCƒ“ƒg‚̑Η§ø‚è‚É‚½‚Æ‚¦‚é
Žg—pŠúŒÀ‚ª‚È‚¢‚͎̂g—p–Ú“I‚ª‚È‚¢‚ÆŒ¾‚Á‚Ä‚¢‚邿‚¤‚È‚à‚Ì
‚¾‚ªŠúŒÀ‚ª‚È‚¢•û‚àƒƒŠƒbƒg‚ª‚ ‚é‚Ì‚ÍHŠw“I‚É‚à”Û’è‚Å‚«‚È‚¢Ž–ŽÀ

804 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/03/22(ŒŽ) 13:52:42.80 ID:gNDsQT3i.net]
>>790
graph refuction‚Å‚·‚©
’²‚ׂĂ݂܂·
‚µ‚©‚µ‚Æ‚à‚©‚­A‚¶‚á‚ GHC‚Æ‚©‚ł͂ǂ¤ŽÀ‘•‚³‚ê‚Ä‚é‚Ì‚©‚Æ‚©‚¢‚¤Ž‘—¿‚Í‚©‚È‚è‚ÌŠ„‡‚ÅŒ‹‹ÇƒJƒŠ[ƒnƒ[ƒh‘ΉžŽg‚Á‚Ă镶Œ£‚µ‚©o‚Ä‚±‚È‚¢‚Ì‚ª‚È‚ñ‚Æ‚à
“––Ê‚Íg‚â‚Á‚Ă݂éh‚Å‚â‚è‰ß‚²‚·‚µ‚©‚È‚³‚»‚¤‚Å‚·

805 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/03/22(ŒŽ) 15:09:38.98 ID:UycYSiaC.net]
call by name(‰¼)‚Ì³Ž®–¼Ì‚ªgraph reduction‚¾‚Á‚½‚ç
ƒJƒŠ[ƒnƒ[ƒh‘Ήž(‰¼)‚ɂ೎®–¼Ì‚ª‚ ‚è‚»‚¤‚¾‚¯‚Ç
’ù³‚·‚邱‚Ƃŗ˜‰v‚ªo‚¹‚邿‚¤‚ɂȂç‚È‚¯‚ê‚Î³Ž®–¼Ì‚̉¿’l‚à•ª‚©‚ç‚ñ

806 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/03/22(ŒŽ) 19:37:04.72 ID:TV/B7jf8.net]
>>795
Ž„‚ɂ͂ނµ‚ëƒJƒŠ[ƒnƒ[ƒh“¯Œ^‘Ήž‚ð—z‚ɂ͎g‚Á‚Ä‚¢‚È‚¢Ž‘—¿‚µ‚©Œ©“–‚½‚ç‚È‚¢‚Å‚·B
ŒŸõƒL[ƒ[ƒh‚â’²‚וû‚ªˆá‚¤‚Ì‚©‚à‚µ‚ê‚Ü‚¹‚ñ‚ËB
(ƒJƒŠ[ƒnƒ[ƒh“¯Œ^‘Ήž‚ª‚³‚·ˆÓ–¡‚ª‚¨ŒÝ‚¢‚Ɉá‚Á‚Ä‚¢‚é‰Â”\«‚à‚ ‚è‚Ü‚·‚ª)

‚±‚ÌŽ‘—¿‚͂ǂ¤‚Å‚µ‚傤‚©B
’x‰„•]‰¿‚ð‚·‚éŠÖ”Œ^Œ¾Œêˆê”ʂ̎À‘••û–@‚Å‚·B
https://www.microsoft.com/en-us/research/uploads/prod/1987/01/slpj-book-1987.pdf

807 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/03/22(ŒŽ) 20:29:59.10 ID:UycYSiaC.net]
—Ⴆ‚Îmonomorphism restriction‚Æ‚©‚¢‚¤ƒAƒŒ‚¾‚Á‚½‚ç
ŽÀsŽž‚Ì‹““®‚ł͂Ȃ­Œ^‚̘b‚ɂȂé‚ñ‚¶‚á‚È‚¢‚©



808 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/03/23(‰Î) 01:01:29.12 ID:HzbeYy7B.net]
>>797
‚ ‚肪‚Æ‚¤‚²‚´‚¢‚Ü‚·
\͂ł·‚Ë
¡“xŽžŠÔ‚ðŒ©‚Â‚¯‚ēǂñ‚ł݂܂·
‚»‚¤‚Å‚·‚Ë
‚â‚Á‚ς莄‚ÍGHCŠÖ˜A‚ÌŽ‘—¿‚ð‚ ‚½‚鎖‚ª‘½‚­‚ÄA‚â‚͂肻‚±‚ł͔Šw‚æ‚è‚ÌŽ‘—¿‚ª‘½‚¢‚ñ‚Å‚µ‚傤‚Ë
‚Å‚à‚â‚Í‚ècall by need‚ÌŽÀ‘••û–@‚ÍHaskell‚̃ŒƒMƒ…ƒŒ[ƒVƒ‡ƒ“‚ɂ͊܂܂ê‚Ä‚¢‚È‚¢ŽÀ‘•ˆË‘¶‚̂Ƃ±‚ë‚Ȃ̂ÅGHC user‚ÌŽ„‚͂ǂ¤‚µ‚Ä‚àGHCŠÖ˜A‚ÌŽ‘—¿‚©‚ç“–‚½‚肽‚­‚È‚Á‚Ä‚µ‚Ü‚¢‚Ü‚·
GHC‚ł̃Cƒ“ƒvƒŠƒƒ“ƒg‚ÍÅV‚̬‰Ê‚ª‘S‚Ä”½‰f‚³‚ê‚Ă邯‚ÍŒÀ‚ç‚È‚¢‚µA‚ ‚é‚¢‚Í‚ ‚Ü‚èˆê”Ê“I‚łȂ¢Žè–@‚ð—p‚¢‚Ä‚¢‚é‚©‚à‚µ‚ê‚È‚¢‚µA‚»‚±‚ÍGHC‚»‚Ì‚à‚̂̎‘—¿‚ªˆê”Ô—Š‚è‚ɂȂè‚Ü‚·
‚½‚¾ˆê‚‚̖â‘è‚Í‚ ‚Ü‚è‚É‚à”Šw‘º(‚ÌŒvŽZ˜_”¨)‚ÌŒ¾—t‚Å‘‚©‚ê‚ĂăTƒbƒpƒŠ‚í‚©‚ç‚ñ‚Æ‚±orz

809 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/03/23(‰Î) 03:42:25.12 ID:VKgh9sH5.net]
>>799
—]Œv‚È‚¨¢˜b‚¾‚Ƃ͎v‚¢‚Ü‚·‚ªA‚Ç‚ÌÍ‚à‚»‚Ì‘O‚܂łÌÍ‚ÌÏ‚Ýd‚˂Ȃ̂ÅA
‘æ10Í‚¾‚¯‚ð“Ç‚ñ‚Å—‰ð‚·‚é‚͓̂‚¢‚ÆŽv‚¢‚Ü‚·B

‚©‚È‚èŒÃ‚¢Ž‘—¿‚ð’ñަ‚µ‚½‚Ì‚ÍAŠî‘b‚ÌŠî‘b‚©‚çŠw‚ñ‚¾•û‚ª—Ç‚¢‚ÆŽv‚Á‚½‚©‚ç‚Å‚·B
‚±‚ÌŽ‘—¿‚Í–{“–‚É•ª‚©‚è‚â‚·‚­Šî‘b‚©‚çà–¾‚³‚ê‚Ä‚¢‚é‚Ì‚ÅA
‹}‚ª‚Ήñ‚ê‚̸_‚ÅA˜‚𘂦‚Ä‚¶‚Á‚­‚è‚ÆŠw‚ñ‚ł݂邱‚Æ‚ð‚¨Š©‚ß‚µ‚Ü‚·B
‚»‚ꂱ‚»”ƒ–ŒŽ‚©‚¯‚ÄB


‚È‚ñ‚©‚±‚¤A”Šw‚ŗႦ‚é‚È‚çAW‡˜_‚â‰ðÍŠw‚ÌŠî‘b‚ª‚ ‚â‚Ó‚â‚Ȃ܂ÜA
ˆÊ‘Š‹óŠÔ˜_‚Ì•K—v‚È•”•ª‚¾‚¯‚ð“s‡‚æ‚­Šw‚Ú‚¤‚Æ‚µ‚Ä‚¢‚邿‚¤‚ÈA
‚»‚ñ‚È‚«‚ç‚¢‚ª‚ ‚邿‚¤‚ÉŒ©‚¦‚Ü‚·B

810 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/03/23(‰Î) 05:16:41.87 ID:EMfQwUjX.net]
‚»‚¤‚Å‚·‚©
Žc”O‚È‚ª‚ç“–•ûŒvŽZ˜_‚̓Eƒ‹ƒ}ƒ“ƒzƒbƒvƒNƒ‰ƒtƒg‚⼉ªæ¶‚Ì‹³‰È‘‚µ‚©“Ç‚ñ‚¾‚±‚ƂȂ¢‚̂ł©‚È‚è’mޝ‚ª”ŠwƒTƒCƒh‚ÉŠñ‚Á‚Ă܂·
ŽdŽ–‚à‚©‚Ȃ蔊w‚æ‚è‚ÅŒvŽZ˜_‚Í‚ ‚­‚܂Ŏ‚Ȃ̂ł ‚Ü‚è–{˜“ü‚ê‚ĕ׋­‚µ‚½‚±‚Ƃ͂Ȃ¢‚Ì‚Å‚à‚µ‚©‚µ‚½‚çê–å‚ɕ׋­‚³‚ê‚Ä‚é•û‚©‚猩‚ê‚΂»‚¤‚©‚à‚µ‚ê‚Ü‚¹‚ñ
‚Ü‚Ÿ–{E‚Ɉ«‰e‹¿—^‚¦‚È‚¢”͈͂ŎžŠÔŒ©‚‚¯‚ă{ƒ`ƒ{ƒ`•׋­‚µ‚Ü‚·

811 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/03/23(‰Î) 07:32:33.02 ID:e41TIwig.net]
‚Í‚Á‚«‚茾‚¤‚Æ•]‰¿í—ª‚¾‚Æ‚©„˜_‹K‘¥‚¾‚Æ‚©ƒJƒŠ[ƒnƒ[ƒh“¯Œ^‘Ήž‚¾‚Æ‚©‚̘b‚ÍA‚܂Ƃà‚Èî•ñŒn‚ÌŠw•”‚È‚çK‚¤Šî‘bŠî–{
‘åŠw‚Ìu‹`Ž‘—¿‚ªˆÕ‚µ‚¢‚ÆŽv‚í‚ê

812 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/03/23(‰Î) 20:57:46.65 ID:zFHE0Fu5.net]
î•ñŒn‚Æ‚©‚¢‚¤Œ¾‚¢•û‚ð‚·‚é“z‚ÍŒ¾Œê‚©‚瓦‚°‚Ä‚é‚Ë
u”Šw‘º‚ÌŒ¾—t‚Å‘‚©‚êv‚½Ž‘—¿‚ª‘¶Ý‚·‚é‚Ì‚à
CŒ¾Œê‚Å‘‚©‚ꂽOS‚̘b‚ð‚µ‚È‚¢‚Ì‚à
Œ¾Œê‚©‚瓦‚°‚½Œ‹‰Ê‚¶‚á‚È‚¢‚©‚È

813 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/03/24(…) 19:34:45.53 ID:8SYKHDut.net]
‰½Œ¾‚Á‚Ä‚ñ‚¾ƒRƒCƒcc

814 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/03/26(‹à) 00:15:16.59 ID:sjuSPGcx.net]
ƒJƒŠ[Eƒnƒ[ƒh“¯Œ^‘Ήž‚Í‚±‚̃Xƒ‰ƒCƒh‚ª•ª‚©‚èˆÕ‚©‚Á‚½
Œ‹‹Ç‚È‚ñ‚ÅãŽè‚­s‚­‚Ì‚©‚Á‚Ä—Ç‚­•ª‚©‚Á‚ĂȂ¢‚Ì‚Ë
https://ocw.kyoto-u.ac.jp/ja/faculty-of-lettersja/002-006/pdf/curryhoward.pdf
https://ocw.kyoto-u.ac.jp/ja/faculty-of-lettersja/002-006/pdf/curryhoward2.pdf

815 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ [2021/04/03(“y) 17:05:11.32 ID:K4bkjZP4q]
ƒuƒƒOvs—L—¿noteI¡‰Ò‚®‚È‚ç‚Ç‚Á‚¿‚ªƒIƒXƒXƒH‚»‚ꂼ‚ê‚Ì“Á’¥‚ðЉî
https://www.youtube.com/watch?v=rFtHbM3dDXs
–³–¼‚Ì–l‚ª—L—¿note‚Å100–œ‰~‰Ò‚®‚܂ł̑S‰ß’öyƒRƒc3‘I‚ð‘åŒöŠJz
https://www.youtube.com/watch?v=kLMXaMpb87A
‘fl‚Å‚à‰Ò‚°‚é!? ˜b‘è‚ÌuBrainv‚ÌŽd‘g‚Ý‚ð‰ðàB
https://www.youtube.com/watch?v=nyelB1Gr_rE
Note‚ð’´‚¦‚é‚©IHuBrainv‚Ì“Á’¥‚ÆŽg‚¢•û‚ð‰ðà‚µ‚Ü‚µ‚½
https://www.youtube.com/watch?v=GYyjfHVyAbs
—L—¿note‚âBrain‚ÅŒp‘±“I‚ɉ҂®3‚‚̕û–@yƒRƒ“ƒeƒ“ƒc”Ì”„z
https://www.youtube.com/watch?v=d31w1Q5UtA4
Brain‚ª‚ß‚¿‚á‚­‚¿‚á‰Ò‚¬‚â‚·‚¢Œ‚ɂ‚¢‚ÄB
https://www.youtube.com/watch?v=pzRd2BEuIQU
note‚Å47–œ‰~‰Ò‚®‚܂łɂµ‚½‚±‚Ƃ܂Ƃß
https://www.youtube.com/watch?v=TTS6WWseUY0

816 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/04/05(ŒŽ) 18:23:16.33 .net]
ŠÖ”‚Ì–¼‘O‚ª”í‚邯‚«A‚±‚̃‚ƒWƒ…[ƒ‹‚Ì‚»‚ꂾ‚ÆCü‚µ‚Ü‚·‚ªA
¡‘‚¢‚Ä‚é–|–ó’PˆÊ‚Ì‚»‚ꂾ‚Æ“`‚¦‚é‚ɂ͡‘‚¢‚Ă郂ƒWƒ…[ƒ‹–¼‚ÅCü‚·‚邵‚©‚È‚¢‚̂ł·‚©H
‚»‚ꂪ’·‘å‚ÈꇎS‚߂ȋCŽ‚¿‚ɂȂè‚Ü‚·

qualified ¡‘‚¢‚Ä‚¢‚郂ƒWƒ…[ƒ‹–¼ as ’Z‚¢–¼‘O
‚É‚·‚邿‚¤‚ÈŽ–‚͂ł«‚È‚¢‚̂ł·‚©H

817 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/04/05(ŒŽ) 21:28:27.96 ID:DOv0Oh8v.net]
idris‚ðŽg‚Á‚½Œ^‹ì“®ÝŒv‚̘b‚ð•·‚¢‚ÄA¦‚¢‚È‚Ÿ‚ÆŽv‚¢‚Ü‚µ‚½B
‚Å‚à‚±‚ÌŒ^‹ì“®ÝŒv‚Á‚ÄAˆË‘¶Œ^‚ªŠJ”­Œ¾Œê‚Ì‚ ‚é‚Ì‚ª‘O’ñ‚Ì•û–@‚È‚ñ‚Å‚µ‚傤‚©H



818 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/04/05(ŒŽ) 22:48:33.31 ID:RKVG1ya/.net]
>>807
¡‘‚¢‚Ä‚¢‚é–|–ó’PˆÊ‚Å import ‚µ‚Ä‚¢‚郂ƒWƒ…[ƒ‹‚ð qualified ‚Å‘•ü‚·‚ê‚ÎA
¡‘‚¢‚Ä‚¢‚é–|–ó’PˆÊ“à‚Å’è‹`‚µ‚Ä‚¢‚铯–¼‚ÌŠÖ”‚ÍCü‚¹‚¸‚Æ‚àŽg‚¦‚邯Žv‚¤‚̂ł·‚ªA‚Ç‚¤‚Å‚·‚©H

module Main where

import qualifued Data.List as L

transpose :: (Int, Int) -> (Int, Int)
transpose (x, y) = (y, x)

main :: IO ()
main = do
let a = L.transpose [[1, 2], [3, 4]]
let b = transpose (1, 2)
putStrLn $ show a ++ " / " ++ show b

819 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/04/06(‰Î) 12:32:00.21 .net]
>>809
’lƒRƒ“ƒXƒgƒ‰ƒNƒ^–¼‚É”í‚肪‚ ‚Á‚½ê‡A‚»‚ꂪ‚Å‚«‚È‚¢‚悤‚Ȃ̂ł·
import ƒ‚ƒWƒ…[ƒ‹‚Ì‘¤‚Ì“¯–¼’lƒRƒ“ƒXƒgƒ‰ƒNƒ^‚ðAqualified‚µ‚ÄCü‚µ‚Ü‚µ‚½‚̂š‘‚¢‚Ă郂ƒWƒ…[ƒ‹‚Ì•û‚ðCü‚È‚µ‚Å‘‚¢‚½‚̂ł·‚ª
‚»‚ê‚ÍAmbiguous‚¾‚Æ“{‚ç‚ê‚Ü‚·

820 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/04/06(‰Î) 20:13:47.61 ID:sYlI8eNJ.net]
ƒzƒ“ƒg‚¾
“{‚ç‚ꂽ

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 ©ƒ_ƒ‚¾‚Á‚Ä

821 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/04/06(‰Î) 20:14:29.60 ID:VZ4U19ap.net]
‚»‚è‚á‚»‚¤‚Å‚µ‚傤‚æEE

822 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/04/06(‰Î) 20:30:15.84 ID:O0PfwEM6.net]
žB–†‚³–³‚­–³‚¢H‚È‚ñ‚Ń_ƒ‚È‚ñ‚¾‚Á‚¯

823 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/04/06(‰Î) 20:31:09.67 ID:xR67cG4d.net]
Prelude ‚ªˆÃ–Ù“I‚É‹‚é‚©‚çH

824 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/04/06(‰Î) 21:08:36.42 ID:sYlI8eNJ.net]
‚µ‚©‚µ>>809‚Í“{‚ç‚ê‚È‚¢
ŠÖ”‚Æ‚©’lƒRƒ“ƒXƒgƒ‰ƒNƒ^‚Æ‚©class–¼‚Æ‚©‚»‚ꂼ‚ê‚Ì–¼‘O‹óŠÔ‚Å‚¿‚å‚Á‚Æ‚¸‚ŠǗ–@‚ª‚¸‚ê‚Ä‚é‚ñ‚¾‚È
——R‚Í’m‚ç‚ñ‚¯‚Ç

825 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/04/06(‰Î) 22:30:07.58 ID:sYlI8eNJ.net]
‚¢‚â>>814‚³‚ñ‚ÌŒ¾‚¤’ʂ肾‚Á‚½‚©‚ÈH
ƒRƒŒ«‚Í’Ê‚é
Bool‚ªƒ_ƒ‚¾‚Á‚½‚Ì‚ÍPrelude‚œǂñ‚Å‚½‚©‚炾‚È
‚¿‚á‚ñ‚ÆCü‚È‚µ‚Ìê‡Main module‚̃Rƒ“ƒXƒgƒ‰ƒNƒ^‚ª‘I‚΂ê‚Ä‚é

import qualified System.Exit as S

data MyExitCode = ExitSuccess | ExitFailure Int

instance Show MyExitCode where
show ExitSuccess = "MyExitSuccess"
show ( ExitFailure x ) = "MyExitFailure " ++ ( show x )

main = do
print ExitSuccess
print S.ExitSuccess
print $ ExitFailure 12
print $ S.ExitFailure 12

826 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/04/06(‰Î) 22:52:08.72 ID:vUIEomdt.net]
>>810
ƒGƒ‰[ƒƒbƒZ[ƒW‚ÍÈ—ª‚¹‚¸‚É‘‚¢‚Ăقµ‚¢

827 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/04/07(…) 15:24:37.74 .net]
module BinaryRepresentation.Word8 (
@@BiRep8( Rep)
)
where
import Data.Word( Word8)


newtype BiRep8 = Rep Word8

instance Show BiRep8 where
@@show a = show' 8 a ""
@@@where
@@@@show' 0 _ s = s
@@@@show' count (Rep w8) s =
@@@@@let
@@@@@@(q,r) = w8 `quotRem` 2
@@@@@in
@@@@@@show' (count-1) (Rep q) (r `shows` s)
---------ªbinary_representation8.hs-----------------------------



828 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/04/07(…) 15:24:59.63 .net]
module BinaryRepresentation.IPAddress(
@@IPv4Address,
@@BiRepIPv4Address( Rep),
@@makeIPv4
) where
import Data.Word( Word8)
import Data.List( intersperse)
import BinaryRepresentation.Word8( BiRep8( Rep))
import qualified BinaryRepresentation.Word8 as Bi8


newtype IPv4Address = A (Word8, Word8, Word8, Word8)

ipshow::Show s=> (Word8->s) -> [Word8] -> String
ipshow f list = concat . intersperse "." $ (show . f) <$> list

instance Show IPv4Address where
@@show (A (_1,_2,_3,_4)) = ipshow id [_1,_2,_3,_4]


newtype BiRepIPv4Address = Rep IPv4Address

instance Show BiRepIPv4Address where
@@show (Rep (A (_1,_2,_3,_4)))
@@@=
@@@@ipshow Bi8.Rep [_1,_2,_3,_4]


makeIPv4::Word8 -> Word8 -> Word8 -> Word8 -> IPv4Address
makeIPv4 _1 _2 _3 _4 = A (_1, _2, _3, _4)
-----------ªbinary_representation_ipv4.hs------------------------

829 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/04/07(…) 15:25:15.94 .net]
[2 of 2] Compiling BinaryRepresentation.IPAddress ( binary_representation_ipv4.hs, binary_representation_ipv4.o )

binary_representation_ipv4.hs:24:11: error:
@@Ambiguous occurrence eRepf
@@It could refer to
@@@either eBinaryRepresentation.Word8.Repf,
@@@@@@@imported from eBinaryRepresentation.Word8f at binary_representation_ipv4.hs:8:36-47
@@@@@or eBinaryRepresentation.IPAddress.Repf,
@@@@@@@defined at binary_representation_ipv4.hs:21:28
@ |
24 | @@show (Rep (A (_1,_2,_3,_4)))
@ |@@@@ @^^^
------------------------------------------------
ˆÓ}FWord8 ’l‚ð01•\‹L‚Å•\Œ»‚·‚郂ƒWƒ…[ƒ‹‚ðì‚èA‚»‚ê‚ð—p‚¢‚ÄIPv4ƒAƒhƒŒƒX‚ð01•\‹L‚Å•\Œ»‚·‚é
–â‘èFbinary_representation_ipv4.hs ‚ÌRep‚ªAbinary_representation8.hs ‚ÌRep‚Æ”í‚èAmbiguous‚Å‚ ‚é
”»–¾‚µ‚Ä‚¢‚éƒ[ƒNƒAƒ‰ƒEƒ“ƒhF24s–Ú‚ÌRep ‚ð BinaryRepresentation.IPAddress.Rep ‚Æ‚¢‚¤•³ƒ_ƒTƒR[ƒh‚Ö‘‚«Š·‚¦‚é
–]‚ÞŽ–FCü‚¹‚¸‚Éς܂·‚©A’Z‚¢Cü‚Åς܂¹‚½‚¢

830 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/04/07(…) 15:51:36.65 ID:6KWn3Zlg.net]
import BinaryRepresentation.Word8( BiRep8( Rep))
ª‚±‚ꉽHÁ‚¹‚ÎH

831 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/04/07(…) 18:16:48.26 .net]
‚Í‚í‚íBBB’Ê‚è‚Ü‚µ‚½
‰ºŽè‚Éimport‘‚¢‚½‚¹‚¢‚Å’Ê‚ç‚È‚­‚È‚é‚Æ‚©‚ ‚é‚ñ‚Å‚·‚Ë
ŽÖ‘«import‚Æ–¼•t‚¯‚Ä‹³ŒP‚É‚µ‚Ü‚·B‚ ‚肪‚Æ‚¤‚²‚´‚¢‚Ü‚µ‚½

832 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/04/07(…) 23:07:15.55 ID:PA0bBjRm.net]
>>822
Ѝ‚ŃR[ƒh‘‚¢‚Ä‚é‚Ì‚©‚æw

833 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ [2021/04/12(ŒŽ) 18:05:50.35 ID:rYLpZPiw+]
ŽdŽ–‚ª¶‚«‚ª‚¢H‰ïŽÐˆõ‚Ì•ªÛ‚ÅH‚»‚ë‚»‚ë”F‚߂Ȃ³‚¢c‚ ‚È‚½‚½‚¿‚Í’P‚È‚é‹î‚Å‚·
ËÔ‰H‚Ì•ƒ‚Ђë‚ä‚«‚ª‹³‚¦‚éŽdŽ–‚Ì–{Ž¿‚Æ‚â‚肽‚¢‚±‚Ƃ̈Ⴂ‚ª¦‰ß‚¬‚ÄŠ´“®‚ªŽ~‚Ü‚ç‚È‚¢c
https://www.youtube.com/watch?v=zkwQOdq17dI
y‚Ђë‚ä‚«/؂蔲‚«zƒTƒ‰ƒŠ[ƒ}ƒ“‚Á‚ÄŽ‘–{Žå‹`‚Ì“z—ê‚È‚ÌH
https://www.youtube.com/watch?v=Vi-dvyd5ksE&t=74s
y‚Ђë‚ä‚«zŽÐ‰ïlŒê‚Á‚¿‚ႤƒTƒ‰ƒŠ[ƒ}ƒ“‚ɂ‚¢‚ÄŒê‚è‚Ü‚µ‚½
https://www.youtube.com/watch?v=pX7NHj_rIBg
“z—ê‚Íg‹ß‚É‚ ‚éH“ú–{‚Ì“z—ê‚ɂ‚¢‚Äy‚Ђë‚ä‚«@؂蔲‚«z
https://www.youtube.com/watch?v=evQjCUWIHV4
y‚Ђë‚ä‚«z‰ïŽÐˆõ‚È‚ñ‚ÄŠy‚µ‚­‚È‚¢?ËŠy‚µ‚¢‚µƒ‰ƒN‚ÈŽdŽ–‚ÌŽd•û‚ƂͦƒTƒ‰ƒŠ[ƒ}ƒ“•KŒ©I
https://www.youtube.com/watch?v=T95-FS8sT3w&t=390s
y‚Ђë‚ä‚«z“ú–{‚̃Tƒ‰ƒŠ[ƒ}ƒ“§“x...I‚í‚Á‚Ă܂·‚æwww
https://www.youtube.com/watch?v=Y-30zk2zDn0
y‚Ђë‚ä‚«zŽ‹’®ŽÒ‚ÌŽ¿–â‚»‚Á‚¿‚Ì‚¯‚Å‹•Œ¾•ȃAƒs[ƒ‹‚·‚é‚Ђë‚ä‚«
https://www.youtube.com/watch?v=cMjk9B4J2n4
y‚Ђë‚ä‚«/؂蔲‚«z‹•Œ¾•È‚Á‚Ăǂ¤‚â‚Á‚Ä’¼‚¹‚΂¢‚¢H
https://www.youtube.com/watch?v=5cS7vyb0tfE

834 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/04/13(‰Î) 20:07:55.95 ID:WnmkLZut.net]
>>822
> ‰ºŽè‚Éimport‘‚¢‚½‚¹‚¢‚Å’Ê‚ç‚È‚­‚È‚é‚Æ‚©‚ ‚é‚ñ‚Å‚·‚Ë

‚¿‚åEEEE

835 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/04/16(‹à) 21:11:12.10 ID:trr1lKH1.net]
"http2" library v3.0.0 in Haskell has been released

836 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/04/16(‹à) 21:38:11.49 ID:gUR6Epkt.net]
>>808
Œ^‹ì“®ŠJ”­(TDD)‚ÍidrisìŽÒ‚ª–{o‚µ‚Ă邯‚Ç‚»‚ê‚Ì‚±‚Æ‚©‚¢‚ÈH

‚Å‚ ‚ê‚Η\‘z‚µ‚Ă邿‚¤‚Ɉˑ¶Œ^‘O’ñ‚æ
ƒpƒ^[ƒ“ƒ}ƒbƒ`‚̓f[ƒ^\’zŽq‚ɉˆ‚Á‚Ä•ª‰ð‚µ‚Ă邾‚¯‚¾‚©‚ç
(x:xs)‚¾‚¯‚¶‚á‚È‚­‚Ä(xs++[x])‚Ńpƒ^[ƒ“ƒ}ƒbƒ`‚Å‚«‚邿‚¤‚ÉSQL‚æ‚낵‚­Œ^ƒŒƒxƒ‹‚̃EƒCƒ“ƒhƒEŠÖ”‚‚­‚è‚Ü‚µ‚傤
IDE‚ɃR[ƒh¶¬‚³‚¹‚Ü‚µ‚傤
‚Æ‚©‚Á‚Ä‘å•ÏŠy‚µ‚¢–{‚¾‚Á‚½

837 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/04/17(“y) 18:14:21.16 ID:+4ymujjn.net]
ƒŠƒXƒg‚ðŽg‚Á‚Ä‘Q‰»Ž®
r_n = max_{1 <= i < n} (p_i + r_{n-i}), r_0 = 0
‚ð‰ð‚­ƒvƒƒOƒ‰ƒ€‚ð‘‚¢‚½‚̂ł·‚ªƒŠƒXƒg‚ðArray‚ɕς¦‚½‚Æ‚½‚ñ“®‚©‚È‚­‚È‚è‚Ü‚µ‚½
‚Ç‚¤‚â‚çmax'‚Éif‚ªŽg‚í‚ê‚Ä‚¢‚é‚Ì‚ªŒ´ˆö‚̂悤‚Ȃ̂ł·‚ª“®‚©‚È‚­‚Ȃ闗R‚ª•ª‚©‚è‚Ü‚¹‚ñ
‚ǂȂ½‚©•ª‚©‚é•û‚¢‚Ü‚·‚©H
ƒvƒƒOƒ‰ƒ€‚͈ȉº‚Ì’Ê‚è‚Å‚·
import Data.Array

p = [1,5,8,9,10,17,17,20,24,30]

max' (i,q) (i',q') = if q < q' then (i',q') else (i,q)

solver p = array (0,length p) $ (0,0):[ -- “®‚©‚È‚¢
@@foldr1 max' [(i, p !! (i-1) + rs ! (j-i)) | i <- [1..j]]
@@| j <- [1..length p]
@] where rs = solver p

solver' p = (0,0):[ -- “®‚­
@@foldr1 max' [(i, p !! (i-1) + (snd $ rs' !! (j-i))) | i <- [1..j]]
@@| j <- [1..length p]
@] where rs' = solver' p



838 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/04/17(“y) 18:16:48.86 ID:+4ymujjn.net]
“®‚©‚È‚¢‚ÆŒ¾‚¤‚Ì‚Íghci‚É“ü—Í‚·‚邯Œ‹‰Ê‚ª‚¢‚‚܂Ōo‚Á‚Ä‚ào—Í‚³‚ê‚È‚¢ó‹µ‚ðŽw‚µ‚Ü‚·

839 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/05/09(“ú) 10:31:13.12 ID:y0UqG5zB.net]
‚È‚ñ‚ł݂ñ‚Èhaskell‚ŃAƒvƒŠì‚ç‚È‚¢‚ÌH

840 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/05/09(“ú) 13:13:30.99 .net]
‚·‚¢‚Ü‚¹‚ñAMicrosoft TrueSkill ƒŒ[ƒeƒBƒ“ƒOƒVƒXƒeƒ€‚ÌHaskellŽÀ‘•‚ð’T‚µ‚Ä‚¢‚é‚̂ł·‚ªŒ©‚‚©‚è‚Ü‚¹‚ñ
ƒCƒƒŒ[ƒeƒBƒ“ƒO‚ƃOƒŠƒRƒŒ[ƒeƒBƒ“ƒO‚µ‚©‚ ‚è‚Ü‚¹‚ñ
TrueSkill‚ðŽÀ‘•‚µ‚½ƒ‰ƒCƒuƒ‰ƒŠ‚ð’m‚Á‚Ä‚é•û‚ª‚¢‚½‚狳‚¦‚Ä‚­‚¾‚³‚¢

841 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/05/09(“ú) 22:22:49.79 ID:HZ/HWpqa.net]
Haskell‚ŃAƒvƒŠì‚낤‚É‚àopengl‚­‚ç‚¢‚µ‚©‚܂Ƃà‚ȃoƒCƒ“ƒfƒBƒ“ƒO‚È‚¢‚ñ‚¶‚á‚È‚©‚Á‚½‚Á‚¯H
‚¶‚Ô‚ñ‚щƒbƒv‚·‚é‚Ì‚¾‚é‚¢‚µ
‚¨‚ê‚Í‚à‚¤f#‚Åì‚邱‚Ƃɂµ‚½‚æ

842 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/05/09(“ú) 22:24:00.80 ID:HZ/HWpqa.net]
‚ AƒfƒXƒNƒgƒbƒvƒAƒvƒŠ‚Ì‚±‚Æ‚¾‚ÆŽv‚Á‚Ä‚½‚¯‚LjႤ‚ñ‚©‚Ë

843 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/05/10(ŒŽ) 00:08:10.35 ID:fW0+gsWX.net]
ƒpƒ^[ƒ“ƒ}ƒbƒ`‚ÅRust‚Ý‚½‚¢‚É
match x {
Some(SeqCst)=>true,
Some(Relaxed)=>true,
_=>false
}
‚ð
match x {
Some(SeqCst|Relaxed)=>true,
_=>false
}
‚Á‚ÄŠ´‚¶‚Å‘‚­•û–@‚Á‚Ä‚ ‚éH

844 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/05/10(ŒŽ) 05:06:07.73 ID:XvUHL9Z9.net]
haskell‚Åmatch‚Á‚Ä‚ ‚é‚ÌH

845 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/05/11(‰Î) 11:45:43.79 ID:cKOIjnA7.net]
>>835
•W€ƒ‰ƒCƒuƒ‰ƒŠ‚ɂ͂Ȃ¢‚¯‚Çhackage‚Æ‚©‚ɂ͂ ‚é

https://hackage.haskell.org/package/regex-compat-0.95.2.1/docs/Text-Regex.html

‰ðà‚à“]‚ª‚Á‚Ä‚é

https://sirocco.hatenadiary.org/entry/20090416/1239852340

846 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/05/11(‰Î) 11:48:38.64 ID:cKOIjnA7.net]
‚ Amatch‚Á‚ij‹K•\Œ»‚Ìmatch‚¶‚á‚È‚­‚ÄH
Ž¿–â“à—e‚ª‚Ó‚í‚ӂ킵‚·‚¬‚ʼn½‚ª‚µ‚½‚¢‚Ì‚©‚³‚Á‚ς蕪‚©‚ç‚ñ

847 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/05/11(‰Î) 11:53:57.18 ID:+XHXxVLE.net]
‚·‚Ü‚ñŽ©ŒÈ‰ðŒˆ‚µ‚½‚í
or patterns‚Ì‚±‚Æ‚ðŒ¾‚Á‚Ä‚½‚ñ‚¾‚¯‚Çissue‚Éオ‚Á‚Ă邾‚¯‚Å–¢ŽÀ‘•‚Á‚Û‚¢
https://gitlab.haskell.org/ghc/ghc/-/issues/3919



848 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/05/14(‹à) 16:46:12.69 .net]
ŽžŠú‚É ARM CPU‚ðÚ‚¹‚½’[––‚Å ‘–‚é Haskell »ƒ\ƒtƒg‚ðŒöŽ®‚É“f‚«o‚¹‚邿‚¤‚ɂȂé‚ñ‚Å‚·H

849 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/05/15(“y) 10:53:50.63 ID:NqYfkIUy.net]
CPU‚ÆHaskell‚Á‚Ä
‚Ü‚é‚Å’†¢‚©‚ç‚¢‚«‚È‚èƒ|ƒXƒgƒ‚ƒ_ƒ“‚É”ò‚ñ‚Å‚é‚Ý‚½‚¢‚È¢ŠEŠÏ‚¾‚È

850 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/05/15(“y) 11:35:40.38 ID:DozosAnh.net]
‚½‚Æ‚¦‚ÎCŒ¾ŒêK‚¢‚½‚Ă̓‚¢‚ÆŽv‚¤——R‚ÍA
ƒRƒ“ƒsƒ…[ƒ^[‚Ȃ炱‚ê‚­‚ç‚¢‚Å‚«‚邾‚낤‚ÆŽv‚Á‚Ä‚½Š‚É‘S‘R“Í‚¢‚ĂȂ­‚Ä
‚»‚±‚ð‘S•”Ž©•ª‚Å–„‚߂Ȃ«‚á‚È‚ç‚È‚¢‚±‚Æ‚ð”Fޝ‚·‚é‚̂ɎžŠÔ‚ª‚©‚©‚邱‚Æ
‘㔓I‚ÈHaskewll‚ªƒfƒtƒH‚Ȃ炷‚ñ‚È‚èŠwK‚Å‚«‚é‚©‚à‚È
‹t‚É¡‚ÍC‚É“K‰ž‚µ‚·‚¬‚ÄHaskell‚É‹ê˜J‚·‚é

851 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/05/15(“y) 12:48:56.18 ID:NqYfkIUy.net]
>>841
‚±‚ê‚­‚ç‚¢‚Å‚«‚邾‚낤‚Æ‚¢‚¤‚̂͊yŠÏ“I‚·‚¬‚Ä‹ê˜J‚·‚éƒpƒ^[ƒ“‚¾
”ߊϓI‚È•û‚ª”Fޝ‚ÉŽžŠÔ‚ª‚©‚©‚ç‚È‚¢

C‚É“K‰ž‚µ‚·‚¬‚Ä‚¢‚邯‚¢‚¤”Fޝ‚Í–{“–‚ɳ‚µ‚¢‚Ì‚©H
‚±‚±‚Å‚àŠyŠÏ‚Ɣߊςª‘Η§‚·‚é

852 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/05/21(‹à) 15:54:58.85 .net]
’·‚­ŽžŠÔ‚ª‚©‚©‚éƒvƒƒOƒ‰ƒ€‚𑖂点‚½ŽžAƒ^ƒXƒNƒ}ƒl[ƒWƒƒ[‚ð’­‚ß‚é‚ÆA­”‚̃RƒA‚É‚•‰‰×AŽc‚è‘SƒRƒA‚ɒᕉ‰×‚ª‚©‚©‚Á‚Ä‚é‚Ý‚½‚¢‚Ȃ̂ł·‚ª
ŽÀsŽž‚ÉŽg—pƒRƒA”‚ÍŽw’肵‚Ä‚¢‚È‚¢‚±‚Æ‚©‚ç„‘ª‚·‚邯AƒKƒxƒRƒŒ‚Í‘SƒRƒA‚ʼnғ­‚·‚é‚Á‚Ä‚±‚Ƃłµ‚傤‚©H

853 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/05/22(“y) 13:34:14.84 ID:hkOb3/u2.net]
Haskell‚̂͒P‚ɃVƒ“ƒOƒ‹ƒXƒŒƒbƒh‚ʼnñŽû‚µ‚Ă邾‚¯‚¾‚¼

854 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/05/22(“y) 20:46:21.69 .net]
‚¦A‚¶‚á‚ ‚È‚ñ‚Å‘SƒRƒA’ᕉ‰×‚ɂȂÁ‚½‚ñ‚¾‚ëEEE
”•ª–ˆ‚ÉŠK’i‚̂悤‚ÉRAMŽg—p—Ê‚ª”GB‚¸‚‘‚¦‚Äs‚Á‚Ä
’·‚¢ˆ—‚ªI—¹‚·‚é’¼‘O‚É‘SƒRƒAƒtƒ‹‰Ò“­‚ɂȂÁ‚ÄA’¼Œã‚Ɉ—I—¹‚ɂȂÁ‚½‚©‚ç
ƒKƒxƒRƒŒ‚ªŠÖ—^‚µ‚Ă邯Žv‚Á‚½‚ñ‚Å‚·‚ª‚Ë

855 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/05/22(“y) 21:35:55.30 ID:aaz7cUPO.net]
ƒTƒ“ƒN‚ª—­‚Ü‚Á‚Ä‚Á‚ÄÅŒã‚É’x‰„‚µ‚Ä‚»‚ê‚ç‚ð•]‰¿‚µ‚½‚̂łÍ
‚Æ‚¢‚¤‚©ƒpƒtƒH[ƒ}ƒ“ƒX‚̘b‚͕ςɗ\‘ª—§‚Ä‚½‚èæ“üŠÏ‚ ‚Á‚½‚è‚·‚邯‚ë‚­‚È‚±‚ƂȂ¢‚©‚ç‚à‚Á‚ÆÚׂɃvƒƒtƒ@ƒCƒŠƒ“ƒO‚µ‚½‚Ù‚¤‚ª

856 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/05/22(“y) 21:58:08.22 ID:Up5XEM4X.net]
ƒKƒxƒRƒŒˆÈŠO‚Él‚¦‚ç‚ê‚錴ˆö‚ª2‚‚®‚ç‚¢‚ ‚Á‚½‚ç
ƒKƒxƒRƒŒ‚ªŒ´ˆö‚Å‚ ‚éŠm—¦‚Í1/3‚®‚ç‚¢‚¾‚©‚ç
2/3‚Ì•û‚ªŸ‚¿‚»‚¤

857 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/05/29(“y) 14:13:39.92 ID:SnGl3AHf.net]
win10‚Åstack‚Æ‚©ghc‚»‚Ì‚à‚̂ͳí‚É“ü‚é‚ñ‚½‚¯‚ǃpƒbƒP[ƒW‚̃Rƒ“ƒpƒCƒ‹‚ª—‚ñ‚Å‚­‚邯‚Ç‚¤‚à•¶ŽšƒR[ƒh‚ªŒ´ˆö‚ŃRƒP‚é
LANG=ascii‚É‚·‚邯‹““®‚ª•Ï‚í‚Á‚Ä‚­‚é‚ñ‚¾‚¯‚ÇA‰½‚É‚µ‚Æ‚­‚Ì‚ª³‰ð‚È‚ñ‚¾‚ë



858 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ [2021/05/29(“y) 16:46:49.24 ID:1zrkc3qO.net]
100–œ—v‘f‚Ì”z—ñ‚Ì1—v‘f‚ðXV‚·‚邽‚߂ɔz—ñ‚ÌÄ쬂ª•K—vH
https://www.quora.com/Is-Haskell-as-fast-as-C++-If-not-why-not/answer/James-Hollis-19
> Haskell naturally operates on lists, but is rather awkward with arrays. Pure functions do not modify their input, so a pure function that changes one element of a million element array will copy 999,999 elements into a second array and return that. You can get around this with monads, but you end up writing imperative code in something that is less flex

859 –¼‘OFible than real imperative code.

‚±‚ê‚ðƒ‚ƒiƒh‚ƃAƒNƒVƒ‡ƒ“‚Å‰ðŒˆ‚Å‚«‚éH‚Ç‚¤‚â‚é‚Ì‚©H
[]
[‚±‚±‰ó‚ê‚Ă܂·]

860 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/05/30(“ú) 20:49:58.16 ID:QwiNWDL1.net]
STArray‚È‚èMutable Vector‚È‚èŽg‚¦‚Ηǂ¢‚̂łÍ

861 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/05/30(“ú) 22:25:02.60 ID:F1Ogq3BP.net]
Unsafe ‚Åok
Š‘F•¨—“I‚ɂ̓n[ƒhƒEƒFƒAã‚Å“®‚¢‚Ä‚é‚Ì‚¾‚©‚çA
•›ì—p‚È‚µ‚È‚ñ‚Ä‚½‚¾‚ÌŒ¶‘z‚æ

862 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/05/31(ŒŽ) 09:29:30.68 ID:O6iiWxP2.net]
•›ì—p‚̈Ӗ¡‚ðŠ¨ˆá‚¢‚µ‚Ä‚¢‚È‚¢‚Æ‚¢‚¢‚Ì‚¾‚¯‚ê‚ÇEEE

863 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/05/31(ŒŽ) 10:43:40.87 ID:xvi5eoqv.net]
Rust‚Æ“¯‚¶‚悤‚ÉA‚Ç‚¤‚É‚©‚µ‚ÄŒ^‚ðŽã‚­‚·‚ê‚Ε›ì—p‚ÍD‚«‚È‚¾‚¯Žg‚¦‚邿

864 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/06/01(‰Î) 02:01:57.33 ID:4I1ndF8a.net]
IOƒ‚ƒiƒh‚âSTƒ‚ƒiƒh‚Ì’†‚Ńtƒ@ƒCƒ‹‘€ì‚µ‚½‚茻ݎžŽæ‚Á‚Ä—ˆ‚½‚肵‚Ä‚à–â‘è–³‚¢‚킯‚¾‚µ‚í‚´‚í‚´Œ^‹]µ‚É‚µ‚È‚­‚Ä‚à—Ç‚¢‚ñ‚¶‚á‚È‚¢

865 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/06/01(‰Î) 10:15:13.07 ID:UuHFoCEt.net]
‘‚«•û‚ª‰½’Ê‚è‚à‚ ‚Á‚ăRƒ“ƒpƒCƒ‹‚ª’Ê‚é‚̂͋qŠÏ“IŽ–ŽÀ‚¾‚æ
‚»‚ñ‚È‘‚«•û‚µ‚È‚­‚Ä‚à—Ç‚¢‚Æ‚¢‚¤‚̂͂܂ ­Ž¡“I‚ɂ͂»‚¤‚È‚é‚킯‚¾‚ª
ƒRƒ“ƒpƒCƒ‹ƒGƒ‰[‚ɂȂç‚È‚¢‚Ì‚ÉAƒoƒ‰ƒ‚ƒ“‚Ý‚½‚¢‚ÈlŠÔ‚ÉFXŒ¾‚í‚ê‚邯¬—‚µ‚â‚·‚¢

866 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ [2021/06/01(‰Î) 22:12:35.15 ID:HETOiJgb.net]
Ž©‘R‚É‘‚¢‚½haskellƒR[ƒh‚ª‹É’[‚É’x‚¢‚Æ‚¢‚¤2018”N‚Ì‹LŽ–
https://pl-rants.net/posts/haskell-vs-go-vs-ocaml-vs/

867 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/06/03(–Ø) 20:42:08.53 ID:/+9iJa2F.net]
>>848
Ž©ŒÈ‰ðŒˆ
language-javascriptƒpƒbƒP[ƒW‚̃\[ƒX‚̃Rƒƒ“ƒg‚É∉‹L†‚ªutf8‚Å“ü‚Á‚Ä‚ÄAŠÂ‹«‚É‚æ‚Á‚Ă͈ႤƒGƒ“ƒR[ƒh‚œǂݞ‚ñ‚ŃGƒ‰[‚ɂȂé‚Á‚Û‚¢
’N‚©‚ªŠJ”­ŽÒ‚Ƀ[ƒNƒAƒ‰ƒEƒ“ƒh‚Æ‚µ‚ăRƒƒ“ƒg‚ðascii‚Å‘‚«’¼‚µ‚Ä‚­‚ê‚ÆƒŠƒNƒGƒXƒg‚µ‚Ä‚½‚¯‚ÇAƒrƒ‹ƒhŠÂ‹«‚𮂦‚é‚Ì‚Ístack‚ÌŽdŽ–‚¾‚©‚牴‚Í’m‚ç‚ñ‚ƈêR‚³‚ê‚Ä‚½
‚Ü‚Ÿ‚»‚è‚á‚»‚¤‚È‚ñ‚¾‚¯‚Ç‚³...



868 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/06/05(“y) 01:35:57.62 ID:qvRyjOjC.net]
>>857
‚È‚ñ‚Æ‚¢‚¤ã©c
‚±‚êˆø‚Á‚©‚©‚Á‚½lŒ‹\‚¢‚»‚¤

869 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/06/05(“y) 12:32:22.17 ID:aDKd5nip.net]
ƒvƒƒOƒ‰ƒ~ƒ“ƒOÅ‘å‚Ì㩂̂ЂƂÂ
Ž©•ª‚Å‘nì‚·‚邿‚è‚à‘¼l‚̃\[ƒX‚ð“ǂޕû‚ª“‚¢

870 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/06/07(ŒŽ) 12:42:09.06 ID:k7DmZ27b.net]
ð“ú‚ÌŽ©•ª‚Í‘¼l‚Å‚·

871 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/06/07(ŒŽ) 20:28:43.19 ID:qbMAaCDK.net]
‹Ž”N‘‚¢‚½ƒR[ƒh‚ª—‰ð‚Å‚«‚È‚¢

872 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/06/07(ŒŽ) 22:37:59.06 ID:+U7TScWJ.net]
‚»‚è‚á‚ lŠÔ‚Ì”\—͂͘V‰»‚ƂƂà‚ÉŠ‚¦‚é‚©‚çŽd•û‚È‚¢‚Ë

873 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/06/07(ŒŽ) 22:55:42.12 ID:OC0V43xk.net]
‚±‚±1, 2”N‚ÅŽ©•ª‚ª‘‚¢‚½ƒ\[ƒX‚ª‰ñ‚Á‚Ä‚­‚邱‚Æ‚ª‚ ‚邯‚ǂقƂñ‚ÇŠo‚¦‚Ä‚¢‚È‚©‚Á‚½
¡‚©‚çU‚è•Ô‚é‚Æ‚à‚Á‚Æ‚¢‚¢‚â‚è•û‚ªŽv‚¢‚‚­‚¯‚ÇA‘¼l‚ª‘‚¢‚½ƒR[ƒh‚æ‚è—y‚©‚És‹V‚ª—Ç‚­‚ēǂ݂₷‚©‚Á‚½

874 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:age [2021/07/01(–Ø) 09:54:29.98 ID:yiVYCTXd.net]
Hmatrix‚Ícabal‚Å“ü‚ꂽ‚Ì‚Éghci‚©‚ç:m Numeric.LinearAlgebra‚â
import Numeric.LinearAlgebra‚Ås—ñ‰‰ŽZƒ‚ƒWƒ…[ƒ‹‚ð“ü‚ê‚æ‚¤‚Æ‚·‚邯A

<no location info>: error:
Could not find module eNumeric.LinearAlgebraf
Perhaps you haven't installed the "dyn" libraries for package ehmatrix-0.20.2f?
Use -v to see a list of the files searched for.

‚ƃGƒ‰[‚ªo‚é‚Ì‚¾‚¯‚ÇA‚æ‚­•ª‚©‚ç‚È‚¢Bƒz[ƒ€ƒfƒBƒŒƒNƒgƒŠ‚ÉHmatrix‚̃tƒ@ƒCƒ‹‚Á‚Û‚¢
‚à‚Ì‚ð’u‚¢‚Ä‚àƒ_ƒBNumeric‚̃tƒHƒ‹ƒ_‚ðƒz[ƒ€ƒfƒBƒŒƒNƒgƒŠ‚É’u‚¢‚Ä‚àƒ_ƒ

•ª‚©‚élA‹³‚¦‚Ä‚­‚¾‚³‚¢m(_ _)m

ŒÃ‚¢ƒpƒ\ƒRƒ“‚̉¼‘zlinux‚É“ü‚Á‚Ä‚¢‚é“z‚Íimport Numeric.LinearAlgebra‚Å
’Êí’ʂ蓮‚­‚¯‚ÇA‚»‚Ì‘¼‚ÌPC‚ł͓®‚©‚È‚¢‚ñ‚¾‚æ‚ËB‘O‚Í“®‚¢‚Ä‚¢‚½‚Ì‚à‚ ‚Á‚½‚¯‚Ç
ƒtƒ@ƒCƒ‹ŠÖŒW‚¢‚¶‚­‚è‰ñ‚µ‚Ä‚½‚çAݒ肪‹¶‚Á‚½‚悤‚Å“®‚©‚È‚­‚È‚Á‚½

ŠÖ”Œ^Œ¾Œê‚Ås—ñ‰‰ŽZ‚³‚¦A“±“ü‚É‚±‚ꂾ‚¯‹ê˜J‚·‚邯‚ÍA‚Ç‚¤‚¢‚¤‚±‚Æ‚¾‚¢‚—

875 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/07/01(–Ø) 13:56:29.22 ID:m444U3IV.net]
> ƒtƒ@ƒCƒ‹ŠÖŒW‚¢‚¶‚­‚è‰ñ‚µ‚Ä‚½‚çAݒ肪‹¶‚Á‚½‚悤‚Å“®‚©‚È‚­‚È‚Á‚½
‚¿‚á‚ñ‚ƃhƒLƒ…ƒƒ“ƒg“Ç‚ñ‚łȂ¢‚æ‚ËH

876 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/07/01(–Ø) 18:53:55.58 ID:dccggDtp.net]
ghci‚Åimport‚ð•¡”‚·‚邯Aƒvƒƒ“ƒvƒg‚ª
Prelude Data.Monoid Data.Traversable Data.Foldable>
‚Æ’·‚­‚È‚Á‚Ä‚µ‚Ü‚¤‚Ì‚ÅAimport‚µ‚½‚Ì•\ަ‚µ‚È‚¢‚悤‚É‚·‚é‚ɂ͂ǂ¤‚µ‚½‚ç‚¢‚¢‚̂ł·‚©H

877 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/07/01(–Ø) 18:56:14.18 ID:dccggDtp.net]
‚·‚Ü‚ñAŽ©ŒÈ‰ðŒˆ‚µ‚½
:set prompt‚ðŽg‚¦‚΂¢‚¢‚Ì‚©
prompt‚ŃOƒO‚ê‚Ηǂ©‚Á‚½



878 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/07/01(–Ø) 22:45:34.96 ID:FFAeznD4.net]
quarified‚àŽg‚¦‚邿
‚¨D‚Ý‚Å

879 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/07/02(‹à) 03:41:23.49 ID:aoQxpJoS.net]
>>864
ghci‚̃Rƒ}ƒ“ƒhƒ‰ƒCƒ“ˆø”‚ÉAŽg—p‚µ‚½‚¢ƒpƒbƒP[ƒW‚ðŽw’è‚·‚é‚à‚Ì‚ª‚È‚©‚Á‚½‚Á‚¯H
baseƒpƒbƒP[ƒWˆÈŠO‚Í‚¿‚á‚ñ‚ƈø”‚Å–¾Ž¦‚µ‚È‚¢‚Æghciã‚ÅŽg‚¦‚È‚©‚Á‚½‚悤‚È‹C‚ª‚·‚éB

880 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/07/10(“y) 00:45:51.28 ID:FlY7oUIG.net]
‚·‚¢‚Ü‚¹‚ñ
Ž¿–₳‚¹‚ĉº‚³‚¢
Ghc.Types ‚Æ‚¢‚¤‚̂𒭂߂Ă½‚ñ‚Å‚·‚ª
“ä‚Ì#‚ª“ü‚Á‚Ä‚éƒRƒ“ƒXƒgƒ‰ƒNƒ^[‚ª‚¢‚Á‚Ï‚¢Œ©‚¦‚Ü‚·

data {-# CTYPE "HsInt" #-} Int = I# Int#
data {-# CTYPE "HsDouble" #-} Double = D# Double#
newtype IO a = IO (State# RealWorld -> (# State# RealWorld, a #))

‚ȂǂȂÇ
‚È‚ñ‚Å‚·‚©ƒRƒŒH
ˆê•û‚Å‚½‚Æ‚¦‚ÎDouble‚ÍReal class‚É‘®‚µ‚Ä‚é‚Ì‚Åsin‚Æ‚©log‚Æ‚©‚̈—‚ð‚Ç‚±‚©‚Å‚â‚Á‚Ă邯Žv‚¤‚̂ł·‚ª‚Ç‚±‚É‚àŒ©‚‚¯‚ç‚ê‚Ü‚¹‚ñ
‚à‚¿‚ë‚ñ‚±‚ñ‚ȃvƒŠƒ~ƒeƒBƒu‚ȉ‰ŽZ‚ÍHaskell‚ł͂Ȃ­C‚Æ‚©‚ÉŠÛ“Š‚°‚µ‚Ä‚é‚ñ‚Å‚µ‚傤‚¯‚Ç‚»‚ÌŽè‚Ì錾‚È‚è‚È‚ñ‚È‚è‚͂Ȃ¢‚à‚ñ‚È‚ñ‚Å‚·‚©H

881 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/07/10(“y) 08:27:37.09 ID:9m9xryS6.net]
https://wiki.haskell.org/Unboxed_type
‹LŽ–“àƒŠƒ“ƒN‚àŒ©‚Ä‚Ë

882 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/07/10(“y) 09:09:34.41 ID:Qo9dk8cs.net]
>>871
‚È‚é‚Ù‚Ç
‚Ü‚¾‚æ‚­‚í‚©‚Á‚ĂȂ¢‚Å‚·‚¯‚Çunboxed type‚Æ‚¢‚¤‚â‚‚Ȃñ‚Å‚·‚Ë
Œã”¼‚à‚ǂȂ½‚©•ª‚©‚è‚Ü‚¹‚ñ‚©H
ŽÀ‚ÍŽ–î‚Åg‘½”{’·‚Ì•‚“®¬”“_h‚ðŽ©ì‚µ‚½‚¢‚̂ł·
‚»‚Ì‚½‚߂ɂÍRealŒ^‚É‚µ‚È‚­‚Ă͂Ȃ炸sin‚Æ‚Èlog‚Æ‚©Œ‹\‚ ‚锂̊֔‚ðŽÀ‘•‚·‚é•K—v‚ª‚ ‚è‚Ü‚·
‚Ç‚±‚©‚ÉŽQl‚ɂł«‚郉ƒCƒuƒ‰ƒŠ“]‚ª‚Á‚Ă܂¹‚ñ‚©H
«”\‚Í‹‚߂Ȃ¢‚̂ő½”{’·¸“x‚ÌŒvŽZ‚ª‚Å‚«‚éRealŒ^‚ðŽÀ‘•‚µ‚Ä‚é—Ⴊ—~‚µ‚¢‚Å‚·

883 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/07/10(“y) 09:23:00.75 ID:Qo9dk8cs.net]
ŠÔˆá‚¦‚½
Float class‚ªsin‚Æ‚©‚¢‚Á‚Ï‚¢‚ ‚Á‚ē‚¢‚Å‚·

884 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/07/10(“y) 09:25:56.65 ID:Qo9dk8cs.net]
ˆá‚¤
Floating
orz

885 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/07/10(“y) 12:08:32.98 ID:5i+2sdHC.net]
https://github.com/ghc/ghc/blob/master/libraries/base/GHC/Float.hs#L588
ƒ‰ƒCƒuƒ‰ƒŠ‚ª‚ ‚è‚»‚¤‚È‹C‚ª‚·‚邯‚ÇAghcƒNƒ[ƒ“‚µ‚Ä‚â‚肽‚¢‚±‚Ƃł«‚é‚©’²‚ׂĂ݂½‚ç

886 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/07/10(“y) 12:28:39.86 ID:5i+2sdHC.net]
hackage‚ðfloat‚ÅŒŸõ‚µ‚½Œ‹‰ÊB‰ö‚µ‚»‚¤‚È‚â‚ÂF
https://hackage.haskell.org/package/variable-precision
https://hackage.haskell.org/package/AERN-Real-Interval

887 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/07/10(“y) 23:01:22.87 ID:zugIw5Ja.net]
‚ ‚´‚Á‚·
ƒ\[ƒX“Ç‚ñ‚ÅŒ¤‹†‚µ‚Ü‚Â



888 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/07/11(“ú) 06:49:31.34 .net]
ƒŠƒXƒg‚̃Vƒƒƒbƒtƒ‹‚ÍA‚Q’lƒ‰ƒ“ƒ_ƒ€‚Æ•ªŠ„“Ž¡–@‚Å\¬‚Å‚«‚邯‚¢‚¤‹«’n‚ÉŽŠ‚Á‚½

889 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/07/11(“ú) 16:41:58.17 ID:KhXXWhgG.net]
—]’k‚¾‚¯‚Ç
ƒI[ƒhƒŠ[Eƒ^ƒ“ނɫ“I‚ÉHŽw‚ª“®‚­
’j«‚Á‚Ä‚¢‚é‚Ì‚©‚ÈB

890 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ [2021/07/16(‹à) 17:38:36.16 .net]
‚ ‚̂̂̂̂ÌI@‚È‚ñ‚ÅŒ^ƒRƒ“ƒXƒgƒ‰ƒNƒ^–¼‚ª”í‚Á‚½‚ç‚¢‚¯‚È‚¢‚ñ‚Å‚·‚©I
Œ^‚ªˆá‚¤‚Ȃ炻‚̃Rƒ“ƒXƒgƒ‰ƒNƒ^–¼‚­‚ç‚¢”í‚Á‚½‚Á‚Ä‚¢‚¢‚¶‚á‚È‚¢‚Å‚·‚©I

891 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ [2021/07/16(‹à) 23:35:14.79 .net]
Esqueleto ‚Å‚Í SELECT ` FROM ONLY an_table `@‚Ý‚½‚¢‚É ONLY ‚ð•t‚¯‚邱‚ƂŌp³ƒe[ƒuƒ‹‚ð‘ÎÌ‚©‚çŠO‚·‚悤‚ÉŽwަ‚·‚邱‚Ƃ͂ł«‚È‚¢‚ñ‚Å‚·‚©H
¶SQL‚ð‘‚­‚µ‚©‚ ‚è‚Ü‚¹‚ñ‚©H

892 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ [2021/07/17(“y) 15:02:59.17 ID:eTC1af8g.net]
>>879
‚¿‚å‚܂ǂ͖P“‚D‚«‚¾‚Á‚ÄŒ¾‚Á‚Ä‚½

893 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/07/17(“y) 17:39:27.65 ID:44fEdIj7.net]
Ž„‚ÍAMBA‚ðŽæ‚é‚½‚ß‚ÉAƒnƒƒC‚É‚ ‚é“`““I‚ȃrƒWƒlƒXƒXƒN[ƒ‹‚É’Ê‚Á‚Ä‚¢‚½‚Æ‚«A‚Ç‚±‚©‚Ì‘åŠé‹Æ‚Å
“­‚­’†ŠÔŠÇ—E‚ª‹³‚¦‚éƒ}ƒlƒWƒƒ“ƒgu˜_v‚âŒoÏu˜_v‚ðŠw‚Ú‚¤‚Æ‚µ‚Ä‚¢‚鎩•ª‚É‹C•t‚¢‚½B
ƒrƒWƒlƒXŒoŒ±‚̂Ȃ¢æ¶‚ÍAŠwZ§“x‚ÌŠO‚Ɉê“x‚ào‚½‚±‚Æ‚ª‚È‚¢l‚¾B‚‚܂è”Þ‚ÍA5΂ŗc’t‰€‚É“ü‚Á‚Ä‚©‚ç
‚¸‚Á‚ÆŠwZ§“x‚Ì’†‚É‚¢‚é‚É‚à‚©‚©‚í‚炸AŠw¶‚½‚¿‚ÉŽÀŽÐ‰ï‚ɂ‚¢‚Ä‹³‚¦‚悤‚Æ‚µ‚Ä‚¢‚邱‚Æ‚¾B
‚Æ‚ñ‚¾‚¨Î‚¢‘‚¾‚ÆŽv‚Á‚½B
uŽtw‚â’†ŠÔŠÇ—E‚⋳Žt‚̂قƂñ‚Ç‚ÍAƒ[ƒ‚©‚çƒrƒWƒlƒX‚ð—§‚¿ã‚°‚é‚̂ɉ½‚ª•K—v‚Ȃ̂©‚ɂ‚¢‚Ă͉½‚à’m‚ç‚È‚©‚Á‚½B
ƒƒo[ƒgƒLƒˆƒTƒLul•‚¯‚ªD‚«‚È‚ ‚È‚½‚É‘¡‚é‹àŽ‚¿•ƒ‚³‚ñ‚̃rƒWƒlƒXƒXƒN[ƒ‹vP‚U‚Q`‚U‚R

”Þ‚ç‚̂قƂñ‚Ç‚ÍAŠwZ‚Æ‚¢‚¤Û‰å‚Ì“ƒ‚ðo‚邯AŠé‹ÆŽÐ‰ï‚Æ‚¢‚¤Û‰å‚Ì“ƒ‚É“ü‚Á‚½B
ˆÀ’肵‚½ŽdŽ–‚Æ‹‹—¿‚Ɉˑ¶‚µ‚Ä‚¢‚½B‚‚܂èA‘f°‚炵‚¢ƒrƒWƒlƒX˜_‚ð‚à‚Á‚Ä‚¢‚él‚Í
‚½‚­‚³‚ñ‚¢‚½‚ªAŒ»ŽÀ‚Ì¢ŠE‚ŃrƒWƒlƒX‚ðƒ[ƒ‚©‚ç—§‚¿ã‚°A‘å‚«‚È•x‚ð’~‚¦‚é‚Ì‚ð‰Â”\‚É‚·‚éA
‘f°‚炵‚¢ƒrƒWƒlƒXƒXƒLƒ‹‚Ì‚ ‚él‚͂قƂñ‚Ç‚¢‚È‚©‚Á‚½‚Æ‚¢‚¤‚±‚Æ‚¾B
”Þ‚ç‚̂قƂñ‚ǂ͋‹—¿‚È‚µ‚Ŷ‚«‚Ä‚¢‚¯‚È‚©‚Á‚½B
ƒƒo[ƒgƒLƒˆƒTƒLul•‚¯‚ªD‚«‚È‚ ‚È‚½‚É‘¡‚é‹àŽ‚¿•ƒ‚³‚ñ‚̃rƒWƒlƒXƒXƒN[ƒ‹vP‚U‚R

894 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/07/17(“y) 18:54:41.40 ID:lhv7ZvYo.net]
Œ¾ŒêÝŒvŽÒ‚ɑ΂·‚鈫Œû‚Í‚»‚±‚܂łɂµ‚Ä‚â‚ê

895 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/07/18(“ú) 08:48:06.51 ID:p5uFvWrN.net]
‚Ü‚ A¶‚«‚Ä‚¢‚¯‚È‚¢‚¼[Ž€‚Ê‚¼[‚Á‚Ă̂ªŠ÷ã‚Ì‹ó˜_‚Ì’†‚Å‚àň«‚̘_‚¾‚æ‚È
ŽÀۂɂ͎€‚ȂȂ¢l‚ª‘½‚¢

896 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/07/18(“ú) 22:53:21.56 .net]
‚·‚¢‚Ü‚¹‚ñA–l‚ªƒXƒŒ‚ðŒy—¦‚Éã‚°‚Ä‚µ‚Ü‚Á‚½‚΂Á‚©‚è‚Ƀ[ƒhƒTƒ‰ƒ_BOT‚̉aH‚È‚Á‚Ä‚µ‚Ü‚¤‚Æ‚ÍEEE

897 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/07/19(ŒŽ) 09:08:56.51 ID:Niob4uA5.net]
Œ»ó‚±‚ê‚͂Ƃ肠‚¦‚¸—LŒø‚É‚µ‚Æ‚¯‚Ý‚½‚¢‚ÈGHCŠg’£‚Á‚ĂȂɂª‚ ‚è‚Ü‚·‚©



898 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/07/19(ŒŽ) 10:46:43.62 ID:jaES3hbu.net]
>>887
–³‚¢‚Å‚·B
•K—v‚ȂƂ«‚ɂ̂ݕK—v‚È‚¾‚¯éŒ¾‚·‚邯‚¢‚¢‚Å‚·B

899 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/07/26(ŒŽ) 04:08:52.62 ID:FlIQ/SVE.net]
ttps://cognicull.com/ja
Haskell‚â‚é‚̂ɂ±‚̕ӂ͗šCς݂ł ‚邱‚Æ‚ª‹‚ß‚ç‚ê‚é‚ÌH
Obj-C‚¾‚ƂقڂȂ­‚Ä‚àƒAƒvƒŠ‚Í‘‚¯‚邯‚Ç‚à
Haskell‚Á‚Ä”Šw‚¶‚á‚È‚¢‚̂ɔŠw‚̃tƒŠ‚µ‚Ă邯‚±‚ë‚ ‚邿‚Ë
—˜—pŽÒ‚à‘R‚è‚Å—]Œv¬—‚𵂢‚Ä‚é‹C‚ª‚·‚é

900 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/07/26(ŒŽ) 12:01:28.04 ID:nPPC7Onz.net]
>>889
‚¤[‚ñA‘‚«‚½‚¢ƒvƒƒOƒ‰ƒ€‚Ì“à—e‚É‚æ‚邯‚µ‚©Œ¾‚¦‚È‚¢‚©‚È
‚±‚¤‚µ‚½‚±‚Æ‚ª‚í‚©‚ç‚È‚¢‚ÆHaskell‚̃vƒƒOƒ‰ƒ€‚ª‘‚¯‚È‚¢‚Æ‚¢‚¤‚±‚Ƃ͂Ȃ¢
‚»‚Ì‚ ‚½‚è‚ÍObjective-C‚Æ“¯‚¶

901 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/07/27(‰Î) 03:35:04.64 .net]
Data.Array‚Á‚Ä”pŽ~‚³‚ꂽ‚ÌH
GHC.Arr ‚ðŽg‚¦‚Á‚Ä‚±‚ÆH

902 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/07/27(‰Î) 05:37:33.58 ID:O4N47kXx.net]
>>891
Data.Array ‚Í array ƒpƒbƒP[ƒW‚É‚ ‚è‚Ü‚·B

903 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/07/27(‰Î) 15:27:28.97 ID:6BJr6nx6.net]
>>889
ƒtƒŠ‚¶‚á‚È‚­‚ÄŽÀÛA‘¼‚̃ƒWƒƒ[Œ¾Œê‚æ‚è‚Í”Šw“I— •t‚¯‚ª‚³‚ê‚Ă邯Žv‚¤
—˜—pŽÒ‚à‘R‚è‚Ȃ̂͂ނµ‚ë—Ç‚¢ŒXŒü
‘¼Œ¾Œê‚ÍhaskellˆÈã‚ÉAƒEƒFƒC‚ªƒmƒŠ‚Å‘‚¢‚½‚悤‚ȃSƒ~ƒ‰ƒCƒuƒ‰ƒŠ‚ª—¬s‚Á‚Ä‚½‚èAŽ˜ƒGƒ“ƒWƒjƒAƒŒƒxƒ‹‚̃Sƒ~•¶Œ£‚ª– ‰„‚Á‚Ä‚½‚è‚·‚鈢•@‹©Š«ó‘Ô

904 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/07/28(…) 02:22:30.38 .net]
>>892
Ú‚µ‚¢î•ñƒTƒ“ƒNƒX

905 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/07/30(‹à) 13:54:44.53 ID:kX7UidPf.net]
>>889
Haskell‘‚¢‚Ă邯‚«‚É‚»‚¤‚¢‚¤Œn“‚Ì’mޝ‚ª—v‹‚³‚ꂽ‚±‚Ƃ͂Ȃ¢‚È‚ŸA‚¢‚­‚‚©‚ÌŠT”O‚ÌoŽ©‚ªŒ—˜_‚¾‚Æ•·‚¢‚½‚±‚Ƃ͂ ‚邪

906 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/07/30(‹à) 14:32:21.44 ID:yBIo03BR.net]
‚·‚²‚¢Haskell‚É‘f°‚炵‚¢”Šw‚̉ðà‘‚Á‚ăŒƒrƒ…[‚ª‚‚¢‚Ä‚½Žž‚̓NƒX‚Á‚Æ—ˆ‚½‚¯‚Ç

907 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/08/02(ŒŽ) 07:34:32.07 ID:Rllz2LO9.net]
—Ⴆ‚ÎOOP‚ÌŒp³ŠÖŒW‚ð”Û’è‚·‚é
”Û’è‚·‚é‚È‚ç‘ΈĂðo‚¹‚ÆŒ¾‚í‚ê‚é
‚±‚̉ߒö‚Í”Šw‚ł͂Ȃ¢‚¯‚ÇŒ‹‰Ê“I‚ɂ͔¼‡˜ŠÖŒW‚Æ‚©Œ—‚Æ‚©o‚Ä‚­‚é



908 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ [2021/08/16(ŒŽ) 04:30:28.47 ID:aZY1/RTa.net]
ƒˆŠÖ”Œ^‚ŃLƒƒƒbƒVƒ…‚ÍŽÀ‘•‰Â”\H

—Ⴆ‚΂n‚n‚o‚ł͌vŽZ‚ÉŽžŠÔ‚ª‚©‚©‚é’l‚̓LƒƒƒbƒVƒ…‚µ‚Ä‚¨‚¢‚ÄŽŸ‚̓ǂݎæ‚è‚Å
ƒLƒƒƒbƒVƒ…‚©‚ç•Ô‚·‚Æ‚¢‚¤Ž–‚ª‚Å‚«‚éB
‚±‚̃LƒƒƒbƒVƒ…‚ÌŠÇ—‚ð‚n‚n‚o‚炵‚¢ƒJƒvƒZƒ‹‰»‚É‚æ‚Á‚Ă܂Ƃà‚ÉŽÀ‘•‚Å‚«‚é

909 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/08/16(ŒŽ) 18:24:35.56 ID:O8pAbV/G.net]
>>898
‰Â”\‚Å‚·B
memoization ‚ðƒL[ƒ[ƒh‚É’²‚ׂĂ݂Ă­‚¾‚³‚¢B

910 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/08/18(…) 20:19:16.73 ID:MamsdVYI.net]
>>66
ƒIƒuƒWƒFƒNƒgŽwŒüƒvƒƒOƒ‰ƒ~ƒ“ƒO‚É‚¨‚¯‚é Smalltalk “I‚Ȉʒu‚¯‚É—ˆ‚é‚ñ‚¶‚á‚È‚¢‚©‚ÈB

ƒKƒbƒ`ƒKƒ`‚¾‚©‚ç‹­§“I‚Éu‚»‚ÌŠT”Ov‚Éõ‚Ü‚ê‚éB

911 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/08/19(–Ø) 00:24:27.59 ID:anV9aH6F.net]
’ዉŒ¾Œê‚ŃCƒ“ƒ^ƒvƒŠƒ^‚ðì‚ê‚»‚¤‚ȃVƒFƒ‹ƒXƒNƒŠƒvƒg“I‚Ȉʒu‚¯‚¾‚æ
’Pˆê‚Ì‚‹‰Œ¾Œê‚ð‹­§‚³‚ê‚È‚¢

912 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/08/19(–Ø) 16:00:36.29 ID:IKqVi/r3.net]
ŠÖ”Œ^Œ¾Œê‚Á‚ÄƒŠƒXƒg‚Æ‚©ƒcƒŠ[‚Ý‚½‚¢‚ÈÄ‹A“I‚ȃf[ƒ^\‘¢ˆµ‚¤‚͓̂¾ˆÓ‚¾‚¯‚Ç
—LŒüE–³ŒüƒOƒ‰ƒt(‚̃Aƒ‹ƒSƒŠƒYƒ€)ˆµ‚¤‚̓‚­‚È‚¢H

913 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/08/19(–Ø) 18:40:13.11 ID:JntO5v5E.net]
>>902
“‚¢‚ÆŠ´‚¶‚é‚©‚Ç‚¤‚©‚Í–{l‚Ì‹CŽ‚¿‚Ȃ̂ʼn½‚Æ‚àŒ¾‚¦‚Ü‚¹‚ñB

‚½‚¾Ahaskell‚ł̃Oƒ‰ƒt—˜_‚̈µ‚¢‚ÉŠÖ‚µ‚Ä‚ÍA
ƒJƒWƒ…ƒAƒ‹‚ȉðà‚àƒtƒH[ƒ}ƒ‹‚Ș_•¶‚à‚½‚­‚³‚ñ‚ ‚è‚Ü‚·B
ƒ‰ƒCƒuƒ‰ƒŠ‚à‚ ‚è‚Ü‚·B

ˆµ‚Á‚½‚±‚Ƃ͂Ȃ¢‚¯‚ÇA‰½‚ƂȂ­ƒCƒ[ƒW‚¾‚¯‚Å
“‚»‚¤‚¾A
haskell‚Ì‹êŽè•ª–삾‚ÆŽv‚Á‚Ä‚¢‚é‚̂ł ‚ê‚ÎA
Ž©•ª‚ɓǂ߂»‚¤‚È‹LŽ–‚É‚¢‚­‚‚©ƒgƒ‰ƒC‚µ‚Ă݂Ă͂ǂ¤‚Å‚µ‚傤‚©B

914 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/08/19(–Ø) 21:01:34.14 ID:anV9aH6F.net]
>>902
Erlang‚̂悤‚ȃƒbƒZ[ƒW‘—M‚ðl‚¦‚ê‚΂킩‚邪
ƒƒ‚ƒŠ‚ð‹¤—L‚µ‚Ä‚¢‚È‚¢‘ŠŽè‚É‚à‘—‚ê‚éƒf[ƒ^\‘¢‚ª“¾ˆÓ

ƒƒbƒZ[ƒW‚Æ‚µ‚Ä•¶Žš—ñ‚΂©‚èŽg‚Á‚Ă邯ƒJƒvƒZƒ‹‰»‚àŒ^î•ñ‚à–³‘ʂɂȂé
‚¾‚©‚ç•¶Žš—ñ‚ÉŽ—‚Ä‚¢‚邪ˆÙ‚È‚éƒf[ƒ^\‘¢‚ª–ð‚É—§‚Â

915 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/08/25(…) 21:36:21.14 ID:NimliznV.net]
Applicative‚Ì(*>)‰‰ŽZ‚Á‚ĉ½‚̈Ӗ¡‚ª‚ ‚é‚Ì?
‘æˆêˆø”‚͂ǂ¤‚¹ŽÌ‚Ä‚ç‚ê‚é‚ñ‚Å‚µ‚åB

916 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/08/25(…) 23:09:37.51 ID:SkXNk2uR.net]
Šm‚©‚ɶ•Ó :: f a‚ÅŒ¾‚¤‚Æ‚±‚ë‚ÌaŒ^‚Ì’l‚͎̂Ă邪
Maybe‚Æ‚©[]‚Ý‚½‚¢‚È’¼˜aŒ^‚łǂ̒lƒRƒ“ƒXƒgƒ‰ƒNƒ^‚ðŽg‚Á‚Ä\’z‚³‚ꂽ‚©‚Ìî•ñ‚͉e‹¿‚·‚邿

917 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/08/26(–Ø) 21:35:42.38 ID:Wv9PZvrP.net]
>>906
‚»‚ê‚Í‘æ1ˆø”‚ðƒpƒ^[ƒ“ƒ}ƒbƒ`‚·‚邱‚Æ‚ÅA‚½‚Æ‚¦‘æ2ˆø”‚ª“¯‚¶’l‚Å‚àA
(*>)‚ÌŒvŽZŒ‹‰Ê‚ð•Ï‚¦‚ç‚ê‚邱‚ƂɈӖ¡‚ª‚ ‚é‚Á‚Ä‚±‚ÆH

SumŒ^‚âProductŒ^‚àApplicative‚̃Cƒ“ƒXƒ^ƒ“ƒX‚ɂȂÁ‚Ă邯‚ÇA
‚±‚ê‚炾‚Æ(*>)‚ɂ͈Ӗ¡‚ª‚È‚¢H
(“–‘R(<*>)‚ȂǑ¼‚̉‰ŽZ‚ɂ͈Ӗ¡‚ª‚ ‚邯Žv‚¤‚¯‚Ç)



918 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/08/28(“y) 14:58:50.16 ID:WIQMD65A.net]
>>905
Parsec‚Ŷ•ӂ̋傪‚¢‚ç‚È‚¢‚Æ‚«‚ÉŽg‚¤

919 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/09/01(…) 17:56:43.60 .net]
‚Ú‚­‚悤ƒƒ‚F
OpenSUSE ‚ÅPostgreSQL‚ðŽg—p‚µ‚½ŠJ”­‚ð‚µ‚Ä‚¢‚Ästack build‚Å
postgresql-libpq ƒpƒbƒP[ƒW‚ð“r’†‚Ƀrƒ‹ƒh‚·‚éÛ
pg_config ‚ª–³‚¢‚ÆŒ¾‚í‚êƒRƒP‚邱‚Æ‚ª‚ ‚é

”wŒiF OpenSUSE ‚Í postgres-devel ‚©‚ç pg_config ‚ð휂µ‚½B‰äX‚Í libpq.pc ‚ð‘ã‚í‚è‚ÉŽg‚¤‚ׂ«‚Å‚ ‚éB
ƒ\[ƒXF https://redmine.lighttpd.net/issues/2965

‰ðŒˆ–@F

stack build --flag postgresql-libpq:use-pkg-config
‚Æ‚µ‚ărƒ‹ƒh‚·‚é

920 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/09/08(…) 22:14:55.40 .net]
‚»‚¤‚©ITrueskill ‚ÌHaskellŽÀ‘•‚ª‚È‚­‚Ę_•¶“Ç‚ñ‚ÅŽ©•ª‚ÅŽÀ‘•‚·‚é—Í‚ª‚È‚­‚Ä‚à
Haskell‚©‚çŽÀsŽž‚Ébash ŒÄ‚Ño‚µ‚ÄPython3@‚ÌTrueskillƒ‰ƒCƒuƒ‰ƒŠ‚É•W€“ü—Í‚ÅPythonƒR[ƒh‚𗬂µž‚ñ‚Å
‰‰ŽZŒ‹‰Ê‚ð•¶Žš—ñ‚Å–á‚Á‚Ä‚«‚ÄA‚»‚ê‚ðParserCombinator‚Åì‚Á‚½Žš‹å‰ð͊킜ǂݎæ‚Á‚ÄHaskell‚̃f[ƒ^‚É–ß‚¹‚΂¢‚¢‚¶‚á‚ñ
‚ ‚½‚¢‚Á‚½‚ç“VË‚ËI

921 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/09/09(–Ø) 09:49:18.76 ID:rktYy8hS.net]
s/“VË/”]‹Ø/

922 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/09/10(‹à) 01:55:27.29 ID:bkZL74IR.net]
ŠÖ”’è‹`‚̶•Ó‚Ì•”•ª“I‚ÅAŠÖ”–¼‚Ɖ¼ˆø”–¼‚ÌŒã‚Ì | ‚Æ = ‚ÌŠÔ‚Ì•”•ª‚Á‚ĉ½‚Ä–¼Ì‚¾‚Á‚¯H

f x y | x < y = ...

‚±‚ê‚Ì x < y ‚Ì•”•ªB
‚ ‚é‚¢‚ÍŠÖ”’è‹`‚ð‚±‚¤‘‚­•û–@‚̌Ăѕû‚Æ‚©B

‚±‚Ì•¶–@‚â§ŒÀ‚Ȃǂðƒlƒbƒg‚Å’²‚ׂ½‚¢‚ñ‚¾‚¯‚ÇA
–¼Ì‚ªŽv‚¢o‚¹‚¸ŒŸõ‚É“ï‹V‚µ‚Ä‚éB
‚Å‚«‚ê‚ΉpŒê‚Å‚¨Šè‚¢B

923 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/09/10(‹à) 03:22:07.48 ID:bkZL74IR.net]
>>912
‚·‚Ü‚ñAŽv‚¢o‚µ‚½Aguard ‚¾B

924 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/09/10(‹à) 22:23:35.11 ID:kwXNo1Gk.net]
>>911
g ‚ð–Y‚ê‚Ä‚ËH

925 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/09/22(…) 10:43:55.15 ID:02VLVXq+.net]
ƒpƒ^[ƒ“‚ÌŽ¿–â‚Å‚·

RationalŒ^‚Ì”‚ª•½•û”‚Å‚ ‚é‚©‚Ç‚¤‚©”»’è‚·‚éƒvƒƒOƒ‰ƒ€‚Å

isSquare r = r >= 0 && r == ( sqrtR r )^2
sqrtI = truncate . sqrt . fromInteger
sqrtR r = let
( a, b ) = ( numerator r, denominator r )
in ( sqrtI a ) % ( sqrtI b )

‚Æ‚¢‚¤‚̂𑂫‚Ü‚µ‚½
‚à‚¿‚ë‚ñ‚±‚ê‚Í‚¤‚Ü‚­‚¢‚«‚Ü‚·

‚µ‚©‚µ numerator, denominator ‚ð‚¢‚¿‚¢‚¿Žæ‚èo‚·‚Ì‚ªŸT“©‚µ‚¢‚Ì‚Å

sqrtR ( a :% b ) = ( sqrtI a ) % ( sqrtI b ) ------- ‡@

‚Æ‘‚«‚½‚©‚Á‚½‚̂ł·‚ª‚¤‚Ü‚­‚¢‚«‚Ü‚¹‚ñ

926 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/09/22(…) 10:44:01.62 ID:02VLVXq+.net]
ƒlƒbƒg‚Å’²‚ׂ邯

{-# LANGUAGE PatternSynonyms, ViewPatterns #-}

numDenum :: Integral a => Ratio a -> (a,a)
numDenum x = ( numerator x, denominator x )

pattern ( :% ) :: Integral a => a -> a -> Ratio a
pattern a :% b <- ( numDenum -> ( a,b ) )
where a :% b = a % b

‚Æ‚¢‚¤‚¨‚Ü‚¶‚È‚¢‚ªstack exchange‚ÅŒ©‚‚©‚Á‚ăRƒŒ‚‚¯‚邯‚¤‚Ü‚­s‚«‚Ü‚µ‚½
‚¤‚Ü‚­‚¢‚Á‚½‚ñ‚Å‚·‚ªƒTƒbƒpƒŠ‚í‚©‚è‚Ü‚¹‚ñ
ƒRƒŒ‰½ŽÒ‚Å‚·‚©H
‚»‚à‚»‚à‡@‚͂Ȃñ‚Å‚¤‚Ü‚­“®‚©‚È‚¢‚ñ‚Å‚·‚©H

927 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/09/22(…) 11:58:51.92 ID:Sp73Mnte.net]
ŒvŽZŒ‹‰Ê‚ðƒpƒ^[ƒ“ƒ}ƒbƒ`‚³‚¹‚悤‚Æ‚µ‚ÄŽ¸”s‚µ‚Ä‚é‚̂łÍ

’l‚ð’lƒRƒ“ƒXƒgƒ‰ƒNƒ^‚ɂ΂炵‚Ä‚»‚Ì’lƒRƒ“ƒXƒgƒ‰ƒNƒ^‚ɉž‚¶‚Ĉ—‚ð•Ï‚¦‚é‚Ì‚ªƒpƒ^[ƒ“ƒ}ƒbƒ`
(ƒ}ƒbƒ`‚³‚¹‚é‘ÎÛ‚ªList a‚È‚çAF‚Ȃ̂©[]‚Ȃ̂©‚ɉž‚¶‚Äu擪FŒã‚ëv‚©‹óƒŠƒXƒg‚©‚ª‘©”›‚³‚ê‚é)

‚ÅAŒvŽZŒ‹‰Ê‚ðƒ}ƒbƒ`‚³‚¹‚½‚¢‚È‚çƒrƒ…[‚Á‚Ă̂ð’è‹`‚µ‚Ä‚ ‚°‚È‚¢‚Æ‚¢‚¯‚Ü‚¹‚ñ‚æ‚Á‚Ęb‚̂悤‚È



928 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/09/22(…) 18:38:05.18 ID:02VLVXq+.net]
>>917
ƒŒƒX‚ ‚肪‚Æ‚¤‚²‚´‚¢‚Ü‚·
Œ´ˆö‚í‚©‚è‚Ü‚µ‚½
‚²Žw“E‚Ì’Ê‚èuŒvŽZŒ‹‰Ê‚ɂ̓pƒ^[ƒ“ƒ}ƒbƒ`‚³‚¹‚ç‚ê‚È‚¢Aƒpƒ^[ƒ“ƒ}ƒbƒ`‚É“ü‚Á‚Ä‚¢‚¢ŠÖ”‚̓Rƒ“ƒXƒgƒ‰ƒNƒ^‚Ì‚Ýv‚Ȃ̂ÅRatio aŒ^‚̃Rƒ“ƒXƒgƒ‰ƒNƒ^‚Å‚ ‚é( :% )‚ðŽg‚Á‚Ä‚½‚̂ł»‚±‚Í–â‘è‚È‚¢‚ÆŽv‚Á‚Ä‚½‚ñ‚Å‚·‚ªŠÌt—v‚Ì( :% )‚ª’è‹`‚³‚ê‚Ä‚éGHC.Real‚ðimport‚µ‚Ă܂¹‚ñ‚Å‚µ‚½
Data.Ratio‚ðimport‚µ‚½‚玩“®“I‚É(:%)‚àŽg‚¦‚é‚à‚ñ‚¾‚ÆŽv‚¢ž‚ñ‚Å‚¢‚Ü‚µ‚½
Pattern synonyms‚ɂ‚¢‚Ä‚Í

https://qiita.com/as_capabl/items/d2eb781478e26411a44c

‚Å‚¿‚å‚Á‚Æ—‰ð‚Å‚«‚Ü‚µ‚½A‚ªA‚»‚à‚»‚àŽg‚í‚È‚­‚Ä‚à—Ç‚­‚È‚è‚Ü‚µ‚½
‚²‹¦—ÍŠ´ŽÓ‚Å‚·

929 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/09/22(…) 20:18:48.06 ID:02VLVXq+.net]
”õ–Y˜^‚ª‚Ă璲‚ׂĂ킩‚Á‚½Ž–‘‚¢‚Ä‚¨‚«‚Ü‚·
Pattern Synonyms ‚Í¡‰ñ‚̂悤‚Ƀ‰ƒCƒuƒ‰ƒŠ‚Ì’ñ‹ŸŽÒ‚ªŒ^‚̃Rƒ“ƒXƒgƒ‰ƒNƒ^‚ð’ñ‹Ÿ‚µ‚ĂȂ¢A‚µ‚©‚µƒpƒ^[ƒ“ƒ}ƒbƒ`‚ÍŽg‚¢‚½‚¢‚Æ‚©‚ÌꇂɎg‚¦‚éŠg’£‚̂悤‚Å‚·
{-# LANGUAGE PatternSynonyms, ViewPatterns #-}
‚ðŽg‚¤‚Æ

pattern ( ƒ}ƒbƒ`‚³‚¹‚½‚¢•\Œ») <-
( ‚»‚ÌŒ^‚©‚çŽæ‚èo‚µ‚½‚¢’l‚ðŽæ‚èo‚·ŠÖ”)
-> ( Žæ‚èo‚µ‚½’l‚Ƀ}ƒbƒ`‚³‚¹‚éƒpƒ^[ƒ“) )
( where ‚³‚ç‚ɃRƒ“ƒXƒgƒ‰ƒNƒ^ƒVƒmƒjƒ€‚Æ‚µ‚Ä‚àŽg‚¢‚½‚¢ê‡‚Ì‹t•ÏŠ·ŠÖ” )

‚ÌŒ`‚ÅŽg‚¤‚悤‚Å‚·
—Ⴆ‚ÎIntŒ^‚Åx‚ª‹ô”‚Å‚ ‚Á‚½ê‡‚Édiv x 2‚ðƒpƒ^[ƒ“ƒ}ƒbƒ`‚ÅE‚¤‚½‚ß‚É

pattern TwiceOf x <-
( ( \t -> ( div t 2 , even t ) ) -> ( x, True ) )

‚̂悤‚É’è‹`‚µ‚Ä‚¨‚¢‚Ä

main = do
case 2 of { DoubleOf x -> print x; _ -> print "odd" }
case 3 of { DoubleOf x -> print x; _ -> print "odd" }

‚̂悤‚É—˜—p‚Å‚«‚邿‚¤‚Å‚·
TwiceOf ‚Í‚ ‚­‚܂Ńpƒ^[ƒ“ƒ}ƒbƒ`‚Ì•\Œ»‚݂̂Ŏg‚¦‚ég‰¼‚ÌhƒRƒ“ƒXƒgƒ‰ƒNƒ^‚Å‚·‚ªpattern•¶‚Éwhere‹å‚ð

pattern DoubleOf x <-
( ( \t -> ( div t 2 , even t ) ) -> ( x, True ) )
where TwiceOf x = 2*x

‚̂悤‚ɒljÁ‚·‚邯‚ ‚½‚©‚àIntŒ^‚ÌV‚µ‚¢ƒRƒ“ƒXƒgƒ‰ƒNƒ^‚ª’ljÁ‚³‚ꂽ‚悤‚ÉU‚é•‘‚¢gDoubleOf 2h

930 –¼‘OF‚̂悤‚È•\Œ»‚ª‹–‚³‚ê‚邿‚¤‚É‚È‚é‚æ‚¤‚Å‚·
¡‰ñ‚Ìꇂ͂ǂ¤‚·‚ׂ«‚©”Y‚݂ǂ±‚ë‚Å‚·
ƒ‰ƒCƒuƒ‰ƒŠ‚ÌŠJ”­ŽÒ‚ª’჌ƒxƒ‹‚Ì(:%)‚ðŒöŠJ‚µ‚È‚¢——R‚à‚í‚©‚é‚̂Ŗ³—ƒNƒŠ(:%)‚ðŽg‚¤‚Ì‚à‚Ç‚¤‚È‚ñ‚‚ċC‚à‚·‚邵A‚©‚ÆŒ¾‚Á‚Ă܂¾Haskell‚Ì•W€‚Æ‚µ‚Ä”F‚ß‚ç‚ê‚ĂȂ¢AGHC‚Å‚µ‚©Žg‚¦‚È‚¢Šg’£Žg‚¤‚Ì‚à‚Ç‚¤‚È‚ñ‚Æ‚¢‚¤‹C‚à‚·‚邵
[]
[‚±‚±‰ó‚ê‚Ă܂·]

931 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/09/23(–Ø) 10:16:50.52 ID:F+2SAjcM.net]
>>919
> ‚©‚ÆŒ¾‚Á‚Ă܂¾Haskell‚Ì•W€‚Æ‚µ‚Ä”F‚ß‚ç‚ê‚ĂȂ¢AGHC‚Å‚µ‚©Žg‚¦‚È‚¢Šg’£Žg‚¤‚Ì‚à‚Ç‚¤‚È‚ñ‚Æ‚¢‚¤‹C‚à‚·‚邵

‚Ü‚³‚©GHC‚ÌŒ¾ŒêŠg’£‚Í‚·‚ׂĎg‚í‚È‚¢‚‚à‚è‚Å‚·‚©H
‚¹‚Á‚©‚­‚Ì•\Œ»—Í‚ª’˜‚µ‚­—Ž‚¿‚Ü‚·‚æB

¡‚ ‚é‚¢‚Í«—ˆ GHC ˆÈŠO‚̃c[ƒ‹‚ŃRƒ“ƒpƒCƒ‹‚·‚éŒv‰æ‚ª‚ ‚é‚̂ȂçŽd•û‚ ‚è‚Ü‚¹‚ñ‚ªA
‚»‚¤‚łȂ¯‚ê‚ÎŒ¾ŒêŠg’£‚ÌŽg—p‚ðçSçO‚·‚é——R‚ªŒ©‚ ‚½‚è‚Ü‚¹‚ñB

Ž„‚È‚çA
EƒvƒƒOƒ‰ƒ€‚ªˆÓ}‚µ‚½“®‚«‚ð‚µA
E‚©‚ƒ\[ƒXƒR[ƒh‚ª“ǂ݂₷‚­‚È‚é
‚Ȃ猾ŒêŠg’£‚ðϋɓI‚É—˜—p‚µ‚Ü‚·B

ˆÓ}’ʂ蓮‚­‚¯‚lj“ǫ‚ª—Ž‚¿‚é‚È‚çA‚»‚±‚ʼn‚߂ĖÀ‚¢‚Ü‚·‚ËB

932 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/09/23(–Ø) 20:01:57.83 ID:0hgEU0Ok.net]
>>920
‚Ü‚Ÿ‚»‚¤‚Å‚·‚Ë
Š®‘S“ú—jƒvƒƒOƒ‰ƒ}[‚Ȃ̂ŋC•ª—Ç‚­‘‚¯‚΂¢‚¢‚©

933 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/09/26(“ú) 07:18:33.81 ID:m/60KM4j.net]
Stack Overflow ‚É–Ê”’‚¢Ž¿–₪“Še‚³‚ê‚Ä‚¢‚½B
—v–ñ‚·‚邯 return 1 getLine ‚Æ‚¢‚¤Ž®‚ÌŒ^‚Í Num t => t ‚ÅA‚»‚Ì’l‚Í 1 ‚炵‚¢‚ñ‚¾‚ª‰½‚ÅH ‚Æ‚¢‚¤‚à‚ÌB
Ž¿–âŽÒ‚ÍŠ¨ˆá‚¢‚µ‚ÄA‰½‚Å return ‚Æ getLine ‚ªŒÝ‚¢‚ɑł¿Á‚µ‡‚¤‚Ì‚©‚Æu‚¢‚Ä‚¢‚½‚ªB
https://stackoverflow.com/questions/69325169/haskell-a-return-before-is-cancelled-out-by-a-monad-after-how

‚È‚©‚È‚©‹»–¡[‚¢B
l‚¦‚Ä‚Ý‚é‚Æ haskell ‚Ì—‰ð‚ª‚¢‚Á‚»‚¤[‚Ü‚éB

934 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/09/26(“ú) 19:38:43.50 .net]
ŋߕÀ—ñˆ—‚ðê–‚èŽn‚߂܂µ‚½

ƒ‰ƒ“ƒ_ƒ€’l‚̶¬‚Émwc-random ƒpƒbƒP[ƒW‚Ì System.Random.MWC.createSystemRandom ‚Ŷ¬‚µ‚½ GenIO ‚ðA‘S‘Ì‚ð’Ê‚µ‚Ä—˜—p‚·‚éŠÂ‹«‚Æ‚µ‚Ä Reader ƒ‚ƒiƒh‚É“ü‚ê‚ÄŽg‚¢‚܂킵‚Ä‚¢‚½‚Æ‚µ‚Ü‚·
‚±‚±‚ÉSTM ‚Å•À—ñˆ—‹@”\‚ðV‹K‚ɒljÁ‚·‚éê‡AforkIO ‚µ‚½ƒXƒŒƒbƒh“à‚ňêX‚»‚̃XƒŒƒbƒhê—p‚É GenIO ‚𶬂µ’¼‚·‚ׂ«‚Å‚µ‚傤‚©H
‚Æ‚¢‚¤‚Ì‚ÍA‚»‚ê‚ð‚µ‚È‚¢‚Æ
ŠeƒXƒŒƒbƒh‚Å‹¤’Ê‚Ì GenIO ‚ªƒRƒs[‚³‚êŽg—p‚³‚ê‚éê‡AŠeƒXƒŒƒbƒh‚Å“¯‚¶’l‚ª¶¬‚³‚ê‚Ä‚¢‚Á‚Ä‚µ‚Ü‚¢ƒ‰ƒ“ƒ_ƒ€‚̈Ӗ¡‚ð‚È‚³‚È‚¢‚̂ł͂Ȃ¢‚©‚ÆŽv‚¤‚©‚ç‚Å‚·
‚ł͂±‚Ì‹^Ž—ƒ‰ƒ“ƒ_ƒ€¶¬Ší‚ð TVar ‚É“ü‚ê‚é‚©‚Æ‚È‚é‚ÆAŽ‘Œ¹‚ÌŽæ‚臂¢‚ɂȂÁ‚ÄA‚PƒXƒŒƒbƒhŽž‚æ‚èƒpƒtƒH[ƒ}ƒ“ƒX‚ª’ቺ‚µ‚ÄŒ³‚àŽq‚à‚È‚¢‚ł͂Ȃ¢‚©‚Æ‚¢‚¤Œœ”O‚ª‚ ‚è‚Ü‚·
‚±‚±‚܂ŎvlŽÀŒ±‚·‚邯A‚â‚Í‚è forkIO ‚µ‚½ƒXƒŒƒbƒh–ˆ‚ɈêXA‚»‚Ì’†‚Åê—p‚Ì‹^Ž—ƒ‰ƒ“ƒ_ƒ€¶¬Ší‚ðV’²‚·‚é•K—v‚ª‚ ‚邯‚¢‚¤l‚¦‚ÉŽŠ‚è‚Ü‚µ‚½
ƒXƒŒƒbƒh”‚ª‘½‚­‚È‚é‚Æ‹^Ž—ƒ‰ƒ“ƒ_ƒ€¶¬Ší‚ðì‚éƒRƒXƒg‚ªƒoƒJ‚ɂȂç‚È‚­‚È‚Á‚Ä‚¢‚­‚Å‚µ‚傤‚ªA‚»‚̕ӂ͊撣‚邵‚©‚È‚¢‚æ‚Æ‚¢‚¤‚±‚Æ‚ÅA‚Ú‚­‚Ìl‚¦‚͇‚Á‚Ä‚¢‚Ü‚·‚©H

935 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/09/26(“ú) 21:46:38.01 ID:m/60KM4j.net]
>>923
‚»‚±‚܂łµ‚Á‚©‚èlŽ@‚µ‚½‚̂ȂçAŽ¿–â‚·‚é‘O‚ɂ܂¸ŽÀŒ±‚µ‚Ă݂悤‚æB

936 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/09/27(ŒŽ) 16:47:57.85 .net]
>>924
ŽÀŒ±‚µ‚Ă݂½‚çAŠeƒXƒŒƒbƒh‚ŕʂ̒l‚ª¶¬‚³‚ê‚Ä‚¢‚Ü‚µ‚½
‚µ‚©‚µƒhƒLƒ…ƒƒ“ƒgŒ©‚邯 It uses mutable state so same generator shouldn't be used from the different threads simultaneously.‚Æ‘‚¢‚Ä‚ ‚é‚ñ‚Å‚·‚ª
‚±‚ê‚͂ǂ¤Žó‚¯Žæ‚Á‚½‚ç‚¢‚¢‚ñ‚Å‚·‚©‚Ë
ŠeƒXƒŒƒbƒh‚ŕʂ̒l‚ª¶¬‚³‚ê‚Ä‚¢‚é‚È‚ç—p‚ðˆ×‚µ‚Ä‚éi‚悤‚ÉŽv‚¦‚éj‚©‚ç‚¢‚¢‚¶‚á‚È‚¢‚©‚Æ‚àŽv‚¤‚̂ł·‚ª
‰½‚©•ʂ̗—R‚ª‚ ‚Á‚ÄA‚»‚¤Žv‚¦‚Ä‚à‚â‚Í‚èŽg‚¤‚ȂƂ¢‚¤Ž–‚È‚ñ‚Å‚µ‚傤‚©H

937 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/09/27(ŒŽ) 18:11:25.46 ID:XYchXu+H.net]
>>925
mutable state‚Ì”r‘¼§Œä‚ð‚µ‚Ä‚È‚¢‚©‚ç•¡”‚̃XƒŒƒbƒh‚ÅŽÀs‚·‚邯‚Ü‚¸‚¢‚±‚Æ‚ª‹N‚±‚é‚©‚à‚µ‚ê‚È‚¢A‚Á‚Ä‚±‚Æ‚¶‚á‚È‚¢‚ÌH

”r‘¼§Œä
https://ja.wikipedia.org/wiki/%E6%8E%92%E4%BB%96%E5%88%B6%E5%BE%A1



938 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/09/27(ŒŽ) 20:38:39.08 ID:MDVYajz0.net]
>>925
ƒpƒtƒH[ƒ}ƒ“ƒX‚ÌŽÀŒ±‚à‚ËB
—˜_ãƒpƒtƒH[ƒ}ƒ“ƒX‚ª—Ž‚¿‚邯•ª‚©‚Á‚Ä‚¢‚Ä‚àAŽÀ—pã‚Í–â‘è‚È‚¢ê‡‚à‘½‚¢B

939 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/09/29(…) 15:57:53.68 ID:lU7q1h04.net]
>>922
‚»‚±‚ÅŠÖ”ƒ‚ƒiƒh‚ªo‚Ä‚­‚é‚̂͒m‚ç‚È‚¢‚ÆŽv‚¢ŽŠ‚ç‚È‚¢‚È‚ 
•׋­‚ɂȂÁ‚½

940 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/09/30(–Ø) 07:09:39.49 ID:N1l0weLI.net]
>>922
ƒZƒ~ƒRƒƒ“‚ð‘‚©‚È‚¢Œ¾Œê‚ł͂·‚ׂ©‚ç‚­‰üs’¼Œã‚É
(getLine)‚Æ‘‚­‚Ƃǂ¤‚Ȃ邩–â‘肪o‚Ä‚­‚é

941 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/09/30(–Ø) 09:21:54.92 ID:LH+TfD4u.net]
‚·‚ׂ©‚ç‚­ŒxŽ@‚¾I

942 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/09/30(–Ø) 09:22:48.41 .net]
>>926
‹ï‘Ì“I‚ɂǂ¤‚¢‚¤ƒP[ƒX‚łǂ¤‚¢‚¤–â‘肪‹N‚±‚é‚©‰ð‚ç‚È‚¢‚Ì‚ÅAŽæ‚芸‚¦‚¸ƒhƒLƒ…ƒƒ“ƒg‚ɃXƒŒƒbƒhŠÔ‚Å‹¤—L‚Í‚â‚ß‚ë‚Æ‚ ‚éˆÈãA‘ål‚µ‚­]‚¤‚±‚Ƃɂµ‚Ü‚·

>>927
STM”Å‚ªA3950XƒGƒRƒ‚[ƒhƒVƒ“ƒOƒ‹500•ª‚̈—‚ª30ƒXƒŒƒbƒhŠ„‚è“–‚Ä‚Å220•ª‚­‚ç‚¢‚ɂȂè‚Ü‚µ‚½‚ª
CPUŽg—p—¦‚à75%‘OŒã‚ÅŽc”O‚Å‚µ‚½

‹£‡‚·‚郊ƒ\[ƒX‚ª‘½‰ß‚¬‚½‚©‚炳͂Ǝv‚¢A‹£‡‚ð”ð‚¯‚éŽ–‚ðl‚¦‚Ä‚¢‚邯
‚»‚à‚»‚àSTM‚ðŽg‚킸AƒXƒŒƒbƒh–ˆ‚Ƀ[ƒJƒ‹‚Ƀf[ƒ^‚𒙂߂Ĉ—‚µ‚ÄÅŒã‚ÉŠeƒXƒŒƒbƒh‚Å•”•ª“I‚ÉŽdã‚°‚½ƒf[ƒ^‚ðChan‚Å—¬‚µ‚Ä
AŽóM‚µ‚½‘¤‚Ńf[ƒ^‚𑊇‚·‚éA‰•à“I‚È•ûŽ®‚ðŽv‚¢‚‚¢‚½‚̂ő‚«Š·‚¦‚Ü‚µ‚½

getChanContents‚ðŽg‚¢‚Ü‚µ‚½‚ªAEOF‚Ý‚½‚¢‚ÈÅŒã‚Ì’Ê’m•û–@‚ª”»‚炸‚ÉA‘SƒXƒŒƒbƒh‚̈—‚ªI‚í‚è‚à‚¤’N‚àƒf[ƒ^‚𗬂·‚±‚Ƃ̂Ȃ¢ƒ`ƒƒƒlƒ‹‚©‚ç«’¦‚è‚à‚È‚­“ǂ݂¾‚»‚¤‚Æ‚µ‚Ä‚µ‚Ü‚¢
—áŠO‚ª”­¶‚µ‚Ä¢‚Á‚Ä‚¢‚Ü‚µ‚½
K‚¢ƒXƒŒƒbƒh‚Ì”‚Í”»‚Á‚Ä‚¢‚é‚̂Ń`ƒƒƒlƒ‹‚©‚çtake‚·‚锂ðƒXƒŒƒbƒh”‚¿‚å‚Á‚«‚è‚Æ‚µ‚ÄØ‚èã‚°‚½ŠA’x‰„•]‰¿‚ªK‚¢‚µ‚Ä‚»‚Ìæ‚ð“Ç‚à‚¤‚Æ‚µ‚È‚­‚È‚è—áŠO‚Í”­¶‚µ‚È‚­‚È‚è‚Ü‚µ‚½i–{Ž¿“I‰ðŒˆ‚©‚Í”»‚è‚Ü‚¹‚ñj
‚±‚ê‚É‚æ‚舗‚ª18•ª‚ÅI‚í‚è‚Ü‚µ‚½
ƒXƒŒƒbƒh–ˆ‚ÉcreateSystemRandom‚·‚邿‚¤‚É‘‚«Š·‚¦‚邯21•ª‚©‚©‚邿‚¤‚ɂȂè‚Ü‚µ‚½
ƒI[ƒoƒwƒbƒhž‚݂łà500•ª‚©‚©‚Á‚Ä‚¢‚½Žž‘ã‚©‚ç‹ÁˆÙ“I‚Èi‰»‚ð‹‚°‚Ü‚µ‚½

“²‚ꂾ‚Á‚½ Software Transactional Memory ‚ÍŠú‘Ò’ö‘¬‚­‚È‚­‚ª‚Á‚©‚肵‚Ü‚µ‚½
STM‚Íʼn‚ÉŒŸ“¢‚·‚é‚ׂ«‚ł͂Ȃ­AI‚­‹£‡‚ª”­¶‚µ‚È‚¢‚悤‚É‘‚¯‚È‚¢‚Æ‚«‚ÌÅŒã‚ÌŽè’i‚Ȃ̂©‚ȂƎv‚¢‚Ü‚µ‚½

943 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/09/30(–Ø) 16:59:33.11 ID:Ai6xyiAS.net]
•¨—cpu‚ªŽl‚‚Ƃ©‚Ì‹[Ž—ƒ}ƒ‹ƒ`ƒXƒŒƒbƒh‚ł͂»‚ñ‚Ȃɑ‚­‚È‚ç‚È‚¢‚ÆŽv‚Á‚Ä‚½‚¯‚ÇA‚à‚̂ɂæ‚Á‚Ă͂»‚ñ‚È‚É‚à‘‚­‚È‚é‚à‚ñ‚È‚ñ‚¾‚È

944 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/10/04(ŒŽ) 21:32:31.29 ID:zxVeK0W2.net]
‚ÆŽv‚Á‚½‚ç3950x gpu‚łقñ‚Ƃɕ¨—ƒXƒŒƒbƒh‚ª‚½‚­‚³‚ñ‚ ‚éꇂ̘b‚©

945 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/10/05(‰Î) 23:20:55.55 ID:75xrYyRf.net]
>>922
Œ^’Žß‚µ‚ĂȂ¢‚Ì‚ÉAƒCƒ“ƒXƒ^ƒ“ƒX‚Æ‚µ‚ÄŠÖ”ƒ‚ƒiƒh‚ª‘I‘ð‚³‚ê‚é‚̂͂ǂ¤‚µ‚Ăł·‚©H
getLine‚ª‰e‹¿‚µ‚Ä‚¢‚Ü‚·‚©H

946 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/10/06(…) 01:58:31.84 ID:3ymQugFf.net]
>>934
return 1 getLine ‚Í (return 1) getLine ‚¾‚©‚çA
(return 1) ‚ªŠÖ”(a->b) ‚¶‚á‚È‚¢‚ÆŒ^‚ª‡‚í‚È‚¢‚ñ‚¶‚á‚È‚¢‚©‚ÈH

947 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/10/06(…) 22:57:04.48 ID:MRfRTuXd.net]
ŠÖ”ƒ‚ƒiƒh‚Æ“¯‚¶‚悤‚ÉAˆø”ˆê‚ÂŽæ‚郂ƒiƒhì‚Á‚½‚çambiguous‚Á‚Ä“{‚ç‚ê‚é‚©‚ȂƎv‚Á‚½‚ñ‚¾‚¯‚ÇAƒRƒ“ƒXƒgƒ‰ƒNƒ^‘‚©‚È‚¢‚ƂȂç‚È‚¢‚©‚炤‚Ü‚­‚¢‚©‚È‚¢B
‚±‚Ì’l‚ÍŠÖ”ƒ‚ƒiƒh‚É‚µ‚©‰ðŒˆ‚³‚ê‚È‚¢‚Ì‚©‚È



948 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/10/07(–Ø) 09:52:08.72 ID:AVdaEi5L.net]
C++‚Ìoperator()()‚ɑГ–‚·‚鉉ŽZ‚ð‘½d’è‹`‚Å‚«‚È‚¢‚̂ŞB–†‚ł͂Ȃ¢

949 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ [2021/10/17(“ú) 18:41:32.26 ID:DQz0YbVB.net]
‚È‚ñ‚Ђł߂ñ‚¾‚±‚Á‚ÄŒ¾‚¤—‘•Žq‚ªhaskell•׋­‚µ‚Ä‚¢‚Ädao of functional programming‚Á‚Ä‚¢‚¤ŠCŠO‚Ìl‚ª‘‚¢‚½•¶Œ£‚ª‚í‚©‚è‚â‚·‚¢‚Á‚Ä‚±‚Ƃł»‚ê“Ç‚ñ‚Å‚¢‚é‚炵‚¢‚ª
‚±‚±‚Ìl‚É‚à‚»‚ê“Ç‚ñ‚Å‚¢‚él‚¢‚éH

950 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/10/17(“ú) 20:11:52.85 ID:LTEsEtXo.net]
‚±‚ê‚©

The Dao of Functional Programming
https://github.com/BartoszMilewski/Publications/blob/master/TheDaoOfFP/DaoFP.pdf

Œ—˜_ŠÖŒW‚Ì“à—e‚¾‚È

951 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ [2021/10/17(“ú) 20:37:14.39 ID:DQz0YbVB.net]
>>939
‚·‚Ü‚ñƒŠƒ“ƒN’T‚³‚¹‚Ä‚µ‚Ü‚Á‚Ä‚·‚܂Ȃ¢
ƒƒC‚ª“\‚é‚ׂ«‚â‚Á‚½
ƒƒC‚ÍŒ—˜_‚í‚©‚ç‚È‚¢‚©‚ç“ǂ܂¸‚¶‚Ü‚¢‚¾‚Á‚½‚í
‚¢‚‚©Œ—˜_K“¾‚Å‚«‚½‚ç‚»‚ÌÛ‚É“Ç‚à‚¤‚©‚È‚Á‚ÄŽv‚Á‚Ä‚é

952 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/10/17(“ú) 21:08:39.75 ID:LTEsEtXo.net]
ƒvƒƒOƒ‰ƒ~ƒ“ƒO‚Ì–{Ž¿‚ðŠw‚Ԃɂ͌—˜_‚ɂ‚¢‚ÄŠw‚Ô•K—v‚ª‚ ‚邯‚¢‚¤‚±‚Ƃ炵‚¢
Šw‚ñ‚Å‚·‚®–𗧂‚Ƃ¢‚¤‚à‚̂ł͂Ȃ¢‚悤‚ÅA‚·‚®–ð—§‚Â’mޝ‚ª‚¨–]‚݂Ȃ瑼‚ð‚ ‚½‚Á‚Ä‚­‚êA‚Æ‚©

953 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ [2021/10/17(“ú) 23:35:51.47 ID:QqhGhKAl.net]
Œ©‚¹‚Ä‚à‚炨‚¤‚©AŒ—˜_‚Æ‚â‚ç‚ðB

954 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/10/18(ŒŽ) 00:33:18.04 ID:BIt/UTxD.net]
>>939
“¯‚¶’˜ŽÒ‚Ì

Category Theory for Programmers
https://github.com/hmemcpy/milewski-ctfp-pdf/releases

955 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ [2021/10/18(ŒŽ) 02:49:04.06 ID:mrfOLNSK.net]
‚Ü‚½Œ—˜_‚©
‚à‚¤‚¢‚¢‚æ

956 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/10/18(ŒŽ) 12:08:52.29 ID:7GcdH/zA.net]
‚³‚ @‚Ë‚ª‚¢‚ð@‚¢‚¦

957 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/10/18(ŒŽ) 15:15:47.20 ID:r9t2S6+p.net]
https://www.youtube.com/watch?v=E-48ent631o
https://bangumi.ouj.ac.jp/v4/bslife/detail/156936813.html



958 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/10/22(‹à) 12:14:30.91 ID:9P3eVRHd.net]
Free monad ‚Ƃ͉½‚©H ‚ÌAƒVƒ“ƒvƒ‹‚©‚“I‚ðŽË‚½à–¾‚ªsrackoverflow‚É‚ ‚Á‚½B
(John Wiegley ‚̉ñ“š)
https://stackoverflow.com/questions/13352205/what-are-free-monads

‚±‚ê‚ð“Ç‚ñ‚Å‚©‚瑼‚ÌF‚ñ‚ÈFree monad‚Ì‹LŽ–‚ð“ǂނÆA‚·‚ñ‚Ȃ藉ð‚Å‚«‚éB

‚±‚êA–{Ž¿‚ª‚æ‚­‰ð‚Á‚Ä‚¢‚él‚̉ñ“š‚¾‚æ‚ËB
‚±‚ñ‚ÈŠiD—Ç‚­‰ñ“š‚ª‚Å‚«‚邿‚¤¸i‚µ‚½‚¢B

959 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/10/22(‹à) 21:20:57.92 .net]
UTF-8 ‚ÌHaskell ƒ\[ƒXƒR[ƒh‚É‘‚«ž‚ñ‚¾“ú–{Œê•¶Žš—ñ‚ð’ÊMæ‚É“n‚·ˆ×‚É Shift_JIS ‚Ì String ‚É‚µ‚½‚¢‚̂ł·‚ª


module Main where

import Data.Text.ICU.Convert as ICU
import Data.Text as T
import Data.ByteString.Char8 as BS

main :: IO ()
main = do
@@conv <- open "Shift_JIS" Nothing
@@let
@@@@utf8txt = T.pack "ŠF‚ÍAÔ‚¿‚á‚ñ‚µ‚ã‚«‚¡H"
@@@@sjis_bs = fromUnicode conv utf8txt

‚±‚Ì sjis_bs ‚ð‚Ç‚¤‚µ‚½‚ç Shift_JIS ‚Ì String ‚ɂȂé‚ñ‚Å‚·‚©H
BS.unpack ‚¾‚Æ
ŠF‚ÃÂAÂԂ¿‚á‚ñ‚µ‚ã‚«‚¡ÂH
‚ɂȂÁ‚Ä‚µ‚Ü‚¢‚Ü‚·

960 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ [2021/10/22(‹à) 23:18:21.74 ID:5ielnrPe.net]
haskell‚Á‚Äpython‚ɉe‹¿—^‚¦‚Ä‚é‚ñ‚â‚È
‚Ç‚¨‚è‚Å•µˆÍ‹CŽ—‚Ă銴‚¶‚·‚é‚ñ‚©

961 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ [2021/10/23(“y) 01:09:52.51 ID:o3xA5lbA.net]
ƒŒƒCƒAƒEƒg‚ƌĂ΂ê‚éƒCƒ“ƒfƒ“ƒgƒXƒ^ƒCƒ‹‚ÍAPython‚ª1991”N‚Éʼn‚ÉƒŠƒŠ[ƒX‚Å‚ ‚èA85”NˆÈ‘O‚É‚ ‚Á‚½
Miranda‚ðŽQl‚É1990”N‚ÉHaskell‚Í“oꂵ‚½‚Í‚¸B

962 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ [2021/10/29(‹à) 12:55:32.45 ID:SqmTIce6.net]
•s“®“_‰‰ŽZŽq‚ª‚í‚©‚ç‚È‚­‚Ä‹ƒ‚¯‚é
Ä‹AŒÄ‚Ño‚µ‚ɂȂÁ‚ĂȂ¢‚Ì‚ÉÄ‹A‚ɂȂÁ‚Ä‚é‚̂͂킩‚é‚ñ‚¾‚¯‚Ç

963 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/10/29(‹à) 18:35:44.90 ID:ZN5Hp6rJ.net]
>>951
‰½‚ª•ª‚©‚ç‚È‚¢‚Ì‚©•ª‚©‚ç‚È‚¢

964 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ [2021/10/29(‹à) 18:40:46.51 ID:uCUCIWXe.net]
>>952
‚È‚ñ‚ł킩‚é‚ñ‚âH
Ë”\‚©H
Œã•s“®“_’è—‚ª‚í‚©‚ç‚ñ
•׋­‚µ‚ë‚Á‚ÄŒ¾‚í‚ê‚Ă邯‚Ç

965 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/10/29(‹à) 20:05:05.45 ID:1mMf/Evz.net]
’x‰„•]‰¿‚ÌË”\‚ª‚È‚¢‚Æ x = f x ‚ðŽv‚¢‚‚©‚È‚¢‚ñ‚¾‚æ‚È
y f = f (y f) ‚µ‚©•ª‚©‚ç‚È‚¢

966 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/10/29(‹à) 21:04:54.17 ID:ZN5Hp6rJ.net]
>>951 ‚̉½‚à‚©‚à‚ªA‚±‚¿‚ç‚ɂ͕ª‚©‚ç‚È‚¢B
‹ð’s‚ðŒ¾‚¢‚½‚¢‚¾‚¯‚Ȃ̂©A‚»‚ê‚Æ‚à‰½‚©Ž¿–â‚ð‚µ‚½‚¢‚Ì‚©B
ŒãŽÒ‚È‚çAŽ¿–â“à—e‚͉½‚©B

>>953
> Œã•s“®“_’è—‚ª‚í‚©‚ç‚ñ
‚»‚ꂾ‚¯‚È‚çA•׋­‚µ‚Ä‚­‚¾‚³‚¢‚Æ‚µ‚©Œ¾‚¢‚悤‚ª‚È‚¢B

•׋­‚µ‚ë‚ÆŒ¾‚í‚ê‚Ä‚¢‚é‚̂ȂçA‰½‚©Ž‘—¿‚ª”z‚ç‚ꂽ‚èA
ŽQl•¶Œ£‚ª‹“‚°‚ç‚ꂽ‚肵‚Ä‚¢‚È‚¢‚Ì‚©H
‚»‚¤‚¢‚¤‚Ì‚ªŠù‚É‚ ‚é‚̂ȂçAŽæ‚è‚ ‚¦‚¸‘S‚Ăɓ–‚½‚Á‚ÄA
¡•ª‚©‚é•”•ª‚Æ•ª‚©‚ç‚È‚¢•”•ª‚ð“O’ê“I‚Éׂ©‚­Žd–󂵂Ă݂ê‚΂¢‚¢‚̂łÍH

967 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/11/05(‹à) 06:38:08.04 ID:UB8UVAT8.net]
>>951
•ª‚©‚ç‚È‚¢‚͉̂½ŒÌÄ‹Aˆ—‚µ‚Ä‚é‚Ì‚©‚¶‚á‚È‚­‚Äi‚»‚±‚Í’è‹`“I‚É–¾‚ç‚©‚¾‚µjA
‚Ç‚¤‚µ‚Ä–³ŒÀƒ‹[ƒv‚¹‚¸‚ÉI—¹‚·‚é‚Ì‚©‚Å‚¢‚¢‚Ì‚©‚È



968 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/11/14(“ú) 05:07:45.42 ID:HK5ctRa0.net]
‚â‚Á‚Æ Monad ƒNƒ‰ƒX‚©‚ç return ‚ªÁ‚¦‚邿
‚Ü‚¾Œv‰æ’iŠK‚½‚¯‚Ç
https://github.com/fumieval/Haskell-breaking-changes

969 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/11/14(“ú) 21:26:09.61 ID:bsdXePE0.net]
‚È‚ñ‚ÅÁ‚·‚ÌH

970 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/11/15(ŒŽ) 02:14:35.96 ID:jBQU3T8q.net]
>>958
ApplicativeƒNƒ‰ƒX‚ÉpureŠÖ”‚ª‚ ‚é‚©‚çB
Monad‘¥‚âApplicative‘¥‚ð–ž‚½‚µ‚Ä‚é‚È‚çA
‚Ü‚¸ŠÔˆá‚¢‚È‚­ pure = return ‚¾‚©‚ç•Еû‚Å[•ªB

‚»‚ê‚Éreturn‚Á‚Ä–¼‘O‚ª‚ ‚Ü‚è‚ÉŽÀ‘Ô‚Æ‚©‚¯—£‚ê‚Ă邵‚ËB

971 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/11/15(ŒŽ) 12:46:13.83 ID:KyLp+2Ep.net]
‰•à“I‚ÈŽ¿–â‚Å‚·‚ªA•¡”‚ÌÝ’èƒtƒ@ƒCƒ‹“ǂݞ‚Ý‚·‚é‚Ì‚É
readFile ‚Å‘S‘̎擾‚µ‚Ä‚©‚爗‚·‚é‚Ì‚Æ
withFile ‚Å hGetLine ‚µ‚È‚ª‚爗‚·‚é‚̂ł͂ǂ¿‚炪‚¢‚¢‚Æ‚©‚ ‚è‚Ü‚·‚©?
Žå‚Ɉ—‘¬“x‚Ì“_‚ɂ‚¢‚Ä•·‚«‚½‚¢‚Å‚·B

972 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/11/15(ŒŽ) 18:22:40.27 ID:W9vQbDtp.net]
>>960
‚»‚¤‚¢‚¤‚Ì‚ÍAŽ©•ª‚ÅŽÀŒ±‚·‚ê‚΂·‚®‚ÉŠm‚©‚ß‚ç‚ê‚é‚̂łÍH

973 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/11/15(ŒŽ) 21:51:56.85 ID:NLyY6NK4.net]
>>959
Applicative‚Épure‚ª‚ ‚é‚̂͂Ȃñ‚ÅH
Monad‚Ìreturn‚¾‚¯‚É‚·‚é‚͕̂ςł·‚©H
—댳‚ªApplicative‚ÌÓ–±‚Ȃ̂ªƒsƒ“‚Æ‚«‚ĂȂ¢‚ñ‚Å‚·BMonad‚¾‚Ɖ½‚Ƈ‚í‚È‚¢‚ñ‚Å‚µ‚傤

974 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/11/16(‰Î) 02:22:00.49 ID:EE8p/B0u.net]
>>962
‚Å‚«‚邾‚¯ˆêŽŸî•ñ‚É“–‚½‚è‚Ü‚µ‚傤B
>>957 ‚ÌƒŠƒ“ƒNæ‚Ì Planned: remove return from Monad ‚Ì€–Ú‚Ì
Proposal ‚ÌƒŠƒ“ƒNæ‚ð“Ç‚ñ‚ʼnº‚³‚¢B
(X‚É‚»‚Ìæ‚Ì dudcusdion ‚Ȃǂà)
‚»‚ꂪłೊm‚ÅA‚©‚ÂA•ª‚©‚è‚â‚·‚¢‚Å‚·B

975 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/11/16(‰Î) 21:38:06.78 ID:au51kzu/.net]
³Šm‚É’Ô‚Á‚Ä‚­‚ê

976 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/11/16(‰Î) 22:40:31.75 ID:t6DDIn3B.net]
“Ç‚ñ‚ł݂½‚¯‚ǂ悭‚í‚©‚ñ‚È‚¢‚È‚ BAMP‚ð–ž‚½‚·‚½‚ß‚ÉApplicative m => Monad m‚ª•K—v‚Á‚Ä‚±‚Ƃ͑‚¢‚Ä‚ ‚邿‚¤‚¾‚¯‚Ç
Monad‚©‚çreturn‚ð휂µ‚ÄApure‚É“ˆê‚·‚é——R‚Á‚Ä‘‚¢‚Ä‚ ‚é‚©‚ÈH
“ǂݔò‚΂µ‚½‚©‚à‚µ‚ê‚ñ‚¯‚ÇB

return = pure‚¾‚©‚çA“ˆê‚µ‚Ä‚à“¯‚¶‚Á‚Ä‚¢‚¤‚͕̂ª‚©‚é‚ñ‚¾‚¯‚ÇAApplicative‚Épure‚ª•K—v‚È——R‚ª‚í‚©‚ç‚È‚¢B
Applicative‚Ì4‚‚̃‹[ƒ‹‚ð–ž‚½‚·‚½‚ß‚Épure‚ª•K—v‚È‚±‚Æ‚ÍAApplicative‚Ì’è‹`‚É‘‚¢‚Ä‚ ‚邯‚ÇAŒ—˜_‚í‚©‚ñ‚È‚¢‚©‚çA‚±‚̃‹[ƒ‹‚ª‰½‚Å•K—v‚Ȃ̂©•ª‚©‚ç‚ñB

Monoidal FunctorH‚Æ‚©‚¢‚¤‚â‚‚̕\Œ»‚Ì‚½‚߂ɒPˆÊŒ³(—댳‚¶‚á‚È‚©‚Á‚½‚Ë)‚ª•K—v‚È‚ñ‚¾‚낤‚¯‚ÇAŒ—˜_‚í‚©‚ç‚ñ‚È‚¢‚©‚番‚©‚ç‚ñB

Monoid‚ÆŠÖŒW‚ ‚é‚ñ‚¾‚낤‚©B‚»‚ê‚È‚ç‰Á–@‚Ì‚½‚߂ɒPˆÊŒ³‚ª•K—v‚Ȃ̂͂킩‚é‚ñ‚¾‚¯‚ÇB

977 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/11/16(‰Î) 22:42:08.60 ID:t6DDIn3B.net]
’N‚©Šš‚ÝÓ‚¢‚Ä‹³‚¦‚ĉº‚³‚¢



978 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/11/17(…) 06:46:33.09 ID:4zMdVbrs.net]
‚æ‚è’ŠÛ“x‚Ì‚‚¢•û‚Å‚ ‚éApplicative‚Ìpure‚ð¶‚©‚·‚Ì‚Í
Ž„‚Í‚²‚­Ž©‘R‚ÉŠ´‚¶‚邯‚Ç

mappend‚Æ<>‚à‹@”\“I‚Ƀ_ƒu‚Á‚Ă邩‚ç
«—ˆMonoid‚©‚çmappend‚ªÁ‚¦‚邿‚Á‚Ä
Monoid‚̃hƒLƒ…ƒƒ“ƒg‚É‘‚¢‚Ä‚ ‚邯‚Ç
‚à‚µ‚©‚µ‚Ä‚»‚ê‚à‹^–₾‚Á‚½‚è‚·‚éH

Semigroup‚Ì•û‚©‚ç<>‚ðÁ‚µ‚ÄA
Monoid‚Ìmappend‚ðŽc‚·‚ñ‚¶‚áƒ_ƒ‚È‚ÌH ‚Á‚Ä

979 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/11/17(…) 08:05:13.47 ID:fLzDfeGp.net]
>>965
Œ—˜_‚ÍˆêØŠÖŒW‚È‚­A‚¢‚©‚ÉŒë‚è‚Ì–³‚¢ƒvƒƒOƒ‰ƒ€‚ª‘‚¯‚é‚©A
‚Ü‚½ƒ\[ƒXƒR[ƒh‚ª“ǂ݂₷‚­‚Ȃ邩‚Æ‚¢‚¤ŽÀ—p“I‚È——R‚Å‚·B
‚»‚¤‚¢‚¤ŠÏ“_‚Å‚à‚¤ˆê“x“Ç‚ñ‚ł݂Ă­‚¾‚³‚¢B

Haskell‚ÍŽÀ—p“I‚ȔėpƒvƒƒOƒ‰ƒ~ƒ“ƒOŒ¾Œê‚Å‚ ‚邱‚Æ‚ð–ÚŽw‚µ‚Äì‚ç‚ê‚Ü‚µ‚½B
‚Ȃ̂ÅA¡‰ñ‚̂悤‚È——R‚ł̒ñˆÄ‚ÍŒÂl“I‚ɂ͂·‚²‚­”[“¾‚Å‚«‚邵A‘åŽ^¬‚Å‚·B

980 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/11/17(…) 12:44:32.78 ID:f9gix7Cx.net]
ƒRƒƒ“ƒg‚ ‚肪‚Ƃł·B
Semigroup‚Í”¼ŒQAMonoid‚Í’PˆÊŒ³•t‚«‚Ì”¼ŒQ‚Å‚·‚æ‚ËB
Œ¾‚í‚ê‚Ä‚Ý‚é‚ÆA<>‚É“ˆê‚µ‚Ämappend‚ÍÁ‚µ‚Ä‚àŽ©‘R‚È‹C‚ª‚·‚éB
‚·‚²‚¢H‚ŃƒO•¶Žš—ñ‚ªmappend‚ŒljÁ‚³‚ê‚Ä‚¢‚­AƒTƒ“ƒvƒ‹‚ð“Ç‚ñ‚¾‚±‚Æ‚ª‚ ‚é‚Ì‚ÅAMonoid‚͎󂯓ü‚ê‚â‚·‚¢‚ñ‚Å‚·B
Semigroup‚É’PˆÊŒ³‚ª‚È‚¢‚±‚Ƃ͕sŽv‹c‚ÉŽv‚í‚È‚¢‚Å‚·B”¼ŒQ‚Æ‚¢‚¤‚à‚̂𕷂¢‚½‚±‚Æ‚ª‚ ‚Á‚½‚Ì‚ÆA
ƒƒO‚Ì—á‚ɖ߂邯A•¶Žš—ñ‚È‚µ‚̃ƒO‚Í‚ ‚肦‚È‚¢‚Æl‚¦‚ê‚ÎA’PˆÊŒ³‚ª‚È‚¢Monoid‚ª‚ ‚Á‚Ä‚à‚ ‚Ü‚è•sŽv‹c‚ÉŽv‚í‚È‚¢‚Å‚·B

Œ¾‚Á‚Ă邱‚Æ‚ªã‚ƕςí‚Á‚Ä‚«‚Ă邩‚à‚µ‚ê‚È‚¢‚Å‚·‚ªAApplicative‚ª•sŽv‹c‚ÉŽv‚¤‚Ì‚ÍA‚±‚±‚É’PˆÊŒ³H(‚Æ‚¢‚¤‚©’PˆÊŒ³‚𶬂·‚é)pure‚ª‚ ‚邱‚ÆB
Applicative‚ÌŒ‹‡<*>‚Á‚ÄŽ‚¿ã‚°‚ç‚ꂽŒ^‚¾‚¯‚Å\¬‚³‚ê‚Ă܂·: f (a -> b) -> f a -> f bB
Œ—˜_‰½‚à’m‚ç‚È‚¢‚ÅŒ¾‚¢‚Ü‚·‚ªA’PˆÊŒ³pure‚ÍŽ‚¿ã‚°‚ç‚ꂽŒ^f a‚ªŽ©‘R‚È‹C‚ª‚·‚é‚ñ‚Å‚·Ba -> f a‚ł͂Ȃ­B
•µˆÍ‹C‚Å‚»‚¤Š´‚¶‚Ă邾‚¯‚Å‚·‚ªB

‚»‚ñ‚Å‚à‚Á‚ÄAa -> f a‚ª“oê‚·‚é‚Ì‚Á‚ÄAMonad.(>>=)‚¾‚æ‚È‚ ‚Á‚Ä‚±‚Æ‚ÅA‚¾‚Á‚½‚çAreturn‚ªMonad‚É‚ ‚é‚͎̂©‘R‚È‚ñ‚¶‚á‚È‚¢‚©‚ÈA‚ÆŽv‚¤‚킯‚Å‚·B
‚»‚¤‚·‚邯Apure‚Á‚ĂȂñ‚Ì‚½‚߂ɂ ‚é‚ñ‚¾‚낤B“¯‚¶Œ^‚È‚çMonad‚¾‚¯‚ ‚é‚Ù‚¤‚ªŽ©‘R‚¾‚ȂƊ´‚¶‚½‚킯‚Å‚·B

‚½‚Ô‚ñ‚±‚ê‚ÍŒ—˜_‚ð’m‚Á‚Ä‚¢‚ê‚ÎA•ςɎv‚í‚È‚¢‚Ì‚©‚ȂƎv‚Á‚ÄA‚»‚¤Œ¾‚Á‚½‚킯‚Å‚·B
„Ȃł«‚ĂȂ¢Š´‚ ‚è‚Ü‚·‚ªA“`‚í‚è‚Ü‚·‚©‚ËH

981 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/11/17(…) 12:50:22.84 ID:f9gix7Cx.net]
‚¿‚Ȃ݂Ɏ©•ª‚ÍAŽ©•ª‚̉¿’lŠÏ‚É”½‚µ‚Ă邩‚ç‹p‰º‚·‚ׂ«‚¾‚ÆŒ¾‚Á‚Ä‚é‚̂ł͂Ȃ­‚ÄA
‚Ç‚¤‚µ‚Ä‚±‚¤‚¢‚¤\‘¢‚ª³‚µ‚¢‚ÌHŽÀÛ‚Ì—˜_‚âƒR[ƒh‚ł̗˜—p—á‚ÉÆ‚炵‚Ăǂñ‚È—˜“_‚âˆÓ–¡‚ª‚ ‚é‚̂ƒm‚肽‚¢‚¾‚¯‚Å‚·B

982 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/11/17(…) 15:59:19.97 ID:oGkdvxh0.net]
‚»‚à‚»‚àapplicative‚È‚é‚à‚Ì‚ª”Šw‚ÌŒ—˜_“I‚ɉ½ˆÓ–¡‚·‚é‚©‚æ‚­‚í‚©‚ç‚ñ‚Ì‚¾‚æ‚È
monad‚Ì•û‚Íwiki‚Ìmonad (category theory)‚Ì€‚ª‚ ‚Á‚ăLƒbƒ`ƒŠ‰ðà‚³‚ê‚Ă邵

https://en.m.wikipedia.org/wiki/Monad_(category_theory)

T‚ªcategory Cã‚Ìmonad‚Å‚ ‚邯‚«fmap T‚ðƒÊ¡ƒÅ_T‚Å’è‚ß‚ê‚΃RƒŒ‚ªfunctor C¨C‚ð’è‹`‚·‚é‚Ì‚à‚í‚©‚é‚ñ‚¾‚¯‚ÇAapplicative‚ɂ‚¢‚Ä‚¨‚ñ‚È‚¶‚悤‚ȉðà‚ª’†XŒ©“–‚½‚ç‚È‚¢
‚Ç‚Á‚©‚ÅDescartes closed category‚ª‚Ç‚¤‚½‚ç‚¢‚¤‚Ì‚ðŒ©‚½Ž–‚ ‚é‚ñ‚¾‚¯‚Ç’N‚©’m‚è‚Ü‚¹‚ñH

983 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/11/17(…) 16:59:55.76 ID:fpCU2YNN.net]
uƒAƒvƒŠƒJƒeƒBƒuŠÖŽè‚̓‚ƒmƒCƒhŒ—‚É‚¨‚¯‚é‹­laxƒ‚ƒmƒCƒhŠÖŽè‚¾‚æA‰½‚©–â‘è‚Å‚àHv
https://blog.miz-ar.info/2018/12/applicative-functor/

984 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/11/17(…) 17:27:50.45 ID:f9gix7Cx.net]
>>971
‘½•ª‚±‚ê‚ÌŠT—v•”•ª‚ÍŒ©‚Ä‚é‚ñ‚Å‚·‚æ‚ËB
https://en.m.wikipedia.org/wiki/Applicative_functor
Œã‚ë‚Ì•û‚Í‚³‚Ä‚¨‚«AŠT—v•”•ª‚ÍŽ©•ª‚Í‚³‚Á‚Ï‚è‚Å‚µ‚½‚ªB

985 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ [2021/11/30(‰Î) 20:23:52.94 ID:SegqCGCa.net]
haskell•׋­‚µ‚悤‚©‚È‚Á‚ÄŽv‚Á‚Ä‚é‚ñ‚Å‚·‚¯‚Ç‚¨‚·‚·‚ߑЂÁ‚ĂȂɂ©‚ ‚è‚Ü‚¹‚ñ‚©H
‚¿‚Ȃ݂Éocaml‚ŃvƒƒOƒ‰ƒ€‘‚¢‚½‚±‚Æ‚ ‚è‚Ü‚·
Œ^ƒVƒXƒeƒ€“ü–å‚ðŒ´•¶‚Å7Š„‚قǓǔj‚µ‚Ü‚µ‚½
‚¿‚Ȃ݂ɑåŠwŽóŒ±‚Ì”Šw‚Í‚»‚±‚»‚±Ž©M‚ ‚è‚Ü‚·
ˆêŠKqŒê˜_—‚Ì‹L†ˆµ‚Á‚Ä‰ð‚¢‚Ä‚¢‚Ü‚µ‚½
Œ—˜_‚Ì’mޝ‚Í‚ ‚è‚Ü‚¹‚ñ

986 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ [2021/11/30(‰Î) 20:27:04.88 ID:SegqCGCa.net]
‚¿‚Ȃ݂Ƀ‚ƒiƒh‚Í“ú–{Œê”Åwikipedia‚Ì‹LŽ–‚ð“Ç‚ñ‚¾‚݂̂ł·
Œ^ƒNƒ‰ƒX‚͂킩‚è‚Ü‚·
Maybe‚܂ł͂킩‚è‚Ü‚µ‚½‚ªIOƒ‚ƒiƒh‚ÅçT‚«‚Ü‚µ‚½
ocaml‚Ƃ͈á‚Á‚ÄŽQÆŒ^‚ª‚È‚¢Œ¾Œê‚¾‚Á‚Ä‚±‚Ƃ͈ӊO‚ÉŽv‚¢‚Ü‚µ‚½

987 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/12/02(–Ø) 00:19:03.82 ID:c82IwjxK.net]
(>>=)‚ª‚½‚¾‚̃f[ƒ^ƒRƒ“ƒXƒgƒ‰ƒNƒ^‚¾‚Á‚½‚烂ƒiƒh‚Í‚½‚¾‚Ì\•¶–؂Ȃ̂É

data M b = Bind (M a) (a -> M b) | ...

‚Ý‚½‚¢‚È’è‹`‚ª‚Å‚«‚È‚¢Œ^ƒVƒXƒeƒ€‚¾‚©‚ç
‘㔓Iƒf[ƒ^Œ^‚ðŽg‚í‚È‚¢‚щƒ€ƒ_‚ð‚½‚­‚³‚ñŽg‚¤‚±‚ƂɂȂÁ‚Ă݂ñ‚ÈçT‚­



988 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/12/02(–Ø) 13:13:42.19 ID:kpMV/tat.net]
‚»‚è‚á‚»‚¤‚â‚ëH
ƒf[ƒ^ƒRƒ“ƒXƒgƒ‰ƒNƒ^‚Æ“WŠJ‚³‚ê‚é‚ׂ«ŠÖ”‚̈Ⴂ‚ðƒvƒƒOƒ‰ƒ}‚ªŽw’肵‚È‚¯‚ê‚Έ—Œn‚Í—^‚¦‚ç‚ꂽexpression‚ð‚Ç‚±‚܂œWŠJ‚·‚ׂ«‚©Œˆ’è‚Å‚«‚ñ‚â‚ëH

989 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/12/02(–Ø) 14:49:59.14 ID:ISSe07L0.net]
>>974
Haskell‚ðŽn‚ß‚é‘O‚ÉŽd“ü‚ꂽ‚»‚̂悤‚È’mޝ‚âOCaml‚ÌŒoŒ±‚ªA
Haskell‚ÌŠwK‚É‚¢‚Á‚½‚¢‚Ç‚ñ‚ȉe‹¿‚ð—^‚¦‚é‚Ì‚©A
Šy‚É‚·‚é‚Ì‚©A‚»‚ê‚Æ‚àŽ×–‚‚É‚µ‚©‚È‚ç‚È‚¢‚Ì‚©A³’¼‚Ü‚Á‚½‚­•ª‚©‚ç‚ñB
Haskell‚ʼn½‚ð‚µ‚½‚¢‚Ì‚©A–Ú“I‚â–Ú•W‚à•ª‚©‚ç‚ñ‚µB

‚Ȃ̂ÅAHaskell“ü–åŽÒ‚Æ‚¢‚¤ŠÏ“_‚¾‚¯‚ÅŽŸ‚Ì2“_‚ð‚·‚·‚ß‚éB

‚³‚Á‚Æ—v“_‚ðŠw‚ñ‚Å‘‚­ƒAƒvƒŠ‚ðì‚èŽn‚ß‚½‚¢‚̂ȂçA”–‚¢“ü–å‘‚Å\•ªB
uLearn You a Haskell for Great Good!v
‚ª—Ç‚¢‚ÆŽv‚¤B

ƒKƒbƒcƒŠŠw‚Ñ‚½‚¢A‚©‚ÂAŽžŠÔ‚ƪ‹C‚ª‚ ‚é‚̂ȂçA
uHaskell Programming from first principlesv
‚ª‚¨‚·‚·‚ßB

Ú‚µ‚­‚͂ǂ¿‚ç‚àŒöŽ®ƒTƒCƒg‚ðŽQÆ‚µ‚ÄB

‚ȂɂŊwK‚·‚é‚É‚µ‚Ä‚àAŽè‚⓪‚ð“®‚©‚·(ƒvƒƒOƒ‰ƒ~ƒ“ƒO‚·‚é)‚Ì‚ªŽå‚ÅA
–{‚âƒhƒLƒ…ƒƒ“ƒg‚ð“ǂނ̂Í]‚Å‚ ‚邱‚Æ‚ð–Y‚ꂸ‚ÉB

990 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ [2021/12/02(–Ø) 17:56:37.45 ID:35Q5ApkZ.net]
>>978
‚·‚݂܂¹‚ñ
ŠÖ”Œ^Œ¾Œê‚Á‚Ä•~‹‚ª‚‚»‚¤‚ȃCƒ[ƒW‚ ‚Á‚Ä‚â‚é‚ɂ͂ ‚é’ö“x”Šw‚Ì‘f—{‚ª‹‚ß‚ç‚ê‚é‚Ì‚©‚È‚Á‚ÄŽv‚Á‚Ä‚¢‚ë‚¢‚뎩•ª‚È‚è‚Ì’mޝ‚ª‚ ‚邯‚±‚ë‹“‚°‚Ă݂܂µ‚½
“Á‚ÉŒ^ƒVƒXƒeƒ€“ü–å‚ÍŒ^„˜_‚Ì—˜_‚Æ‚©•ª‚©‚Á‚Ä‚¢‚½‚Ù‚¤‚ª‚¢‚¢‚Ì‚©‚ȂƎv‚Á‚ēǂñ‚Å‚¢‚Ü‚µ‚½
‚Ü‚¸‚ÍLearn you‚Ì•û‚ð“Ç‚ñ‚ÅŒ©‚悤‚ÆŽv‚¢‚Ü‚·
‚ ‚肪‚Æ‚¤‚²‚´‚¢‚Ü‚µ‚½

991 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/12/02(–Ø) 20:33:40.95 ID:c82IwjxK.net]
>>977
‚½‚¾‚µAIOƒ‚ƒiƒh‚Íu“WŠJv‚Å‚«‚È‚¢•û‚ª‚¢‚¢
‚»‚¤‚·‚ê‚Έ—Œn‚ªexpression‚ð‚ǂꂾ‚¯u“WŠJv‚µ‚Ä‚à•›ì—p‚ª‚È‚¢

992 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/12/14(‰Î) 12:11:46.65 ID:78Ep1iUH.net]
‚ ‚Ì“`à‚̉ª•”Œ’‚ª•œŠˆII
https://twitter.com/ken74047924


i‚¨‚Ü‚¯î•ñj
Quora‚Å‚à—L–¼‚¾‚Á‚½‰ª•”Œ’A2021”N12ŒŽ‚ÉTwitter‚̃AƒJƒEƒ“ƒg‚Ü‚½‚Ü‚½‰i‹v“€Œ‹‚³‚ê‚éB
“–Žž‚̃A[ƒJƒCƒu‚Í‘½­ƒlƒbƒg‚ÉŽc‚Á‚Ä‚é‚炵‚¢

https://twitter.com/KenSmooth5
https://i.imgur.com/Ws4RM1o.png
(deleted an unsolicited ad)

993 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/12/14(‰Î) 12:13:53.75 ID:l8dEnSpn.net]
–т̕ǂ©‚ç‘–¯‚ðŽç‚é“} 72‹cÈ–Ú
https://lavender.5ch.net/test/read.cgi/net/1615613906/

994 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ [2021/12/14(‰Î) 12:34:07.62 ID:iFoIKYew.net]
IQ145‚ÌlH

995 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/12/14(‰Î) 12:57:57.79 ID:IE9oyXDX.net]
>>983
‚æ‚­Šo‚¦‚Ä‚é‚È
ŋ߂Íkensmooth‚Á‚ăAƒJƒEƒ“ƒg‚ð˜A”ԂŎ擾‚µ‚ÄAƒlƒgƒEƒˆƒ€[ƒu‚ð˜A”­‚µ‚Ä‚½‚ñ‚¾‚¯‚Ç‘S•”“€Œ‹‚³‚ê‚Ä¡‚̃AƒJƒEƒ“ƒg‚ɂȂÁ‚Ä‚é
‚ ‚̃lƒgƒEƒˆ“Še‚͂Ȃñ‚¾‚Á‚½‚ñ‚¾‚낤

996 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/12/14(‰Î) 17:15:27.20 ID:Ad592Fxk.net]
>>981
‚¤‚í‚ 

997 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ [2021/12/14(‰Î) 17:39:35.08 ID:iFoIKYew.net]
>>981
‚Ȃɂ±‚̈ꗗ



998 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/12/14(‰Î) 18:35:50.33 ID:SgMFGeMD.net]
‰ª•”Œ’ATwitterÄŠJ‚µ‚Ä‚½‚Ì‚Ëw
Newbie‚Ƃ͂²–³¹‘¿‚µ‚Ä‚½‚©‚ç’m‚ç‚ñ‚©‚Á‚½‚íw

999 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ [2021/12/14(‰Î) 19:46:12.10 ID:oL+i1N1M.net]
ƒcƒCƒbƒ^[ÄŠJ‚¨‚߂łƂ¤‚²‚´‚¢‚Ü‚·I
—ˆ”N‚Í‚×[‚â‚ñ‚Ì”N‚ɂȂéI
‚Æ—Ç‚¢‚Å‚·‚ËI

1000 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/12/14(‰Î) 22:17:24.22 ID:8Kmj5/YX.net]
>>981
‚±‚͂Ђǂ¢

1001 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/12/14(‰Î) 22:19:44.63 ID:3V9aUzHV.net]
‰ª•”‚Ìŋߓ€Œ‹‚³‚ꂽƒAƒJƒEƒ“ƒg‚̃cƒC[ƒg‚Ý‚Á‚¯‚½

https://archive.ph/7pepg

1002 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ [2021/12/14(‰Î) 22:22:42.89 ID:oL+i1N1M.net]
‚×[‚â‚ñ‚͘_‹q‚È‚ñ‚¾‚ÈB

1003 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/12/14(‰Î) 22:38:20.35 ID:sz+GbZW0.net]
UCLA‚𑲋Ƃµ‚½‚Æ‚¢‚¤˜b‚Í••ˆó‚µ‚½‚Ý‚½‚¢‚Ë
‚È‚ºH

1004 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ [2021/12/14(‰Î) 22:53:00.93 ID:oL+i1N1M.net]
‚½‚Ü‚½‚܂łÍH

1005 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ [2021/12/14(‰Î) 23:06:41.51 ID:dwtzMOq3.net]
Quora‚Å‚¢‚ë‚¢‚ë‰ñ“š‚µ‚Ä‚¢‚邪ƒ‚ƒiƒh‚̉ðà‚ÍŒ©Ž–‚¾‚¼

1006 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/12/14(‰Î) 23:16:06.08 ID:NLEjPnNU.net]
‚±‚ñ‚Șb‚Ũ‚¢‚¢‚Ä‚é‚ñ‚¶‚á‚È‚¢‚æŒN‚ç

1007 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ [2021/12/14(‰Î) 23:42:04.31 ID:iFoIKYew.net]
>>994
ƒnƒ‰ƒfƒC



1008 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ [2021/12/15(…) 00:16:47.05 ID:Xb4w9/yA.net]
uƒ‚ƒiƒh‚ɂ‚¢‚ÄŠw‚ñ‚Å‚¢‚é‚̂ł·‚ªAmap‚âflatMap‚ÍŒ—˜_‚ł͂ǂ̊T”O‚É‚ ‚½‚é‚̂ł·‚©Hv
‹ï‘Ì“I‚ɗᎦ‚µ‚Ä‚¢‚Ă킩‚è‚â‚·‚¢B

1009 –¼‘OF‚É‚µ‚â‚Ü@‘åã‘åŠw mailto:sage [2021/12/15(…) 07:25:32.70 ID:/l12wr0Z.net]
‰R‚‚«ƒPƒ“‚¿‚á‚ñA‘Š•Ï‚í‚炸‚Å‚·‚Ëww
‹vX‚ɂ킽‚­‚µ‚à• ‹Ø‚ªƒ~ƒVƒ~ƒV‚Æ’b‚¦‚ç‚ê‚Ü‚µ‚½
‚µ‚΂炭‚킽‚­‚µ‚à‰Á¨‚¢‚½‚µ‚Ü‚·

1010 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ [2021/12/15(…) 08:55:33.56 ID:fP8nqGj3.net]
Hugs> take 10 fibs where fibs = 0 : 1 : zipWith (+) fibs (tail fibs)
[0,1,1,2,3,5,8,13,21,34]

GHCi
Prelude> take 10 fibs where fibs = 0 : 1 : zipWith (+) fibs (tail fibs)
<interactive>:6:14: error: parse error on input ewheref
Œ¾ŒêŽd—l‚ª”÷–­‚ɈقȂéH

ƒIƒŒƒƒ‚Aƒoƒbƒ`ƒtƒ@ƒCƒ‹
stack ghci
‚ð–Ú“I‚̃fƒBƒŒƒNƒgƒŠ‰º(—áAe:\haskell)‚Éì‚Á‚ăfƒBƒXƒNƒgƒbƒv‚ɂ̓oƒbƒ`ƒtƒ@ƒCƒ‹‚Ö‚ÌƒŠƒ“ƒN‚ðì‚Á‚Ä‚¨‚­‚Æ
ghci‹N“®ŒãƒJ[ƒ\ƒ‹‚ªÁ‚¦‚È‚¢

‹Md‚ÈHaskellƒXƒŒ‚ª‚à‚¤‰ß‚®1000s‚­

1011 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ [2021/12/15(…) 10:41:42.68 ID:BDga5vqT.net]
>>981
‚¬‚á‚Á‚Í‚Á‚Í‚Á‚Í‚Á‚Í

1012 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ [2021/12/16(–Ø) 08:29:00.48 ID:kVJbCKwy.net]
—ߘa‚ÌŽž‘ã‚ɖт̕ǂӂ½‚½‚Ñ

1013 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ [2021/12/16(–Ø) 21:29:13.60 ID:k4b05O9+.net]
Ž©•ª‚ŃLƒƒƒ‰‰‰o‚µ‚Ă邾‚ë

1014 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ [2021/12/16(–Ø) 21:38:27.93 ID:Y2CVy/MB.net]
https://togetter.com/li/773846
‚¿‚å‚܂ǎ‚ªŽñ“Ë‚Áž‚ñ‚ł邯‚ÇAŽÐ–¼”w•‰‚Á‚Ă悭‚±‚ñ‚È‘‚«ž‚Ýo—ˆ‚é‚à‚ñ‚¾‚ÆA‹Á‚¢‚½B

1015 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ [2021/12/16(–Ø) 21:46:42.96 ID:OBc86cw8.net]
‘¼‚Ìl‚à’@‚¢‚Ä‚¢‚é‚©‚ç•Öæ‚µ‚ÄŽ€‘ÌR‚肵‚悤‚©“I‚ȸ_‚ªŒ©‚ÄŽæ‚ê‚é

1016 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ mailto:sage [2021/12/16(–Ø) 21:55:44.07 ID:iDMhxZSI.net]
>>1003
–т̕ǎA‚Å‚·‚©A‚Ȃ‚©‚µ‚¢‚Å‚·‚Ë

1017 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ [2021/12/16(–Ø) 21:55:47.51 ID:Y2CVy/MB.net]
‚»‚ê‚̓}ƒCƒNƒƒ\ƒtƒgŽÐ‚ÌŒöŽ®Œ©‰ð‚Å‚·‚©H‚Á‚ē˂Áž‚Ý“ü‚ê‚Ä—~‚µ‚¢‚íB



1018 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ [2021/12/16(–Ø) 22:06:47.71 ID:Y2CVy/MB.net]
‹³‘c‚¾‚Ìô”]‚¾‚ÌŒ¾‚¢‚ª‚©‚è‚àr‚¾‚µ‚¢‚µAuŠwp“I‚È^—‚ł͂Ȃ¢‚µv‰]X‚Æ‚¢‚¤Ž©g‚Ì‘‚«ž‚Ý‚ª‚»‚̂܂܃u[ƒƒ‰ƒ“‚¾‚ÆŽv‚¤‚¯‚ÇB
‚±‚ê‚ðŽÐ–¼”w•‰‚Á‚Ä‚â‚é‚ñ‚¾‚©‚瓪‚¨‚©‚µ‚¢‚íB

1019 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ [2021/12/16(–Ø) 22:08:34.93 ID:OBc86cw8.net]
’N‚©ŽŸƒXƒŒ—§‚Ä‚ë‚æ

1020 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ [2021/12/16(–Ø) 22:42:52.47 ID:k4b05O9+.net]
Œ‹‹Çƒ‚ƒiƒh‚Á‚ĂȂñ‚Ȃ̂©‚í‚©‚ç‚ñ‚Æ‚¢‚¤‚±‚Ƃɂ·‚ׂċNˆö‚µ‚Ä‚éŠóƒKƒX
˜b‘è‚ɂȂÁ‚Ä‚©‚ç‚à‚¤“ñ\”N‚­‚ç‚¢—§‚‚̂Ɍ‹˜_‚łȂ¢‚µA”ŠwŽÒ‚Å‚à‚È‚¢ŒÀ‚èˆê¶‚í‚©‚ç‚ñ‚Ì‚¾‚낤‚È

1021 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ [2021/12/17(‹à) 13:01:29.30 ID:NPioGyUL.net]
VƒXƒŒ‚𗧂Ă܂µ‚½B“–ƒXƒŒ(Part33)‚ª–„‚Ü‚Á‚Ä‚©‚ç‚Ì—˜—p‚ð‚¨Šè‚¢‚µ‚Ü‚·B

ŠÖ”Œ^ƒvƒƒOƒ‰ƒ~ƒ“ƒOŒ¾ŒêHaskell Part34
https://mevius.5ch.net/test/read.cgi/tech/1639713446/

1022 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ [2021/12/18(“y) 00:42:46.36 ID:om0zr0Am.net]
>>1009
Œ‹˜_‚¾‚¹‚éŒÂl‚Í‘¶Ý‚·‚邯‚Ç
‘gD‚É‚È‚é‚Æ‚È‚º‚©AŒ‹˜_‚¾‚¹‚È‚¢“z‚ª‘ã•\ŽÒ‚ð‹CŽæ‚Á‚Ă邾‚¯‚¶‚á‚ñ

1023 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ [2021/12/18(“y) 11:05:05.98 ID:1fj0JYV9.net]
>>1011
Œ‹˜_o‚¹‚éŒÂl‚ĉª•”Ž‚Ì‚±‚Æ‚Á‚µ‚åH
‚»‚¤‚¢‚¤¨‚¢‚łǂ¤‚±‚¤‚¶‚á‚È‚­‚Á‚ÄŠF‚ð”[“¾‚³‚¹‚邿‚¤‚ÈŒ‹˜_‚͂Ȃ¢‚Á‚Ä‚¢‚¤‚±‚Æ

1024 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ [2021/12/18(“y) 11:23:52.39 ID:9ehaErM5.net]
”[“¾‚ª’x‚¢

1025 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ [2021/12/20(ŒŽ) 09:52:36.40 ID:ZumN5JOf.net]
https://qiita.com/mod_poppo/items/a6317294ba1e39b1c3b3

ƒRƒƒ“ƒg—“‚ɖт̕nj»‚éB

1026 –¼‘OFƒfƒtƒHƒ‹ƒg‚Ì–¼–³‚µ‚³‚ñ [2021/12/20(ŒŽ) 09:52:54.51 ID:ZumN5JOf.net]
‚Ü‚½”îæŽ’†‚µ‚Ä‚é‚̂Œʕñ‚æ‚ë

1027 –¼‘OF1001 [Over 1000 Thread.net]
‚±‚̃XƒŒƒbƒh‚Í‚P‚O‚O‚O‚ð’´‚¦‚Ü‚µ‚½B
V‚µ‚¢ƒXƒŒƒbƒh‚𗧂ĂĂ­‚¾‚³‚¢B
life time: 678“ú 15ŽžŠÔ 35•ª 18•b



1028 –¼‘OF‰ß‹ŽƒƒO š [[‰ß‹ŽƒƒO]]
¡ ‚±‚̃XƒŒƒbƒh‚Í‰ß‹ŽƒƒO‘qŒÉ‚ÉŠi”[‚³‚ê‚Ä‚¢‚Ü‚·






[ V’…ƒŒƒX‚̎擾/•\ަ (agate) ] / [ Œg‘єŠ]

‘O100 ŽŸ100 ÅV50 £ [ ‚±‚̃XƒŒ‚ðƒuƒbƒNƒ}[ƒNI Œg‘тɑ—‚é ] 2ch‚Ìread.cgi‚Ö
[{” ŋߗ§‚Á‚½ƒXƒŒ•”M‚¢ƒXƒŒˆê—— : {” ŋߗ§‚Á‚½ƒXƒŒ^‹LŽÒ•ʈꗗ]iGLÍMjƒ342KB

read.cgi ver5.27 [feat.BBS2 +1.6] / e.0.2 (02/09/03) / eucaly.net products.
’S“–:undef