Home
last modified time | relevance | path

Searched refs:XMIN (Results 1 – 25 of 1195) sorted by relevance

12345678910>>...48

/dports/science/InsightToolkit/ITK-5.0.1/Modules/ThirdParty/Netlib/src/netlib/slatec/
H A Ddgamlm.f2 SUBROUTINE DGAMLM (XMIN, XMAX) argument
32 DOUBLE PRECISION XMIN, XMAX, ALNBIG, ALNSML, XLN, XOLD, D1MACH
35 XMIN = -ALNSML
37 XOLD = XMIN
38 XLN = LOG(XMIN)
39 XMIN = XMIN - XMIN*((XMIN+0.5D0)*XLN - XMIN - 0.2258D0 + ALNSML)
40 1 / (XMIN*XLN+0.5D0)
41 IF (ABS(XMIN-XOLD).LT.0.005D0) GO TO 20
45 20 XMIN = -XMIN + 0.01D0
59 XMIN = MAX (XMIN, -XMAX+1.D0)
/dports/math/octave/octave-6.4.0/liboctave/external/slatec-fn/
H A Ddgamlm.f2 SUBROUTINE DGAMLM (XMIN, XMAX) argument
32 DOUBLE PRECISION XMIN, XMAX, ALNBIG, ALNSML, XLN, XOLD, D1MACH local
35 XMIN = -ALNSML
37 XOLD = XMIN
38 XLN = LOG(XMIN)
39 XMIN = XMIN - XMIN*((XMIN+0.5D0)*XLN - XMIN - 0.2258D0 + ALNSML)
40 1 / (XMIN*XLN+0.5D0)
41 IF (ABS(XMIN-XOLD).LT.0.005D0) GO TO 20
45 20 XMIN = -XMIN + 0.01D0
59 XMIN = MAX (XMIN, -XMAX+1.D0)
H A Dgamlim.f2 SUBROUTINE GAMLIM (XMIN, XMAX) argument
34 XMIN = -ALNSML
36 XOLD = XMIN
37 XLN = LOG(XMIN)
38 XMIN = XMIN - XMIN*((XMIN+0.5)*XLN - XMIN - 0.2258 + ALNSML)
39 1 / (XMIN*XLN + 0.5)
40 IF (ABS(XMIN-XOLD).LT.0.005) GO TO 20
44 20 XMIN = -XMIN + 0.01
58 XMIN = MAX (XMIN, -XMAX+1.)
/dports/math/maxima/maxima-5.43.2/src/numerical/slatec/fortran/
H A Ddgamlm.f2 SUBROUTINE DGAMLM (XMIN, XMAX) argument
32 DOUBLE PRECISION XMIN, XMAX, ALNBIG, ALNSML, XLN, XOLD, D1MACH local
35 XMIN = -ALNSML
37 XOLD = XMIN
38 XLN = LOG(XMIN)
39 XMIN = XMIN - XMIN*((XMIN+0.5D0)*XLN - XMIN - 0.2258D0 + ALNSML)
40 1 / (XMIN*XLN+0.5D0)
41 IF (ABS(XMIN-XOLD).LT.0.005D0) GO TO 20
45 20 XMIN = -XMIN + 0.01D0
59 XMIN = MAX (XMIN, -XMAX+1.D0)
/dports/math/slatec/src/
H A Ddgamlm.f2 SUBROUTINE DGAMLM (XMIN, XMAX) argument
32 DOUBLE PRECISION XMIN, XMAX, ALNBIG, ALNSML, XLN, XOLD, D1MACH
35 XMIN = -ALNSML
37 XOLD = XMIN
38 XLN = LOG(XMIN)
39 XMIN = XMIN - XMIN*((XMIN+0.5D0)*XLN - XMIN - 0.2258D0 + ALNSML)
40 1 / (XMIN*XLN+0.5D0)
41 IF (ABS(XMIN-XOLD).LT.0.005D0) GO TO 20
45 20 XMIN = -XMIN + 0.01D0
59 XMIN = MAX (XMIN, -XMAX+1.D0)
H A Dgamlim.f2 SUBROUTINE GAMLIM (XMIN, XMAX) argument
34 XMIN = -ALNSML
36 XOLD = XMIN
37 XLN = LOG(XMIN)
38 XMIN = XMIN - XMIN*((XMIN+0.5)*XLN - XMIN - 0.2258 + ALNSML)
39 1 / (XMIN*XLN + 0.5)
40 IF (ABS(XMIN-XOLD).LT.0.005) GO TO 20
44 20 XMIN = -XMIN + 0.01
58 XMIN = MAX (XMIN, -XMAX+1.)
/dports/math/scilab/scilab-6.1.1/scilab/modules/elementary_functions/src/fortran/slatec/
H A Ddgamlm.f2 SUBROUTINE DGAMLM (XMIN, XMAX) argument
32 DOUBLE PRECISION XMIN, XMAX, ALNBIG, ALNSML, XLN, XOLD, D1MACH
35 XMIN = -ALNSML
37 XOLD = XMIN
38 XLN = LOG(XMIN)
39 XMIN = XMIN - XMIN*((XMIN+0.5D0)*XLN - XMIN - 0.2258D0 + ALNSML)
40 1 / (XMIN*XLN+0.5D0)
41 IF (ABS(XMIN-XOLD).LT.0.005D0) GO TO 20
45 20 XMIN = -XMIN + 0.01D0
59 XMIN = MAX (XMIN, -XMAX+1.D0)
/dports/math/cmlib/cmlib-3.0_8/src/fnlib/
H A Ddgamlm.f1 SUBROUTINE DGAMLM(XMIN,XMAX) argument
25 DOUBLE PRECISION XMIN, XMAX, ALNBIG, ALNSML, XLN, XOLD, D1MACH
28 XMIN = -ALNSML
30 XOLD = XMIN
31 XLN = DLOG(XMIN)
32 XMIN = XMIN - XMIN*((XMIN+0.5D0)*XLN - XMIN - 0.2258D0 + ALNSML)
33 1 / (XMIN*XLN+0.5D0)
34 IF (DABS(XMIN-XOLD).LT.0.005D0) GO TO 20
38 20 XMIN = -XMIN + 0.01D0
52 XMIN = DMAX1 (XMIN, -XMAX+1.D0)
H A Dgamlim.f1 SUBROUTINE GAMLIM(XMIN,XMAX) argument
25 XMIN = -ALNSML
27 XOLD = XMIN
28 XLN = ALOG(XMIN)
29 XMIN = XMIN - XMIN*((XMIN+0.5)*XLN - XMIN - 0.2258 + ALNSML)
30 1 / (XMIN*XLN + 0.5)
31 IF (ABS(XMIN-XOLD).LT.0.005) GO TO 20
35 20 XMIN = -XMIN + 0.01
49 XMIN = AMAX1 (XMIN, -XMAX+1.)
/dports/math/cmlib/cmlib-3.0_8/src/cluster/
H A Dscale.f70 XMIN=A(1,J)
74 IF(A(I,J).LT.XMIN) XMIN=A(I,J)
76 IF(XMIN.EQ.XMAX) XMAX=XMIN+.000001
80 ZZ=KL/(XMAX-XMIN)
82 XK=(A(I,J)-XMIN)*ZZ+1
94 XMIN=A(1,1)
98 IF(A(I,J).LT.XMIN) XMIN=A(I,J)
100 IF(XMIN.EQ.XMAX) XMAX=XMIN+.000001
104 ZZ=KL/(XMAX-XMIN)
107 XK=(A(I,J)-XMIN)*ZZ+1.
/dports/graphics/pgplot/pgplot/src/
H A Dpgfunx.f3 SUBROUTINE PGFUNX (FY, N, XMIN, XMAX, PGFLAG) argument
7 REAL XMIN, XMAX local
50 DT = (XMAX-XMIN)/N
56 CALL PGMOVE(XMIN,FY(XMIN))
58 CALL PGDRAW(XMIN+I*DT,FY(XMIN+I*DT))
66 Y(0) = FY(XMIN)
70 Y(I) = FY(XMIN+DT*I)
82 CALL PGENV(XMIN,XMAX,YMIN,YMAX,0,0)
83 CALL PGMOVE(XMIN,Y(0))
85 CALL PGDRAW(XMIN+DT*I,Y(I))
H A Dgrpixl.f41 REAL XMIN, YMIN, XMAX, YMAX, XPIX, YPIX
51 XMIN = MIN(XLL,XUR)
64 XPIX = XMAX - XMIN
66 IF (XMIN .LT. GRXMIN(GRCIDE)) THEN
68 XMIN = XMIN + (XPIX * (IL - I1)) / (I2 - I1 + 1)
106 1 XMIN,XMAX,YMIN,YMAX)
116 XPIX = XMAX - XMIN + 1
125 1 XMIN, XMAX, YMIN, YMAX)
134 XMIN = XMIN + XPIX / (IR - IL + 1)
154 XPIX = XMAX - XMIN + 1
[all …]
H A Dpgfuny.f45 REAL XMIN, XMAX local
58 XMIN = X(0)
63 XMIN = MIN(XMIN,X(I))
66 DT = 0.05*(XMAX-XMIN)
68 XMIN = XMIN - 1.0
71 XMIN = XMIN - DT
77 IF (PGFLAG.EQ.0) CALL PGENV(XMIN,XMAX,YMIN,YMAX,0,0)
H A Dpgfunt.f38 REAL XMIN, XMAX, YMIN, YMAX local
51 XMIN = X(0)
58 XMIN = MIN(XMIN,X(I))
63 DT = 0.05*(XMAX-XMIN)
65 XMIN = XMIN - 1.0
68 XMIN = XMIN - DT
82 IF (PGFLAG.EQ.0) CALL PGENV(XMIN,XMAX,YMIN,YMAX,0,0)
H A Dgrrec0.f29 REAL XMIN, YMIN, XMAX, YMAX, Y, DY local
34 XMIN = X0
38 IF (XMIN .LT. GRXMIN(GRCIDE)) XMIN = GRXMIN(GRCIDE)
42 IF (XMIN .GT. XMAX) RETURN
49 RBUF(1) = XMIN
62 RBUF(1) = XMIN
71 RBUF(1) = XMIN
94 GRXPRE(GRCIDE) = XMIN
/dports/science/dalton/dalton-66052b3af5ea7225e31178bf9a8b031913c72190/DALTON/sirius/
H A Ddetpr.F277 XMAX = XMIN
278 XMIN = XMIN/SQRT(10.0D0)
280 IF(XMIN .LT. THRES ) XMIN = THRES
344 XMIN = VNRM + 0.1D0
348 XMAX = XMIN
427 XMIN = 0.0D0
431 XMIN = MIN(XMIN, CIVEC(I))
459 XMAX = XMIN
460 XMIN = XMIN/SQRT(10.0D0)
462 IF(XMIN .LT. THRES ) XMIN = THRES
[all …]
/dports/games/fs2open/fs2open.github.com-release_21_4_1/code/graphics/
H A Dline.h36 if((x2 < XMIN) || (x1 > XMAX)) { \
39 if(x1 < XMIN) { \
40 INT_SCALE(temp,(y2 - y1),(XMIN - x1),(x2 - x1)); \
42 x1 = XMIN; \
65 if((x1 < XMIN) || (x2 > XMAX)) { \
74 if(x2 < XMIN) { \
75 INT_SCALE(temp,(y2 - y1),(XMIN - x2),(x1 - x2)); \
111 if((x2 < XMIN) || (x1 > XMAX)) { \
115 FL_SCALE(temp,(y2 - y1),(XMIN - x1),(x2 - x1)); \
140 if((x1 < XMIN) || (x2 > XMAX)) { \
[all …]
/dports/games/diaspora/Diaspora_R1_Linux/Diaspora/fs2_open/code/graphics/
H A Dline.h36 if((x2 < XMIN) || (x1 > XMAX)) { \
39 if(x1 < XMIN) { \
40 INT_SCALE(temp,(y2 - y1),(XMIN - x1),(x2 - x1)); \
42 x1 = XMIN; \
65 if((x1 < XMIN) || (x2 > XMAX)) { \
74 if(x2 < XMIN) { \
75 INT_SCALE(temp,(y2 - y1),(XMIN - x2),(x1 - x2)); \
111 if((x2 < XMIN) || (x1 > XMAX)) { \
115 FL_SCALE(temp,(y2 - y1),(XMIN - x1),(x2 - x1)); \
140 if((x1 < XMIN) || (x2 > XMAX)) { \
[all …]
/dports/science/dcl/dcl-5.4.8/src/grph1/slpack/
H A Dslinit.f11 COMMON /SLBLK1/ XMIN,XMAX,YMIN,YMAX,NN local
14 REAL XMIN(MAXFR),XMAX(MAXFR),YMIN(MAXFR),YMAX(MAXFR) local
30 XMIN(1)=0
36 XMIN(2)=0
73 IF (XMAX(1)-XMIN(1).GT.YMAX(1)-YMIN(1)) THEN
84 BWX=(XMAX(2)-XMIN(2))*FACTR
96 CALL SLMGNZ(XMIN(1),XMAX(1),YMIN(1),YMAX(1),XX,XX,YY,YY)
98 XMIN(2)=XMIN(1)
112 BWX=(XMAX(2)-XMIN(2))*FACTR
123 CALL SLMGNZ(XMIN(1),XMAX(1),YMIN(1),YMAX(1),XX,XX,YY,YY)
[all …]
/dports/graphics/xd3d/xd3d-8.3.1/src/graphic/
H A Dgraph.f239 XMIN = BIG
384 XMIN = MIN(XMIN,XPOINT(J))
497 XMIN = BIG
541 XMIN = XMIN - 0.5*(YMAX-YMIN)
550 XMIN = XMIN - 0.5*(YMAX-YMIN)*PETIPETI
588 XMIN000 = XMIN
1239 XMIN = XMIN+0.01*(XMAX-XMIN)
1315 XMIN = XMIN+DDDDD
1772 XDUM = XMIN
1773 XMIN = XMAX
[all …]
H A Darondi.f19 DX = DBLE(XMAX-XMIN)
25 XMIN2 = XMIN - .5D0*DX
143 EPSEPS = (XMAX-XMIN)*1.E-5
154 IF ((XMIN-XX(I)).LT.DIFMIN.AND.XX(I).LE.XMIN) THEN
155 DIFMIN = XMIN-XX(I)
159 IF (IARON.EQ.0) XMIN = XX(NMIN)
183 NDX2 = MAX(1,NINT(XMAX-XMIN))
203 IF (XX(I).LE.XMIN) NMIN = I
217 XMIN = XX(NMIN)
229 REAL*8 X,XX(*),XMIN,XMAX local
[all …]
/dports/games/d2x/d2x-0.2.5/2d/
H A Dclip.h58 if((xx > XMAX) || (xx < XMIN)) { WHEN_OUTSIDE; } \
64 if((x1 > XMAX) || (x2 < XMIN)) { WHEN_OUTSIDE; } \
66 if(x1 < XMIN) { x1 = XMIN; WHEN_CLIPPED; } \
96 if((x2 < XMIN) || (x1 > XMAX)) { \
99 if(x1 < XMIN) { \
100 MY_SCALE(temp,(y2 - y1),(XMIN - x1),(x2 - x1)); \
102 x1 = XMIN; \
125 if((x1 < XMIN) || (x2 > XMAX)) { \
134 if(x2 < XMIN) { \
135 MY_SCALE(temp,(y2 - y1),(XMIN - x2),(x1 - x2)); \
[all …]
/dports/graphics/ossim/ossim-OrchidIsland-2.11.1/src/vpfutil/
H A Dvpfspx.c70 #define XMIN 0 macro
115 if(box2[XMIN] >= box1[XMIN] && box2[XMIN] <= box1[XMAX]) in is_over()
132 if(xmin == OUT && xmax == OUT && box2[XMIN] <= box1[XMIN] && in is_over()
317 if ( (x1 <= bnd[XMIN]) && (x2 >= bnd[XMAX]) && in spatial_index_search()
336 xf = (float)(255.0 / (bnd[XMAX] - bnd[XMIN])); in spatial_index_search()
338 spx.box[XMIN] = (char)((x1 - bnd[XMIN]) * xf); in spatial_index_search()
339 if (x1 <= bnd[XMIN]) spx.box[XMIN] = 0; in spatial_index_search()
340 if (x1 >= bnd[XMAX]) spx.box[XMIN] = 255; in spatial_index_search()
344 spx.box[XMAX] = (char)(((x2 - bnd[XMIN]) * xf) + 1); in spatial_index_search()
345 if (x2 <= bnd[XMIN]) spx.box[XMAX] = 0; in spatial_index_search()
[all …]
/dports/math/moab/fathomteam-moab-7bde9dfb84a8/test/mesquite/unit/
H A DXYRectangleTest.cpp98 XMIN , YMIN , 0,
99 XMIN + 0.5*WIDTH, YMIN , 0,
100 XMIN + WIDTH, YMIN , 0,
101 XMIN , YMIN + 0.5*HEIGHT, 0,
102 XMIN + .25*WIDTH, YMIN + 0.5*HEIGHT, 0,
103 XMIN + .75*WIDTH, YMIN + 0.5*HEIGHT, 0,
104 XMIN + WIDTH, YMIN + 0.5*HEIGHT, 0,
144 if (fabs(vertex[0] - XMIN) < 1e-6) in snap_to()
145 result[0] = XMIN; in snap_to()
147 result[0] = XMIN + WIDTH; in snap_to()
[all …]
/dports/science/dcl/dcl-5.4.8/src/grph2/umpack/
H A Dumpfit.f43 XMIN = RUNDEF
46 CALL UMBNDC(XMIN, XMAX, YMIN, YMAX )
48 + XMIN, XMAX, YMIN, YMAX )
49 CALL UMBNDP(XMIN, XMAX, YMIN, YMAX )
51 IF (XMIN .EQ. RUNDEF) THEN
53 + XMIN, XMAX, YMIN, YMAX )
59 + RADIUS = MIN((VXMAXZ-VXMINZ)/(XMAX-XMIN),
63 + VXOFF = ((VXMAXZ + VXMINZ) - (XMAX + XMIN )) /2. * RADIUS
70 WX = (XMAX-XMIN)*RADIUS

12345678910>>...48