Return to powers.icn CVS log

Up to [CSRG BSD Unix] / 43BSD / contrib / icon / book / 04

Initial revision

procedure main()
   i := 0
   while i < 10 do {
      i +:= 1
      write(right(i,5),right(i ^ 2,8),right(i ^ 3,8),
         right(i ^ 4,8))
      }
end

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.