/dports/science/InsightToolkit/ITK-5.0.1/Modules/ThirdParty/VNL/src/vxl/v3p/netlib/temperton/ |
H A D | dgpfa2f.f | 32 ninc = n * inc 80 jstepl = jstep - ninc 91 if (jb.lt.istart) jb = jb + ninc 93 if (jc.lt.istart) jc = jc + ninc 95 if (jd.lt.istart) jd = jd + ninc 129 if (ja.lt.istart) ja = ja + ninc 157 if (jb.lt.istart) jb = jb + ninc 213 jstepl = jstep - ninc 328 jstepl = jstep - ninc 609 jstepl = jstep - ninc [all …]
|
H A D | gpfa2f.f | 32 ninc = n * inc 80 jstepl = jstep - ninc 91 if (jb.lt.istart) jb = jb + ninc 93 if (jc.lt.istart) jc = jc + ninc 95 if (jd.lt.istart) jd = jd + ninc 129 if (ja.lt.istart) ja = ja + ninc 157 if (jb.lt.istart) jb = jb + ninc 213 jstepl = jstep - ninc 328 jstepl = jstep - ninc 609 jstepl = jstep - ninc [all …]
|
H A D | gpfa2f.c | 90 ninc = *n * *inc; in gpfa2f_() 453 jstepl = jstep - ninc; in gpfa2f_() 473 jb += ninc; in gpfa2f_() 514 ja += ninc; in gpfa2f_() 673 jstepl = jstep - ninc; in gpfa2f_() 883 jb += ninc; in gpfa2f_() 889 jc += ninc; in gpfa2f_() 895 jd += ninc; in gpfa2f_() 901 je += ninc; in gpfa2f_() 907 jf += ninc; in gpfa2f_() [all …]
|
H A D | dgpfa2f.c | 91 ninc = *n * *inc; in dgpfa2f_() 454 jstepl = jstep - ninc; in dgpfa2f_() 474 jb += ninc; in dgpfa2f_() 515 ja += ninc; in dgpfa2f_() 674 jstepl = jstep - ninc; in dgpfa2f_() 884 jb += ninc; in dgpfa2f_() 890 jc += ninc; in dgpfa2f_() 896 jd += ninc; in dgpfa2f_() 902 je += ninc; in dgpfa2f_() 908 jf += ninc; in dgpfa2f_() [all …]
|
H A D | gpfa3f.f | 28 ninc = n * inc 63 jstepl = jstep - ninc 74 if (jb.lt.istart) jb = jb + ninc 76 if (jc.lt.istart) jc = jc + ninc 104 if (ja.lt.istart) ja = ja + ninc 130 if (jb.lt.istart) jb = jb + ninc 132 if (jc.lt.istart) jc = jc + ninc 161 if (ja.lt.istart) ja = ja + ninc 178 jstepl = jstep - ninc 179 laincl = la*ink - ninc [all …]
|
H A D | dgpfa3f.f | 28 ninc = n * inc 63 jstepl = jstep - ninc 74 if (jb.lt.istart) jb = jb + ninc 76 if (jc.lt.istart) jc = jc + ninc 104 if (ja.lt.istart) ja = ja + ninc 130 if (jb.lt.istart) jb = jb + ninc 132 if (jc.lt.istart) jc = jc + ninc 161 if (ja.lt.istart) ja = ja + ninc 178 jstepl = jstep - ninc 179 laincl = la*ink - ninc [all …]
|
H A D | dgpfa3f.c | 84 ninc = *n * *inc; in dgpfa3f_() 151 jstepl = jstep - ninc; in dgpfa3f_() 171 jb += ninc; in dgpfa3f_() 177 jc += ninc; in dgpfa3f_() 233 ja += ninc; in dgpfa3f_() 285 jb += ninc; in dgpfa3f_() 291 jc += ninc; in dgpfa3f_() 348 ja += ninc; in dgpfa3f_() 381 jstepl = jstep - ninc; in dgpfa3f_() 383 laincl = la * ink - ninc; in dgpfa3f_() [all …]
|
H A D | gpfa3f.c | 83 ninc = *n * *inc; in gpfa3f_() 150 jstepl = jstep - ninc; in gpfa3f_() 170 jb += ninc; in gpfa3f_() 176 jc += ninc; in gpfa3f_() 232 ja += ninc; in gpfa3f_() 284 jb += ninc; in gpfa3f_() 290 jc += ninc; in gpfa3f_() 347 ja += ninc; in gpfa3f_() 380 jstepl = jstep - ninc; in gpfa3f_() 382 laincl = la * ink - ninc; in gpfa3f_() [all …]
|
/dports/misc/vxl/vxl-3.3.2/v3p/netlib/temperton/ |
H A D | gpfa2f.f | 32 ninc = n * inc 80 jstepl = jstep - ninc 91 if (jb.lt.istart) jb = jb + ninc 93 if (jc.lt.istart) jc = jc + ninc 95 if (jd.lt.istart) jd = jd + ninc 129 if (ja.lt.istart) ja = ja + ninc 157 if (jb.lt.istart) jb = jb + ninc 213 jstepl = jstep - ninc 328 jstepl = jstep - ninc 609 jstepl = jstep - ninc [all …]
|
H A D | dgpfa2f.f | 32 ninc = n * inc 80 jstepl = jstep - ninc 91 if (jb.lt.istart) jb = jb + ninc 93 if (jc.lt.istart) jc = jc + ninc 95 if (jd.lt.istart) jd = jd + ninc 129 if (ja.lt.istart) ja = ja + ninc 157 if (jb.lt.istart) jb = jb + ninc 213 jstepl = jstep - ninc 328 jstepl = jstep - ninc 609 jstepl = jstep - ninc [all …]
|
H A D | dgpfa2f.c | 91 ninc = *n * *inc; in dgpfa2f_() 454 jstepl = jstep - ninc; in dgpfa2f_() 474 jb += ninc; in dgpfa2f_() 515 ja += ninc; in dgpfa2f_() 674 jstepl = jstep - ninc; in dgpfa2f_() 884 jb += ninc; in dgpfa2f_() 890 jc += ninc; in dgpfa2f_() 896 jd += ninc; in dgpfa2f_() 902 je += ninc; in dgpfa2f_() 908 jf += ninc; in dgpfa2f_() [all …]
|
H A D | gpfa2f.c | 90 ninc = *n * *inc; in gpfa2f_() 453 jstepl = jstep - ninc; in gpfa2f_() 473 jb += ninc; in gpfa2f_() 514 ja += ninc; in gpfa2f_() 673 jstepl = jstep - ninc; in gpfa2f_() 883 jb += ninc; in gpfa2f_() 889 jc += ninc; in gpfa2f_() 895 jd += ninc; in gpfa2f_() 901 je += ninc; in gpfa2f_() 907 jf += ninc; in gpfa2f_() [all …]
|
H A D | dgpfa3f.f | 28 ninc = n * inc 63 jstepl = jstep - ninc 74 if (jb.lt.istart) jb = jb + ninc 76 if (jc.lt.istart) jc = jc + ninc 104 if (ja.lt.istart) ja = ja + ninc 130 if (jb.lt.istart) jb = jb + ninc 132 if (jc.lt.istart) jc = jc + ninc 161 if (ja.lt.istart) ja = ja + ninc 178 jstepl = jstep - ninc 179 laincl = la*ink - ninc [all …]
|
H A D | gpfa3f.f | 28 ninc = n * inc 63 jstepl = jstep - ninc 74 if (jb.lt.istart) jb = jb + ninc 76 if (jc.lt.istart) jc = jc + ninc 104 if (ja.lt.istart) ja = ja + ninc 130 if (jb.lt.istart) jb = jb + ninc 132 if (jc.lt.istart) jc = jc + ninc 161 if (ja.lt.istart) ja = ja + ninc 178 jstepl = jstep - ninc 179 laincl = la*ink - ninc [all …]
|
H A D | gpfa3f.c | 83 ninc = *n * *inc; in gpfa3f_() 150 jstepl = jstep - ninc; in gpfa3f_() 170 jb += ninc; in gpfa3f_() 176 jc += ninc; in gpfa3f_() 232 ja += ninc; in gpfa3f_() 284 jb += ninc; in gpfa3f_() 290 jc += ninc; in gpfa3f_() 347 ja += ninc; in gpfa3f_() 380 jstepl = jstep - ninc; in gpfa3f_() 382 laincl = la * ink - ninc; in gpfa3f_() [all …]
|
H A D | dgpfa3f.c | 84 ninc = *n * *inc; in dgpfa3f_() 151 jstepl = jstep - ninc; in dgpfa3f_() 171 jb += ninc; in dgpfa3f_() 177 jc += ninc; in dgpfa3f_() 233 ja += ninc; in dgpfa3f_() 285 jb += ninc; in dgpfa3f_() 291 jc += ninc; in dgpfa3f_() 348 ja += ninc; in dgpfa3f_() 381 jstepl = jstep - ninc; in dgpfa3f_() 383 laincl = la * ink - ninc; in dgpfa3f_() [all …]
|
/dports/misc/libemos/libemos-4.5.9-Source/fft/ |
H A D | gpfa3.f | 33 ninc = n * inc 68 jstepl = jstep - ninc 79 if (jb.lt.istart) jb = jb + ninc 81 if (jc.lt.istart) jc = jc + ninc 103 if (ja.lt.istart) ja = ja + ninc 129 if (jb.lt.istart) jb = jb + ninc 131 if (jc.lt.istart) jc = jc + ninc 154 if (ja.lt.istart) ja = ja + ninc 171 jstepl = jstep - ninc 172 laincl = la*ink - ninc [all …]
|
/dports/science/siesta/siesta-4.1.5/Src/ |
H A D | m_fft_gpfa.F | 490 ninc = n * inc 538 jstepl = jstep - ninc 675 jstepl = jstep - ninc 796 jstepl = jstep - ninc 1083 jstepl = jstep - ninc 1496 ninc = n * inc 1531 jstepl = jstep - ninc 1650 jstepl = jstep - ninc 1946 ninc = n * inc 1990 jstepl = jstep - ninc [all …]
|
H A D | fft1d.F | 257 ninc = n * inc 305 jstepl = jstep - ninc 442 jstepl = jstep - ninc 563 jstepl = jstep - ninc 850 jstepl = jstep - ninc 1263 ninc = n * inc 1298 jstepl = jstep - ninc 1417 jstepl = jstep - ninc 1714 ninc = n * inc 1758 jstepl = jstep - ninc [all …]
|
/dports/science/py-netCDF4/netcdf4-python-1.5.7rel/test/ |
H A D | tst_multifile2.py | 12 ninc = nx/nfiles variable 26 f.createDimension('x',ninc) 35 nx1 = int(nfile*ninc); nx2 = int(ninc*(nfile+1)) 37 x[:] = np.arange(nfile*ninc,ninc*(nfile+1)) 70 ninc = 365 variable in NonuniformTimeTestCase 91 nx1 = self.ninc*nfile; 92 nx2 = self.ninc*(nfile+1) 94 time[:] = np.arange(self.ninc) 95 x[:] = np.arange(nx1, nx2).reshape(self.ninc,1,1) * np.ones((1, ydim, zdim))
|
H A D | tst_multifile.py | 12 ninc = nx/nfiles variable 34 nx1 = int(nfile*ninc); nx2 = int(ninc*(nfile+1)) 36 x[:] = np.arange(nfile*ninc,ninc*(nfile+1)) 80 ninc = 365 variable in NonuniformTimeTestCase 103 nx1 = self.ninc*nfile; 104 nx2 = self.ninc*(nfile+1) 106 time[:] = np.arange(self.ninc) 107 x[:] = np.arange(nx1, nx2).reshape(self.ninc,1,1) * np.ones((1, ydim, zdim))
|
/dports/science/bagel/bagel-1.2.2/src/molecule/ |
H A D | moment_compute.cc | 39 const int ninc = norig + angular_number + 2; in mblock() local 44 mcart[i] = make_shared<Matrix>(ninc, norig, true); in mblock() 100 const int ninc = norig + angular_number + 2; in mblock() local 106 mcart[i] = make_shared<ZMatrix>(ninc, norig, true); in mblock() 191 const int ninc = ncart + (angular_number + 2); in call() local 193 const int n = ninc + ndec; in call() 205 tmp[i]->copy_block(j*ninc, j*norig, ninc, norig, thisblock[i]); in call() 207 tmp[i]->copy_block(ninc*shell.num_primitive()+j*ndec, j*norig, ndec, norig, thisblock[3+i]); in call() 230 const int ninc = ncart + (angular_number + 2); in call() local 234 const int n = ninc + ndec + nsame; in call() [all …]
|
/dports/devel/py-pyopencl/pyopencl-2018.2/pyopencl/ |
H A D | bitonic_sort.py | 215 ninc = 0 217 if allowb16 and inc >= 8 and ninc == 0: 219 ninc = 4 220 elif allowb8 and inc >= 4 and ninc == 0: 222 ninc = 3 223 elif allowb4 and inc >= 2 and ninc == 0: 225 ninc = 2 228 ninc = 1 230 nthreads = size >> ninc 235 inc >>= ninc
|
/dports/cad/calculix-ccx/CalculiX/ccx_2.18/src/ |
H A D | ident2.f | 26 subroutine ident2(x,px,n,ninc,id) argument 29 integer n,id,n2,m,ninc local 31 real*8 x(n*ninc),px 40 if(px.ge.x(1+ninc*(m-1))) then
|
/dports/devel/plan9port/plan9port-1f098efb7370a0b28306d10681e21883fb1c1507/src/libmach/ |
H A D | symstabs.c | 127 int ninc, minc; in stabssyminit() local 140 ninc = 0; in stabssyminit() 159 if(ninc >= minc){ in stabssyminit() 160 xinc = realloc(inc, (ninc+32)*sizeof(inc[0])); in stabssyminit() 162 memset(xinc+ninc, 0, 32*sizeof(inc[0])); in stabssyminit() 165 ninc += 32; in stabssyminit() 167 if(ninc < minc) in stabssyminit() 168 inc[ninc] = sym.name; in stabssyminit() 169 ninc++; in stabssyminit() 172 if(ninc > 0) in stabssyminit() [all …]
|