Mathematica
Mathematica
Datos personales
apache Flex
jueves, 12 de mayo de 2011
PROLOG: Ultimo elemento de una lista
2:26 | 
Publicado por
a8a
Este programa devuelve el último elemento de una lista:
my_last_element([Y], Y).
my_last_element([_|Xs], Y):-
my_last_element(Xs, Y).
Para ejecutar el programa:
?- my_last_element([m,j,k,e,w], X).
Y el resultado es:
X = w
PROLOG: Primer elemento de una lista
Este programa devuelve el primer elemento de una lista:
my_first_element([X|_], X).
Para ejecutar el programa:
?- my_first_element([m,j,k,e,w], X).
Y el resultado es:
X = m
lunes, 9 de mayo de 2011
PROLOG: Invierte una lista
Este programa invierte una lista:
my_reverse([], Zs, Zs).
my_reverse([X|Xs], Ys, Zs):-
my_reverse(Xs, [X|Ys], Zs).
Para ejecutar el programa:
?- my_reverse([1,2,3,4,5], [], Ls).
Y el resultado es:
Ls = [5,4,3,2,1]
Nota: Algunas versiones de Prolog, como WinProlog, tienen la función REVERSE predefinida.
PROLOG: Longitud de una lista (versión 2)
Este programa calcula la longitud de una lista:
my_length([], L, L).
my_length([_|Xs], N, L):-
N2 is N + 1,
my_length(Xs, N2, L).
Para ejecutar el programa:
?- my_length([a,b,c,d,e], 0, L).
Y el resultado es:
L = 5
Nota: Algunas versiones de Prolog, como WinProlog, tienen la función LENGTH predefinida.
PROLOG: Longitud de una lista
Este programa calcula la longitud de una lista:
my_length([], 0).
my_length([_|Xs], L):-
my_length(Xs, L2),
L is L2 + 1.
Para ejecutar el programa:
?- my_length([a,b,c,d,e], L).
Y el resultado es:
L = 5
Nota: Algunas versiones de Prolog, como WinProlog, tienen la función LENGTH predefinida.
domingo, 8 de mayo de 2011
PROLOG: Busca elemento en una lista
Este programa permite buscar si un elemento esta dentro de una lista de elementos:
my_member(X, [X|_]).
my_member(X, [_|Ys]):-
my_member(X, Ys).
Para ejecutar el programa:
?- my_member(3, [1,2,5,2,1,3,4]).
Y el resultado es:
yes
Para ejecutar el programa:
?- my_member(8, [1,2,5,2,1,3,4]).
Y el resultado es:
no
Nota: Algunas versiones de Prolog, como WinProlog, tienen la función MEMBER predefinida.
PROLOG: Concatena listas
Este programa concatena o une dos listas:
my_append([], Cs, Cs).
my_append([A|As],Bs,[A|Cs]):-
my_append(As, Bs, Cs).
Para ejecutar el programa:
?- my_append([a,b,c], [w,x,y,z], Ls).
Y el resultado es:
Ls = [a,b,c,w,x,y,z]
Nota: Algunas versiones de Prolog, como WinProlog, tienen la función APPEND predefinida.
Suscribirse a:
Entradas (Atom)
Wolfram Programming Lab
