"Fossies" - the Fresh Open Source Software Archive

Member "asymptote-2.61/tests/bench/6000circles.asy" (18 Nov 2019, 276 Bytes) of package /linux/misc/asymptote-2.61.src.tgz:


As a special service "Fossies" has tried to format the requested text file into HTML format (style: standard) with prefixed line numbers. Alternatively you can here view or download the uninterpreted source code file.

    1 size(0,100);
    2 import math; 
    3 import stats; 
    4  
    5 currentpen=magenta; 
    6 // A centered random number 
    7 real crand() {return unitrand()*5;} 
    8  
    9 real r1; 
   10 pair pcenter; 
   11  
   12 for(int i=0; i < 6000; ++i) { 
   13  
   14 r1 = unitrand()/10; 
   15 pcenter = ( crand(), crand()); 
   16 Draw(circle(pcenter,r1)); 
   17 }