A partição numérica do Logan

Instruções

O Logan, o extraterrestre do Lisp, gosta de números e também de organizar coisas.

Pedem-te que os ajudes a escrever uma função que recebe uma lista de números e produz um par de duas listas: a primeira com todos os números ímpares, a segunda com todos os números pares.

1. Categorizar um número

Primeiro, tens de criar uma função que recebe um par de duas listas e um número, e coloca esse número na sublista correta, consoante seja ímpar ou par:

(categorize-number '((1) . (2)) 23) ; => ((23 1) . (2))
(categorize-number '((1) . (2)) 42) ; => ((1) . (42 2))

2. Categorizar muitos números

Agora, com a função que acabaste de criar, podes escrever outra função que recebe uma lista de números e os categoriza como fizeste acima:

(partition-numbers '(1 2 3 4))     ; => ((3 1) . (4 2))
(partition-numbers '(42 31 24 13)) ; => ((13 31) . (24 42))