Home
last modified time | relevance | path

Searched refs:nq0 (Results 1 – 25 of 83) sorted by relevance

1234

/dports/benchmarks/hpl/hpl-2.3/src/pgesv/
H A DHPL_pdupdateNN.c109 nq0, nn, test; local
147 mp = PANEL->mp - jb; iroff = PANEL->ii; nq0 = 0;
172 nn = n - nq0; nn = Mmin( nb, nn );
189 Uv1 = vsip_msubview_d( Av0, PANEL->ii, PANEL->jj+nq0, jb, nn );
190 Av1 = vsip_msubview_d( Av0, PANEL->ii+jb, PANEL->jj+nq0, mp, nn );
204 Aptr = Mptr( Aptr, 0, nn, lda ); nq0 += nn;
211 if( ( nn = n - nq0 ) > 0 )
275 nq0 = 0; curr = ( PANEL->grid->myrow == PANEL->prow ? 1 : 0 );
302 nn = n - nq0; nn = Mmin( nb, nn );
352 Aptr = Mptr( Aptr, 0, nn, lda ); nq0 += nn;
[all …]
H A DHPL_pdupdateNT.c109 nq0, nn, test; local
147 mp = PANEL->mp - jb; iroff = PANEL->ii; nq0 = 0;
172 nn = n - nq0; nn = Mmin( nb, nn );
189 Uv1 = vsip_msubview_d( Av0, PANEL->ii, PANEL->jj+nq0, jb, nn );
190 Av1 = vsip_msubview_d( Av0, PANEL->ii+jb, PANEL->jj+nq0, mp, nn );
204 Aptr = Mptr( Aptr, 0, nn, lda ); nq0 += nn;
211 if( ( nn = n - nq0 ) > 0 )
275 nq0 = 0; curr = ( PANEL->grid->myrow == PANEL->prow ? 1 : 0 );
302 nn = n - nq0; nn = Mmin( nb, nn );
353 Aptr = Mptr( Aptr, 0, nn, lda ); nq0 += nn;
[all …]
H A DHPL_pdupdateTT.c109 nq0, nn, test; local
147 mp = PANEL->mp - jb; iroff = PANEL->ii; nq0 = 0;
172 nn = n - nq0; nn = Mmin( nb, nn );
189 Uv1 = vsip_msubview_d( Av0, PANEL->ii, PANEL->jj+nq0, jb, nn );
190 Av1 = vsip_msubview_d( Av0, PANEL->ii+jb, PANEL->jj+nq0, mp, nn );
204 Aptr = Mptr( Aptr, 0, nn, lda ); nq0 += nn;
211 if( ( nn = n - nq0 ) > 0 )
275 nq0 = 0; curr = ( PANEL->grid->myrow == PANEL->prow ? 1 : 0 );
302 nn = n - nq0; nn = Mmin( nb, nn );
353 Aptr = Mptr( Aptr, 0, nn, lda ); nq0 += nn;
[all …]
H A DHPL_pdupdateTN.c109 nq0, nn, test;
147 mp = PANEL->mp - jb; iroff = PANEL->ii; nq0 = 0;
172 nn = n - nq0; nn = Mmin( nb, nn );
189 Uv1 = vsip_msubview_d( Av0, PANEL->ii, PANEL->jj+nq0, jb, nn );
190 Av1 = vsip_msubview_d( Av0, PANEL->ii+jb, PANEL->jj+nq0, mp, nn );
204 Aptr = Mptr( Aptr, 0, nn, lda ); nq0 += nn;
211 if( ( nn = n - nq0 ) > 0 )
275 nq0 = 0; curr = ( PANEL->grid->myrow == PANEL->prow ? 1 : 0 );
302 nn = n - nq0; nn = Mmin( nb, nn );
353 Aptr = Mptr( Aptr, 0, nn, lda ); nq0 += nn;
[all …]
/dports/science/qmcpack/qmcpack-3.11.0/src/AFQMC/Hamiltonians/
H A DKPFactorizedHamiltonian.cpp362 for (int nd = 0, nt = 0, nq0 = 0; nd < ndet; nd++, nq0 += nkpts * nspins) in getHamiltonianOperations_shared() local
372 …std::fill_n(to_address(LQKank[nq0 + Q][K].origin()), LQKank[nq0 + Q][K].num_elements(), SPComplexT… in getHamiltonianOperations_shared()
375 …std::fill_n(to_address(LQKank[nq0 + nkpts + Q][K].origin()), LQKank[nq0 + nkpts + Q][K].num_elemen… in getHamiltonianOperations_shared()
397 for (int nd = 0, nt = 0, nq0 = 0; nd < ndet; nd++, nq0 += number_of_symmetric_Q * nspins) in getHamiltonianOperations_shared() local
405 …std::fill_n(to_address(LQKbnl[nq0 + Q][K].origin()), LQKbnl[nq0 + Q][K].num_elements(), SPComplexT… in getHamiltonianOperations_shared()
479 for (int nd = 0, nq0 = 0; nd < ndet; nd++, nq0 += nkpts * nspins) in getHamiltonianOperations_shared() local
555 for (int nd = 0, nq0 = 0; nd < ndet; nd++, nq0 += number_of_symmetric_Q * nspins) in getHamiltonianOperations_shared() local
1245 for (int nd = 0, nq0 = 0; nd < ndet; nd++, nq0 += nkpts * nspins) in getHamiltonianOperations_batched() local
1326 for (int nd = 0, nq0 = 0; nd < ndet; nd++, nq0 += number_of_symmetric_Q * nspins) in getHamiltonianOperations_batched() local
1364 Sp3Tensor_ref Lbnl(to_address(LQKbnl[nq0 + Qmap[Q] - 1][QK].origin()), in getHamiltonianOperations_batched()
[all …]
H A DKPTHCHamiltonian.cpp836 for (int nd = 0, nt = 0, nq0 = 0; nd < ndet; nd++, nq0 += (nkpts + 1) * nspins) in getHamiltonianOperations() local
844 …std::fill_n(to_address(LQKank[nq0 + Q][K].origin()), LQKank[nq0 + Q][K].num_elements(), SPComplexT… in getHamiltonianOperations()
847 std::fill_n(to_address(LQKank[nq0 + nkpts + 1 + Q][K].origin()), in getHamiltonianOperations()
848 LQKank[nq0 + nkpts + 1 + Q][K].num_elements(), SPComplexType(0.0)); in getHamiltonianOperations()
/dports/science/qmcpack/qmcpack-3.11.0/src/QMCTools/
H A DQPParser.cpp255 int nq0 = atoi(it0->c_str()) - 1; in getGeometry() local
259 core[nq0] = atoi(it->c_str()); in getGeometry()
260 q[nq0] -= core[nq0]; in getGeometry()
262 … std::cout << "1 Found ECP for atom " << nq0 << " with zcore " << core[nq0] << std::endl; in getGeometry()
270 std::cerr << "Atom: " << nq0 << std::endl; in getGeometry()
276 if (nq != nq0 + 1) in getGeometry()
279 std::cerr << "Atom: " << nq0 << std::endl; in getGeometry()
286 std::cerr << "Atom: " << nq0 << std::endl; in getGeometry()
290 core[nq0] = core[nq - 1]; in getGeometry()
291 q[nq0] -= core[nq0]; in getGeometry()
[all …]
H A DGamesAsciiParser.cpp400 int nq0 = atoi(it0->c_str()) - 1; in getGeometry() local
404 core[nq0] = atoi(it->c_str()); in getGeometry()
405 q[nq0] -= core[nq0]; in getGeometry()
406 std::cout << "Found ECP for atom " << nq0 << " with zcore " << core[nq0] << std::endl; in getGeometry()
414 std::cerr << "Atom: " << nq0 << std::endl; in getGeometry()
420 if (nq != nq0 + 1) in getGeometry()
423 std::cerr << "Atom: " << nq0 << std::endl; in getGeometry()
430 std::cerr << "Atom: " << nq0 << std::endl; in getGeometry()
434 core[nq0] = core[nq - 1]; in getGeometry()
435 q[nq0] -= core[nq0]; in getGeometry()
[all …]
/dports/science/qmcpack/qmcpack-3.11.0/src/AFQMC/HamiltonianOperations/
H A DKP3IndexFactorizationIO.hpp321 for (int nd = 0, nt = 0, nq0 = 0; nd < ndet; nd++, nq0 += (nkpts + 1) * nspins) in loadKP3IndexFactorization() local
329 … std::fill_n(std::addressof(*LQKank[nq0 + Q][K].origin()), LQKank[nq0 + Q][K].num_elements(), in loadKP3IndexFactorization()
333 std::fill_n(std::addressof(*LQKank[nq0 + nkpts + 1 + Q][K].origin()), in loadKP3IndexFactorization()
334 LQKank[nq0 + nkpts + 1 + Q][K].num_elements(), SPComplexType(0.0)); in loadKP3IndexFactorization()
342 for (int nd = 0, nt = 0, nq0 = 0; nd < ndet; nd++, nq0 += (nkpts + 1) * nspins) in loadKP3IndexFactorization() local
401 Sp3Tensor_ref Lank(std::addressof(*LQKank[nq0 + Q][K].origin()), {na, nchol, nk}); in loadKP3IndexFactorization()
406 … Sp3Tensor_ref Lank(std::addressof(*LQKank[nq0 + nkpts][K].origin()), {na, nchol, nk}); in loadKP3IndexFactorization()
421 Sp3Tensor_ref Lank(std::addressof(*LQKank[nq0 + Q][K].origin()), {na, nchol, nk}); in loadKP3IndexFactorization()
481 Sp3Tensor_ref Lank(std::addressof(*LQKank[nq0 + Q][K].origin()), {na, nchol, nk}); in loadKP3IndexFactorization()
486 … Sp3Tensor_ref Lank(std::addressof(*LQKank[nq0 + nkpts][K].origin()), {na, nchol, nk}); in loadKP3IndexFactorization()
[all …]
/dports/cad/alliance/alliance/src/cells/src/rflib/
H A Drf_dec_bufad2.vbe5 nq0 : inout BIT;
21 nq0 <= not i0;
22 q0 <= not nq0;
H A Drf_dec_bufad2.ap56 S 500,1000,500,4000,200,nq0,UP,CALU1
/dports/cad/alliance/alliance/src/cells/src/rf2lib/
H A Drf2_dec_bufad2_l.vbe5 nq0 : inout BIT;
21 nq0 <= not i0;
22 q0 <= not nq0;
H A Drf2_dec_bufad2_r.vbe5 nq0 : inout BIT;
21 nq0 <= not i0;
22 q0 <= not nq0;
/dports/graphics/gpxsee/GPXSee-7.32/src/map/
H A Dalbersequal.cpp65 double nq0; in AlbersEqual() local
109 nq0 = _n * q0; in AlbersEqual()
110 _rho0 = (_c < nq0) ? 0 : _a_over_n * sqrt(_c - nq0); in AlbersEqual()
/dports/math/saga/saga-8.1.3/saga-gis/src/tools/projection/pj_geotrans/geotrans/
H A Dalbers.c188 double nq0; in Set_Albers_Parameters() local
271 nq0 = n * q0; in Set_Albers_Parameters()
272 if (C < nq0) in Set_Albers_Parameters()
275 rho0 = Albers_a_OVER_n * sqrt(C - nq0); in Set_Albers_Parameters()
/dports/math/R-cran-gss/gss/R/
H A Dproject.sscden1.R134 theta.wk <- 1:nq0
136 if (nq0-1) theta.wk[-fix] <- theta1
179 nq0 <- length(id.r) functionVar
180 if (nq0>1) {
183 if (nq0-2) {
H A Dproject.sshzd1.R126 if (nq0-1) theta.wk[id.q0] <- theta1
151 nq0 <- length(id.q) functionVar
155 if (nq0-1) {
159 if (nq0-2) {
/dports/science/berkeleygw/BGW-2.0.0/Epsilon/
H A Dinput.f90271 if(pol%nq0>0) qgr%r(1:3,1) = 0d0
296 if (iq<=pol%nq0) then
307 if (iq<=pol%nq0) then
695 if (pol%nq0>0) then
705 pol%nq0, pol%qpt(:,1:pol%nq0), pol%nmtx_of_q(1:pol%nq0), nmtx0, &
734 write(10) ((pol%qpt(ii,iq),ii=1,3),iq=1,pol%nq0)
748 write(12) pol%nq0,((pol%qpt(ii,iq),ii=1,3),iq=1,pol%nq0)
772 pol%nq1, pol%qpt(:,pol%nq0+1:pol%nq), pol%nmtx_of_q(pol%nq0+1:pol%nq), nmtx, &
794 write(11) pol%nq,pol%nq0,((pol%qpt(jj,iq),jj=1,3),iq=1,pol%nq) !??????
808 write(13) pol%nq1, ((pol%qpt(jj,iq),jj=1,3),iq=pol%nq0+1,pol%nq)
[all …]
H A Dinread.f9053 pol%nq0=0
181 pol%nq0 = pol%nq0 + 1
602 pol%nq1 = pol%nq - pol%nq0
603 if (.not.pol%subsample.and.pol%nq0>1) then
658 pol%need_WFNq = (pol%nq0>0.and.pol%valueq0==1.and.pol%iqexactlyzero==0)&
H A Depsilon_main.f90193 if (pol%nq0>0) then
195 if (pol%icutv==TRUNC_NONE .and. any(all(abs(pol%qpt(:,:pol%nq0))<TOL_ZERO,dim=1))) then
290 is_q0 = iq<=pol%nq0
302 if (.not.is_q0) my_iq = iq - pol%nq0
1419 if (pol%nq0>0) call close_file(10) ! chi0mat
1423 if (pol%nq0>0) call close_file(12) ! eps0mat
/dports/math/scalapack/scalapack-2.1.0/SRC/
H A Dpzaxpy.c176 npcol, nq, nq0, nz, ione=1, tmp1, wksz; local
379 nq0 = MYROC0( tmp1, nn, desc_Y[NB_], npcol );
380 tmp1 = nq0 / desc_Y[NB_];
381 wksz = np + MYROC0( tmp1, nq0, desc_Y[NB_], lcmq );
/dports/graphics/ossim/ossim-OrchidIsland-2.11.1/src/projection/
H A DossimAlbersProjection.cpp303 double nq0; in Set_Albers_Parameters() local
386 nq0 = n * q0; in Set_Albers_Parameters()
387 if (C < nq0) in Set_Albers_Parameters()
390 rho0 = Albers_a_OVER_n * sqrt(C - nq0); in Set_Albers_Parameters()
/dports/science/berkeleygw/BGW-2.0.0/BSE/
H A Ddistrib.f9045 integer :: numbl_max,nnp,nn,np0,mq0,nq0,cls,neig,lrwork,lwork,nbr,nbc local
286 nq0 = numroc(nn,scal%nbl,0,0,scal%npcol)
287 lwork = nmat + (np0+nq0+scal%nbl)*scal%nbl
/dports/science/berkeleygw/BGW-2.0.0/Sigma/
H A Dsigma_main.f90335 sig%nq = sig%nq0 + sig%nq1
495 SAFE_ALLOCATE(sig%subweights, (sig%nq0))
498 do irq=1,sig%nq0
560 fact = 1D0/(dble(gr%nf-sig%nq0+1)*crys%celvol)
561 coulfact = 8D0*PI_D/(dble(gr%nf-sig%nq0+1)*crys%celvol)
900 call irrbz(syms,gr%nf,gr%f,nrq,neq,indrq,rq,sig%nq,sig%qpt,itnrq,kg0,nfix=sig%nq0)
924 if (sig%subsample.and.irq<=sig%nq0) then
1025 gr%nf-sig%nq0+1,ncoul,isrtrq,sig%iscreen,vq,sig%q0vec,vcoul, &
1030 fact = 1D0/(dble(gr%nf-sig%nq0+1)*crys%celvol)
1031 coulfact = 8D0*PI_D/(dble(gr%nf-sig%nq0+1)*crys%celvol)
[all …]
H A Dinread.f9089 sig%nq0=0
193 sig%nq0 = sig%nq0 + 1
446 sig%nq1 = sig%nq - sig%nq0

1234