Lines Matching refs:x
33 define e(x){
39 scale = t + .434*x + 1
42 if(x<0){
43 x = -x
47 while(x>2){
48 x = x/2
58 b=b*x
79 define l(x){
83 if(x <=0){
91 scale = scale + scale(x) - length(x) + 1
93 while(x > 2){
94 s = s + (length(x)-scale(x))/2 + 1
96 x = sqrt(x)
99 while(x < .5){
100 s = s + (length(x)-scale(x))/2 + 1
102 x = sqrt(x)
107 u = (x-1)/(x+1)
129 define s(x){
134 y = x/.7853
141 if(x>=0) n = (x/(2*p)+1)/2
142 if(x<0) n = (x/(2*p)-1)/2
143 x = x - 4*n*p
144 if(n%2!=0) x = -x
147 y = -x*x
148 a = x
150 s = x
160 define c(x){
166 x = s(x+2*a(1))
169 return(x/1)
172 define a(x){
174 if(x==0) {return(0/1)}
177 if(x==1){
184 while(x > .5){
186 x= -(1-sqrt(1.+x*x))/x
189 while(x < -.5){
191 x = -(1-sqrt(1.+x*x))/x
194 s = -x*x
207 return(x*c/d)
213 define j(n,x){
219 k = 1.36*x + 1.16*t - n
223 s= -x*x/4
226 x= -x
231 a=a*x