Yurttas/PL/IL/A/F/01/PU/02.html
| ada-95 programming language fundamentals | 1 | 2 | 3 | 4 |
|---|---|
| 1. program units and overall structure | << | >> |
packageunit is composed of two parts: specification and body as follows:
--
-- date : January 1, 2000.
-- author : Salih Yurttas.
-- package specification
--
-- minni_p.ads
with Text_IO; use Text_IO;
package Minimum_of_N_Integers_P is
type Integer_List is array(Integer range <>) of Integer;
procedure Get_Integer_List(K : out Integer;
D : out Integer_List);
procedure Find_Minimum_of_Integer_List(Min,
J : out Integer;
K : in Integer;
D : in Integer_List);
procedure Put_Minimum_of_Integer_List(Min,
J : in Integer);
end Minimum_of_N_Integers_P;
contents << | >> flow of control