package body Compk10 is
    function K10 return Integer is
    begin
        return 10;
    end K10;
end Compk10;