PEMROGAMAN SWI PROLOG

Prolog singkatan dari Programming in Logic.  Dikembangkan oleh  Alain Colmenraurer dan P.Roussel di UniversitasMarseillesPerancis, tahun1972. Prolog populer di Eropa untuk aplikasi artificial intelligence, sedangkan di Amerika peneliti mengembangkan aplikasi yang sama, yaitu LISP.

Prolog merupakan suatu bahasa pemrograman yang banyak digunakan dalam pengembangan Artificial Intelliegence.  Prolog dalam perkembangannya telah dikombinasikan dengan berbagai bahasa pemrograman, terutama functional programming. Bahasa prolog ini memiliki ciri-ciri :

• Bahasa pemrograman yang non sequential
• Bahasa pemrograman yang deklaratif
• Simbolik
• Berdasarkan first order logic

Pengenalan SWI-Prolog

SWI-Prolog, SWI dari Sociaal-Wetenschappelijke Informatica (”Social Science Informatics”) adalah salah satu aplikasi yang digunakan untuk melakukan implementasi bahas pemrograman prolog. Aplikasi ini dibuat pertama kali oleh Jan Wielemaker dan dikembangkan sejak tahun 1987.

Tahap Persiapan

1. Download dan Install aplikasi SWI-Prolog
2. Download silsilah keluarga.pl

Atau tulis pada Notepad silsilah keluarga di bawah ini :

married(yuda,nina).

married(rico,dina).

married(hari,ambar).

married(tatang,yani).

married(joko,endah).

child(rico,yuda).

child(ambar,yuda).

child(tatang,yuda).

child(joko,yuda).

child(budi,rico).

child(ani,rico).

child(ajeng,rico).

child(rani,rico).

child(danang,rico).

child(ika,hari).

child(tuti,hari).

child(rudi,hari).

child(ana,hari).

child(eko,tatang).

child(dita,tatang).

child(tedi,tatang).

child(adi,joko).

child(nana,joko).

child(rifki,joko).

child(antok,joko).

male(yuda).

male(rico).

male(hari).

male(tatang).

male(joko).

male(budi).

male(danang).

male(rudi).

male(eko).

male(tedi).

male(adi).

male(rifki).

male(antok).

parents(A,B,C) :-child(A,B),married(B,C).

grandparents(A,D,E) :-child(A,B),child(B,D),married(D,E).

grandparents(A,D,E) :-child(A,B),married(B,C),child(C,D),married(D,E).

sibling(A,F) :-child(A,B), child(F,B), (F) \== (A).

sister(A,G):-child(A,B), child(G,B), (G) \== (A), not(male(G)).

brother(A,H):-child(A,B), child(H,B), (H) \== (A), male(H).

Tahap Percobaan

1. Jalankan SWI-Prolog
2. Pilih menu File > Consult…
3. Cari dan pilih file silsilah_keluarga.pl yang sudah di download
4. Klik tombol Open
5. Jika tidak ada tanda error langsung ketik perintah dibawah ini
6. Ingat tanda titik (.) di akhir perintah harus diketik
7. Setelah itu tekan enter untuk melihat hasilnya