-- -------------------------------------------------------------------------------
-- PROGRAMACION FUNCIONAL  -  SOLUCIONES CONTROL 1  (25.4.06)
-- -------------------------------------------------------------------------------

module Control_1 where

-- -------------------------------------------------------------------------------

-- 1. Dar implementaciones sencillas para f y g, con f recursiva, y reducir la 
--    siguiente expresión:	
--
--                         f ( f (if g ('w',5) then 0 else 1))


-- --------------------------------------------------------------------------------

-- 2. Implementar una función Haskell que suma las cifras de un entero. 
--    Generalizarla para una lista de enteros.	


-- ---------------------------------------------------------------------------------

-- 3. Implementar en Haskel la función polimórfica menorL, que obtiene de una lista 
--    de enteros, el menor elemento y una lista con los restantes (en cualquier orden). 
--    Por ejemplo, con la lista [4,2,4,1,2,1,3,5] obtiene 1 y la lista [4,2,4,1,2,3,5] 
--    (los elementos podrían estar en otro orden). No deben implementarse ambas tareas 
--    por separado. Usando menorL, implementar una función polimórfica para ordenar 
--    una lista (ordenación por selección).