package Compk24 is
    function K24 return Integer;
end Compk24;