package body Compk21 is
    function K21 return Integer is
    begin
        return 21;
    end K21;
end Compk21;