ppg(blossom).
ppg(buttercup).
ppg(bubbles).

tmnt(leonardo).
tmnt(rafael).
tmnt(donatello).
tmnt(michelangelo).

villain(mojo-jojo).
  
fightsWith(buttercup,fist).
fightsWith(blossom,brain).
fightsWith(bubbles,cat_videos).
fightsWith(leo,shredder).
fightsWith(michelangelo,nunchucks).


fightsWith(mojo-jojo,brain).

color(bubbles,blue).
color(buttercup,green).
color(blossom,red).

color(leonardo,blue).
color(rafael,red).
color(donatello,purple).
color(michelangelo,orange).

pmon(squirtle). 
color(squirtle,blue).
fightsWith(squirtle,bubbles).

pmon(magikarp). 
color(magikarp,red).
fightsWith(magikarp,tail).


pmon(pikachu).
hero(pikachu).
villain(meowth).
color(pikachu,yellow).
pmon(meowth).
color(meowth,black).
fightsWith(pikachu,tail).

  
%%% Find all ppg.
%%% Find all who like the color blue.
%%% Find all heroes.
  

%%% Make a RULE: all  ppg,tmnt are heroes  

hero(C) :- ppg(C).
hero(C) :- tmnt(C).

%%% make a rule:
%%% snazzyHero/1: a hero whose color is blue.


%%% rule: bothRed/2: two heroes both like red

%%% rule: clash/2: two heroes have same color  
clash(C1,C2) :- color(C1, K ), color(C2, K). 
% query: Do blossom, .. clash?
% Find all clashes w/ blossom.
% Find all clashes.
% find all clashes with a tmnt.

  
