package body Compk6 is
    function K6 return Integer is
    begin
        return 6;
    end K6;
end Compk6;