map($0..10, (x -> ln(1.0+x/10))); ln(1.0+x/10) $ x=0..10; fp::nest(t -> (a*t), 10)(x); fp::nestvals(t -> (a*t), 10)(x); pileface:= 2*random(2)()-1 $ i=1..1000; gains:=fp::fold(_plus,0)(pileface); moyenne:=_plus(pileface)/1000.0;