1 2 3 4 5 6
package Vect1_Pkg is function K return Integer; function N return Integer; end Vect1_Pkg;