12 lines
		
	
	
		
			190 B
		
	
	
	
		
			Factor
		
	
	
		
		
			
		
	
	
			12 lines
		
	
	
		
			190 B
		
	
	
	
		
			Factor
		
	
	
|  | USING: adsoda.combinators | ||
|  | sequences | ||
|  |     tools.test  | ||
|  |  ;
 | ||
|  | 
 | ||
|  | IN: adsoda.combinators.tests | ||
|  | 
 | ||
|  | 
 | ||
|  | [ { "atoto" "b" "ctoto" } ] [ { "a" "b" "c" } 1 [ "toto" append ] map-but ]  | ||
|  |     unit-test | ||
|  | 
 |