22 lines
		
	
	
		
			254 B
		
	
	
	
		
			Plaintext
		
	
	
	
	
	
		
		
			
		
	
	
			22 lines
		
	
	
		
			254 B
		
	
	
	
		
			Plaintext
		
	
	
	
	
	
| 
								 | 
							
								/*
							 | 
						||
| 
								 | 
							
								
							 | 
						||
| 
								 | 
							
								s([on(3,1)],P).
							 | 
						||
| 
								 | 
							
								P = 0.0625 
							 | 
						||
| 
								 | 
							
								sc([on(3,1)],[on(2,1)],P).
							 | 
						||
| 
								 | 
							
								P = 0.5 ?
							 | 
						||
| 
								 | 
							
								
							 | 
						||
| 
								 | 
							
								sc([on(4,1)],[on(2,1)],P).
							 | 
						||
| 
								 | 
							
								P = 0.25 
							 | 
						||
| 
								 | 
							
								
							 | 
						||
| 
								 | 
							
								sc([on(10,1)],[on(2,1)],P).
							 | 
						||
| 
								 | 
							
								P = 0.00390625
							 | 
						||
| 
								 | 
							
								
							 | 
						||
| 
								 | 
							
								
							 | 
						||
| 
								 | 
							
								*/
							 | 
						||
| 
								 | 
							
								on(0,1):0.5;on(0,2):0.5.
							 | 
						||
| 
								 | 
							
								
							 | 
						||
| 
								 | 
							
								on(X,1):0.5;on(X,2):0.5:-
							 | 
						||
| 
								 | 
							
								  X1 is X-1,X1>=0,
							 | 
						||
| 
								 | 
							
								  on(X1,Y),
							 | 
						||
| 
								 | 
							
								  \+ on(X1,2).
							 |