fromEnum

例

code:hs

data Color = Black | Brown | Red | Orange | Yellow | Green | Blue | Violet | Grey | White

deriving (Show, Enum)

code:hs

main :: IO ()

main = do

print $ fromEnum Red -- 出力: 2

print $ fromEnum Green -- 出力: 5

print $ fromEnum White -- 出力: 9