Pesquisa em lista complexa

Se você deseja encontrar uma entrada em uma lista complexa como:

[{p1, [{c1, x}, {c2, o}]}, ...]

Por favor, pelo amor de Deus, não implemente a pesquisa personalizada. Use listas: keyfind / 3 em seu lugar.