Mathematica
Mathematica
Datos personales
apache Flex
lunes, 10 de septiembre de 2012
PROLOG: Convierte lista anidada en lista no anidada
14:22 | 
Publicado por
a8a
Este programa convierte una lista que contiene elementos que son listas, en una lista de elementos simples:
my_flatten(X, [X]):-
\+ list(X).
my_flatten([], []).
my_flatten([As|Bs], Cs):-
my_flatten(As, ALs),
my_flatten(Bs, BLs),
my_append(ALs, BLs, Cs).
Para ejecutar el programa:
?- my_flatten([1,7,3,4,[5,[[[6],[8]],9,7]],[[8],9],[[[0]]]], Ls).
Y el resultado es:
Ls = [1,7,3,4,5,6,8,9,7,8,9,0]
Nota: Este programa usa algunas reglas (programas) definidas anteriormente.
Suscribirse a:
Entradas (Atom)
Wolfram Programming Lab
