(phixonline)--> with javascript_semantics function pdd(integer n) return sprintf("%2d",product(sq_sub(sprint(n),'0'))) end function printf(1,"Product of the decimal digits of 1..100:\n%s\n", {join_by(apply(tagset(100),pdd),1,10)})