Estou tentando definirproduct comfoldr:

Eu poderia fazer isso com:

new_product xs = foldr (*) 1 xs

mas não:

new_product = foldr (*) 1

ou:

new_product = \xs -> foldr (*) 1 xs

Ambas as definições produzem o mesmo erro:

Nenhuma instância para (dobrável t0) decorrente do uso de "pasta"

A variável de tipo 't0' é ambígua

Ligações relevantes incluem

new_product :: t0 Inteiro -> Inteiro

É algum tipo de erro de tipo?

Como eu poderia consertar isso?