larger value of list in haskell

larger_value_list.hs

-- maior valor de uma lista
maior [a] = a
maior (a:x) = if (a > (maior x)) then a else (maior x)

-- segunda forma de fazer
maior2 [a] = a
maior2 (a:b:x) | a > b = maior2(a:x)
              | otherwise = maior2(b:x)
			  
-- terceira forma de fazer (mais eficiente)
maior3 [a] = a
maior3 (a:x) | a > (maior3 x) = a
             | otherwise = (maior3 x)