Abundant, deficient and perfect number classifications: Difference between revisions

Content added Content deleted
(Tcl implementation added)
Line 560: Line 560:
=={{header|Oforth}}==
=={{header|Oforth}}==


<lang Oforth>Integer method: properDivs { seq(self 2 / ) filter(#[ self swap rem 0 == ]) }
<lang Oforth>Integer method: properDivs { seq(self 2 / ) filter(#[ self swap mod 0 == ]) }


func: numberClasses
func: numberClasses