Li-Fan Chen says to YSITD
這是Haskell的虛擬碼