aparler/RosettaCodeData
1
0
Fork 0
Code Issues 12 Pull requests 3 Projects Releases Packages Wiki Activity Actions

September 2017 Update

Browse source
This commit is contained in:
Ingy döt Net 2017-09-23 10:01:46 +02:00
parent bba7bfd280
commit ba8067c3b7
14570 changed files with 153136 additions and 63871 deletions
Download patch file Download diff file Expand all files Collapse all files

14
Task/Fractran/Sidef/fractran.sidef
View file

@ -1,20 +1,20 @@
var str ="17/91, 78/85, 19/51, 23/38, 29/33, 77/29, 95/23, 77/19, 1/17, 11/13, 13/11, 15/14, 15/2, 55/1"
const FractalProgram = str.split(',').map{.to_r} #=> array of rationals
const FractalProgram = str.split(',').map{.num} #=> array of rationals
func runner(n, callback) {
var num = 2.rat
var num = 2
n.times {
callback(num *= FractalProgram.find { |f| (f*num).de.is_one })
callback(num *= FractalProgram.find { |f| f * num -> is_int })
}
}
func prime_generator(n, callback) {
var x = 0;
runner(Math.inf, { |num|
var l = num.to_f.log2
runner(Inf, { |num|
var l = num.log2
if (l.floor == l) {
callback(l.to_i)
++x == n && return
callback(l.int)
++x == n && return nil
}
})
}