Páginas

Bienvenidos

Este blog busca darle algunas herramientas para trabajar con varios de los programas más interesantes y útiles de la actualidad.

El objetivo es emplear ejemplos y su desarrollo paso a paso para que el aprendizaje sea lo más fácil y real posible.

Mathematica

Mathematica
Mathematica

Etiquetas

Datos personales

Mi foto
Ingeniero
Esp. Informática y Computación
Esp. Administración de Sistemas

apache Flex

Mathematica

Todo el poder de Mathematica en la Web:



Ejemplos de uso:

1) Plot3D[Sin[x]*Cos[y],{x,0,2 Pi},{y,0,Pi}]
2) Colombia

Escribe el ejemplo y da clic en el igual

Seguidores

martes, 8 de noviembre de 2011

PostHeaderIcon PROLOG: Mira si una lista es sublista de otra lista


Este programa mira si una lista es sublista de otra lista:

my_sub_list(Xs, Ys):-
          my_append(_, Bs, Ys),
          my_append(Xs, _, Bs).


Para ejecutar el programa:

?- my_sub_list([b,c], [a,b,c,d,e,f,g]).


Y el resultado es:

yes


Para ejecutar el programa:

?- my_sub_list([b,c,f], [a,b,c,d,e,f,g]).


Y el resultado es:

no


Para ejecutar el programa:

?- my_sub_list(Ls, [c,d,e]).


Y el resultado es:

Ls = [] ;
Ls = [c] ;
Ls = [c,d] ;
Ls = [c,d,e] ;
Ls = [] ;
Ls = [d] ;
Ls = [d,e] ;
Ls = [] ;
Ls = [e] ;
Ls = [] ;


Nota: Este programa usa algunas reglas (programas) definidas anteriormente.



*** Programa probado en WinProlog versión 4.7 ***

5 comentarios:

Anónimo dijo...

y el my_append puto?

a8a dijo...

Hola

El predicado "my_append" se encuentra en una entrada anterior del blog. Puedes verlo en el enlace siguiente:

http://xpasos.blogspot.com/2011/05/prolog-concatena-listas.html

Si tienes duda sobre otro predicado, puedes localizarlo usando el buscador situado en la parte superior de la pagina.

Espero te sirva la respuesta.


Anónimo dijo...

Esto es una locura. Eres un genio.

a8a dijo...

Ojala. Solo soy un entusiasta de uno de los mejores lenguajes de programación.

Gracias por el comentario.

J.Alexis dijo...

Muchas gracias por este gran aporte,,,me ayudo mucho

Publicar un comentario

Apache Flex

Wolfram Programming Lab