https://github.com/tategakibunko/hml

haskell mahjong library
https://github.com/tategakibunko/hml

Last synced: 1 day ago
JSON representation

haskell mahjong library

• Host: GitHub
• URL: https://github.com/tategakibunko/hml
• Owner: tategakibunko
• License: gpl-2.0
• Created: 2012-08-03T09:58:45.000Z (over 12 years ago)
• Default Branch: master
• Last Pushed: 2012-08-03T21:36:10.000Z (over 12 years ago)
• Last Synced: 2023-03-22T16:57:01.552Z (over 1 year ago)
• Language: Haskell
• Size: 113 KB
• Stars: 12
• Watchers: 1
• Forks: 1
• Open Issues: 0
• Metadata Files:
  • Readme: README.md
  • License: LICENSE

Awesome Lists containing this project

README

        
hml

===

haskell mahjong library

## how to use

import Mahjong.Parser

import Mahjong.Data

:t parseAgari

> parseAgari :: NakiMentsu -> FetchType -> Pai -> [Pai] -> [Result]

parseAgari (NakiMentsu []) TUMO P1 [P1,P2,P2,P3,P3,M1,M2,M3,S1,S2,S3,S8,S8]

> [Agari (Ryanmen P1 P4) [TUMO_AGARI,PINFU,IPEKO,SANSHOKU_DOJUN]]

parseAgari (NakiMentsu [Shuntsu P1]) RON P9 [P4,P5,P6,P7,P8,S1,S1,M1,M2,M3]

> [Agari (Ryanmen P6 P9) [ITTSU_NAKI]]`

parseAgari (NakiMentsu [Koutsu P1]) RON TON [P2,P3,P4,P5,P6,P7,NAN,NAN,NAN,TON]

> [Agari (Tanki TON) [HONITSU_NAKI]]