package body H3 is
function Align (X: in System_Size; Y: in System_Size) return System_Size is
begin
return ((X + Y - 1) / Y) * Y;
end Align;
end H3;
