Yurttas/PL/IL/Ada-95/F/01/PU/02.html
Jump to navigation
Jump to search
| ada-95 programming language fundamentals | |
| 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
Dr.Salih Yurttas