42 lines
		
	
	
		
			540 B
		
	
	
	
		
			Plaintext
		
	
	
	
	
	
		
		
			
		
	
	
			42 lines
		
	
	
		
			540 B
		
	
	
	
		
			Plaintext
		
	
	
	
	
	
|   | /* | ||
|  | s([\+ cites_cited(c1,p1)],P). | ||
|  | P = 0.7 ? | ||
|  | 
 | ||
|  | s([cites_citing(c1,p1)],P). | ||
|  | P = 0.14 ? | ||
|  | 
 | ||
|  | */ | ||
|  | paper(p1). | ||
|  | 
 | ||
|  | paper(p2). | ||
|  | 
 | ||
|  | paper(p3). | ||
|  | 
 | ||
|  | paper(p4). | ||
|  | 
 | ||
|  | paper(p5). | ||
|  | 
 | ||
|  | paper_topic(p1,theory). | ||
|  | 
 | ||
|  | paper_topic(p2,theory). | ||
|  | 
 | ||
|  | paper_topic(p4,theory). | ||
|  | 
 | ||
|  | paper_topic(p3,ai). | ||
|  | 
 | ||
|  | paper_topic(p5,ai). | ||
|  | 
 | ||
|  | cites(c1). | ||
|  | 
 | ||
|  | 
 | ||
|  | cites_cited_group(C,theory):0.9;cites_cited_group(C,ai):0.1. | ||
|  | 
 | ||
|  | uniform(cites_cited(C,P),P,L):- | ||
|  |     cites_cited_group(C,T),bagof(Pap,paper_topic(Pap,T),L). | ||
|  | 
 | ||
|  | 
 | ||
|  | uniform(cites_citing(C,P),P,L):- | ||
|  | 	setof(Paper,paper(Paper),L), | ||
|  | 	cites_cited(C,Pap), | ||
|  | 	\+ cites_cited(C,p1). |