Определите функцию, вычисляющую двойной факториал, то есть произведение натуральных чисел, не превосходящих заданного числа и имеющих ту же четность.
Например:
7!!=7⋅5⋅3⋅1,
8!!=8⋅6⋅4⋅2.
Предполагается, что аргумент функции может принимать только неотрицательные значения.
Answer:
doubleFact :: Integer -> Integer
doubleFact n = if n <= 1 then 1 else n * doubleFact(n-2)