/dports/science/lammps/lammps-stable_29Sep2021/src/EXTRA-COMPUTE/ |
H A D | compute_ti.cpp | 55 nterms = (narg-3) / 4; in ComputeTI() 58 which = new int[nterms]; in ComputeTI() 59 ivar1 = new int[nterms]; in ComputeTI() 60 ivar2 = new int[nterms]; in ComputeTI() 61 ilo = new int[nterms]; in ComputeTI() 62 ihi = new int[nterms]; in ComputeTI() 63 var1 = new char*[nterms]; in ComputeTI() 64 var2 = new char*[nterms]; in ComputeTI() 72 nterms = 0; in ComputeTI() 82 utils::bounds(FLERR,arg[iarg+1],1,atom->ntypes,ilo[nterms],ihi[nterms],error); in ComputeTI() [all …]
|
/dports/cad/calculix-ccx/CalculiX/ccx_2.18/src/ |
H A D | basis.f | 298 nterms=8 300 nterms=6 302 nterms=4 304 nterms=20 306 nterms=15 308 nterms=10 310 nterms=0 344 do i=1,nterms 410 nterms=8 507 do j=1,nterms [all …]
|
H A D | attach_2d.f | 19 subroutine attach_2d(pneigh,pnode,nterms,ratio,dist,xil,etl) argument 27 integer nterms,i,j,k,imin,jmin,im,jm local 37 & ratio,nterms) 62 & ratio,nterms) 110 & pnode,a,p,ratio,nterms) 128 & ratio,nterms) 136 if(nterms.eq.3) then 144 elseif(nterms.eq.4) then 147 elseif(nterms.eq.6) then 155 elseif(nterms.eq.8) then
|
H A D | attach_3d.f | 19 subroutine attach_3d(pneigh,pnode,nterms,ratio,dist,xil,etl,zel, argument 28 integer nterms,i,j,k,m,imin,jmin,kmin,im,jm,km,n,loopa local 42 & ratio,nterms) 72 & pneigh,pnode,a,p,ratio,nterms) 131 & ze(i,j,k),pneigh,pnode,a,p,ratio,nterms) 151 & ratio,nterms) 159 if((nterms.eq.20).or.(nterms.eq.8)) then 163 elseif((nterms.eq.4).or.(nterms.eq.10)) then 178 elseif((nterms.eq.6).or.(nterms.eq.15)) then
|
/dports/science/cp2k/cp2k-2e995eec7fd208c8a72d9544807bd8b8ba8cd1cc/src/ |
H A D | pao_param_linpot.F | 178 ALLOCATE (S(nterms, nterms)) 182 ALLOCATE (S_evals(nterms), S_evecs(nterms, nterms)) 187 DO k = 1, nterms 190 DO i = 1, nterms 257 ALLOCATE (S(nterms, nterms)) 261 ALLOCATE (S_evals(nterms), S_evecs(nterms, nterms)) 268 DO k = 1, nterms 583 ALLOCATE (S(nterms, nterms)) 587 ALLOCATE (S_evals(nterms), S_evecs(nterms, nterms)) 592 ALLOCATE (S_inv(nterms, nterms)) [all …]
|
H A D | pao_param_gth.F | 91 col_blk_size = SUM(nterms) 112 DO iterm = 1, nterms(jatom) 171 natoms = SIZE(nterms) 183 ioffset = SUM(nterms(1:iatom - 1)) 184 joffset = SUM(nterms(1:jatom - 1)) 185 n = nterms(iatom) 186 m = nterms(jatom) 265 natoms = SIZE(nterms) 270 ALLOCATE (world_X(SUM(nterms)), world_G(SUM(nterms))) 278 idx = SUM(nterms(1:iatom - 1)) [all …]
|
/dports/science/cp2k-data/cp2k-7.1.0/src/ |
H A D | pao_param_linpot.F | 178 ALLOCATE (S(nterms, nterms)) 182 ALLOCATE (S_evals(nterms), S_evecs(nterms, nterms)) 187 DO k = 1, nterms 190 DO i = 1, nterms 257 ALLOCATE (S(nterms, nterms)) 261 ALLOCATE (S_evals(nterms), S_evecs(nterms, nterms)) 268 DO k = 1, nterms 583 ALLOCATE (S(nterms, nterms)) 587 ALLOCATE (S_evals(nterms), S_evecs(nterms, nterms)) 592 ALLOCATE (S_inv(nterms, nterms)) [all …]
|
H A D | pao_param_gth.F | 91 col_blk_size = SUM(nterms) 112 DO iterm = 1, nterms(jatom) 171 natoms = SIZE(nterms) 183 ioffset = SUM(nterms(1:iatom - 1)) 184 joffset = SUM(nterms(1:jatom - 1)) 185 n = nterms(iatom) 186 m = nterms(jatom) 265 natoms = SIZE(nterms) 270 ALLOCATE (world_X(SUM(nterms)), world_G(SUM(nterms))) 278 idx = SUM(nterms(1:iatom - 1)) [all …]
|
/dports/comms/wsjtz/wsjtx/lib/ |
H A D | polyfit.f90 | 7 nmax = 2*nterms-1 27 do n=1,nterms 35 do j=1,nterms 36 do k=1,nterms 42 delta=determ(array,nterms) 47 do l=1,nterms 48 do j=1,nterms 49 do k=1,nterms 60 do j=1,nterms 62 do k=1,nterms [all …]
|
/dports/science/lammps/lammps-stable_29Sep2021/src/EXTRA-MOLECULE/ |
H A D | dihedral_spherical.cpp | 52 memory->destroy(nterms); in ~DihedralSpherical() 543 for (int j = 0; j < nterms[i]; j++) { in CalcGeneralizedForces() 657 nterms[i] = nterms_one; in coeff() 734 Ccoeff[i] = new double[nterms[i]]; in read_restart() 735 phi_mult[i] = new double[nterms[i]]; in read_restart() 736 phi_shift[i] = new double[nterms[i]]; in read_restart() 737 phi_offset[i] = new double[nterms[i]]; in read_restart() 738 theta1_mult[i] = new double[nterms[i]]; in read_restart() 741 theta2_mult[i] = new double[nterms[i]]; in read_restart() 784 fprintf(fp, "%d %d ", i, nterms[i]); in write_data() [all …]
|
H A D | bond_gaussian.cpp | 48 memory->destroy(nterms); in ~BondGaussian() 94 for (int i = 0; i < nterms[type]; i++) { in compute() 136 memory->create(nterms,n+1,"bond:nterms"); in allocate() 171 nterms[i] = n; in coeff() 208 fwrite(alpha[i],sizeof(double),nterms[i],fp); in write_restart() 210 fwrite(r0[i],sizeof(double),nterms[i],fp); in write_restart() 231 alpha[i] = new double [nterms[i]]; in read_restart() 232 width[i] = new double [nterms[i]]; in read_restart() 233 r0[i] = new double [nterms[i]]; in read_restart() 261 for (int j = 0; j < nterms[i]; j++) { in write_data() [all …]
|
H A D | angle_gaussian.cpp | 49 memory->destroy(nterms); in ~AngleGaussian() 124 for (int i = 0; i < nterms[type]; i++) { in compute() 181 memory->create(nterms,n+1,"angle:nterms"); in allocate() 218 nterms[i] = n; in coeff() 253 fwrite(alpha[i],sizeof(double),nterms[i],fp); in write_restart() 254 fwrite(width[i],sizeof(double),nterms[i],fp); in write_restart() 276 alpha[i] = new double [nterms[i]]; in read_restart() 277 width[i] = new double [nterms[i]]; in read_restart() 278 theta0[i] = new double [nterms[i]]; in read_restart() 306 for (int j = 0; j < nterms[i]; j++) { in write_data() [all …]
|
H A D | dihedral_fourier.cpp | 50 memory->destroy(nterms); in ~DihedralFourier() 152 for (j=0; j<nterms[type]; j++) in compute() 300 nterms[i] = nterms_one; in coeff() 360 k[i] = new double [nterms[i]]; in read_restart() 361 multiplicity[i] = new int [nterms[i]]; in read_restart() 362 shift[i] = new double [nterms[i]]; in read_restart() 363 cos_shift[i] = new double [nterms[i]]; in read_restart() 364 sin_shift[i] = new double [nterms[i]]; in read_restart() 383 for (int j = 0; j < nterms[i]; j++) { in read_restart() 398 fprintf(fp,"%d %d",i,nterms[i]); in write_data() [all …]
|
/dports/math/yices/yices-2.6.2/src/terms/ |
H A D | poly_buffer.h | 59 uint32_t nterms; // number of monomials member 175 poly_buffer_add_monarray(buffer, p->mono, p->nterms); in poly_buffer_add_poly() 179 poly_buffer_sub_monarray(buffer, p->mono, p->nterms); in poly_buffer_sub_poly() 183 poly_buffer_addmul_monarray(buffer, p->mono, p->nterms, a); in poly_buffer_addmul_poly() 187 poly_buffer_submul_monarray(buffer, p->mono, p->nterms, a); in poly_buffer_submul_poly() 277 return buffer->nterms; in poly_buffer_nterms() 289 return buffer->nterms == 0; in poly_buffer_is_zero() 297 return buffer->nterms == 0 || (buffer->nterms == 1 && buffer->mono[0].var == const_idx); in poly_buffer_is_constant() 319 return buffer->nterms == 0 || (buffer->nterms == 1 && buffer->mono[0].var == const_idx && in poly_buffer_is_nonneg_constant() 347 assert(buffer->nterms > 0); in poly_buffer_get_main_coeff() [all …]
|
H A D | poly_buffer.c | 45 buffer->nterms = 0; in init_poly_buffer() 74 n = buffer->nterms; in reset_poly_buffer() 82 buffer->nterms = 0; in reset_poly_buffer() 151 i = buffer->nterms; in poly_buffer_alloc_mono() 156 buffer->nterms = i+1; in poly_buffer_alloc_mono() 416 i = buffer->nterms; in poly_buffer_add_end_marker() 437 n = buffer->nterms; in normalize_poly_buffer() 453 n = buffer->nterms; in normalize_poly_buffer() 469 n = buffer->nterms; in poly_buffer_negate() 485 n = buffer->nterms; in poly_buffer_rescale() [all …]
|
/dports/math/cocoalib/CoCoALib-0.99712/src/AlgebraicCore/TmpFactorDir/multivariate/ |
H A D | DMPZinterp.c | 47 nterms = DMPZ_nterms(ans); in DMPZinterp() 52 M=Qmat_ctor(nterms,nterms); in DMPZinterp() 53 rhs=Qmat_ctor(nterms,1); in DMPZinterp() 54 soln=Qmat_ctor(nterms,1); in DMPZinterp() 56 for (i=0; i < nterms; i++) in DMPZinterp() 61 range = 2*nterms*nterms; /* gives a good prob of non-singularity */ in DMPZinterp() 90 if (nrows < nterms) continue; in DMPZinterp() 99 if (rank == nterms) break; in DMPZinterp() 107 for (i=0; i < nterms; i++) in DMPZinterp() 110 for (i=0; i < nterms; i++) in DMPZinterp() [all …]
|
/dports/math/giacxcas/CoCoALib-0.99700/src/AlgebraicCore/TmpFactorDir/multivariate/ |
H A D | DMPZinterp.c | 47 nterms = DMPZ_nterms(ans); in DMPZinterp() 52 M=Qmat_ctor(nterms,nterms); in DMPZinterp() 53 rhs=Qmat_ctor(nterms,1); in DMPZinterp() 54 soln=Qmat_ctor(nterms,1); in DMPZinterp() 56 for (i=0; i < nterms; i++) in DMPZinterp() 61 range = 2*nterms*nterms; /* gives a good prob of non-singularity */ in DMPZinterp() 90 if (nrows < nterms) continue; in DMPZinterp() 99 if (rank == nterms) break; in DMPZinterp() 107 for (i=0; i < nterms; i++) in DMPZinterp() 110 for (i=0; i < nterms; i++) in DMPZinterp() [all …]
|
/dports/math/py-numpy/numpy-1.20.3/numpy/core/src/common/ |
H A D | mem_overlap.c | 727 terms[*nterms].a = -terms[*nterms].a; in strides_to_terms() 736 ++*nterms; in strides_to_terms() 765 unsigned int nterms; in solve_may_share_memory() local 810 nterms = 0; in solve_may_share_memory() 818 terms[nterms].a = 1; in solve_may_share_memory() 820 ++nterms; in solve_may_share_memory() 823 terms[nterms].a = 1; in solve_may_share_memory() 825 ++nterms; in solve_may_share_memory() 881 nterms = 0; in solve_may_have_internal_overlap() 888 ++nterms; in solve_may_have_internal_overlap() [all …]
|
/dports/astro/py-astropy/astropy-5.0/astropy/timeseries/periodograms/lombscargle/implementations/tests/ |
H A D | test_mle.py | 27 def test_multiterm_design_matrix(t, nterms): argument 30 X = design_matrix(t, freq, dy=dy, bias=True, nterms=nterms) 31 assert X.shape == (t.shape[0], 1 + 2 * nterms) 33 for i in range(1, nterms + 1): 41 def test_exact_mle_fit(nterms, freq, fit_mean): argument 44 theta = -1 + rand.random(2 * nterms + 1) 48 for i in range(1, nterms + 1): 52 y_fit = periodic_fit(t, y, dy=1, frequency=freq, t_fit=t, nterms=nterms,
|
/dports/math/R/R-4.1.2/src/library/stats/R/ |
H A D | manova.R | 51 nterms <- length(uasgn) functionVar 64 df <- nterms <- 0 68 df <- numeric(nterms) 69 ss <- list(nterms) 70 nmrows <- character(nterms) 71 for (i in seq(nterms)) { 80 nterms <- nterms - 1 87 nt <- nterms 89 nt <- nterms + 1 94 eigs <- array(NA, c(nterms, nresp), dimnames = [all …]
|
/dports/math/libRmath/R-4.1.1/src/library/stats/R/ |
H A D | manova.R | 51 nterms <- length(uasgn) functionVar 64 df <- nterms <- 0 68 df <- numeric(nterms) 69 ss <- list(nterms) 70 nmrows <- character(nterms) 71 for (i in seq(nterms)) { 80 nterms <- nterms - 1 87 nt <- nterms 89 nt <- nterms + 1 94 eigs <- array(NA, c(nterms, nresp), dimnames = [all …]
|
/dports/audio/julius/julius-4.1.2/gramtools/nextword/ |
H A D | nextword.c | 78 int *nterms; in can_accept_recursive() local 96 free(nterms); free(nstate); in can_accept_recursive() 109 cnum = next_terms(stateid, nterms, nstate); in can_accept_recursive() 117 free(nterms); free(nstate); in can_accept_recursive() 155 int *nterms, *nstate; in put_nextword() local 165 cnum = next_terms(state, nterms, nstate); in put_nextword() 166 cnum = compaction_int(nterms, cnum); in put_nextword() 169 printf("\t%-16d (", nterms[i]); in put_nextword() 171 printf("\t%16s (", termname[nterms[i]]); in put_nextword() 179 for(j=0;j<dfa->term.wnum[nterms[i]];j++) { in put_nextword() [all …]
|
/dports/science/qmcpack/qmcpack-3.11.0/src/AFQMC/Numerics/detail/CUDA/Kernels/ |
H A D | batched_Tab_to_Klr.cu | 29 __global__ void kernel_batched_Tab_to_Klr(int nterms, in kernel_batched_Tab_to_Klr() argument 44 for (int k = 0; k < nterms; k++) in kernel_batched_Tab_to_Klr() 66 for (int k = 0; k < nterms; k++) in kernel_batched_Tab_to_Klr() 89 __global__ void kernel_batched_Tanb_to_Klr(int nterms, in kernel_batched_Tanb_to_Klr() argument 104 for (int k = 0; k < nterms; k++) in kernel_batched_Tanb_to_Klr() 126 for (int k = 0; k < nterms; k++) in kernel_batched_Tanb_to_Klr() 148 void batched_Tab_to_Klr(int nterms, in batched_Tab_to_Klr() argument 162 …kernel_batched_Tab_to_Klr<<<grid_dim, nthr>>>(nterms, nwalk, nocc, nchol_max, nchol_tot, ncholQ, n… in batched_Tab_to_Klr() 170 void batched_Tab_to_Klr(int nterms, in batched_Tab_to_Klr() argument 192 void batched_Tanb_to_Klr(int nterms, in batched_Tanb_to_Klr() argument [all …]
|
/dports/astro/py-astropy/astropy-5.0/astropy/timeseries/periodograms/lombscargle/implementations/ |
H A D | mle.py | 5 def design_matrix(t, frequency, dy=None, bias=True, nterms=1): argument 37 if nterms == 0 and not bias: 45 for i in range(1, nterms + 1): 57 center_data=True, fit_mean=True, nterms=1): argument 102 X = design_matrix(t, frequency, dy=dy, bias=fit_mean, nterms=nterms) 106 X_fit = design_matrix(t_fit, frequency, bias=fit_mean, nterms=nterms)
|
/dports/astro/p5-Starlink-AST/Starlink-AST-1.05/extsrc/erfa/ |
H A D | epv00.c | 2381 int nterms; in eraEpv00() local 2410 nterms = ne0[i]; in eraEpv00() 2411 for (j = 0; j < nterms; j++) { in eraEpv00() 2422 nterms = ne1[i]; in eraEpv00() 2423 for (j = 0; j < nterms; j++) { in eraEpv00() 2436 nterms = ne2[i]; in eraEpv00() 2437 for (j = 0; j < nterms; j++) { in eraEpv00() 2458 nterms = ns0[i]; in eraEpv00() 2459 for (j = 0; j < nterms; j++) { in eraEpv00() 2470 nterms = ns1[i]; in eraEpv00() [all …]
|