From 30fb702d8c102522f763bfc9e80e54c9ae1833f2 Mon Sep 17 00:00:00 2001
From: cicibintang23 <2410631080011@student.unsika.ac.id>
Date: Wed, 17 Sep 2025 09:55:23 +0700
Subject: [PATCH] Create program 1

---
 program 1 | 11 +++++++++++
 1 file changed, 11 insertions(+)
 create mode 100644 program 1

diff --git a/program 1 b/program 1
new file mode 100644
index 00000000..ed7467c2
--- /dev/null
+++ b/program 1	
@@ -0,0 +1,11 @@
+% Silsilah Keluarga
+
+pria(budi).
+pria(joko).
+wanita(ani).
+
+orangtua(budi, joko).
+orangtua(ani, joko).
+
+ayah(x, y) :- pria(X), orangtua(x,y). 
+ibu(x, y) :- wanita(x), orangtua(x,y).