Aufgabe 5 / Lösungsvorschläge
ist_ein(spatz,vogel). ist_ein(strauss,vogel). ist_ein(vogel,tier). ist_ein(hai,fisch). ist_ein(lachs,fisch). ist_ein(fisch,tier). ist_ein(tier,lebewesen). ist_ein(pflanze,lebewesen). merkmal(lebewesen,waechst). merkmal(tier,atmet). merkmal(tier,hat_haut). |
eigenschaft(B,E):-
eigenschaft(B,E):- |
semnetz:-
write('Willkommen im semantischen Netz. Um welchen Begriff geht es?'), nl, read(Input), findall(E,eigenschaft(Input,E),Liste), write('Dieser Begriff weist die folgenden Eigenschaften auf'), nl, write(Liste). |
merkmal(vogel,kann_fliegen). merkmal(vogel,hat_federn). merkmal(fisch,kann_schwimmen). merkmal(fisch,hat_schuppen). merkmal(spatz,ist_braun). merkmal(strauss,ist_schnell). merkmal(strauss,kann_nicht_fliegen). merkmal(hai,ist_gefaehrlich). merkmal(lachs,ist_rosa). konflikt(strrauss,kann_fliegen) |