12 lines
		
	
	
		
			99 B
		
	
	
	
		
			Fortran
		
	
	
	
	
	
			
		
		
	
	
			12 lines
		
	
	
		
			99 B
		
	
	
	
		
			Fortran
		
	
	
	
	
	
| module lib
 | |
| 
 | |
| implicit none
 | |
| 
 | |
| contains
 | |
| 
 | |
| pure real function func()
 | |
| func = 1.0
 | |
| end function
 | |
| 
 | |
| end module
 |