Home
last modified time | relevance | path

Searched refs:YC (Results 51 – 75 of 1664) sorted by relevance

12345678910>>...67

/dports/math/math77/MATH77/demo/
H A Ddrderf.f12 double precision D1MACH, DERF, DERFC, DERFCE, X, XMAX, YE, YC, YCE variable
23 YC= DERFC(X)
25 print '(1x,f5.1,1x,2e17.8)', X,YE,YC
28 print '(1x,f5.1,1x,3e17.8)', X,YE,YC,YCE
H A Ddrserf.f12 real R1MACH, SERF, SERFC, SERFCE, X, XMAX, YE, YC, YCE variable
23 YC= SERFC(X)
25 print '(1x,f5.1,1x,2e17.8)', X,YE,YC
28 print '(1x,f5.1,1x,3e17.8)', X,YE,YC,YCE
/dports/math/scalapack/scalapack-2.1.0/PBLAS/SRC/PTOOLS/
H A DPB_Ctzher2.c22 char * YC, int LDYC, char * XR, int LDXR, char * YR, in PB_Ctzher2() argument
25 void PB_Ctzher2( TYPE, UPLO, M, N, K, IOFFD, ALPHA, XC, LDXC, YC, LDYC, in PB_Ctzher2()
36 char * A, * XC, * XR, * YC, * YR;
199 gerc( &M, &n1, Calph, YC, &ione, XR, &LDXR, A, &LDA );
214 gerc( &m1, &n1, Calph, Mptr( YC, i1, 0, LDYC, size ), &ione,
230 gerc( &m1, &n1, Calph, YC, &ione, XR, &LDXR, A, &LDA );
241 gerc( &M, &n1, Calph, YC, &ione, Mptr( XR, 0, j1, LDXR, size ), &LDXR,
249 gerc( &M, &N, Calph, YC, &ione, XR, &LDXR, A, &LDA );
/dports/science/dcl/dcl-5.4.8/src/math1/maplib/
H A Dmpfpt2.f44 YC = 0.5 * (YC1 + YC2)
46 R = SQRT((X2 - XC) ** 2 + (Y2 - YC) ** 2)
48 RHO = SQRT(XC ** 2 + (PI - YC) ** 2)
57 IF (ATAN2(X2, -Y2) .LT. ATAN2(XC, -YC)) THEN
62 X = R0RHO * (COS(ALPHA) * XC - SIN(ALPHA) * (YC - PI))
63 Y = R0RHO * (SIN(ALPHA) * XC + COS(ALPHA) * (YC - PI)) + PI
/dports/science/aircraft-datcom/aircraft-datcom-ed877bb/src/
H A Dcord5m.f75 IF(X(M).EQ.ZP)YC=AI*.01
77 IF(X(M).LT.ZM)YC=(1./6.)*XK*(X(M)**3-3.*ZM*X(M)**2+ZM**2
83 IF(X(M).GT.ZM)YC=(1./6.)*XK*ZM**3*(1.-X(M))
90 IF(X(M).LT.ZM)YC=(1./6.)*XK*((X(M)-ZM)**3-RK*X(M)*(1.-ZM)**3
95 IF(X(M).EQ.ZP)YC=AI*.01
98 IF(X(M).GT.ZM)YC=(1./6.)*XK*(RK*(X(M)-ZM)**3-RK*X(M)*(1.-ZM)**3
103 YUN(M)=YC+YT*COS(ALPHA)
105 YLN(M)=YC-YT*COS(ALPHA)
106 CAM(M)=YC
/dports/graphics/pgplot/pgplot/src/
H A Dpgcl.f24 REAL XX, YY, XC, YC, XV1, XV2, YV1, YV2, XL, XR, YB, YT local
46 YC = (YY+YP)*0.5
59 YN = (YC-YB)/(YT-YB)
66 CALL PGQTXT(XC, YC, ANGLE, 0.5, PGCLAB, XBOX, YBOX)
70 CALL PGPTXT(2.0*XC-XO, 2.0*YC-YO, ANGLE, 0.5, PGCLAB)
/dports/graphics/opencv/opencv-4.5.3/modules/imgproc/src/
H A Dfloodfill.cpp160 int k, YC, PL, PR, dir; in floodFill_CnIR() local
161 ICV_POP( YC, L, R, PL, PR, dir ); in floodFill_CnIR()
176 if( YMax < YC ) YMax = YC; in floodFill_CnIR()
177 if( YMin > YC ) YMin = YC; in floodFill_CnIR()
187 img = image.ptr<_Tp>(YC + dir); in floodFill_CnIR()
330 int k, YC, PL, PR, dir; in floodFillGrad_CnIR() local
331 ICV_POP( YC, L, R, PL, PR, dir ); in floodFillGrad_CnIR()
348 if( YMax < YC ) YMax = YC; in floodFillGrad_CnIR()
349 if( YMin > YC ) YMin = YC; in floodFillGrad_CnIR()
356 _Tp* img1 = (_Tp*)(pImage + YC * step); in floodFillGrad_CnIR()
[all …]
/dports/graphics/xd3d/xd3d-8.3.1/src/graphic/
H A Dtrace.f288 YC = YMAX-(REAL(NCOURB)+.25)*YBOXR-YBOX
290 YC = YMIN+.75*YBOX
296 YYY(1) = YC
297 YYY(2) = YC
298 YYY(3) = YC + YBOXR*(REAL(NCOURB)+.4)
395 SUBROUTINE RAPROC2(X0,Y0,X,Y,N,IPREC,XB,YB,XC,YC) argument
400 &.AND.Y.GE.YC(1).AND.Y.LE.YC(3)) THEN
408 DY0 = YC(II)-YC(J)
420 YB(N) = YC(IPREC)
445 DY0 = YC(II)-YC(J)
[all …]
/dports/science/dcl/dcl-5.4.8/src/grph1/szpack/
H A Dszpcll.f86 YC=VY1-DYDX*VX1
88 YI=YC+DYDX*XI
91 XI=(YI-YC)/DYDX
128 YC=VY1-DYDX*VX1
130 XJ(1)=DXDY*(YJ(1)-YC)
132 YJ(2)=YC+DYDX*XJ(2)
134 YJ(3)=YC+DYDX*XJ(3)
136 XJ(4)=DXDY*(YJ(4)-YC)
/dports/science/xcrysden/xcrysden-1.6.2/F/
H A Dmulthexa.f9 REAL*8 TTC(3,13),TOL,XC(INATOM),YC(INATOM),ZC(INATOM),
129 YC(N)=YPOS
251 DIS=DIST(XC(I),YC(I),ZC(I),XC(J),YC(J),ZC(J))
257 * WRITE(12,23) '1',XC(I),YC(I),ZC(I),XC(J),YC(J),ZC(J)
260 * WRITE(12,23) '2',XC(I),YC(I),ZC(I),XC(J),YC(J),ZC(J)
265 * WRITE(12,23) '1',XC(I),YC(I),ZC(I),XC(J),YC(J),ZC(J)
/dports/science/dcl/dcl-5.4.8/demo/rakuraku/kihon/
H A Dkihon5.f7 REAL X(0:NMAX,IMAX), Y(0:NMAX,IMAX), XC(IMAX), YC(IMAX)
10 DATA YC/0.75, 0.75, 0.25, 0.25/
16 Y(N,I) = 0.2*SIN(N*DT) + YC(I)
22 Y(N,IMAX) = 0.2*SIN(N*DT) + YC(IMAX)
/dports/science/dcl/dcl-5.4.8/src/math2/shtlib/
H A Dshmswj.f6 SUBROUTINE SHMSWJ(MM,JM,ISW,J,M1,M2,S,WJ,SD,PMJ,YS,YC,PY,R) argument
10 REAL YS(0:JM),YC(0:JM) local
17 CALL SHMWJZ(MM,JM,ISW,J,S,WJ(0),SD,PMJ,YS,YC,PY,R)
21 CALL SHMWJM(MM,JM,ISW,J,M,S,WJ(M),WJ(-M),SD,PMJ,YS,YC,PY,R)
H A Dshinit.f6 SUBROUTINE SHINIT(MM,JM,IM,Y,YS,YC,X,XS,XC,XW,Z,PY,PX,R,WFFT) argument
8 REAL Y(0:JM),YS(0:JM),YC(0:JM) local
16 CALL SHINIY(JM,Y,YS,YC)
19 CALL SHINIP(MM,JM,YS,YC,PY)
H A Dshmswm.f6 SUBROUTINE SHMSWM(MM,JM,M,ISW,S,WR,WI,SD,PM,YS,YC,PY,R) argument
10 REAL YS(0:JM),YC(0:JM) local
16 CALL SHLBWM(MM,JM,M,ISW,S(LR),WR,SD,PM,YC,R)
17 CALL SHLBWM(MM,JM,M,ISW,S(LI),WI,SD,PM,YC,R)
H A Dshmwjm.f6 SUBROUTINE SHMWJM(MM,JM,ISW,J,M,S,WJR,WJI,SD,PMJ,YS,YC,PY,R) argument
10 REAL YS(0:JM),YC(0:JM) local
18 CALL SHLBWJ(MM,JM,M,J,ISW,S(LR),WJR,SD,PMJ,YC,R)
19 CALL SHLBWJ(MM,JM,M,J,ISW,S(LI),WJI,SD,PMJ,YC,R)
H A Dshmswa.f6 SUBROUTINE SHMSWA(MM,JM,ISW,M1,M2,S,W,SD,PM,YS,YC,PY,R) argument
10 REAL YS(0:JM),YC(0:JM) local
19 CALL SHMSWZ(MM,JM,ISW,S,W(-JM,0),SD,PM,YS,YC,PY,R)
23 CALL SHMSWM(MM,JM,M,ISW,S,W(-JM,M),W(-JM,-M),SD,PM,YS,YC,PY,R)
H A Dshpfun.f6 SUBROUTINE SHPFUN(MM,JM,M,FUN,PM,YS,YC,PY,R) argument
10 REAL YS(0:JM),YC(0:JM),PY(2,0:JM,0:MM),R((MM+1)*(MM+1)) local
30 FUN( J,N)=FUN( J,N)*YC(J)
31 FUN(-J,N)=FUN(-J,N)*YC(J)
/dports/math/scalapack/scalapack-2.1.0/PBLAS/SRC/
H A Dpchemv_.c262 char * Aptr = NULL, * XC = NULL, * XR = NULL, * YC = NULL, local
394 Yi, Yj, Yd, COLUMN, ((char**)(&tbeta)), &YC, YCd, &YCfr,
479 cset_( &Amp, ((char *) tbeta), YC, &ione );
483 cscal_( &Amp, ((char *) tbeta), YC, &ione );
508 XRld, size ), &XRld, one, YC, &ione );
563 Ccgsum2d( ctxt, ROW, &top, Amp, 1, YC, YCd[LLD_], myrow, 0 );
579 PB_Cpaxpby( type, NOCONJG, *N, 1, one, YC, 0, 0, YCd, COLUMN, one,
611 Ccgsum2d( ctxt, ROW, &top, Amp, 1, YC, YCd[LLD_], myrow,
618 YC, 0, 0, YCd, COLUMN );
624 PB_Cpaxpby( type, NOCONJG, *N, 1, one, YC, 0, 0, YCd,
[all …]
H A Dpzhemv_.c262 char * Aptr = NULL, * XC = NULL, * XR = NULL, * YC = NULL, local
394 Yi, Yj, Yd, COLUMN, ((char**)(&tbeta)), &YC, YCd, &YCfr,
479 zset_( &Amp, ((char *) tbeta), YC, &ione );
483 zscal_( &Amp, ((char *) tbeta), YC, &ione );
508 XRld, size ), &XRld, one, YC, &ione );
563 Czgsum2d( ctxt, ROW, &top, Amp, 1, YC, YCd[LLD_], myrow, 0 );
579 PB_Cpaxpby( type, NOCONJG, *N, 1, one, YC, 0, 0, YCd, COLUMN, one,
611 Czgsum2d( ctxt, ROW, &top, Amp, 1, YC, YCd[LLD_], myrow,
618 YC, 0, 0, YCd, COLUMN );
624 PB_Cpaxpby( type, NOCONJG, *N, 1, one, YC, 0, 0, YCd,
[all …]
H A Dpdsymv_.c259 char * Aptr = NULL, * XC = NULL, * XR = NULL, * YC = NULL, local
390 Yi, Yj, Yd, COLUMN, ((char**)(&tbeta)), &YC, YCd, &YCfr,
473 dset_( &Amp, ((char *) tbeta), YC, &ione );
477 dscal_( &Amp, ((char *) tbeta), YC, &ione );
502 XRld, size ), &XRld, one, YC, &ione );
557 Cdgsum2d( ctxt, ROW, &top, Amp, 1, YC, YCd[LLD_], myrow, 0 );
573 PB_Cpaxpby( type, NOCONJG, *N, 1, one, YC, 0, 0, YCd, COLUMN, one,
605 Cdgsum2d( ctxt, ROW, &top, Amp, 1, YC, YCd[LLD_], myrow,
612 YC, 0, 0, YCd, COLUMN );
618 PB_Cpaxpby( type, NOCONJG, *N, 1, one, YC, 0, 0, YCd,
[all …]
H A Dpssymv_.c259 char * Aptr = NULL, * XC = NULL, * XR = NULL, * YC = NULL, local
390 Yi, Yj, Yd, COLUMN, ((char**)(&tbeta)), &YC, YCd, &YCfr,
473 sset_( &Amp, ((char *) tbeta), YC, &ione );
477 sscal_( &Amp, ((char *) tbeta), YC, &ione );
502 XRld, size ), &XRld, one, YC, &ione );
557 Csgsum2d( ctxt, ROW, &top, Amp, 1, YC, YCd[LLD_], myrow, 0 );
573 PB_Cpaxpby( type, NOCONJG, *N, 1, one, YC, 0, 0, YCd, COLUMN, one,
605 Csgsum2d( ctxt, ROW, &top, Amp, 1, YC, YCd[LLD_], myrow,
612 YC, 0, 0, YCd, COLUMN );
618 PB_Cpaxpby( type, NOCONJG, *N, 1, one, YC, 0, 0, YCd,
[all …]
/dports/science/cp2k/cp2k-2e995eec7fd208c8a72d9544807bd8b8ba8cd1cc/tests/QMMM/QS/sample_pot/
H A Dacn.pot18 CT YC 400.0 1.458
19 YC YN 600.0 1.150
41 CT YC YN 80.0 180.0
42 HC CT YC 35.0 110.0
69 YN YC CT HC 0.0 1 0.0
91 YC 0.0 0.0860 1.908
/dports/science/cp2k-data/cp2k-7.1.0/tests/QMMM/QS/sample_pot/
H A Dacn.pot18 CT YC 400.0 1.458
19 YC YN 600.0 1.150
41 CT YC YN 80.0 180.0
42 HC CT YC 35.0 110.0
69 YN YC CT HC 0.0 1 0.0
91 YC 0.0 0.0860 1.908
/dports/science/berkeleygw/BGW-2.0.0/BSE/SSEIG/
H A Dstest_ssmv.f9012 Y( VECLEN ), YC( VECLEN ) variable
49 CALL SCOPY( N, Y, INCY, YC, INCY )
53 YC, INCY )
55 ERR = SERRVEC( N, Y, INCY, ONE, YC, INCY )
H A Ddtest_ssmv.f9012 Y( VECLEN ), YC( VECLEN ) variable
49 CALL DCOPY( N, Y, INCY, YC, INCY )
53 YC, INCY )
55 ERR = DERRVEC( N, Y, INCY, ONE, YC, INCY )

12345678910>>...67