Cuban primes: Difference between revisions

Content added Content deleted
(→‎{{header|Wren}}: Now uses 'fmt' module.)
Line 2,463: Line 2,463:
=={{header|Wren}}==
=={{header|Wren}}==
{{trans|Python}}
{{trans|Python}}
{{libheader|fmt}}
<lang ecmascript>var commatize = Fn.new { |n|
<lang ecmascript>import "/fmt" for Fmt
var s = "%(n)"
var le = s.count
var i = le - 3
while (i >= 1) {
s = s[0...i] + "," + s[i..-1]
i = i - 3
}
return s
}

var rset = Fn.new { |m, n|
var s = "%(n)"
var c = s.count
return (m > c) ? " " * (m - c) + s : s
}


var start = System.clock
var start = System.clock
Line 2,522: Line 2,508:
}
}
primes.add(v)
primes.add(v)
cubans.add(commatize.call(v))
cubans.add(Fmt.commatize(v))
if (c == cutOff) showEach = false
if (c == cutOff) showEach = false
}
}
if (c == bigOne) {
if (c == bigOne) {
bigCuban = commatize.call(v)
bigCuban = Fmt.commatize(v)
break
break
}
}
Line 2,535: Line 2,521:
for (i in 0...20) {
for (i in 0...20) {
var j = i * 10
var j = i * 10
for (k in j...j+10) System.write(rset.call(10, cubans[k])) // 10 per line say
for (k in j...j+10) System.write(Fmt.s(10, cubans[k])) // 10 per line say
System.print()
System.print()
}
}