domains
penyakit = string
gejala = symbol
query = string
jawab = char
database
dbmengalami(gejala)
dbtdkmengalami(gejala)
predicates
penyebab(penyakit)
go
mengalami(query,gejala)
tdkmengalami(query,gejala)
gejala(gejala)
clear_fakta2
simpan(gejala,jawab)
tanya(query,gejala,jawab)
go_once
diagnosa(penyakit)
solusi(penyakit)
goal
clearwindow,
makewindow(1,7,7," DIAGNOSA PENYAKIT THT ",0,0,24,80),
go,
removewindow.
clauses
...
Kamis, 02 Februari 2012
00
DataBase Prolog
Selengkapnya →
Langganan:
Postingan (Atom)