/dports/sysutils/tracker/tracker-2.3.4/src/ontologies/nepomuk/ |
H A D | 36-scal.ontology | 84 scal:attendance-accepted a scal:AttendanceStatus . 104 scal:attendee-role-chair a scal:AttendeeRole . 130 scal:rsvp-value-true a scal:RSVPValues . 131 scal:rsvp-value-false a scal:RSVPValues . 165 scal:cutype-group a scal:CalendarUserType . 166 scal:cutype-room a scal:CalendarUserType . 167 scal:cutype-resource a scal:CalendarUserType . 168 scal:cutype-unknown a scal:CalendarUserType . 241 scal:todo-status-completed a scal:TodoStatus . 243 scal:todo-status-cancelled a scal:TodoStatus . [all …]
|
/dports/science/berkeleygw/BGW-2.0.0/Epsilon/ |
H A D | epsinv.f90 | 92 SAFE_ALLOCATE(eps, (scal%npr,scal%npc)) 102 SAFE_ALLOCATE(eps1Aux, (scal%npr,scal%npc)) 270 SAFE_ALLOCATE(epsTemplate,(scal%npr,scal%npc)) 378 SAFE_ALLOCATE(wcoul_r, (scal%npr,scal%npc)) 381 scal%icntxt, max(1,scal%npr), info) 388 jj_g = indxl2g(jj, scal%nbl, scal%mypcol, 0, scal%npcol) 434 igp_g = indxl2g(igp_l, scal%nbl, scal%mypcol, 0, scal%npcol) 437 ig_g = indxl2g(ig_l, scal%nbl, scal%myprow, 0, scal%nprow) 821 scal_aux%npc = numroc(neig_sub, scal%nbl, scal%mypcol, 0, scal%npcol) 1027 scal%icntxt, max(1,scal%npr), info) [all …]
|
H A D | epsilon_main.f90 | 432 scal%nprd = 0 455 scal%nprd = scal%npr 456 scal%npcd = scal%npc 464 dnpcr = scal%npc*1D0*scal%npr 486 SAFE_ALLOCATE(scal%isrtxcol, (scal%npc)) 487 SAFE_ALLOCATE(scal%isrtxrow, (scal%npr)) 488 SAFE_ALLOCATE(scal%imycol, (scal%npc)) 489 SAFE_ALLOCATE(scal%imyrow, (scal%npr)) 506 ig_g = indxl2g(ig_l, scal%nbl, scal%myprow, 0, scal%nprow) 513 ig_g = indxl2g(ig_l, scal%nbl, scal%mypcol, 0, scal%npcol) [all …]
|
H A D | chi_summation.f90 | 2542 igp_g = indxl2g(igp_l, scal%nbl, scal%mypcol, 0, scal%npcol) 2545 ig_g = indxl2g(ig_l, scal%nbl, scal%myprow, 0, scal%nprow) 2786 nbc = nmtx/(scal%nbl * scal%npcol) + 1 2787 nbr = nmtx/(scal%nbl * scal%nprow) + 1 2792 mq0 = numroc(MAX(neig_sub,scal%nbl,2), scal%nbl, 0, 0, scal%npcol) 3076 j = INDXL2G (icolm, scal%nbl, scal%mypcol, 0, scal%npcol) 3113 i = INDXL2G (irowm, scal%nbl, scal%myprow, 0, scal%nprow) 3143 irowm = INDXG2L(i, scal%nbl, scal%myprow, 0, scal%nprow) 3146 j = INDXL2G (icolm, scal%nbl, scal%mypcol, 0, scal%npcol) 3224 irowm = INDXG2L(i, scal%nbl, scal%myprow, 0, scal%nprow) [all …]
|
H A D | mtxelmultiply.f90 | 41 type (scalapack), intent(in) :: scal local 68 SAFE_ALLOCATE(tmprowindex,(scal%nprd(ipe))) 69 SAFE_ALLOCATE(tmpcolindex,(scal%npcd(ipe))) 70 SAFE_ALLOCATE(tmprowph,(scal%nprd(ipe))) 71 SAFE_ALLOCATE(tmpcolph,(scal%npcd(ipe))) 76 do icurr=1,scal%nprd(ipe) 80 do icurr=1,scal%npcd(ipe) 94 do icurr=1,scal%nprd(ipe) 101 do icurr=1,scal%npcd(ipe) 122 call X(gemm)('n','t',scal%nprd(ipe),scal%npcd(ipe),ntot, & [all …]
|
/dports/science/berkeleygw/BGW-2.0.0/Common/ |
H A D | inversion_inc.f90 | 15 SCALAR, intent(inout) :: matrix(scal%npr,scal%npc) 18 integer :: info, desca(9), lwork, liwork, ipiv(scal%npr+scal%nbl) 37 irow=mod(int(((i-1)/scal%nbl)+TOL_SMALL),scal%nprow) 38 if(irow.ne.scal%myprow) cycle 40 icol=mod(int(((j-1)/scal%nbl)+TOL_SMALL),scal%npcol) 61 write(6,*) scal%nprow,scal%npcol,scal%myprow,scal%mypcol 62 write(6,*) nmtx,scal%nbl,scal%npr,scal%npc 66 call descinit(desca, nmtx, nmtx, scal%nbl, scal%nbl, 0, 0, & 67 scal%icntxt, max(1,scal%npr), info) 89 irow=mod(int(((i-1)/scal%nbl)+TOL_SMALL),scal%nprow) [all …]
|
H A D | scalapack.f90 | 316 scal%nprow, scal%npcol) 330 SAFE_ALLOCATE(usermap,(scal%nprow,scal%npcol)) 347 call blacs_gridmap(scal%icntxt,usermap,scal%nprow,scal%nprow, scal%npcol) 349 call blacs_gridinfo(scal%icntxt, scal%nprow, scal%npcol, scal%myprow, scal%mypcol) 357 'row=', scal%myprow, 'col=', scal%mypcol 368 call blacs_gridinit(scal%icntxt, order, scal%nprow, scal%npcol) 369 call blacs_gridinfo(scal%icntxt, scal%nprow, scal%npcol, scal%myprow, scal%mypcol) 372 scal%npr = numroc(matsize, scal%nbl, scal%myprow, 0, scal%nprow) 373 scal%npc = numroc(matsize, scal%nbl, scal%mypcol, 0, scal%npcol) 378 ' x ', scal%npcol, '; BLOCKSIZE = ', scal%nbl [all …]
|
H A D | elpa_interface.f90 | 30 type (scalapack), intent(in) :: scal local 31 complex(DP), intent(inout) :: matrix(scal%npr,scal%npc), eigen_vect(scal%npr,scal%npc) 47 nblk = scal%nbl 48 np_rows = scal%nprow 49 np_cols = scal%npcol 50 na_rows = scal%npr 51 na_cols = scal%npc 52 my_prow = scal%myprow 53 my_pcol = scal%mypcol 62 call elpa_solver%set("local_nrows", scal%npr, success) [all …]
|
H A D | write_matrix.f90 | 834 count(2) = scal%npr/scal%nbl 835 count(3) = scal%npc/scal%nbl 855 stride(2) = scal%nprow*scal%nbl 856 stride(3) = scal%npcol*scal%nbl 1018 count(2) = scal%npr/scal%nbl 1019 count(3) = scal%npc/scal%nbl 1039 stride(2) = scal%nprow*scal%nbl 1040 stride(3) = scal%npcol*scal%nbl 1206 count(2) = scal%npr/scal%nbl 1207 count(3) = scal%npc/scal%nbl [all …]
|
H A D | read_matrix.f90 | 40 type (scalapack), intent(in) :: scal local 55 type (scalapack), intent(in) :: scal local 72 type (scalapack), intent(in) :: scal local 142 icol=MOD(INT(((jj-1)/scal%nbl)+TOL_SMALL),scal%npcol) 143 if (icol .eq. scal%mypcol) then 145 irow=MOD(INT(((ii-1)/scal%nbl)+TOL_SMALL),scal%nprow) 188 type(scalapack), intent(in) :: scal local 208 type(scalapack), intent(in) :: scal local 338 icol=MOD(INT(((jj-1)/scal%nbl)+TOL_SMALL),scal%npcol) 339 if (icol .eq. scal%mypcol) then [all …]
|
/dports/astro/oskar/OSKAR-2.8.0/oskar/mem/ |
H A D | define_mem_normalise.h | 25 a[j].x *= scal; a[j].y *= scal;\ 44 a[j].a.x *= scal; a[j].a.y *= scal;\ 45 a[j].b.x *= scal; a[j].b.y *= scal;\ 46 a[j].c.x *= scal; a[j].c.y *= scal;\ 47 a[j].d.x *= scal; a[j].d.y *= scal;\ 69 LOCAL FP scal;\ 79 a[j].x *= scal; a[j].y *= scal;\ 101 a[j].a.x *= scal; a[j].a.y *= scal;\ 102 a[j].b.x *= scal; a[j].b.y *= scal;\ 103 a[j].c.x *= scal; a[j].c.y *= scal;\ [all …]
|
/dports/science/berkeleygw/BGW-2.0.0/BSE/ |
H A D | diagonalize.f90 | 564 if(mod(nmat,(scal%nbl*scal%npcol)).gt.scal%mypcol*scal%nbl) nbc=nbc+1 566 if(mod(nmat,(scal%nbl*scal%nprow)).gt.scal%myprow*scal%nbl) nbr=nbr+1 577 if(mod(neig,(scal%nbl*scal%npcol)).gt.scal%mypcol*scal%nbl) & 622 do ic=(ibc*scal%npcol+scal%mypcol)*scal%nbl+1, & 623 min((ibc*scal%npcol+scal%mypcol)*scal%nbl+scal%nbl,nmat) ! loop over cols 682 do ic=(ibc*scal%npcol+scal%mypcol)*scal%nbl+1, & 683 min((ibc*scal%npcol+scal%mypcol)*scal%nbl+scal%nbl,nmat) ! loop over cols 709 min((ibc*scal%npcol+scal%mypcol)*scal%nbl+scal%nbl,neig) ! loop over cols 1760 call blacs_gridinfo(scal%icntxt, scal%nprow, scal%npcol, scal%myprow, scal%mypcol) 1783 scal%npr = numroc(MM, scal%nbl, scal%myprow, 0, scal%nprow) [all …]
|
H A D | distrib.f90 | 271 call layout_scalapack(nmat, scal%nbl, peinf%npes, scal%nprow, scal%npcol) 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 281 nnp = max(nmat,scal%nprow*scal%npcol+1,4) 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 [all …]
|
/dports/science/siconos/siconos-4.4.0/externals/numeric_bindings/boost/numeric/bindings/blas/level1/ |
H A D | scal.hpp | 82 inline void scal( const int n, const float a, std::complex<float>* x, in scal() function 102 inline void scal( const int n, const std::complex<float> a, in scal() function 112 inline void scal( const int n, const std::complex<double> a, in scal() function 141 inline void scal( const int n, const float a, std::complex<float>* x, 161 inline void scal( const int n, const std::complex<float> a, 171 inline void scal( const int n, const std::complex<double> a, 182 inline void scal( const fortran_int_t n, const float a, float* x, 192 inline void scal( const fortran_int_t n, const double a, double* x, 202 inline void scal( const fortran_int_t n, const float a, 212 inline void scal( const fortran_int_t n, const double a, [all …]
|
/dports/math/scs/scs-3.0.0/src/ |
H A D | normalize.c | 9 scs_float *D = w->scal->D; in SCS() 10 scs_float *E = w->scal->E; in SCS() 12 sol->x[i] /= (E[i] / w->scal->dual_scale); in SCS() 18 sol->s[i] *= (D[i] * w->scal->dual_scale); in SCS() 24 scs_float *D = w->scal->D; in SCS() 25 scs_float *E = w->scal->E; in SCS() 27 sol->x[i] *= (E[i] / w->scal->dual_scale); in SCS() 39 scs_float *D = w->scal->D; in SCS() 41 r[i] /= (D[i] * w->scal->dual_scale); in SCS() 47 scs_float *E = w->scal->E; in SCS() [all …]
|
/dports/math/py-scs/scs-3.0.0/scs/src/ |
H A D | normalize.c | 9 scs_float *D = w->scal->D; in SCS() 10 scs_float *E = w->scal->E; in SCS() 12 sol->x[i] /= (E[i] / w->scal->dual_scale); in SCS() 18 sol->s[i] *= (D[i] * w->scal->dual_scale); in SCS() 24 scs_float *D = w->scal->D; in SCS() 25 scs_float *E = w->scal->E; in SCS() 27 sol->x[i] *= (E[i] / w->scal->dual_scale); in SCS() 39 scs_float *D = w->scal->D; in SCS() 41 r[i] /= (D[i] * w->scal->dual_scale); in SCS() 47 scs_float *E = w->scal->E; in SCS() [all …]
|
/dports/science/py-scipy/scipy-1.7.1/scipy/linalg/src/id_dist/src/ |
H A D | idd_house.f | 16 subroutine idd_houseapp(n,vn,u,ifrescal,scal,v) argument 54 real*8 vn(2:*),scal,u(n),v(n),fact,sum local 78 if(sum .eq. 0) scal = 0 79 if(sum .ne. 0) scal = 2/(1+sum) 93 fact = fact*scal 111 subroutine idd_house(n,x,rss,vn,scal) argument 147 real*8 x(n),rss,sum,v1,scal,vn(2:*),x1 local 157 scal = 0 181 scal = 0 228 scal = 2*v1**2 / (v1**2+sum) [all …]
|
H A D | idz_house.f | 16 subroutine idz_houseapp(n,vn,u,ifrescal,scal,v) argument 54 real*8 scal,sum local 79 if(sum .eq. 0) scal = 0 80 if(sum .ne. 0) scal = 2/(1+sum) 94 fact = fact*scal 112 subroutine idz_house(n,x,css,vn,scal) argument 147 real*8 scal,test,rss,sum local 158 scal = 0 182 scal = 0 246 subroutine idz_housemat(n,vn,scal,h) argument [all …]
|
/dports/science/berkeleygw/BGW-2.0.0/Sigma/ |
H A D | epscopy.f90 | 993 i_global = indxl2g(i_local, scal%nbl, scal%myprow, 0, scal%nprow) 999 i_global = indxl2g(i_local, scal%nbl, scal%mypcol, 0, scal%npcol) 1216 eigenvect(1:scal%npr, 1:scal%npc) = buffer(1:scal%npr, 1:scal%npc) 1492 ig_g = indxl2g(ig_l, scal%nbl, scal%myprow, 0, scal%nprow) 1497 igp_g = indxl2g(igp_l, scal%nbl, scal%mypcol, 0, scal%npcol) 1504 igp_g = indxl2g(igp_l, scal%nbl, scal%mypcol, 0, scal%npcol) 1506 ig_g = indxl2g(ig_l, scal%nbl, scal%myprow, 0, scal%nprow) 1515 igp_g = indxl2g(igp_l, scal%nbl, scal%mypcol, 0, scal%npcol) 1518 ig_g = indxl2g(ig_l, scal%nbl, scal%myprow, 0, scal%nprow) 1584 igp_g = indxl2g(igp_l, scal%nbl, scal%mypcol, 0, scal%npcol) [all …]
|
/dports/cad/netgen/netgen-6.2.2105/libsrc/linalg/ |
H A D | vector.hpp | 30 TFlatVector & operator= (T scal) in operator =() argument 32 for (int i = 0; i < s; i++) data[i] = scal; in operator =() 45 TFlatVector & operator*= (T scal) in operator *=() argument 47 for (int i = 0; i < s; i++) data[i] *= scal; in operator *=() 71 FlatVector & operator= (double scal) in operator =() argument 73 for (int i = 0; i < s; i++) data[i] = scal; in operator =() 86 FlatVector & operator*= (double scal) in operator *=() argument 95 data[i] += scal * v2[i]; in Add() 102 data[i] = scal * v2[i]; in Set() 153 Vector & operator= (double scal) in operator =() argument [all …]
|
/dports/science/qmcpack/qmcpack-3.11.0/external_codes/boost_multi/multi/adaptors/blas/ |
H A D | scal.hpp | 12 using core::scal; 16 ->decltype(scal(count, &a, first.base(), first.stride()), void()){ in scal_n() 17 scal(count, &a, first.base(), first.stride()); } in scal_n() 20 auto scal(A const& a, It1D first, It1D last) in scal() function 25 auto scal(A const& a, X1D&& x) in scal() function 26 ->decltype(blas::scal(a, x.begin(), x.end()), std::forward<X1D>(x)){ in scal() 27 return blas::scal(a, x.begin(), x.end()), std::forward<X1D>(x);} in scal() 37 ->decltype(std::forward<X1D>(scal(std::declval<scalar_type const&>(), x))){ in operator *=() 38 return std::forward<X1D>(scal(self.alpha_, x));} in operator *=() 41 template<class A> auto scal(A const& a){return scal_range<A>{a};} in scal() function
|
/dports/cad/gmsh/gmsh-4.9.2-source/contrib/Netgen/libsrc/linalg/ |
H A D | vector.hpp | 27 FlatVector & operator= (double scal) in operator =() argument 29 for (int i = 0; i < s; i++) data[i] = scal; in operator =() 42 FlatVector & operator*= (double scal) in operator *=() argument 44 for (int i = 0; i < s; i++) data[i] *= scal; in operator *=() 48 FlatVector & Add (double scal, const FlatVector & v2) in Add() argument 51 data[i] += scal * v2[i]; in Add() 58 data[i] = scal * v2[i]; in Set() 99 Vector & operator= (double scal) in operator =() argument 101 for (int i = 0; i < s; i++) data[i] = scal; in operator =() 128 VectorMem & operator= (double scal) in operator =() argument [all …]
|
/dports/science/siconos/siconos-4.4.0/externals/numeric_bindings/libs/numeric/bindings/tools/templates/level1/ |
H A D | scal.hpp | 1 $TEMPLATE[scal.all.remove_argument_value_type_prepend] 3 $TEMPLATE[scal.all.arguments] 10 $TEMPLATE[scal.all.cblas_alias] 12 $TEMPLATE[scal.complex.A.code.level_1] 14 $TEMPLATE[scal.complex.A.code.level_1_type] 16 $TEMPLATE[scal.complex.A.code.level_1_static_assert] 18 $TEMPLATE[scal.complex.A.code.level_2] 20 $TEMPLATE[scal.friendly_name]
|
/dports/audio/faust/faust-2.37.3/tests/impulse-tests/deprecated/ |
H A D | test.sh | 72 $TOOL $OPTIONS $f > $D/$f.scal.ir 73 …filesCompare $D/$f.scal.ir ../$REF/$DSP.ir && echo "OK $f with $OPTIONS" || echo "ERROR $f with $O… 84 $TOOL $OPTIONS $f > $D/$f.scal.ir || (echo "ERROR $f with $OPTIONS"; exit) 85 cp $D/$f.scal.ir $f.scal.ir 131 faust2impulse $f > $D/$f.scal.ir 136 faust2impulse $f -vec > $D/$f.scal.ir 141 faust2impulse $f -sch > $D/$f.scal.ir 283 faust2impulse8 -double $f > $D/$f.scal.ir && RES=1 || RES=0 285 …filesCompare $D/$f.scal.ir ../$REF/$f.scal.ir && echo "OK $f scalar mode" || echo "ERROR $f scalar… 300 faust2impulse9 -double $f > $D/$f.scal.ir && RES=1 || RES=0 [all …]
|
/dports/math/octave-forge-ltfat/ltfat/inst/filterbank/ |
H A D | filterbankscale.m | 1 function [g,scal] = filterbankscale(g,varargin) 6 % Usage: g=filterbankscale(g,scal) 9 % [g,scal]=filterbankscale(...) 12 % with scal. scal can be either scalar or a vector of the same length 27 % [g,scal]=FILTERBANKSCALE(g,...) additionally returns a vector scal 101 g{ii}.h = scal(ii)*g{ii}.h; 106 g{ii}.H = scal(ii)*g{ii}.H; 117 g{ii} = scal(ii)*g{ii}; 124 scal = zeros(numel(g),1); variable 203 g{ii} = g{ii}/scal(ii); [all …]
|