/dports/math/openblas/OpenBLAS-0.3.18/kernel/riscv64/ |
H A D | zgemv_n_vector.c | 83 vy1 = VFMACCVF_FLOAT(vy1, temp_r, va1, gvl); in CNAME() 84 vy1 = VFMACCVF_FLOAT(vy1, temp_i, va0, gvl); in CNAME() 89 vy1 = VFMACCVF_FLOAT(vy1, temp_r, va1, gvl); in CNAME() 90 vy1 = VFNMSACVF_FLOAT(vy1, temp_i, va0, gvl); in CNAME() 98 vy1 = VFNMSACVF_FLOAT(vy1, temp_r, va1, gvl); in CNAME() 99 vy1 = VFMACCVF_FLOAT(vy1, temp_i, va0, gvl); in CNAME() 103 vy1 = VFNMSACVF_FLOAT(vy1, temp_r, va1, gvl); in CNAME() 104 vy1 = VFNMSACVF_FLOAT(vy1, temp_i, va0, gvl); in CNAME() 139 vy1 = VFMACCVF_FLOAT(vy1, temp_r, va1, gvl); in CNAME() 140 vy1 = VFMACCVF_FLOAT(vy1, temp_i, va0, gvl); in CNAME() [all …]
|
H A D | zaxpy_vector.c | 56 FLOAT_V_T vx0, vx1, vy0, vy1; in CNAME() local 64 vy1 = VLSEV_FLOAT(&y[iy+1], stride_y, gvl); in CNAME() 68 vy1 = VFMACCVF_FLOAT(vy1, da_r, vx1, gvl); in CNAME() 69 vy1 = VFMACCVF_FLOAT(vy1, da_i, vx0, gvl); in CNAME() 73 vy1 = VFNMSACVF_FLOAT(vy1, da_r, vx1, gvl); in CNAME() 74 vy1 = VFMACCVF_FLOAT(vy1, da_i, vx0, gvl); in CNAME() 77 VSSEV_FLOAT(&y[iy+1], stride_y, vy1, gvl); in CNAME() 91 vy1 = VFMACCVF_FLOAT(vy1, da_r, vx1, gvl); in CNAME() 92 vy1 = VFMACCVF_FLOAT(vy1, da_i, vx0, gvl); in CNAME() 96 vy1 = VFNMSACVF_FLOAT(vy1, da_r, vx1, gvl); in CNAME() [all …]
|
H A D | zrot_vector.c | 73 vy1 = VLEV_FLOAT(&y[ix+gvl], gvl); in CNAME() 81 vy1 = VFMULVF_FLOAT(vy1, c, gvl); in CNAME() 82 vy1 = VFNMSACVF_FLOAT(vy1, s, vx1, gvl); in CNAME() 87 VSEV_FLOAT(&y[ix+gvl], vy1, gvl); in CNAME() 105 vy1 = VFMULVF_FLOAT(vy1, c, gvl); in CNAME() 106 vy1 = VFNMSACVF_FLOAT(vy1, s, vx1, gvl); in CNAME() 111 VSEV_FLOAT(&y[ix+gvl], vy1, gvl); in CNAME() 127 vy1 = VFMULVF_FLOAT(vy1, c, gvl); in CNAME() 128 vy1 = VFNMSACVF_FLOAT(vy1, s, vx1, gvl); in CNAME() 152 vy1 = VFMULVF_FLOAT(vy1, c, gvl); in CNAME() [all …]
|
H A D | zhemv_UV_vector.c | 74 FLOAT_V_T va0, va1, vx0, vx1, vy0, vy1, vr0, vr1; in CNAME() local 109 vy1 = VLSEV_FLOAT(&y[iy+1], stride_y, gvl); in CNAME() 113 vy1 = VFMACCVF_FLOAT(vy1, temp_r1, va1, gvl); in CNAME() 114 vy1 = VFMACCVF_FLOAT(vy1, temp_i1, va0, gvl); in CNAME() 118 vy1 = VFNMSACVF_FLOAT(vy1, temp_r1, va1, gvl); in CNAME() 119 vy1 = VFMACCVF_FLOAT(vy1, temp_i1, va0, gvl); in CNAME() 122 VSSEV_FLOAT(&y[iy+1], stride_y, vy1, gvl); in CNAME() 156 vy1 = VFMACCVF_FLOAT(vy1, temp_r1, va1, gvl); in CNAME() 157 vy1 = VFMACCVF_FLOAT(vy1, temp_i1, va0, gvl); in CNAME() 161 vy1 = VFNMSACVF_FLOAT(vy1, temp_r1, va1, gvl); in CNAME() [all …]
|
H A D | zaxpby_vector.c | 59 FLOAT_V_T vy0, vy1; in CNAME() local 102 vy1 = VFMULVF_FLOAT(vx1, alpha_r, gvl); in CNAME() 103 vy1 = VFMACCVF_FLOAT(vy1, alpha_i, vx0, gvl); in CNAME() 104 VSSEV_FLOAT(&y[iy+1], stride_y, vy1, gvl); in CNAME() 117 vy1 = VFMULVF_FLOAT(vx1, alpha_r, gvl); in CNAME() 118 vy1 = VFMACCVF_FLOAT(vy1, alpha_i, vx0, gvl); in CNAME() 119 VSSEV_FLOAT(&y[iy+1], stride_y, vy1, gvl); in CNAME() 130 v0 = VFMULVF_FLOAT(vy1, beta_i, gvl); in CNAME() 133 v1 = VFMULVF_FLOAT(vy1, beta_r, gvl); in CNAME() 143 v0 = VFMULVF_FLOAT(vy1, beta_i, gvl); in CNAME() [all …]
|
H A D | zhemv_LM_vector.c | 74 FLOAT_V_T va0, va1, vx0, vx1, vy0, vy1, vr0, vr1; in CNAME() local 110 vy1 = VLSEV_FLOAT(&y[iy+1], stride_y, gvl); in CNAME() 114 vy1 = VFMACCVF_FLOAT(vy1, temp_r1, va1, gvl); in CNAME() 115 vy1 = VFMACCVF_FLOAT(vy1, temp_i1, va0, gvl); in CNAME() 119 vy1 = VFNMSACVF_FLOAT(vy1, temp_r1, va1, gvl); in CNAME() 120 vy1 = VFMACCVF_FLOAT(vy1, temp_i1, va0, gvl); in CNAME() 123 VSSEV_FLOAT(&y[iy+1], stride_y, vy1, gvl); in CNAME() 157 vy1 = VFMACCVF_FLOAT(vy1, temp_r1, va1, gvl); in CNAME() 158 vy1 = VFMACCVF_FLOAT(vy1, temp_i1, va0, gvl); in CNAME() 162 vy1 = VFNMSACVF_FLOAT(vy1, temp_r1, va1, gvl); in CNAME() [all …]
|
H A D | axpby_vector.c | 59 FLOAT_V_T vy0, vy1; in CNAME() local 113 VSEV_FLOAT(&y[j+gvl], vy1, gvl); in CNAME() 136 VSEV_FLOAT(&y[j+gvl], vy1, gvl); in CNAME() 212 vy1 = VFMULVF_FLOAT(vy1, beta, gvl); in CNAME() 213 VSEV_FLOAT(&y[j+gvl], vy1, gvl); in CNAME() 235 vy1 = VFMULVF_FLOAT(vy1, beta, gvl); in CNAME() 264 vy1 = VFMACCVF_FLOAT(vx1, beta, vy1,gvl); in CNAME() 265 VSEV_FLOAT(&y[j+gvl], vy1, gvl); in CNAME() 293 vy1 = VFMACCVF_FLOAT(vx1, beta, vy1, gvl); in CNAME() 323 vy1 = VFMACCVF_FLOAT(vx1, beta, vy1, gvl); in CNAME() [all …]
|
H A D | axpy_vector.c | 53 FLOAT_V_T vy0, vy1; in CNAME() local 71 vy1 = VLEV_FLOAT(&y[j+gvl], gvl); in CNAME() 72 vy1 = VFMACCVF_FLOAT(vy1, da, vx1, gvl); in CNAME() 73 VSEV_FLOAT(&y[j+gvl], vy1, gvl); in CNAME() 98 vy1 = VLEV_FLOAT(&y[j+gvl], gvl); in CNAME() 99 vy1 = VFMACCVF_FLOAT(vy1, da, vx1, gvl); in CNAME() 100 VSEV_FLOAT(&y[j+gvl], vy1, gvl); in CNAME() 127 vy1 = VFMACCVF_FLOAT(vy1, da, vx1, gvl); in CNAME() 128 VSSEV_FLOAT(&y[jy+inc_yv], stride_y, vy1, gvl); in CNAME() 157 vy1 = VFMACCVF_FLOAT(vy1, da, vx1, gvl); in CNAME() [all …]
|
H A D | zdot_vector.c | 82 FLOAT_V_T vr0, vr1, vx0, vx1, vy0, vy1; in CNAME() local 95 vy1 = VLSEV_FLOAT(&y[iy+1], stride_y, gvl); in CNAME() 98 vr1 = VFMACCVV_FLOAT(vr1, vx0, vy1, gvl); in CNAME() 100 vr0 = VFNMSACVV_FLOAT(vr0, vx1, vy1, gvl); in CNAME() 103 vr0 = VFMACCVV_FLOAT(vr0, vx1, vy1, gvl); in CNAME() 120 vy1 = VLSEV_FLOAT(&y[iy+1], stride_y, gvl); in CNAME() 123 vr0 = VFMULVV_FLOAT(vx1, vy1, gvl); in CNAME() 125 vr1 = VFMULVV_FLOAT(vx0, vy1, gvl); in CNAME() 129 vr0 = VFMACCVV_FLOAT(vr0, vx1, vy1, gvl); in CNAME() 131 vr1 = VFMSACVV_FLOAT(vr1, vx0, vy1, gvl); in CNAME()
|
H A D | gemv_n_vector.c | 55 FLOAT_V_T va0, va1, vy0, vy1; in CNAME() local 64 vy1 = VLEV_FLOAT(&y[j+gvl], gvl); in CNAME() 71 vy1 = VFMACCVF_FLOAT(vy1, temp, va1, gvl); in CNAME() 76 VSEV_FLOAT(&y[j+gvl], vy1, gvl); in CNAME() 106 vy1 = VLSEV_FLOAT(&y[iy+inc_yv], stride_y, gvl); in CNAME() 113 vy1 = VFMACCVF_FLOAT(vy1, temp, va1, gvl); in CNAME() 118 VSSEV_FLOAT(&y[iy+inc_yv], stride_y, vy1, gvl); in CNAME()
|
/dports/science/cdcl/dcl-5.4.8-C/src/grph1/szpack/ |
H A D | szpcll.c | 65 if (*vy1 < ylim[*ii * 2]) { in szpcll_0_() 67 } else if (*vy1 > ylim[(*ii << 1) + 1]) { in szpcll_0_() 78 vy[(*ii << 1) + 1] = *vy1; in szpcll_0_() 96 dydx = (*vy1 - *vy0) / (*vx1 - *vx0); in szpcll_0_() 97 yc = *vy1 - dydx * *vx1; in szpcll_0_() 110 vy[(*ii << 1) + 1] = *vy1; in szpcll_0_() 129 } else if (*vy1 == *vy0) { in szpcll_0_() 131 vy[*ii * 2] = *vy1; in szpcll_0_() 133 vy[(*ii << 1) + 1] = *vy1; in szpcll_0_() 138 dydx = (*vy1 - *vy0) / (*vx1 - *vx0); in szpcll_0_() [all …]
|
/dports/science/simbody/simbody-Simbody-3.7/SimTKmath/Integrators/src/CPodes/sundials/tests/ |
H A D | cpsNewtCrd_dns.c | 72 realtype vx1, vy1, vx2, vy2; in main() local 288 realtype vx1, vy1, vx2, vy2; in ffun1() local 304 lam1 = m/(2*L*L)*(vx1*vx1 + vy1*vy1 - g*y1); in ffun1() 325 realtype vx1, vy1, vx2, vy2; in ffun2() local 350 lam1 = m/(2*L*L)*(vx1*vx1 + vy1*vy1 + frc*(x1-R) - g*y1); in ffun2() 371 realtype vx1, vy1, vx2, vy2; in cfun() local 384 NV_Ith_S(c,1) = (x1-R)*vx1 + y1*vy1; in cfun() 416 realtype vx1, vy1, vx2, vy2; in contact() local 434 vn1 = ca*vx1 + sa*vy1; in contact() 435 vt1 = -sa*vx1 + ca*vy1; in contact() [all …]
|
H A D | newton.c | 279 realtype vx1, vy1, vx2, vy2; in ffun1() local 293 vy1 = NV_Ith_S(yy,3); vy2 = NV_Ith_S(yy,7); in ffun1() 295 lam1 = m/(2*L*L)*(vx1*vx1 + vy1*vy1 - g*y1); in ffun1() 316 realtype vx1, vy1, vx2, vy2; in ffun2() local 341 lam1 = m/(2*L*L)*(vx1*vx1 + vy1*vy1 + frc*(x1-R) - g*y1); in ffun2() 362 realtype vx1, vy1, vx2, vy2; in cfun() local 375 NV_Ith_S(c,1) = (x1-R)*vx1 + y1*vy1; in cfun() 407 realtype vx1, vy1, vx2, vy2; in contact() local 425 vn1 = ca*vx1 + sa*vy1; in contact() 426 vt1 = -sa*vx1 + ca*vy1; in contact() [all …]
|
/dports/biology/p5-AcePerl/AcePerl-1.92/Ace/Graphics/Glyph/ |
H A D | triangle.pm | 20 my ($vx1,$vy1,$vx2,$vy2,$vx3,$vy3) = undef; 33 if ($orient eq 'N'){$vx1=$xmid-$q;$vy1=$y1;$vx2=$xmid+$q;$vy2=$y1;$vx3=$xmid;$vy3=$y2;} 34 elsif($orient eq 'S'){$vx1=$xmid-$q;$vy1=$y2;$vx2=$xmid+$q;$vy2=$y2;$vx3=$xmid;$vy3=$y1;} 35 elsif($orient eq 'E'){$vx1=$x2;$vy1=$y1;$vx2=$x2;$vy2=$y2;$vx3=$x2-$p;$vy3=$ymid;} 36 elsif($orient eq 'W'){$vx1=$x1;$vy1=$y1;$vx2=$x1;$vy2=$y2;$vx3=$x1+$p;$vy3=$ymid;} 39 $gd->line($vx1,$vy1,$vx2,$vy2,$fg); 41 $gd->line($vx3,$vy3,$vx1,$vy1,$fg);
|
/dports/math/scilab/scilab-6.1.1/scilab/modules/scicos_blocks/src/fortran/ |
H A D | intrp2.f | 31 double precision vx1,vx2,vy1,vy2,vz1,vz2,vz3,vz4 local 45 vy1=rpar(ipar(1)+j-1) 53 y1=(1.0d0-(u2-vy1)/(vy2-vy1))*(vz1+(vz2-vz1)*(u1-vx1)/(vx2-vx1)) 54 $ +((u2-vy1)/(vy2-vy1))*(vz4+(vz3-vz4)*(u1-vx1)/(vx2-vx1))
|
/dports/graphics/qcomicbook/QComicBook-0.9.1/src/View/ |
H A D | ContinuousPageView.cpp | 176 const int vy1 = verticalScrollBar()->value(); in disposeOrRequestPages() local 177 const int vy2 = vy1 + viewport()->height(); in disposeOrRequestPages() 184 _DEBUG << "view rect:" << vy1 << "," << vy2; in disposeOrRequestPages() 193 if (isInView(m_ypos.startCoordinate(i), m_ypos.endCoordinate(i), vy1, vy2)) in disposeOrRequestPages() 255 const int vy1 = verticalScrollBar()->value(); in findComicPageImagesInView() local 256 const int vy2 = vy1 + viewport()->height(); in findComicPageImagesInView() 262 if (imgLabel[i]->isInView(vy1, vy2)) in findComicPageImagesInView() 267 while (i < imgLabel.size() && imgLabel[i]->isInView(vy1, vy2)) in findComicPageImagesInView() 471 const int vy1 = verticalScrollBar()->value(); in currentComicPageImage() local 472 const int vy2 = vy1 + viewport()->height(); in currentComicPageImage() [all …]
|
/dports/graphics/evolvotron/evolvotron/libfunction/ |
H A D | functions_gradient.h | 82 const real vy1=k%arg(0)(p+XYZ(0.0,epsilon(),0.0)); in evaluate() local 85 return XYZ(vx1-vx0,vy1-vy0,vz1-vz0)*inv_epsilon2(); in evaluate() 106 const real vy1=k%arg(0)(p+XYZ(0.0,epsilon(),0.0)); in evaluate() local 109 return XYZ(vx1-vx0,vy1-vy0,vz1-vz0)*inv_epsilon2(); in evaluate() 128 const XYZ vy1(arg(0)(p+XYZ(0.0,epsilon(),0.0))); in evaluate() 131 return (vx1-vx0+vy1-vy0+vz1-vz0)*inv_epsilon2(); in evaluate() 150 const XYZ vy1(arg(0)(p+XYZ(0.0,epsilon(),0.0))); in evaluate() 154 const XYZ d_dy((vy1-vy0)*inv_epsilon2()); in evaluate() 191 const XYZ vy1(arg(0)(p+XYZ(0.0,big_epsilon(),0.0))); in evaluate() 199 const XYZ dy1(vy1-v); in evaluate()
|
/dports/lang/basic256/basic256-2.0.0.11/Examples/ |
H A D | collision.kbs | 26 vx1 = 10*rand - 5 : vy1 = 3*rand 43 #vy1 = 0 72 y1 = y1 + vy1 84 if ( y1 > gheight - r1 and vy1 > 0 ) or ( y1 < r1 and vy1 < 0 ) then vy1 = -vy1 102 vt1 = utx*vx1 + uty*vy1 105 vn1 = unx*vx1 + uny*vy1 121 vx1 = vt1nx + vn1nx : vy1 = vt1ny + vn1ny
|
H A D | collision3.kbs | 28 vx1 = 10*rand - 5 : vy1 = 3*rand 61 y1 = y1 + vy1 77 if ( y1 > gheight - r1 and vy1 > 0 ) or ( y1 < r1 and vy1 < 0 ) then vy1 = -vy1 113 vt1 = utx*vx1 + uty*vy1 116 vn1 = unx*vx1 + uny*vy1 122 vt1 = utx*vx1 + uty*vy1 125 vn1 = unx*vx1 + uny*vy1 152 vx1 = vt1nx + vn1nx : vy1 = vt1ny + vn1ny 156 vx1 = vt1nx + vn1nx : vy1 = vt1ny + vn1ny
|
/dports/biology/p5-Bio-Graphics/Bio-Graphics-2.40/lib/Bio/Graphics/Glyph/ |
H A D | triangle.pm | 41 my ($vx1,$vy1,$vx2,$vy2,$vx3,$vy3); 51 if ($orient eq 'S'){$vx1=$x1;$vy1=$y1;$vx2=$x2;$vy2=$y1;$vx3=$xmid;$vy3=$y2;} 52 elsif($orient eq 'N'){$vx1=$x1;$vy1=$y2;$vx2=$x2;$vy2=$y2;$vx3=$xmid;$vy3=$y1;} 53 elsif($orient eq 'W'){$vx1=$x2;$vy1=$y1;$vx2=$x2;$vy2=$y2;$vx3=$x2-$q*2;$vy3=$ymid;} 54 elsif($orient eq 'E'){$vx1=$x1;$vy1=$y1;$vx2=$x1;$vy2=$y2;$vx3=$x1+$q*2;$vy3=$ymid;} 59 $poly->addPt($vx1,$vy1);
|
/dports/science/cdcl/dcl-5.4.8-C/src/grph2/uvpack/ |
H A D | uvbxaz.c | 51 vy1, vx2, vy2, rot, vyy; in uvbxaz_() local 151 stftrf_(&ux1, &uy1, &vx1, &vy1); in uvbxaz_() 158 if ((vy2 - vy1) * (vx2 - vx1) < 0.f) { in uvbxaz_() 159 vyy = vy1; in uvbxaz_() 160 vy1 = vy2; in uvbxaz_() 164 szsttv_(&vx1, &vy1); in uvbxaz_() 165 szsttv_(&vx2, &vy1); in uvbxaz_() 168 szsttv_(&vx1, &vy1); in uvbxaz_()
|
H A D | uvbraz.c | 51 static real dx, rx0, ry0, rx1, ry1, rx2, ry2, vy1, vy2, rot, uxx, vxx, in uvbraz_() local 160 stftrf_(&uxx, &uyy1, &vxx, &vy1); in uvbraz_() 167 if (vy1 > vy2) { in uvbraz_() 168 vyy = vy1; in uvbraz_() 169 vy1 = vy2; in uvbraz_() 174 szsttv_(&r__1, &vy1); in uvbraz_() 176 szsttv_(&r__1, &vy1); in uvbraz_() 182 szsttv_(&r__1, &vy1); in uvbraz_()
|
/dports/math/fflas-ffpack/fflas-ffpack-2.4.3/fflas-ffpack/fflas/fflas_sparse/ell/ |
H A D | ell_spmm.inl | 95 vect_t vx1, vx2, vy1, vy2, vdat; local 99 vy1 = simd::load(y + i * ldy + k); 107 vy1 = simd::load(y + i * ldy + k); 130 vect_t vx1, vx2, vy1, vy2, vdat; local 221 vect_t vx1, vx2, vy1, vy2, vdat; local 246 vect_t vx1, vx2, vy1, vy2, vdat; local 313 vect_t vx1, vx2, vy1, vy2, vdat; local 442 vect_t vx1, vx2, vy1, vy2; local 474 vect_t vx1, vx2, vy1, vy2; local 506 vect_t vx1, vx2, vy1, vy2; local [all …]
|
/dports/math/openblas/OpenBLAS-0.3.18/kernel/mips/ |
H A D | ddot_msa.c | 37 v2f64 vy0, vy1, vy2, vy3, vy4, vy5, vy6, vy7; in CNAME() local 69 LD_DP8_INC(y, 2, vy0, vy1, vy2, vy3, vy4, vy5, vy6, vy7); in CNAME() 83 dot1 += (vy1 * vx1); in CNAME() 97 LD_DP4_INC(y, 2, vy0, vy1, vy2, vy3); in CNAME() 100 dot1 += (vy1 * vx1); in CNAME() 108 LD_DP2_INC(y, 2, vy0, vy1); in CNAME() 111 dot1 += (vy1 * vx1); in CNAME()
|
/dports/graphics/libprojectm/projectm-3.1.12/presets/presets_tryptonaut/ |
H A D | flexi - bouncing icecubes [good morning edit].milk | 342 …nce = below(y1,r-(aspectx-1)*0.5);y1 = y1+vy1;vy1 = if(bounce, abs(vy1)*0.96 + (r-y1-(aspectx-1)*0… 345 per_frame_11=vy1 = if(bounce, vy1 + (vr-vy1)*0.15, vy1);vr = if(bounce, vr + (vy1-vr)*0.85 , vr);vr… 347 per_frame_13=vy1 = if(bounce, vy1 + (-vr-vy1)*0.15, vy1);vr = if(bounce, vr - (vy1+vr)*0.85 , vr);v… 365 per_frame_31=bounce = below( sqrt( sqr(x1+vx1-x2-vx2) + sqr(y1+vy1-y2-vy2)), 2*r); 368 per_frame_34=v1 = sqrt(vx1*vx1+vy1*vy1);v2 = sqrt(vx2*vx2+vy2*vy2);w1 = atan2(vx1,vy1);w2 = atan2(v… 372 per_frame_38=vy1 = if(bounce,cos(ref_ang)*v1*cos(w1-ref_ang) + ((vr-v2r)-cos(ref_ang)*v1*cos(w1-ref… 373 per_frame_39= + cos(ref_ang+asin(1))*v2*cos(w2-ref_ang-asin(1)), vy1); 381 per_frame_47=bounce = below( sqrt( sqr(x1+vx1-x3-vx3) + sqr(y1+vy1-y3-vy3)), 2*r); 384 per_frame_50=v1 = sqrt(vx1*vx1+vy1*vy1);v2 = sqrt(vx3*vx3+vy3*vy3);w1 = atan2(vx1,vy1);w2 = atan2(v… 388 per_frame_54=vy1 = if(bounce,cos(ref_ang)*v1*cos(w1-ref_ang) + ((vr-v2r)-cos(ref_ang)*v1*cos(w1-ref… [all …]
|