"Fossies" - the Fresh Open Source Software Archive

Member "bc-1.06.95/Test/aryprm.b" (7 Jul 2000, 205 Bytes) of package /linux/misc/old/bc-1.06.95.tar.gz:


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

    1 define p ( x[] ) {
    2   auto i;
    3   for (i=0; i<10; i++) x[i];
    4 }
    5 
    6 define m ( x[] ) {
    7   auto i;
    8   for (i=0; i<10; i++) x[i] *= 2;
    9 }
   10     
   11 scale = 20;
   12 for (i=0; i<10; i++) a[i] = sqrt(i);
   13 
   14 p(a[]);
   15 m(a[]);
   16 p(a[]);