相关疑难解决方法(0)

我有以下方法:

mainFunction arg1 = "http://someBaseUrl.com/" ++ arg1
url1 x = mainFunction x ++ "/subUrl1"
url2 x = mainFunction x ++ "/subUrl2"
url3 x = mainFunction x ++ "/subUrl3"
url4 x = mainFunction x ++ "/subUrl4"

我的直觉告诉我它必须简化.但我无法弄清楚如何.

但是,我不能这样做,因为它不一样:

url1 = (mainFunction .) ++ "/subUrl1"

你的建议？