/dports/science/cdcl/dcl-5.4.8-C/src/grph2/ulpack/ |
H A D | ulylbl.c | 49 *nbl = nybl[*inum - 1]; in ulylbl_0_() 54 nybl[3] = *nbl; in ulylbl_0_() 55 i__1 = *nbl; in ulylbl_0_() 60 ybl[*nbl + 30] = 10.f; in ulylbl_0_() 65 *nbl = nybl[3]; in ulylbl_0_() 66 i__1 = *nbl; in ulylbl_0_() 76 return ulylbl_0_(0, bl, nbl, inum); in ulylbl_() 79 /* Subroutine */ int ulsybl_(real *bl, integer *nbl) in ulsybl_() argument 81 return ulylbl_0_(1, bl, nbl, (integer *)0); in ulsybl_() 84 /* Subroutine */ int ulqybl_(real *bl, integer *nbl) in ulqybl_() argument [all …]
|
H A D | ulxlbl.c | 49 *nbl = nxbl[*inum - 1]; in ulxlbl_0_() 54 nxbl[3] = *nbl; in ulxlbl_0_() 55 i__1 = *nbl; in ulxlbl_0_() 60 xbl[*nbl + 30] = 10.f; in ulxlbl_0_() 65 *nbl = nxbl[3]; in ulxlbl_0_() 66 i__1 = *nbl; in ulxlbl_0_() 76 return ulxlbl_0_(0, bl, nbl, inum); in ulxlbl_() 79 /* Subroutine */ int ulsxbl_(real *bl, integer *nbl) in ulsxbl_() argument 81 return ulxlbl_0_(1, bl, nbl, (integer *)0); in ulsxbl_() 84 /* Subroutine */ int ulqxbl_(real *bl, integer *nbl) in ulqxbl_() argument [all …]
|
H A D | ulylog.c | 54 static integer nbl; in ulylog_() local 181 nbl = 0; in ulylog_() 198 ++nbl; in ulylog_() 199 if (nbl > 50) { in ulylog_() 209 ici__1.iciunit = ch + (nbl - 1 << 4); in ulylog_() 220 ici__1.iciunit = ch + (nbl - 1 << 4); in ulylog_() 255 cladj_(ch + (nbl - 1 << 4), (ftnlen)16); in ulylog_() 262 ici__1.iciunit = ch + (nbl - 1 << 4); in ulylog_() 270 r__2 = (r__1 = uy2[nbl - 1], abs(r__1)); in ulylog_() 273 cladj_(ch + (nbl - 1 << 4), (ftnlen)16); in ulylog_() [all …]
|
H A D | ulxlog.c | 54 static integer nbl; in ulxlog_() local 179 nbl = 0; in ulxlog_() 196 ++nbl; in ulxlog_() 197 if (nbl > 50) { in ulxlog_() 207 ici__1.iciunit = ch + (nbl - 1 << 4); in ulxlog_() 218 ici__1.iciunit = ch + (nbl - 1 << 4); in ulxlog_() 253 cladj_(ch + (nbl - 1 << 4), (ftnlen)16); in ulxlog_() 260 ici__1.iciunit = ch + (nbl - 1 << 4); in ulxlog_() 268 r__2 = (r__1 = ux2[nbl - 1], abs(r__1)); in ulxlog_() 271 cladj_(ch + (nbl - 1 << 4), (ftnlen)16); in ulxlog_() [all …]
|
/dports/science/gromacs/gromacs-2021.4/src/gromacs/nbnxm/ |
H A D | pairlist.cpp | 799 nbl.nci_tot, nbl.excl.size()); in print_nblist_statistics() 870 return nbl->excl[nbl->cj4[cj4].imei[warp].excl_ind]; in get_exclusion_mask() 1076 nbl->ci.back().cj_ind_end = nbl->cj.size(); in makeClusterListSimple() 1213 nbl->cj4.resize(nbl->cj4.size() + 1); in make_cluster_list_supersub() 2160 nbl->sci[nbl->sci.size() - 2].cj4_ind_end--; in split_sci_entry() 2161 nbl->sci[nbl->sci.size() - 1].cj4_ind_start--; in split_sci_entry() 2747 srenew(nbl->jjnr, nbl->maxnrj); in balance_fep_lists() 2748 srenew(nbl->excl_fep, nbl->maxnrj); in balance_fep_lists() 3026 nbl->ncjInUse += nbl->cj.size(); in incrementNumSimpleJClustersInList() 3136 const real rlist2 = nbl->rlist * nbl->rlist; in nbnxn_make_pairlist_part() [all …]
|
/dports/science/cp2k/cp2k-2e995eec7fd208c8a72d9544807bd8b8ba8cd1cc/src/aobasis/ |
H A D | ai_contraction.F | 121 nbl = nb 123 nbl = SIZE(cb, 1) 141 work(1:nal, 1:mbl) = MATMUL(sab(1:nal, 1:nbl), cb(1:nbl, 1:mbl)) 152 nbl = nb 154 nbl = SIZE(sab, 2) 158 qab(1:nbl, 1:mal) = fs*MATMUL(TRANSPOSE(sab(1:nal, 1:nbl)), ca(1:nal, 1:mal)) 161 qab(1:mal, 1:nbl) = fs*MATMUL(TRANSPOSE(ca(1:nal, 1:mal)), sab(1:nal, 1:nbl)) 171 qab(1:nal, 1:mbl) = fs*MATMUL(sab(1:nal, 1:nbl), cb(1:nbl, 1:mbl)) 238 nbl = nb 240 nbl = SIZE(cb, 1) [all …]
|
/dports/science/gromacs/gromacs-2021.4/src/gromacs/nbnxm/kernels_reference/ |
H A D | kernel_ref_prune.cpp | 45 void nbnxn_kernel_prune_ref(NbnxnPairlistCpu* nbl, in nbnxn_kernel_prune_ref() argument 51 nbl->ci.resize(nbl->ciOuter.size()); in nbnxn_kernel_prune_ref() 52 nbl->cj.resize(nbl->cjOuter.size()); in nbnxn_kernel_prune_ref() 54 const nbnxn_ci_t* gmx_restrict ciOuter = nbl->ciOuter.data(); in nbnxn_kernel_prune_ref() 55 nbnxn_ci_t* gmx_restrict ciInner = nbl->ci.data(); in nbnxn_kernel_prune_ref() 57 const nbnxn_cj_t* gmx_restrict cjOuter = nbl->cjOuter.data(); in nbnxn_kernel_prune_ref() 58 nbnxn_cj_t* gmx_restrict cjInner = nbl->cj.data(); in nbnxn_kernel_prune_ref() 76 const int nciOuter = nbl->ciOuter.size(); in nbnxn_kernel_prune_ref() 141 nbl->ci.resize(nciInner); in nbnxn_kernel_prune_ref() 142 nbl->cj.resize(ncjInner); in nbnxn_kernel_prune_ref()
|
H A D | kernel_gpu_ref.cpp | 103 if (nbl->na_ci != c_clSize) in nbnxn_kernel_gpu_ref() 108 nbl->na_ci, c_clSize); in nbnxn_kernel_gpu_ref() 128 rlist2 = nbl->rlist * nbl->rlist; in nbnxn_kernel_gpu_ref() 142 for (const nbnxn_sci_t& nbln : nbl->sci) in nbnxn_kernel_gpu_ref() 182 excl[0] = &nbl->excl[nbl->cj4[cj4_ind].imei[0].excl_ind]; in nbnxn_kernel_gpu_ref() 183 excl[1] = &nbl->excl[nbl->cj4[cj4_ind].imei[1].excl_ind]; in nbnxn_kernel_gpu_ref() 187 cj = nbl->cj4[cj4_ind].cj[jm]; in nbnxn_kernel_gpu_ref() 370 nbl->na_ci, nbl->na_ci, nhwu, nhwu_pruned, nhwu_pruned / static_cast<double>(nhwu)); in nbnxn_kernel_gpu_ref() 372 nhwu * nbl->na_ci / 2 * nbl->na_ci); in nbnxn_kernel_gpu_ref() 374 nhwu_pruned * nbl->na_ci / 2 * nbl->na_ci); in nbnxn_kernel_gpu_ref() [all …]
|
/dports/math/freefem++/FreeFem-sources-4.6/3rdparty/yams/ |
H A D | freeyams.2012.02.05.patch | 69 nn = nbl = 0; 80 ++nbl; 90 ++nbl; 98 ++nbl; 113 ++nbl; 123 ++nbl; 148 ++nbl; 158 ++nbl; 166 ++nbl; 181 ++nbl; [all …]
|
/dports/math/xlife++/xlifepp-sources-v2.0.1-2018-05-09/tests/sys/ |
H A D | sys_OpenMP.cpp | 44 theCout<<comment<<" number of loop = "<<nbl<<eol; in test_multOpenMP() 51 for(int i = 0; i < nbl; ++i) {multMatrixVector(A, X, B);} in test_multOpenMP() 53 theCout << nbl << " Matrix * Vector, nb threads = "<<t; in test_multOpenMP() 83 for(int i = 0; i < nbl; ++i) in test_multOpenMP() 100 theCout << nbl <<" Solve AY=B, nb threads = "<<t; in test_multOpenMP() 119 Number nbl=4000; in sys_OpenMP() local 127 test_multOpenMP(A1, X, B, nbl, 3,"matrice dual skyline 782x782"); in sys_OpenMP() 130 nbl=100; in sys_OpenMP() 140 nbl=20; in sys_OpenMP() 150 nbl=20; in sys_OpenMP() [all …]
|
/dports/science/gromacs/gromacs-2021.4/src/gromacs/nbnxm/kernels_simd_2xmm/ |
H A D | kernel_prune.cpp | 51 void nbnxn_kernel_prune_2xnn(NbnxnPairlistCpu* nbl, in nbnxn_kernel_prune_2xnn() argument 60 nbl->ci.resize(nbl->ciOuter.size()); in nbnxn_kernel_prune_2xnn() 61 nbl->cj.resize(nbl->cjOuter.size()); in nbnxn_kernel_prune_2xnn() 63 const nbnxn_ci_t* gmx_restrict ciOuter = nbl->ciOuter.data(); in nbnxn_kernel_prune_2xnn() 64 nbnxn_ci_t* gmx_restrict ciInner = nbl->ci.data(); in nbnxn_kernel_prune_2xnn() 66 const nbnxn_cj_t* gmx_restrict cjOuter = nbl->cjOuter.data(); in nbnxn_kernel_prune_2xnn() 67 nbnxn_cj_t* gmx_restrict cjInner = nbl->cj.data(); in nbnxn_kernel_prune_2xnn() 77 const int nciOuter = nbl->ciOuter.size(); in nbnxn_kernel_prune_2xnn() 165 nbl->ci.resize(nciInner); in nbnxn_kernel_prune_2xnn() 166 nbl->cj.resize(ncjInner); in nbnxn_kernel_prune_2xnn() [all …]
|
/dports/devel/plan9port/plan9port-1f098efb7370a0b28306d10681e21883fb1c1507/src/cmd/tbl/ |
H A D | te.c | 17 int nbl; in gets1() local 27 nbl = Blinelen(tabin)-1; in gets1() 28 if(nbl >= size) in gets1() 30 p[nbl] = 0; in gets1() 32 s += nbl; in gets1() 33 for (nbl = 0; *s == '\\' && s > ns; s--) in gets1() 34 nbl++; in gets1() 35 if (linstart && nbl % 2) /* fold escaped nl if in table */ in gets1()
|
/dports/science/quantum-espresso/q-e-qe-6.7.0/CPV/src/ |
H A D | wave_types.f90 | 36 INTEGER :: nbl( 2 ) ! local number of bands component 67 SUBROUTINE wave_descriptor_init( desc, ngwl, ngwt, nbl, nbt, nkl, nkt, & argument 75 INTEGER, INTENT(IN) :: nbl( : ) local 110 desc % nbl = 0 112 IF( nbl( is ) <= 0 ) THEN 113 desc % nbl( is ) = nbt( is ) 114 ELSE IF( nbl( is ) > nbt( is ) ) THEN 117 desc % nbl( is ) = nbl( is ) 155 desc % ldb = MAX( 1, MAXVAL( desc % nbl ) ) 172 desc%ngwl, desc%ngwt, desc%nbl, desc%nbt, desc%nkl, desc%nkt, &
|
/dports/science/medit/medit-2012.02.05_5/sources/ |
H A D | inmesh.c.old | 104 for (k=0; k<nbl; k++) { 123 for (k=0; k<nbl; k++) { 147 for (k=0; k<nbl; k++) { 176 for(k=0; k<nbl; k++) { 201 for(k=0; k<nbl; k++) { 228 for(k=0; k<nbl; k++) { 245 for(k=0; k<nbl; k++) { 262 for(k=0; k<nbl; k++) { 286 for(k=0; k<nbl; k++) { 302 for(k=0; k<nbl; k++) { [all …]
|
/dports/science/cp2k-data/cp2k-7.1.0/src/aobasis/ |
H A D | ai_contraction.F | 121 nbl = nb 123 nbl = SIZE(cb, 1) 149 nbl = nb 151 nbl = SIZE(sab, 2) 231 nbl = nb 233 nbl = SIZE(cb, 1) 258 ALLOCATE (work1(nal, nbl, ncl)) 260 work1(1:nal, 1:nbl, 1:ncl) = sabc(1:nal, 1:nbl, 1:ncl) 262 ALLOCATE (work2(nbl, ncl, mal)) 263 …CALL dgemm("T", "N", nbl*ncl, mal, nal, 1.0_dp, work1(1, 1, 1), nal, ca(1, 1), lda, 0.0_dp, work2(… [all …]
|
/dports/science/gromacs/gromacs-2021.4/src/gromacs/nbnxm/kernels_simd_4xm/ |
H A D | kernel_prune.cpp | 51 void nbnxn_kernel_prune_4xn(NbnxnPairlistCpu* nbl, in nbnxn_kernel_prune_4xn() argument 60 nbl->ci.resize(nbl->ciOuter.size()); in nbnxn_kernel_prune_4xn() 61 nbl->cj.resize(nbl->cjOuter.size()); in nbnxn_kernel_prune_4xn() 63 const nbnxn_ci_t* gmx_restrict ciOuter = nbl->ciOuter.data(); in nbnxn_kernel_prune_4xn() 64 nbnxn_ci_t* gmx_restrict ciInner = nbl->ci.data(); in nbnxn_kernel_prune_4xn() 66 const nbnxn_cj_t* gmx_restrict cjOuter = nbl->cjOuter.data(); in nbnxn_kernel_prune_4xn() 67 nbnxn_cj_t* gmx_restrict cjInner = nbl->cj.data(); in nbnxn_kernel_prune_4xn() 77 const int nciOuter = nbl->ciOuter.size(); in nbnxn_kernel_prune_4xn() 183 nbl->ci.resize(nciInner); in nbnxn_kernel_prune_4xn() 184 nbl->cj.resize(ncjInner); in nbnxn_kernel_prune_4xn() [all …]
|
/dports/security/softether/v4.38-9760/src/Neo6/ |
H A D | Neo6.c | 224 NET_BUFFER *nb = NET_BUFFER_LIST_FIRST_NB(nbl); in NeoWrite() 226 nbl->SourceHandle = ctx->NdisMiniport; in NeoWrite() 228 NET_BUFFER_LIST_NEXT_NBL(nbl) = NULL; in NeoWrite() 257 nbl_chain = nbl; in NeoWrite() 262 NET_BUFFER_LIST_NEXT_NBL(nbl_tail) = nbl; in NeoWrite() 265 nbl_tail = nbl; in NeoWrite() 271 nbl->Status = NDIS_STATUS_RESOURCES; in NeoWrite() 301 NET_BUFFER_LIST *nbl = nbl_chain; in NeoWrite() local 303 while (nbl != NULL) in NeoWrite() 305 NET_BUFFER *nb = NET_BUFFER_LIST_FIRST_NB(nbl); in NeoWrite() [all …]
|
/dports/security/softether5/SoftEtherVPN-5.02.5180/src/Neo6/ |
H A D | Neo6.c | 127 NET_BUFFER *nb = NET_BUFFER_LIST_FIRST_NB(nbl); in NeoWrite() 129 nbl->SourceHandle = ctx->NdisMiniport; in NeoWrite() 131 NET_BUFFER_LIST_NEXT_NBL(nbl) = NULL; in NeoWrite() 160 nbl_chain = nbl; in NeoWrite() 165 NET_BUFFER_LIST_NEXT_NBL(nbl_tail) = nbl; in NeoWrite() 168 nbl_tail = nbl; in NeoWrite() 174 nbl->Status = NDIS_STATUS_RESOURCES; in NeoWrite() 204 NET_BUFFER_LIST *nbl = nbl_chain; in NeoWrite() local 206 while (nbl != NULL) in NeoWrite() 208 NET_BUFFER *nb = NET_BUFFER_LIST_FIRST_NB(nbl); in NeoWrite() [all …]
|
/dports/security/softether-devel/v4.36-9754/src/Neo6/ |
H A D | Neo6.c | 224 NET_BUFFER *nb = NET_BUFFER_LIST_FIRST_NB(nbl); in NeoWrite() 226 nbl->SourceHandle = ctx->NdisMiniport; in NeoWrite() 228 NET_BUFFER_LIST_NEXT_NBL(nbl) = NULL; in NeoWrite() 257 nbl_chain = nbl; in NeoWrite() 262 NET_BUFFER_LIST_NEXT_NBL(nbl_tail) = nbl; in NeoWrite() 265 nbl_tail = nbl; in NeoWrite() 271 nbl->Status = NDIS_STATUS_RESOURCES; in NeoWrite() 301 NET_BUFFER_LIST *nbl = nbl_chain; in NeoWrite() local 303 while (nbl != NULL) in NeoWrite() 305 NET_BUFFER *nb = NET_BUFFER_LIST_FIRST_NB(nbl); in NeoWrite() [all …]
|
/dports/science/berkeleygw/BGW-2.0.0/BSE/ |
H A D | distrib.f90 | 272 nbc = nmat/(scal%nbl*scal%npcol) 273 if(mod(nmat,(scal%nbl*scal%npcol)).gt.scal%nbl*scal%npcol) nbc=nbc+1 274 nbr = nmat/(scal%nbl*scal%nprow) 275 if(mod(nmat,(scal%nbl*scal%nprow)).gt.scal%nbl*scal%nprow) nbr=nbr+1 280 nn = max(nmat,scal%nbl,2) 282 np0 = numroc(nn,scal%nbl,0,0,scal%nprow) 283 mq0 = numroc(max(neig,scal%nbl,2),scal%nbl,0,0,scal%npcol) 286 nq0 = numroc(nn,scal%nbl,0,0,scal%npcol) 287 lwork = nmat + (np0+nq0+scal%nbl)*scal%nbl 293 lwork=5*nmat+max(5*nn,np0*mq0+2*scal%nbl*scal%nbl)+ & [all …]
|
/dports/math/libflame/libflame-5.2.0/src/base/alt/octave/ |
H A D | FLA_Repart_2x2_to_3x3.m | 28 [ mbl, nbl ] = size( ABL ); 37 elseif( ntl ~= nbl ) 71 A00 = ATL( :, 1:nbl-bn ); 72 A01 = ATL( :, nbl-bn+1:nbl ); 74 A10 = ABL( 1:bm, 1:nbl-bn ); 75 A11 = ABL( 1:bm, nbl-bn+1:nbl ); 77 A20 = ABL( bm+1:mbl, 1:nbl-bn ); 78 A21 = ABL( bm+1:mbl, nbl-bn+1:nbl );
|
/dports/math/libflame/libflame-5.2.0/src/base/old/octave/ |
H A D | FLA_Repart_2x2_to_3x3.m | 28 [ mbl, nbl ] = size( ABL ); 37 elseif( ntl ~= nbl ) 71 A00 = ATL( :, 1:nbl-bn ); 72 A01 = ATL( :, nbl-bn+1:nbl ); 74 A10 = ABL( 1:bm, 1:nbl-bn ); 75 A11 = ABL( 1:bm, nbl-bn+1:nbl ); 77 A20 = ABL( bm+1:mbl, 1:nbl-bn ); 78 A21 = ABL( bm+1:mbl, nbl-bn+1:nbl );
|
/dports/science/berkeleygw/BGW-2.0.0/Common/ |
H A D | write_matrix.f90 | 834 count(2) = scal%npr/scal%nbl 835 count(3) = scal%npc/scal%nbl 841 block(2) = scal%nbl 842 block(3) = scal%nbl 1018 count(2) = scal%npr/scal%nbl 1019 count(3) = scal%npc/scal%nbl 1025 block(2) = scal%nbl 1026 block(3) = scal%nbl 1206 count(2) = scal%npr/scal%nbl 1217 block(2) = scal%nbl [all …]
|
/dports/astro/stellarium/stellarium-0.21.3/plugins/Scenery3d/src/ |
H A D | Frustum.cpp | 86 Vec3d nbl = nc - Z * nh - X * nw; in calcFrustum() local 96 corners[NBL] = nbl.toVec3f(); in calcFrustum() 178 Vec3f nbl = drawCorners[NBL]; in drawFrustum() local 191 glExtFuncs->glVertex3f(nbl.v[0],nbl.v[1],nbl.v[2]); in drawFrustum() 204 glExtFuncs->glVertex3f(nbl.v[0],nbl.v[1],nbl.v[2]); in drawFrustum() 221 glExtFuncs->glVertex3f(nbl.v[0],nbl.v[1],nbl.v[2]); in drawFrustum() 237 a = (ntr + ntl + nbr + nbl) * 0.25; in drawFrustum() 249 a = (ftl + fbl + nbl + ntl) * 0.25; in drawFrustum() 267 a = (fbr + fbl + nbr + nbl) * 0.25; in drawFrustum()
|
/dports/devel/9base/9base-6/sam/ |
H A D | buff.c | 22 if(i > b->nbl) in addblock() 25 b->bl = realloc(b->bl, (b->nbl+1)*sizeof b->bl[0]); in addblock() 26 if(i < b->nbl) in addblock() 29 b->nbl++; in addblock() 37 if(i >= b->nbl) in delblock() 41 b->nbl--; in delblock() 42 if(i < b->nbl) in delblock() 44 b->bl = realloc(b->bl, b->nbl*sizeof b->bl[0]); in delblock() 98 if(i >= b->nbl) in setcache() 288 for(i=b->nbl-1; --i>=0; ) in bufreset() [all …]
|