2010-11-09 66 views

回答

11

你在n模式匹配。


getIt :: SS -> Int 
getIt (SSliteral (SSint x)) = x 

我建議你看看lyah

+1

+1鏈接 – Landei 2010-11-09 09:23:51

0

我們定義與記錄語法:

data SS = SSliteral { 
    ssValue :: Value 
    } 

data Value = SSint { 
    ssInt :: Int 
} 

現在我們定義

getIt :: SS -> Int 
getIt = ssInt . ssValue 

而現在我們是自由點。