home *** CD-ROM | disk | FTP | other *** search
/ PC-Online 1996 May / PCOnline_05_1996.bin / linux / source / a / bin / gawk-2.15 / gawk-2 / gawk-2.15.6 / test / numfunc.awk < prev    next >
Encoding:
AWK Script  |  1993-10-19  |  303 b   |  20 lines
  1. BEGIN {
  2.     y = 8
  3.     x = 1
  4.     while (x < 256) {
  5.         print "arctan", y/x, atan2(y , x)
  6.         x += x
  7.     }
  8.     print ""
  9.     pi8 = atan2(1, 1) / 2
  10.     arg = 0
  11.     for (i = 0; i <= 8; i++) {
  12.         print "cos sin", arg, cos(arg), sin(arg)
  13.         arg += pi8
  14.     }
  15.     print ""
  16.     for (i = -5; i<= 5; i++) {
  17.         print "exp log", i, exp(i), log(exp(i))
  18.     }
  19. }
  20.