| /openbsd/src/gnu/gcc/libgomp/testsuite/libgomp.fortran/ |
| D | jacobi.f | 87 double precision u(n,m),f(n,m),dx,dy
91 call initialize (n,m,alpha,dx,dy,u,f)
95 call jacobi (n,m,dx,dy,alpha,relax,u,f,tol,mits)
99 call error_check (n,m,alpha,dx,dy,u,f)
104 subroutine initialize (n,m,alpha,dx,dy,u,f) argument
113 double precision u(n,m),f(n,m),dx,dy,alpha
120 dy = 2.0 / (m-1)
128 yy = -1.0 + dy * dble(j-1) ! -1 < y < 1
139 subroutine jacobi (n,m,dx,dy,alpha,omega,u,f,tol,maxit) argument
161 double precision dx,dy,f(n,m),u(n,m),alpha, tol,omega
[all …]
|
| /openbsd/src/gnu/usr.bin/gcc/gcc/testsuite/gcc.c-torture/execute/ |
| D | 20020615-1.c | 20 long dy = p1->y - p0->y; in line_hints() local
27 dy = -dy; in line_hints()
31 dx = dy, xi = yi; in line_hints()
32 dy = t, yi = ti; in line_hints()
35 ady = dy < 0 ? -dy : dy; in line_hints()
36 if (dy != 0 && (adx <= ady >> 4)) { in line_hints()
37 hints = dy > 0 ? 2 : 1; in line_hints()
|
| D | 921202-1.c | 9 long dy[VLEN]; in main() local
23 dy[size] = 0x12345678; in main()
26 cyy = mpn_mul_1 (dy, s1, size); in main()
28 if (cyx != cyy || mpn_cmp (dx, dy, size + 1) != 0 || dx[size] != 0x12345678) in main()
30 foo ("", 8, cyy); mpn_print (dy, size); in main()
|
| D | 20010118-1.c | 17 int dx, dy; in bar() local
20 dy = (oldh - h) * (double) f/2.0; in bar()
22 y += dy; in bar()
|
| /openbsd/src/games/trek/ |
| D | move.c | 74 double x, y, dx, dy; in move() local
94 dy = sin(angle); in move()
96 dist = fabs(dy); in move()
100 dy /= bigger; in move()
129 printf("dx = %.2f, dy = %.2f, xn = %.2f, n = %d\n", dx, dy, xn, n); in move()
136 iy = (y += dy); in move()
145 dy = Ship.quady * NSECTS + Ship.secty + dy * xn; in move()
150 if (dy < 0.0) in move()
153 iy = dy + 0.5; in move()
185 iy = y - dy; in move()
[all …]
|
| D | help.c | 66 int dx = 0, dy = 0; in help() local
100 dy = Now.base[i].y - Ship.quady; in help()
101 x = dx * dx + dy * dy; in help()
142 dy = Etc.starbase.y + ranf(3) - 1; in help()
143 if (dy < 0 || dy >= NSECTS || Sect[dx][dy] != EMPTY) in help()
152 Ship.secty = dy; in help()
153 Sect[dx][dy] = Ship.ship; in help()
|
| D | klmove.c | 65 double dx, dy; in klmove() local
91 dy = Ship.secty - k->y + ranf(3) - 1; in klmove()
93 if (dy > bigger) in klmove()
94 bigger = dy; in klmove()
98 dy = dy / bigger + 0.5; in klmove()
103 dy = -dy; in klmove()
112 looky = nexty + dy; in klmove()
|
| D | snova.c | 65 int dx, dy; in snova() local
111 dy = iy - Ship.secty; in snova()
112 if (dx * dx + dy * dy <= 2) in snova()
133 dy = q->stars; in snova()
138 Game.kills += dy; in snova()
|
| D | compkl.c | 54 int i, dx, dy; in compkldist() local
64 dy = Ship.secty - Etc.klingon[i].y; in compkldist()
65 d = dx * dx + dy * dy; in compkldist()
|
| D | torped.c | 65 double x, y, dx, dy; in torped() local
136 dy = sin(angle); in torped()
138 x = fabs(dy); in torped()
142 dy /= bigger; in torped()
154 iy = y += dy; in torped()
|
| /openbsd/src/games/hack/ |
| D | hack.zap.c | 214 (void) bhit(u.dx,u.dy,rn1(8,6),0,bhitm,bhito,obj); in dozap()
280 zy = u.uy+u.dy; in dozap()
308 zy += u.dy; in dozap()
316 u.ux, u.uy, u.dx, u.dy); in dozap()
413 boomhit(int dx, int dy) in boomhit() argument
423 for(i=0; i<8; i++) if(xdir[i] == dx && ydir[i] == dy) break; in boomhit()
430 dy = ydir[i]; in boomhit()
432 bhitpos.y += dy; in boomhit()
439 bhitpos.y -= dy; in boomhit()
460 dirlet(int dx, int dy) in dirlet() argument
[all …]
|
| D | hack.c | 164 u.dx = u.dy = 0; in domove()
171 } while(!isok(u.ux+u.dx, u.uy+u.dy) || in domove()
172 IS_ROCK(levl[u.ux+u.dx][u.uy+u.dy].typ)); in domove()
174 if(!isok(u.ux+u.dx, u.uy+u.dy)){ in domove()
183 if(!u.uswallow && (trap = t_at(u.ux+u.dx, u.uy+u.dy)) && trap->tseen) in domove()
186 u.uy+u.dy != u.ustuck->my)) { in domove()
198 if(u.uswallow || (mtmp = m_at(u.ux+u.dx,u.uy+u.dy))) { in domove()
216 if((u.dx && u.dy) || !rn2(5)) u.utrap--; in domove()
220 tmpr = &levl[u.ux+u.dx][u.uy+u.dy]; in domove()
222 (u.dx && u.dy && (tmpr->typ == DOOR || ust->typ == DOOR))){ in domove()
[all …]
|
| D | hack.mklev.c | 212 int lx, ly, hx, hy, lowx, lowy, hix, hiy, dx, dy; in makerooms() local
242 dx = dy = 1; in makerooms()
245 dy = 2 + rn2(4); in makerooms()
246 if(dx*dy > 50) in makerooms()
247 dy = 50/dx; in makerooms()
251 if(hx-lx < dx + dx/2 + 2*xlim || hy-ly < dy + dy/3 + 2*ylim) { in makerooms()
266 lowy = ly + ylim + rn2(hy - ly - dy - 2*ylim + 1); in makerooms()
268 hiy = lowy + dy; in makerooms()
270 if(maker(lowx, dx, lowy, dy)) { in makerooms()
542 int dx, dy, dix, diy, cct; in join() local
[all …]
|
| D | hack.vault.c | 197 int dx,dy; in invault() local
200 dy = (gy > y) ? 1 : (gy < y) ? -1 : 0; in invault()
204 y += dy; in invault()
253 int x,y,dx,dy,gx,gy,nx,ny,typ; in gd_move() local
294 dy = (gy > y) ? 1 : (gy < y) ? -1 : 0; in gd_move()
295 if(abs(gx-x) >= abs(gy-y)) nx += dx; else ny += dy; in gd_move()
305 if(dy && nx != x) { in gd_move()
306 nx = x; ny = y+dy; in gd_move()
310 ny = y; nx = x+dx; dy = 0; in gd_move()
|
| D | hack.unix.c | 390 int dx,dy,nfx = fx,nfy = fy,d1,d2; in mdrush() local
394 for(dx = -1; dx <= 1; dx++) for(dy = -1; dy <= 1; dy++) in mdrush()
395 if(dx || dy) { in mdrush()
396 d2 = DIST(fx+dx,fy+dy,md->mx,md->my); in mdrush()
400 nfy = fy+dy; in mdrush()
|
| /openbsd/src/sys/dev/wscons/ |
| D | wstpad.c | 284 direction(int dx, int dy, int ratio) in direction() argument
288 if (dx || dy) { in direction()
289 rdy = abs(dy) * ratio; in direction()
296 if ((dx < 0) != (dy < 0)) in direction()
324 wstpad_set_direction(struct wstpad *tp, struct tpad_touch *t, int dx, int dy) in wstpad_set_direction() argument
335 dir = direction(dx, dy, tp->ratio); in wstpad_set_direction()
365 magnitude(struct wsmouseinput *input, int dx, int dy) in magnitude() argument
370 v = abs(dy) * input->filter.v.mag_scale; in magnitude()
386 if (magnitude(input, t->pos->dx, t->pos->dy) > MAG_MEDIUM) in wstpad_is_stable()
443 wstpad_scroll_coords(struct wsmouseinput *input, int *dx, int *dy) in wstpad_scroll_coords() argument
[all …]
|
| D | wsmouse.c | 593 wsmouse_motion(struct device *sc, int dx, int dy, int dz, int dw) in wsmouse_motion() argument
599 motion->dy = dy; in wsmouse_motion()
602 if (dx || dy || dz || dw) in wsmouse_motion()
631 pos->y -= pos->dy; in set_y()
632 pos->acc_dy -= pos->dy; in set_y()
634 if ((pos->dy = y - pos->y)) { in set_y()
636 if ((pos->dy > 0) == (pos->acc_dy > 0)) in set_y()
637 pos->acc_dy += pos->dy; in set_y()
639 pos->acc_dy = pos->dy; in set_y()
648 pos->dy = pos->acc_dy = 0; in cleardeltas()
[all …]
|
| /openbsd/src/regress/lib/libm/cephes/ |
| D | monot.c | 273 double x, x0, y, dy, err; in monot() local
292 dy = volat1 * test1[i].derivative; in monot()
293 dy = test1[i].answer2 + dy; in monot()
294 volat1 = test1[i].answer1 + dy; in monot()
301 err = err - dy; in monot()
319 dy = volat1 * test1[i].derivative; in monot()
320 dy = test1[i].answer2 + dy; in monot()
321 volat1 = test1[i].answer1 + dy; in monot()
326 err = err - dy; in monot()
|
| D | monotl.c | 366 long double x, x0, dy, err; in monotl() local
388 dy = volat1 * test1[i].derivative; in monotl()
390 dy = test1[i].answer2 + dy; in monotl()
391 volat1 = test1[i].answer1 + dy; in monotl()
399 err = err - dy; in monotl()
427 dy = volat1 * test1[i].derivative; in monotl()
428 dy = test1[i].answer2 + dy; in monotl()
429 volat1 = test1[i].answer1 + dy; in monotl()
434 err = err - dy; in monotl()
|
| D | monotll.c | 685 long double x, x0, dy, err; in monotll() local
711 dy = volat1 * test1[i].derivative; in monotll()
713 dy = test1[i].answer2 + dy; in monotll()
714 volat1 = test1[i].answer1 + dy; in monotll()
732 err = err - dy; in monotll()
760 dy = volat1 * test1[i].derivative; in monotll()
761 dy = test1[i].answer2 + dy; in monotll()
762 volat1 = test1[i].answer1 + dy; in monotll()
777 err = err - dy; in monotll()
|
| /openbsd/src/sys/dev/hil/ |
| D | hilms.c | 223 int dx, dy, dz, button; in hilms_callback() local
271 dy = *buf++; in hilms_callback()
272 dy |= (*buf++) << 8; in hilms_callback()
274 dy = (int16_t)dy; in hilms_callback()
276 dy = *buf++; in hilms_callback()
278 dy = (int8_t)dy; in hilms_callback()
294 dy = dz = 0; in hilms_callback()
301 dy = -dy; in hilms_callback()
337 wsmouse_motion(sc->sc_wsmousedev, dx, dy, dz, 0); in hilms_callback()
339 wsmouse_position(sc->sc_wsmousedev, dx, dy); in hilms_callback()
|
| /openbsd/src/lib/libcurses/base/ |
| D | lib_overlay.c | 171 int sx, sy, dx, dy; in copywin() local
176 for (dy = dminrow, sy = sminrow; in copywin()
177 dy <= dmaxrow; in copywin()
178 sy++, dy++) { in copywin()
181 if (dy < 0 || sy < 0) in copywin()
195 (!CharEq(dst->_line[dy].text[dx], in copywin()
197 dst->_line[dy].text[dx] = in copywin()
199 SetAttr(dst->_line[dy].text[dx], in copywin()
205 if (!CharEq(dst->_line[dy].text[dx], in copywin()
207 dst->_line[dy].text[dx] = in copywin()
|
| /openbsd/src/sys/arch/i386/isa/ |
| D | mms.c | 195 signed char dx, dy; in mmsintr() local
217 dy = bus_space_read_1(iot, ioh, MMS_DATA); in mmsintr()
218 dy = (dy == -128) ? 127 : -dy; in mmsintr()
220 dx = dy = 0; in mmsintr()
231 if (dx || dy || changed) in mmsintr()
232 WSMOUSE_INPUT(sc->sc_wsmousedev, buttons, dx, dy, 0, 0); in mmsintr()
|
| D | lms.c | 206 signed char dx, dy; in lmsintr() local
226 dy = ((hi & 0x0f) << 4) | (lo & 0x0f); in lmsintr()
227 dy = (dy == -128) ? 127 : -dy; in lmsintr()
237 if (dx || dy || changed) in lmsintr()
238 WSMOUSE_INPUT(sc->sc_wsmousedev, buttons, dx, dy, 0, 0); in lmsintr()
|
| /openbsd/src/gnu/usr.bin/gcc/gcc/testsuite/gcc.c-torture/compile/ |
| D | 921202-1.c | 4 long dy[2055]; in f() local
15 dy[s] = 0x12345; in f()
17 if (x != y || h (dx, dy, s) || dx[s] != 0x12345) in f()
19 j (y);k (dy); in f()
|