-- ------------------------------------------------- -- SOLUCIONES PR. FUNCIONAL CONTROL 1 (3.4.07) -- ------------------------------------------------- module Control1 where -- 1. Dar una implementación posible en Haskell de la función f para que -- sea válida la expresión -- -- f 1 (if (f 0 []) then “si” else “no” ) -- -- con 3 condiciones: 1) debe ser polimórfica, 2) debe ser recursiva, -- y 3) debe usar todos sus parámetros. Según ésta implementación, -- ¿qué vale la expresión?. -- 2. Implementar una función Haskell que comprueba si un entero positivo -- es capicúa. Generalizarla para una lista de números. -- 3. Implementar en Haskel una función para pasar a base 10 un entero -- que está en una determinada base b (que puede ser mayor que 10). -- El número inicial se da como un string. Por ejemplo, si pasamos -- “101” en base 2, daría 5; si pasamos “2AC” en base 16 saldría -- 684, etc.