run-unix-factor ( -- )

Vocabulary

math.primes.factors

Inputs

None

Outputs

None

Definition

USING: command-line io kernel namespaces sequences ;

IN: math.primes.factors

: run-unix-factor ( -- )
    command-line get
    [ [ readln [ unix-factor t ] [ f ] if* ] loop ]
    [ [ unix-factor ] each ] if-empty ;