Fiz um algoritmo que converte do Binário para o Decimal, agora preciso desenvolver um que faz o contrario. Vou deixar o código que fiz abaixo, porém esta com erro. Obrigado.
converte' :: [Int] -> Int
converte' [] = 0
converte' (x:xs) = ((2 ^ comprimento xs) * x) + (2 ^ (comprimento xs-1)) * x
ps: função comprimento
mede o tamanho da cauda da lista atual