15 lines
		
	
	
		
			486 B
		
	
	
	
		
			Factor
		
	
	
		
		
			
		
	
	
			15 lines
		
	
	
		
			486 B
		
	
	
	
		
			Factor
		
	
	
| 
								 | 
							
								! Copyright (C) 2009 Doug Coleman.
							 | 
						||
| 
								 | 
							
								! See http://factorcode.org/license.txt for BSD license.
							 | 
						||
| 
								 | 
							
								USING: math.primes.safe math.primes.safe.private tools.test ;
							 | 
						||
| 
								 | 
							
								IN: math.primes.safe.tests
							 | 
						||
| 
								 | 
							
								
							 | 
						||
| 
								 | 
							
								[ 863 ] [ 862 next-safe-prime ] unit-test
							 | 
						||
| 
								 | 
							
								[ f ] [ 862 safe-prime? ] unit-test
							 | 
						||
| 
								 | 
							
								[ t ] [ 7 safe-prime? ] unit-test
							 | 
						||
| 
								 | 
							
								[ f ] [ 31 safe-prime? ] unit-test
							 | 
						||
| 
								 | 
							
								[ t ] [ 47 safe-prime-candidate? ] unit-test
							 | 
						||
| 
								 | 
							
								[ t ] [ 47 safe-prime? ] unit-test
							 | 
						||
| 
								 | 
							
								[ t ] [ 863 safe-prime? ] unit-test
							 | 
						||
| 
								 | 
							
								
							 | 
						||
| 
								 | 
							
								[ 47 ] [ 31 next-safe-prime ] unit-test
							 |