更改函數定義爲指向，自由的風格

Question

我無法寫這個代碼，我的教授給我：

編寫一個叫做digit7函數，它接受一個Int並返回一個Bool說與否7是數字之一。 （提示：使用show至 將數字轉換爲字符列表。）使用digit7創建一個不帶參數的函數，該參數返回最小的 數字，其數字的正方形包含7作爲數字。

，我有代碼：

digit7 l = elem '7' (show l) 

這工作，但我需要寫在一個自由點式的代碼。我也很難計算出square7函數。

Answer 1

對於digit7功能，您可以將您的高清使用功能組合點，自由的風格：

digit7 = (elem '7') . (show) 

這是因爲：

digit7 l 
-> ((elem '7') . (show)) l  By substitution 
-> (elem '7') ((show) l)  By definition of (.) 
-> elem '7' (show l)   By operator precedence 

---

對於square7功能，我推薦使用dropWhile和head。