package body Compk5 is
    function K5 return Integer is
    begin
        return 5;
    end K5;
end Compk5;