home *** CD-ROM | disk | FTP | other *** search
/ Geek Gadgets 1 / ADE-1.bin / ade-dist / bc-1.03-base.tgz / bc-1.03-base.tar / fsf / bc / Test / jn.b < prev    next >
Text File  |  1994-11-04  |  80b  |  7 lines
  1. scale = 30
  2. for (a=0; a<5; a=a+2) {
  3.   for (b=0; b<100; b=b+10) x=j(a,b)
  4. }
  5. x
  6. quit
  7.