Programación Funcional - cuboimpar en Haskell

La pregunta es:

Definir una función cuboimpar de tipo Int->Int que dado un entero no negativo x, devuelve la
suma de los cubos de los números impares entre 0 y x.
Ejemplo: cuboimpar 5 = 1^3 + 3^3 + 5^3 = 1 + 27 + 125
= 153

Y respondo con esto:

cubo :: Int -> Int
cubo 0 = 0
cubo 1 = 1
cubo a = a^3

cuboimpar :: Integer -> Integer
cuboimpar 0 = 0
cuboimpar a = if mod a 2 /= 0 then (a^3) + cubo (a-1) else cubo (a-1) else cubo (a-1)

Y me tira error con el else, ¿dóde está el error?

Hay varios errores.

1ero "else" no puede aparecer dos veces en una misma sentencia

2do Si viene declarándose Int -> Int se tiene que seguir declarando Int -> Int
sino va a tirar error

3ero cuboimpar es una sentencia recursiva, se define a si misma para calcular el siguente número
por lo tanto definir una función "cubo" es innecesario

El código corregido quedaría así

cuboimpar :: Integer -> Integer
cuboimpar 0 = 0
cuboimpar a = if mod a 2 /= 0 then a^3 + cuboimpar(a-1) else cuboimpar(a-1)