Haskell数据类型匹配问题：编写trade_report函数时遇类型转换错误

我正在编写函数trade_report :: String -> [Transaction] -> String，该函数接收指定字符串与交易列表，返回对应的关联结果字符串。

以下是Transaction类型定义及测试用例：

type Transaction = (Char, Int, Int, String, Int) 

test_log :: [Transaction]
test_log = [('B', 100, 1104,  "VTI",  1),
            ('B', 200,   36, "ONEQ",  3),
            ('B',  50, 1223,  "VTI",  5),
            ('S', 150, 1240,  "VTI",  9),
            ('B', 100,  229, "IWRD", 10),
            ('S', 200,   32, "ONEQ", 11), 
            ('S', 100,  210, "IWRD", 12)
            ]

内容的提问来源于stack exchange，提问作者Stabba_thehut