RosettaCodeData/Task/Population-count/Ada/population-count-1.adb
2026-04-30 12:34:36 -04:00

6 lines
156 B
Ada

with Interfaces;
package Population_Count is
subtype Num is Interfaces.Unsigned_64;
function Pop_Count(N: Num) return Natural;
end Population_Count;