Home
last modified time | relevance | path

Searched refs:NPOINT (Results 1 – 25 of 31) sorted by relevance

12

/dports/graphics/xd3d/xd3d-8.3.1/src/graphic/
H A Dfilm.f72 IREACH(IC) = MAX(2,MIN(NUMPT,NPOINT(IC)))
97 NP = MIN(NUMANI,NPOINT(IC)-IREACH(IC))+1
112 IF (IREACH(IC).LT.NPOINT(IC)) IFINI = 1
126 CALL GSPLNE_SPEED(NPOINT(IC),XPOINT(1+NDEB(IC))
129 NP = MAX(2,MIN(NUMPT,NPOINT(IC)))
130 II = NPOINT(IC)-NP+1
201 CALL GSPLNE_SPEED(NPOINT(ICOURB),XPOINT(1+NDEB(ICOURB))
208 CALL GSMRKS(NPOINT(ICOURB),XPOINT(1+NDEB(ICOURB))
229 CALL GSPLNE_SPEED(NPOINT(1),XPOINT(1),YPOINT(1))
241 CALL GSPLNE_SPEED(NPOINT(1),XPOINT(1),YPOINT(1))
[all …]
H A Dtrace.f59 IF (ILT(ICOURB).GE.0.AND.NPOINT(ICOURB).GT.1) THEN
69 DO I=1,NPOINT(ICOURB)
73 IF (I.LT.NPOINT(ICOURB)) THEN
133 CALL GSMRKS(NPOINT(ICOURB)
143 DO I=1,NPOINT(ICOURB)
171 DO I=1,NPOINT(ICOURB)
203 DO I=1,NPOINT(ICOURB)
212 ELSEIF(M.EQ.1.AND.I.GT.1.AND.I.LT.NPOINT(ICOURB)) THEN
H A Dparam.f7 INTEGER NPOINT(NCMAX) variable
16 COMMON / BID / XPOINT,YPOINT,NPOINT local
H A Dborne.f12 DO I=1,NPOINT(NC)
H A Dgraph.f358 NPOINT(I) = MAX(2,MIN(MEM-NPTOT,NPOINT(I)))
366 PAS = (XXMA-XXMI)/REAL(NPOINT(I)-1)
380 DO K=1,NPOINT(I)
397 ITROU(NDEB(I)+1) = NPOINT(I)
400 NPTOT = NPTOT+NPOINT(I)
420 IF (NPOINT(I).EQ.0) THEN
425 NPPM = MAX(NPPM,NPOINT(I))
510 NPPM = MAX(NPPM,NPOINT(I))
2165 DO J=1,NPOINT(I)
2495 DO J=1,NPOINT(II)
[all …]
H A Dlectur.f42 NPOINT(III) = 0
177 NPOINT(III) = NN
180 DO I=1,NPOINT(III)
/dports/science/dalton/dalton-66052b3af5ea7225e31178bf9a8b031913c72190/DALTON/srdft/
H A Ddftgrd_srdft.F516 DIMENSION X(NPOINT),Y(NPOINT),Z(NPOINT),WT(NPOINT)
517 WRITE(LUQUAD) NPOINT
518 IF (NPOINT .GT. 0) WRITE(LUQUAD) X,Y,Z,WT
532 DIMENSION X(NPOINT),Y(NPOINT),Z(NPOINT),WT(NPOINT)
549 READ(LUQUAD) NPOINT
550 IF (NPOINT .LT. 0) GO TO 200
551 CALL PRIQU2(X,Y,Z,WT,LUQUAD,NPOINT)
567 DIMENSION X(NPOINT),Y(NPOINT),Z(NPOINT),WT(NPOINT)
569 DO 100 I = 1, NPOINT
945 DIMENSION X(NPOINT),Y(NPOINT),Z(NPOINT),WT(NPOINT)
[all …]
H A Ddftdrv_srdft.F240 READ(LUQUAD) NPOINT
241 IF (NPOINT.GT.0) THEN
242 NPNTS = NPNTS + NPOINT
243 CALL REAQUA_OLD(CORX,CORY,CORZ,WEIGHT,LUQUAD,NPOINT)
245 DO 300 IPNT = 1+MYNUM, NPOINT, NODTOT+1
247 DO 300 IPNT = 1, NPOINT
378 ELSE IF (NPOINT .EQ.0 ) THEN
H A Dsrdft.F1052 READ(LUQUAD) NPOINT
1055 IF (NPOINT.GT.0) THEN
1066 CALL REAQUA_OLD(CORX,CORY,CORZ,WEIGHT,LUQUAD,NPOINT)
1284 ELSE IF (NPOINT .EQ.0 ) THEN
1672 READ(LUQUAD) NPOINT
1673 IF (NPOINT.GT.0) THEN
1674 NPNTS = NPNTS + NPOINT
1675 CALL REAQUA_OLD(CORX,CORY,CORZ,WEIGHT,LUQUAD,NPOINT)
1677 DO 300 IPNT = 1+MYNUM, NPOINT, NODTOT+1
1679 DO 300 IPNT = 1, NPOINT
[all …]
H A Dsrdftjt.F102 & NORDER, NPNT1, NPNTS, NPNTS_PER_NODE, NPOINT, NSKIP1,
281 READ(LUQUAD) NPOINT
283 write(lupri,*) 'MYNUM, NPOINT from LUQUAD',MYNUM,NPOINT
286 IF (NPOINT.GT.0) THEN
288 NPNTS = NPNTS + NPOINT ! last integration point from this record
301 CALL REAQUA_OLD(CORX,CORY,CORZ,WEIGHT,LUQUAD,NPOINT)
595 ELSE IF (NPOINT .EQ.0 ) THEN
/dports/databases/grass7/grass-7.8.6/vector/v.vol.rst/
H A Duser1.c86 NPOINT = 0; in INPUT()
220 NPOINT++; in INPUT()
313 if (NPOINT > 0) in INPUT()
316 NPOINT, k - NPOINT); in INPUT()
317 NPOINT = k - NPOINT - NPT - OUTRANGE; in INPUT()
318 if (NPOINT < KMIN) { in INPUT()
319 if (NPOINT != 0) { in INPUT()
322 NPOINT, KMIN); in INPUT()
323 KMIN = NPOINT; in INPUT()
330 if (NPOINT > KMAXPOINTS && KMIN <= KMAX) { in INPUT()
[all …]
H A Duserextern.h6 extern int NPOINT;
H A Dmain.c97 int NPOINT = 0; variable
571 KMAX2 =(NPOINT >= KMAXPOINTS ? KMAXPOINTS : NPOINT); in main()
906 NPOINT); in main()
/dports/science/siesta/siesta-4.1.5/Src/
H A Delectrostatic.f96 PARAMETER ( NPOINT = 4 )
103 . GRCH(3),RX(3),RAUX(2*NPOINT+1)
177 NMIN=MAX(0,NR-NPOINT)
178 NMAX=MIN(NQ,NR+NPOINT)
/dports/science/dalton/dalton-66052b3af5ea7225e31178bf9a8b031913c72190/DALTON/dft/
H A Ddft_old.F183 READ(LUQUAD) NPOINT
184 IF (NPOINT.GT.0) THEN
185 NPNTS = NPNTS + NPOINT
186 CALL REAQUA_OLD(CORX,CORY,CORZ,WEIGHT,LUQUAD,NPOINT)
187 DO 300 IPNT = 1, NPOINT
305 ELSE IF (NPOINT .EQ.0 ) THEN
977 READ(LUQUAD) NPOINT
978 IF (NPOINT.GT.0) THEN
979 CALL REAQUA_OLD(CORX,CORY,CORZ,WEIGHT,LUQUAD,NPOINT)
980 DO 300 IPNT = 1, NPOINT
[all …]
/dports/databases/grass7/grass-7.8.6/raster/r.resamp.rst/
H A Dmain.c58 static int NPOINT; variable
483 NPOINT = in main()
494 if (NPOINT < 0) { in main()
515 &dnorm, &outhd, &winhd, smooth, NPOINT) < 0) { in main()
/dports/science/xcrysden/xcrysden-1.6.2/F/
H A Dbox.f46 INTEGER NPOINT(6),NVEC(6),VECPAIR(2,3,6) local
54 DATA NPOINT/4,4,3,4,4,3/
/dports/databases/grass7/grass-7.8.6/vector/v.surf.rst/
H A Dmain.c69 static int NPOINT = 0; variable
657 &ymin, &ymax, &zmin, &zmax, &NPOINT, &dmax); in main()
717 dnorm = sqrt((deltx * delty * KMIN) / NPOINT); in main()
763 dtens, 1, NPOINT); in main()
/dports/science/dalton/dalton-66052b3af5ea7225e31178bf9a8b031913c72190/DALTON/abacus/
H A Dher1int.F41 NPOINT = NPQUAD
44 NPOINT = 1
47 NPOINT = 1
50 NPOINT = 1
56 NPOINT = 1
59 NPOINT = 1
62 NPOINT = 1
97 & WEIGHT(NPOINT), ABSCIS(NPOINT), INTADR(*),
825 & WEIGHT(NPOINT), ABSCIS(NPOINT), INTADR(*),
873 & WEIGHT(NPOINT), ABSCIS(NPOINT), FACINT(*),
[all …]
H A Dher2odc.F85 & NRED12,KHKT1,KHKT2,EXPECT,DIRFCK,NPOINT,NREDP1,
112 & NPOINT(NUC1*NUC2,2,NODC12), NPNT12(NUC1*NUC2,2,NODC12),
213 CALL IZERO(NPOINT,NUC1*NUC2*NODC12)
284 NPOINT(IPRIM,1,ISYM) = IPRM1
285 NPOINT(IPRIM,2,ISYM) = IPRM2
336 I = NFTOR1(NPOINT(IJ,1,ISYM))
337 J = NFTOR2(NPOINT(IJ,2,ISYM))
H A Dher2fck.F774 & NPOINT,IATOM,IXYZ,NMAT,ISYMDM,IFCTYP,IPRINT) argument
794 & NINDEX(0:MAXREP), NPOINT(NMAT,0:MAXREP),
915 NPOINT(IMAT,ISYM) = NINDEX(ISYMPR)
947 NP = NPOINT(N,ISYMOP)
H A Dabaptr.F1415 NPOINT = 2*NPS + 2
1432 JBIN = JPOINT + NPOINT + 1
1503 1 ITAB,NTOP,SORT,NPOINT,NPS1, INDGEN,
1621 IF (LOC .GE. NPOINT) GOTO 50
1630 IF (LOC .GE. NPOINT) GOTO 50
1641 NPOINU = MIN(LOC,NPOINT)
/dports/science/libccp4/libccp4-6.5.1/fortran/
H A Dplot84lib.f1769 INTEGER I,IEND,ISTART,NCHAR,NPOINT
1808 IEND = ISTART + NPOINT - 1
11449 INTEGER NPOINT
11452 REAL XVEC(NPOINT),YVEC(NPOINT)
11471 IF (NPOINT.GE.2) THEN
11472 DO 10 J = 2,NPOINT
12637 IF (NPC.GE.0 .AND. NPC.LT.NPOINT) NPOINT = NPC
12638 IEND = ISTART + NPOINT - 1
13279 INTEGER ICOLR,LWT,N,NPOINT
13485 ENTRY VECGS(XVEC,YVEC,NPOINT)
[all …]
/dports/science/sparta/sparta-20Oct2021/src/
H A Dwrite_restart.cpp43 NPARTICLE,NUNSPLIT,NSPLIT,NSUB,NPOINT,NSURF, enumerator
/dports/graphics/dataplot/dataplot-2c1b27601a3b7523449de612613eadeead9a8f70/src/
H A Ddp15.F16869 NPOINT=0
17076 NSTRT=NPOINT+1
17080 NPOINT=NPOINT+1
17081 D2(N2+NPOINT)=ATAG
17083 X2(N2+NPOINT)=X(K)
17084 X3D(N2+NPOINT)=XHIGH(K)
17088 X2(N2+NPOINT)=DCLMDJ
17093 ABASE=Y2(N2+NPOINT-NUMCLA)
17106 Y2(N2+NPOINT)=CUMFJ + ABASE
17116 NSTOP=NPOINT
[all …]

12