divisors

Next: expand Up: Product Previous: size Contents Index

divisors

$\begin{usage} for d in divisors~p repeat \{ \dots \} \end{usage}$

Signature

divisors: % $\to$ Generator R

$\begin{params} {\em p} & \% & A product\\ \end{params}$

$\begin{descr} This generator yields all the products of the form $\prod_{i=1}^n... ...{f_i}$\ where $p = \prod_{i=1}^n r_i^{e_i}$and $0 \le f_i \le e_i$. \end{descr}$

Example

import from Integer, Product Integer, List Integer;

p := term(3, 1) * term(2, 2) * term(5, 2)       -- p = 3^1 2^2 5^2 = 300
l := sort! [divisors p];

creates the list


  [1,2,3,4,5,6,10,12,15,20,25,30,50,60,75,100,150,300]

of all the divisors of

Manuel Bronstein 2000-12-13