Proper divisors: Difference between revisions
Content added Content deleted
m (→{{header|Ada}}) |
|||
Line 216: | Line 216: | ||
function Arr(P: Positive) return Single_Pos_Arr is ((others => P)); |
function Arr(P: Positive) return Single_Pos_Arr is ((others => P)); |
||
-- A: Pos_Arr(1..1) := (1 => P); |
|||
-- begin |
|||
-- return A; |
|||
-- end Arr; |
|||
package Divisor_List is new Generic_Divisors |
package Divisor_List is new Generic_Divisors |