Aliquot sequence classifications: Difference between revisions
Content deleted Content added
→{{header|zkl}}: Incomplete - would help in last classification. |
m →{{header|zkl}}: Added comment and removed incomplete flag |
||
Line 651:
=={{header|zkl}}==
<lang zkl>fcn properDivs(n){ [1.. (n + 1)/2 + 1].filter('wrap(x){ n%x==0 and n!=x }) }
fcn aliquot(k){ //-->Walker
Line 667 ⟶ 666:
}(10).walk(15).println();</lang>
<lang zkl>fcn classify(k){
const MAX=(2).pow(47); // 140737488355328
ak,aks:=aliquot(k), ak.walk(16);
_,a2,a3:=aks;
| |||