Home
last modified time | relevance | path

Searched refs:npoly (Results 1 – 25 of 234) sorted by relevance

12345678910

/dports/science/dakota/dakota-6.13.0-release-public.src-UI/packages/surfpack/src/surfaces/nkm/
H A DNKM_SurfPack.cpp134 int Npoly, npoly; in multi_dim_poly_power() local
198 jstart+=npoly; in multi_dim_poly_power()
225 for(j=0; j<npoly; j++) in multi_dim_poly_power()
228 jstart+=npoly; in multi_dim_poly_power()
275 int npoly=poly.getNCols(); in poly_to_flypoly() local
392 (0<npoly)&&(npoly==coef.getNRows())&&(1==coef.getNCols())&& in evaluate_poly_der()
463 g.newSize(npoly,npts); in evaluate_flypoly_basis()
515 flycoef.newSize(npoly,1); in evaluate_poly_der_basis()
696 npoly=poly.getNCols(); in main()
708 MtxDbl g(npoly,npts), g2(npoly,npts), dg(npoly,nder*npts); in main()
[all …]
/dports/french/med/med-4.0.0/tests/c/2.3.6/
H A Dtest24.c47 med_int nmaa,i,mdim,npoly,j; in main() local
86 printf("Nombre de mailles polygones en mode nodal : "IFORMAT" \n",npoly); in main()
101 index = (med_int *) malloc(sizeof(med_int)*(npoly+1)); in main()
103 num = (med_int *) malloc(sizeof(med_int)*npoly); in main()
104 fam = (med_int *) malloc(sizeof(med_int)*npoly); in main()
105 nom = (char *) malloc(sizeof(char)*MED_TAILLE_PNOM*npoly+1); in main()
108 if (MEDpolygoneConnLire(fid,maa,index,npoly+1,con,MED_MAILLE,MED_NOD) < 0) { in main()
116 if (MEDnomLire(fid,maa,nom,npoly,MED_MAILLE,MED_POLYGONE) < 0) { in main()
125 if (MEDnumLire(fid,maa,num,npoly,MED_MAILLE,MED_POLYGONE) < 0) { in main()
134 if ((ret = MEDfamLire(fid,maa,fam,npoly,MED_MAILLE,MED_POLYGONE)) < 0) { in main()
[all …]
H A Dtest26.c47 med_int nmaa,i,mdim,npoly,j; in main() local
89 printf("Nombre de mailles polyedres : "IFORMAT" \n",npoly); in main()
116 indexp = (med_int *) malloc(sizeof(med_int)*(npoly+1)); in main()
117 indexp2 = (med_int *) malloc(sizeof(med_int)*(npoly+1)); in main()
122 num = (med_int *) malloc(sizeof(med_int)*npoly); in main()
123 fam = (med_int *) malloc(sizeof(med_int)*npoly); in main()
124 nom = (char *) malloc(sizeof(char)*MED_TAILLE_PNOM*npoly+1); in main()
144 if (MEDnomLire(fid,maa,nom,npoly,MED_MAILLE,MED_POLYEDRE) < 0) { in main()
153 if (MEDnumLire(fid,maa,num,npoly,MED_MAILLE,MED_POLYEDRE) < 0) { in main()
162 if (MEDfamLire(fid,maa,fam,npoly,MED_MAILLE,MED_POLYEDRE) < 0) { in main()
[all …]
/dports/science/siesta/siesta-4.1.5/Util/Macroave/Src/
H A Ddpnint1.f905 subroutine dpnint1(npoly, xx, yy, nn, r, val, debug) argument
33 integer, intent(in) :: nn,npoly local
61 if(mod(npoly,2)==1) then
62 istart=imin-npoly/2
64 istart=imin-npoly/2
66 istart=imax-npoly/2
69 istart = min(istart, nn - npoly)
71 iend = min(istart+npoly,nn)
/dports/french/med/med-4.0.0/tests/f/2.3.6/
H A Dtest24.f31 integer cret,mdim,nmaa,npoly,i,j,k,taille
76 & MED_NOD,npoly,cret)
82 print *,'Nombre de mailles MED_POLYGONE : ',npoly
94 call efpgcl(fid,maa,index,npoly+1,con,MED_MAILLE,
104 call efnoml(fid,maa,nom,npoly,MED_MAILLE,MED_POLYGONE,
114 call efnuml(fid,maa,num,npoly,MED_MAILLE,MED_POLYGONE,
124 call effaml(fid,maa,fam,npoly,MED_MAILLE,MED_POLYGONE,
136 do 20 j=1,npoly
H A Dtest26.f31 integer cret,mdim,nmaa,npoly,i,j,k,l
82 & MED_NOD,npoly,cret)
88 print *,'Nombre de mailles MED_POLYEDRE : ',npoly
101 call efpecl(fid,maa,indexp,npoly+1,indexf,tmp,conn,
112 call efpecl(fid,maa,indexp2,npoly+1,indexf2,tmp,conn2,
123 call efnoml(fid,maa,nom,npoly,MED_MAILLE,MED_POLYEDRE,
133 call efnuml(fid,maa,num,npoly,MED_MAILLE,MED_POLYEDRE,
143 call effaml(fid,maa,fam,npoly,MED_MAILLE,MED_POLYEDRE,
154 do 20 j=1,npoly
/dports/math/R-cran-maps/maps/R/
H A Dmapclip.r13 poly=as.integer(poly), npoly=integer(nseg),
21 data$names <- rep(data$names, times=wrap$npoly)
43 poly=as.integer(poly), npoly=integer(nseg),
47 if (!is.null(nam) && poly) nam <- rep(nam, times=dd$npoly)
61 poly=as.integer(poly), npoly=integer(nseg),
65 if (!is.null(nam) && poly) nam <- rep(nam, times=dd$npoly)
79 poly=as.integer(poly), npoly=integer(nseg),
81 if (!is.null(nam) && poly) nam <- rep(nam, times=dd$npoly)
97 poly=as.integer(poly), npoly=integer(nseg),
101 if (!is.null(nam) && poly) nam <- rep(nam, times=dd$npoly)
/dports/science/cp2k/cp2k-2e995eec7fd208c8a72d9544807bd8b8ba8cd1cc/src/common/
H A Dd3_poly.F881 IF (PRESENT(npoly)) my_npoly = npoly
1043 IF (PRESENT(npoly)) my_npoly = npoly
1200 IF (PRESENT(npoly)) my_npoly = npoly
1250 DO ipoly = 1, npoly
1309 IF (PRESENT(npoly)) my_npoly = npoly
1417 IF (PRESENT(npoly)) my_npoly = npoly
1521 IF (PRESENT(npoly)) my_npoly = npoly
1623 IF (PRESENT(npoly)) my_npoly = npoly
1662 IF (PRESENT(npoly)) my_npoly = npoly
1731 IF (PRESENT(npoly)) my_npoly = npoly
[all …]
/dports/science/cp2k-data/cp2k-7.1.0/src/
H A Dd3_poly.F881 IF (PRESENT(npoly)) my_npoly = npoly
1043 IF (PRESENT(npoly)) my_npoly = npoly
1200 IF (PRESENT(npoly)) my_npoly = npoly
1250 DO ipoly = 1, npoly
1309 IF (PRESENT(npoly)) my_npoly = npoly
1417 IF (PRESENT(npoly)) my_npoly = npoly
1521 IF (PRESENT(npoly)) my_npoly = npoly
1623 IF (PRESENT(npoly)) my_npoly = npoly
1662 IF (PRESENT(npoly)) my_npoly = npoly
1731 IF (PRESENT(npoly)) my_npoly = npoly
[all …]
/dports/x11/xscreensaver/xscreensaver-5.44/hacks/
H A Dqix.c34 int npoly; member
50 int npoly; member
78 qix->npoly = st->npoly; in init_one_qix()
127 for(j=0; j<qix->npoly; j++) in init_one_qix()
161 if (st->npoly <= 2) st->npoly = 2; in qix_init()
162 if (st->npoly > MAXPOLY) st->npoly = MAXPOLY; in qix_init()
183 if (st->npoly != 2) in qix_init()
186 st->npoly = 2; in qix_init()
188 if (st->npoly > 2) in qix_init()
400 for(i=0; i<qix->npoly; i++) in add_qline()
[all …]
/dports/french/med/med-4.0.0/tests/python/
H A Dtest24.py56 npoly = nind-1; variable
57 print("Nombre de mailles ",polyname," en mode nodal : \n",npoly)
72 num = MEDINT(npoly)
73 fam = MEDINT(npoly)
74 nom = MEDCHAR(MED_SNAME_SIZE*npoly+1)
110 for j in range(npoly):
/dports/french/med/med-4.0.0/tests/c/
H A Dtest24.c48 med_int nmaa,i,mdim,nindex,npoly,j,nind,nnoe; in main() local
104 npoly = nind-1; in main()
105 printf("Nombre de mailles polygones en mode nodal : "IFORMAT" \n",npoly); in main()
126 num = (med_int *) malloc(sizeof(med_int)*npoly); in main()
127 fam = (med_int *) malloc(sizeof(med_int)*npoly); in main()
128 nom = (char *) malloc(sizeof(char)*MED_SNAME_SIZE*npoly+1); in main()
163 for (j=0;j<npoly;j++) { in main()
H A Dtest26.c51 med_int taille,nindf,nindn,npoly; in main() local
111 npoly = nindf-1; in main()
112 printf("Nombre de mailles polyedres : "IFORMAT" \n",npoly); in main()
164 num = (med_int *) malloc(sizeof(med_int)*npoly); in main()
165 fam = (med_int *) calloc(sizeof(med_int),npoly); in main()
166 nom = (char *) malloc(sizeof(char)*MED_SNAME_SIZE*npoly+1); in main()
234 for (j=0;j<npoly;j++) { in main()
/dports/graphics/rayshade/rayshade.4.0/rayview/
H A Dspheregen.c76 int npoly; /* # of triangles in object */ member
128 for (i = 0; i < oct.npoly; i++) {
147 new->npoly = old->npoly * 4;
150 new->poly = (triangle *)malloc(new->npoly * sizeof(triangle));
176 for (i = 0; i < old->npoly; i++) {
262 for (i = 0; i < obj->npoly; i++)
/dports/science/octopus/octopus-10.5/src/grid/
H A Dstencil.F9048 integer :: npoly component
65 this%npoly = size
84 output%npoly = input%npoly
150 stu%npoly = -1
H A Dderivatives.F90473 SAFE_ALLOCATE(polynomials(1:der%dim, 1:der%op(i)%stencil%npoly))
493 SAFE_ALLOCATE(polynomials(1:der%dim, 1:der%op(1)%stencil%npoly))
510 SAFE_ALLOCATE(polynomials(1:der%dim, 1:der%op(i)%stencil%npoly))
607 do j = 1, der%lapl%stencil%npoly
633 do j = 1, der%grad(dir)%stencil%npoly
666 SAFE_ALLOCATE(mat(1:op(1)%stencil%npoly, 1:op(1)%stencil%size))
714 do j = 2, op(1)%stencil%npoly
725 if (op(1)%stencil%npoly==op(1)%stencil%size) then
793 op(1)%stencil%npoly = op(1)%stencil%size &
796 SAFE_ALLOCATE(polynomials(1:this%dim, 1:op(1)%stencil%npoly))
[all …]
/dports/science/nwchem-data/nwchem-7.0.2-release/src/ddscf/fast/
H A Dcart_trans.F142 subroutine cart_poly_translate(lmax,npoly,coeff,ncoeff,a,b,c) argument
144 integer lmax, npoly local
145 double precision coeff(npoly,*)
146 double precision ncoeff(npoly,*)
193 call dfill(npoly*nijk, 0.0d0, ncoeff, 1)
203 do m = 1, npoly
216 call dfill(npoly*nijk, 0.0d0, coeff, 1)
227 do m = 1, npoly
240 call dfill(npoly*nijk, 0.0d0, ncoeff, 1)
250 do m = 1, npoly
H A Dtestcarttrans.f5 integer lmax, npoly, numl, lmax2
8 parameter (lmax = 3, npoly = 7)
15 double precision coeff(npoly,numl)
16 double precision scoeff(npoly,numl)
17 double precision ncoeff(npoly,numl)
30 do m = 1, npoly
53 call cart_poly_translate(lmax,npoly,coeff,ncoeff,a,b,c)
56 do m = 1, npoly
/dports/science/nwchem/nwchem-7b21660b82ebd85ef659f6fba7e1e73433b0bd0a/src/ddscf/fast/
H A Dcart_trans.F142 subroutine cart_poly_translate(lmax,npoly,coeff,ncoeff,a,b,c) argument
144 integer lmax, npoly local
145 double precision coeff(npoly,*)
146 double precision ncoeff(npoly,*)
193 call dfill(npoly*nijk, 0.0d0, ncoeff, 1)
203 do m = 1, npoly
216 call dfill(npoly*nijk, 0.0d0, coeff, 1)
227 do m = 1, npoly
240 call dfill(npoly*nijk, 0.0d0, ncoeff, 1)
250 do m = 1, npoly
H A Dtestcarttrans.f5 integer lmax, npoly, numl, lmax2
8 parameter (lmax = 3, npoly = 7)
15 double precision coeff(npoly,numl)
16 double precision scoeff(npoly,numl)
17 double precision ncoeff(npoly,numl)
30 do m = 1, npoly
53 call cart_poly_translate(lmax,npoly,coeff,ncoeff,a,b,c)
56 do m = 1, npoly
/dports/french/med/med-4.0.0/tests/f/
H A Dtest24.f31 integer cret,mdim,nmaa,npoly,i,j,k,taille
83 npoly = isize - 1;
89 print *,'Nombre de mailles MED_POLYGONE : ',npoly
144 do 20 j=1,npoly
H A Dtest26.f31 integer cret,mdim,nmaa,npoly,i,j,k,l,nfindex
91 npoly = nfindex - 1
97 print *,'Nombre de mailles MED_POLYEDRE : ',npoly
167 do 20 j=1,npoly
/dports/math/gretl/gretl-2021d/tests/
H A Dnistcheck.c310 int i, t, npoly = 0; in read_nist_file() local
331 npoly = 1; in read_nist_file()
334 npoly = 9; in read_nist_file()
337 npoly = 4; in read_nist_file()
393 int nc = nvar - 1 + npoly; in read_nist_file()
468 if (npoly && verbose) { in read_nist_file()
472 for (i=2; i<=npoly+1; i++) { in read_nist_file()
486 *polyterms = npoly; in read_nist_file()
581 int realv = dset->v - npoly; in run_gretl_mp_comparison()
606 if (npoly) { in run_gretl_mp_comparison()
[all …]
/dports/science/cgnslib/CGNS-4.1.2/src/tests/
H A Delemtest.c49 static int npoly = 16; variable
168 ne += npoly; in main()
180 elems_offsets[ne-npoly] = j; in main()
192 elems_offsets[ne-npoly] = j; in main()
200 elems_offsets[ne-npoly] = j; in main()
205 elems_offsets[ne-npoly] = j; in main()
217 elems_offsets[ne-npoly] = j; in main()
229 elems_offsets[ne-npoly] = j; in main()
241 elems_offsets[ne-npoly] = j; in main()
253 elems_offsets[ne-npoly] = j; in main()
[all …]
/dports/french/med/med-4.0.0/tests/usecases/c/
H A DUsesCase_MEDmesh_16.c45 med_int npoly = 0; in main() local
100 npoly = faceindexsize-1; in main()
101 ISCRUTE(npoly); in main()
147 for (i=0;i<npoly;i++) in main()

12345678910