27 lines
		
	
	
	
		
			547 B
		
	
	
	
		
			Modula-2
		
	
	
	
	
	
			
		
		
	
	
			27 lines
		
	
	
	
		
			547 B
		
	
	
	
		
			Modula-2
		
	
	
	
	
	
| DEFINITION MODULE MathLib0;
 | |
| (*
 | |
|   Module:	Some mathematical functions
 | |
|   From:		"Programming in Modula-2", 3rd, corrected edition, by N. Wirth
 | |
|   Version:	$Header$
 | |
| 
 | |
| 	Exists for compatibility.
 | |
| 	A more elaborate math lib can be found in Mathlib.def
 | |
| *)
 | |
| 
 | |
| 	PROCEDURE sqrt(x : REAL) : REAL;
 | |
| 
 | |
| 	PROCEDURE exp(x : REAL) : REAL;
 | |
| 
 | |
| 	PROCEDURE ln(x : REAL) : REAL;
 | |
| 
 | |
| 	PROCEDURE sin(x : REAL) : REAL;
 | |
| 
 | |
| 	PROCEDURE cos(x : REAL) : REAL;
 | |
| 
 | |
| 	PROCEDURE arctan(x : REAL) : REAL;
 | |
| 
 | |
| 	PROCEDURE real(x : INTEGER) : REAL;
 | |
| 
 | |
| 	PROCEDURE entier(x : REAL) : INTEGER;
 | |
| 
 | |
| END MathLib0.
 |