| * software is freely granted, provided that this notice | |
| <<tan>> computes the tangent of the argument <[x]>. | |
| Angles are specified in radians. | |
| The tangent of <[x]> is returned. | |
| * Let S,C and T denote the sin, cos and tan respectively on | |
| * [-PI/4, +PI/4]. Reduce the argument x to y1+y2 = x-k*pi/2 | |
| * TRIG(x) returns trig(x) nearly rounded | |
| int32_t n,ix; |