home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Boston 2
/
boston-2.iso
/
DOS
/
PROGRAM
/
MODULA
/
MODTUTOR
/
CIRCLES.DEF
< prev
next >
Wrap
Text File
|
1993-12-01
|
291b
|
11 lines
(* Chapter 13 - Program 3 *)
DEFINITION MODULE Circles;
EXPORT QUALIFIED AreaOfCircle, PerimeterOfCircle;
PROCEDURE AreaOfCircle(Radius : REAL; VAR Area : REAL);
PROCEDURE PerimeterOfCircle(Radius : REAL; VAR Perim : REAL);
END Circles.