Run Code
|
API
|
Code Wall
|
Users
|
Misc
|
Feedback
|
Login
|
Theme
|
Privacy
|
Patreon
Ge
rndfrom(L,M):- length(L,Le), R is random(Le), nth0(R,L,M). newgene([H|T]):- rndfrom([u,d,l,r,a],H), findall(A,( between(1,4,_), rndfrom([w,n,b,a],A) ),T). newrobot(R):- findall(G,(between(1,16,_),newgene(G)),R). newgeneration(G):- findall(R,(between(1,200,_),newrobot(R)),G). batteries(0,[]). batteries(N,[(X,Y)|T]):- N2 is N-1, batteries(N2,T), once(( X is random(10), Y is random(10), \+member((X,Y),T) )).
run
|
edit
|
history
|
help
0
Please
log in
to post a comment.
tarea
Empresa
Arreglos Segura_Sanchez
inicio del clasificador de objetos json
Query Espinoza Francisco Ing del conocimiento
Base de Conocimiento
codificador json prolog
Exam 1
Gramatica JSON V1.1
Estructura de Datos - Empresa
Please log in to post a comment.