| /dports/math/pari/pari-2.13.3/src/kernel/none/ |
| H A D | gcdll.c | 227 xv += q * xv1; in xgcduu()
230 xv += xv1; in xgcduu()
237 xv1 += q * xv; in xgcduu()
240 xv1 += xv; in xgcduu()
271 xu = xv1 = 1UL; in xxgcduu()
336 xu = xv1 = 1UL; in rgcduu()
593 xv1 = 1UL; in lgcdii()
618 xv1--; in lgcdii()
638 if (xv1 > vmax) in lgcdii()
826 tmp0 = xv; xv = xv1; xv1 = tmp0; in lgcdii()
[all …]
|
| H A D | invmod.c | 39 ulong xu,xu1,xv,xv1; /* Lehmer stage recurrence matrix */ in invmod_pari() local
54 g = xgcduu(uel(b,2), d1, 1, &xv, &xv1, &s); in invmod_pari()
57 xv = xv1 % uel(b,2); if (s < 0) xv = uel(b,2) - xv; in invmod_pari()
69 lhmres = lgcdii((ulong*)d, (ulong*)d1, &xu, &xu1, &xv, &xv1, ULONG_MAX); in invmod_pari()
74 if (xv1 == 1) in invmod_pari()
81 r = subii(d, mului(xv1,d1)); d=d1; d1=r; in invmod_pari()
82 a = subii(v, mului(xv1,v1)); v=v1; v1=a; in invmod_pari()
89 d1 = subii(muliu(d,xu1), muliu(d1,xv1)); d = r; in invmod_pari()
90 v1 = subii(muliu(v,xu1), muliu(v1,xv1)); v = a; in invmod_pari()
116 g = xxgcduu(uel(d,2), uel(d1,2), 1, &xu, &xu1, &xv, &xv1, &s); in invmod_pari()
[all …]
|
| H A D | ratlift.c | 76 ulong xu, xu1, xv, xv1; /* Lehmer stage recurrence matrix */ in Fp_ratlift() local
152 if (xv1 == 1) in Fp_ratlift()
159 r = subii(d, mului(xv1,d1)); d = d1; d1 = r; in Fp_ratlift()
160 r = addii(v, mului(xv1,v1)); v = v1; v1 = r; in Fp_ratlift()
166 d1 = subii(muliu(d,xu1), muliu(d1,xv1)); d = r; in Fp_ratlift()
168 v1 = addii(muliu(v,xu1), muliu(v1,xv1)); v = r; in Fp_ratlift()
231 if (xv1 == 1) /* avoid multiplications */ in Fp_ratlift()
239 r = subii(d, mului(xv1,d1)); d = d1; d1 = r; in Fp_ratlift()
240 r = addii(v, mului(xv1,v1)); v = v1; v1 = r; in Fp_ratlift()
246 d1 = subii(muliu(d,xu1), muliu(d1,xv1)); d = r; in Fp_ratlift()
[all …]
|
| H A D | gcdext.c | 38 ulong xu,xu1,xv,xv1; /* Lehmer stage recurrence matrix */ in bezout_lehmer() local
72 g = xxgcduu(uel(a,2), uel(b,2), 0, &xu, &xu1, &xv, &xv1, &s); in bezout_lehmer()
139 lhmres = lgcdii((ulong *)d, (ulong *)d1, &xu, &xu1, &xv, &xv1, ULONG_MAX); in bezout_lehmer()
144 if (xv1 == 1) in bezout_lehmer()
152 r = subii(d, mului(xv1,d1)); d=d1; d1=r; in bezout_lehmer()
153 a = subii(u, mului(xv1,u1)); u=u1; u1=a; in bezout_lehmer()
154 a = subii(v, mului(xv1,v1)); v=v1; v1=a; in bezout_lehmer()
160 d1 = subii(muliu(d,xu1), muliu(d1,xv1)); d = r; in bezout_lehmer()
162 u1 = subii(muliu(u,xu1), muliu(u1,xv1)); u = a; in bezout_lehmer()
164 v1 = subii(muliu(v,xu1), muliu(v1,xv1)); v = a; in bezout_lehmer()
[all …]
|
| /dports/math/p5-Math-Pari/pari-2.3.5/src/kernel/none/ |
| H A D | gcdll.c | 237 xv += xv1; in xgcduu()
248 xv1 += xv; in xgcduu()
280 xu = xv1 = 1UL; in xxgcduu()
345 xu = xv1 = 1UL; in rgcduu()
650 xv1 = 1UL; in lgcdii()
680 xv1--; in lgcdii()
703 if (xv1 > vmax) in lgcdii()
752 tmpv = xv + xv1; in lgcdii()
814 if (xv1 > vmax) in lgcdii()
935 tmp0 = xv; xv = xv1; xv1 = tmp0; in lgcdii()
[all …]
|
| H A D | invmod.c | 40 ulong xu,xu1,xv,xv1; /* Lehmer stage recurrence matrix */ in invmod_pari() local
56 g = xgcduu((ulong)(b[2]), d1, 1, &xv, &xv1, &s); in invmod_pari()
59 fprintferr(" -> %lu,%ld,%lu; %lx\n", g,s,xv1,avma); in invmod_pari()
87 lhmres, xu, xu1, xv, xv1); in invmod_pari()
91 if (xv1 == 1) in invmod_pari()
98 r = subii(d, mului(xv1,d1)); d=d1; d1=r; in invmod_pari()
99 a = subii(v, mului(xv1,v1)); v=v1; v1=a; in invmod_pari()
106 d1 = subii(muliu(d,xu1), muliu(d1,xv1)); d = r; in invmod_pari()
107 v1 = subii(muliu(v,xu1), muliu(v1,xv1)); v = a; in invmod_pari()
156 fprintferr(" -> %lu,%ld,%lu; %lx\n", g,s,xv1,avma); in invmod_pari()
[all …]
|
| H A D | ratlift.c | 182 if (xv1 == 1) in ratlift()
190 r = subii(d, mului(xv1,d1)); d=d1; d1=r; in ratlift()
191 r = addii(v, mului(xv1,v1)); v=v1; v1=r; in ratlift()
197 d1 = subii(muliu(d,xu1), muliu(d1,xv1)); d = r; in ratlift()
199 v1 = addii(muliu(v,xu1), muliu(v1,xv1)); v = r; in ratlift()
340 xu, xu1, xv, xv1, in ratlift()
343 if (xv1 == 1) /* avoid multiplications */ in ratlift()
352 r = subii(d, mului(xv1,d1)); d=d1; d1=r; in ratlift()
353 r = addii(v, mului(xv1,v1)); v=v1; v1=r; in ratlift()
359 d1 = subii(muliu(d,xu1), muliu(d1,xv1)); d = r; in ratlift()
[all …]
|
| H A D | gcd.c | 148 ulong xu,xu1,xv,xv1; /* Lehmer stage recurrence matrix */ in bezout() local
183 g = xxgcduu((ulong)a[2], (ulong)b[2], 0, &xu, &xu1, &xv, &xv1, &s); in bezout()
254 lhmres = lgcdii((ulong *)d, (ulong *)d1, &xu, &xu1, &xv, &xv1, MAXULONG); in bezout()
259 if (xv1 == 1) in bezout()
267 r = subii(d, mului(xv1,d1)); d=d1; d1=r; in bezout()
268 a = subii(u, mului(xv1,u1)); u=u1; u1=a; in bezout()
269 a = subii(v, mului(xv1,v1)); v=v1; v1=a; in bezout()
275 d1 = subii(muliu(d,xu1), muliu(d1,xv1)); d = r; in bezout()
277 u1 = subii(muliu(u,xu1), muliu(u1,xv1)); u = a; in bezout()
279 v1 = subii(muliu(v,xu1), muliu(v1,xv1)); v = a; in bezout()
[all …]
|
| /dports/devel/clixon/clixon-4.8.0/lib/src/ |
| H A D | clixon_xml_vec.c | 146 clixon_xvec *xv1 = NULL; /* retval */ in clixon_xvec_dup() local
148 if ((xv1 = clixon_xvec_new()) == NULL) in clixon_xvec_dup()
150 *xv1 = *xv0; in clixon_xvec_dup()
151 xv1->xv_vec = NULL; in clixon_xvec_dup()
152 if (xv1->xv_max && in clixon_xvec_dup()
153 (xv1->xv_vec = calloc(xv1->xv_max, sizeof(cxobj*))) == NULL){ in clixon_xvec_dup()
155 free(xv1); in clixon_xvec_dup()
156 xv1 = NULL; in clixon_xvec_dup()
159 memcpy(xv1->xv_vec, xv0->xv_vec, xv0->xv_len*sizeof(cxobj*)); in clixon_xvec_dup()
161 return xv1; in clixon_xvec_dup()
|
| /dports/math/openblas/OpenBLAS-0.3.18/kernel/mips/ |
| H A D | cswap_msa.c | 40 v4f32 xv0, xv1, xv2, xv3, xv4, xv5, xv6, xv7; in CNAME() local
86 ST_SP(xv1, srcy); srcy += 4; in CNAME()
102 xv1 = LD_SP(px); px += 4; in CNAME()
141 LD_SP5_INC(px, 4, xv0, xv1, xv2, xv3, xv4); in CNAME()
143 ST_SP5_INC(xv0, xv1, xv2, xv3, xv4, srcy, 4); in CNAME()
148 LD_SP3_INC(px, 4, xv0, xv1, xv2); in CNAME()
150 ST_SP3_INC(xv0, xv1, xv2, srcy, 4); in CNAME()
155 LD_SP4_INC(px, 4, xv0, xv1, xv2, xv3); in CNAME()
157 ST_SP4_INC(xv0, xv1, xv2, xv3, srcy, 4); in CNAME()
162 LD_SP2_INC(px, 4, xv0, xv1); in CNAME()
[all …]
|
| H A D | dswap_msa.c | 39 v2f64 xv0, xv1, xv2, xv3, xv4, xv5, xv6, xv7; in CNAME() local
82 ST_DP(xv1, srcy); srcy += 2; in CNAME()
98 xv1 = LD_DP(px); px += 2; in CNAME()
137 LD_DP5_INC(px, 2, xv0, xv1, xv2, xv3, xv4); in CNAME()
139 ST_DP5_INC(xv0, xv1, xv2, xv3, xv4, srcy, 2); in CNAME()
144 LD_DP3_INC(px, 2, xv0, xv1, xv2); in CNAME()
146 ST_DP3_INC(xv0, xv1, xv2, srcy, 2); in CNAME()
151 LD_DP4_INC(px, 2, xv0, xv1, xv2, xv3); in CNAME()
153 ST_DP4_INC(xv0, xv1, xv2, xv3, srcy, 2); in CNAME()
158 LD_DP2_INC(px, 2, xv0, xv1); in CNAME()
[all …]
|
| H A D | sswap_msa.c | 39 v4f32 xv0, xv1, xv2, xv3, xv4, xv5, xv6, xv7; in CNAME() local
82 ST_SP(xv1, srcy); srcy += 4; in CNAME()
98 xv1 = LD_SP(px); px += 4; in CNAME()
137 LD_SP5_INC(px, 4, xv0, xv1, xv2, xv3, xv4); in CNAME()
139 ST_SP5_INC(xv0, xv1, xv2, xv3, xv4, srcy, 4); in CNAME()
144 LD_SP3_INC(px, 4, xv0, xv1, xv2); in CNAME()
146 ST_SP3_INC(xv0, xv1, xv2, srcy, 4); in CNAME()
151 LD_SP4_INC(px, 4, xv0, xv1, xv2, xv3); in CNAME()
153 ST_SP4_INC(xv0, xv1, xv2, xv3, srcy, 4); in CNAME()
158 LD_SP2_INC(px, 4, xv0, xv1); in CNAME()
[all …]
|
| /dports/emulators/mess/mame-mame0226/src/mame/video/ |
| H A D | wpc_dmd.cpp | 116 uint32_t xv1 = (v1 << 16) | (v1 << 8); in screen_update() local
119 *pix0++ = xv1; in screen_update()
120 *pix0++ = xv1; in screen_update()
123 *pix1++ = xv1; in screen_update()
126 *pix1++ = xv1; in screen_update()
128 *pix2++ = xv1; in screen_update()
131 *pix2++ = xv1; in screen_update()
134 *pix3++ = xv1; in screen_update()
135 *pix3++ = xv1; in screen_update()
|
| /dports/emulators/mame/mame-mame0226/src/mame/video/ |
| H A D | wpc_dmd.cpp | 116 uint32_t xv1 = (v1 << 16) | (v1 << 8); in screen_update() local
119 *pix0++ = xv1; in screen_update()
120 *pix0++ = xv1; in screen_update()
123 *pix1++ = xv1; in screen_update()
126 *pix1++ = xv1; in screen_update()
128 *pix2++ = xv1; in screen_update()
131 *pix2++ = xv1; in screen_update()
134 *pix3++ = xv1; in screen_update()
135 *pix3++ = xv1; in screen_update()
|
| /dports/science/afni/afni-AFNI_21.3.16/src/coxplot/ |
| H A D | zzaxxx.c | 71 static real xv1, xv2, xx1, xx2; in zzaxxx_() local
99 xv1 = dmin(*x1,*x2); in zzaxxx_()
106 zzlgin_(&xv1, &xv1, &nl1); in zzaxxx_()
122 xx1 = xv1; in zzaxxx_()
157 dxv = (xv2 - xv1) / nlab; in zzaxxx_()
163 xv = xv1 + il * dxv; in zzaxxx_()
165 r__1 = dabs(xv1), r__2 = dabs(xv2); in zzaxxx_()
|
| /dports/japanese/groff/groff-1.18.1.1/src/libs/libgroff/ |
| H A D | geometry.cc | 123 int xv1, int yv1, in check_output_arc_limits() argument
130 int x2 = x1 + xv1 + xv2; // end of arc is (x2, y2) in check_output_arc_limits()
134 *minx = x1 + xv1 - radius; in check_output_arc_limits()
135 *maxx = x1 + xv1 + radius; in check_output_arc_limits()
154 if (xv1 > 0 && yv1 > 0) { in check_output_arc_limits()
183 else if (xv1 > 0 && yv1 < 0) { in check_output_arc_limits()
213 else if (xv1 <= 0 && yv1 <= 0) { in check_output_arc_limits()
243 else if (xv1 <= 0 && yv1 > 0) { in check_output_arc_limits()
|
| /dports/comms/linrad/linrad-04.02/ |
| H A D | rxout.c | 981 xv1[0]=xv1[1]; in make_audio_signal()
982 xv1[1]=xv1[2]; in make_audio_signal()
983 xv1[2]=xv1[3]; in make_audio_signal()
988 yv1[3]=xv1[0]+xv1[3]+3*(xv1[1]+xv1[2])+ in make_audio_signal()
1062 xv1[0]=xv1[1]; in make_audio_signal()
1063 xv1[1]=xv1[2]; in make_audio_signal()
1069 yv1[3]=xv1[0]+xv1[3]+3*(xv1[1]+xv1[2])+ in make_audio_signal()
1236 xv1[0]=xv1[1]; in make_audio_signal()
1237 xv1[1]=xv1[2]; in make_audio_signal()
1238 xv1[2]=xv1[3]; in make_audio_signal()
[all …]
|
| /dports/science/code_saturne/code_saturne-7.1.0/src/cdo/ |
| H A D | cs_hho_builder.c | 145 cs_quadrature_tria_7pts(xv1, xv2, xv3, surf, gpts, gw); in _add_tria_reduction()
374 _add_tria_to_reco_op(const cs_real_3_t xv1, in _add_tria_to_reco_op() argument
399 fbf->quadrature_tria(xv1, xv2, xv3, surf, gpts, gw); in _add_tria_to_reco_op()
510 _add_contrib_mcg(const cs_real_3_t xv1, in _add_contrib_mcg() argument
568 _add_contrib_mf_cg(const cs_real_3_t xv1, in _add_contrib_mf_cg() argument
589 fbf->quadrature_tria(xv1, xv2, xv3, surf, gpts, gw); in _add_contrib_mf_cg()
1019 const double *xv1 = cm->xv + 3*v1; in cs_hho_builder_compute_grad_reco() local
1561 const double *xv1 = cm->xv + 3*v1; in cs_hho_builder_reduction_from_analytic() local
1748 const double *xv1 = cm->xv + 3*v1; in cs_hho_builder_reduction_from_analytic_v() local
1903 const double *xv1 = cm->xv + 3*v1; in cs_hho_builder_compute_dirichlet() local
[all …]
|
| /dports/math/grace/grace-5.1.25/src/ |
| H A D | draw.c | 911 vpsa[0].x = viewport.xv1; in clip_polygon()
917 vpsa[3].x = viewport.xv1; in clip_polygon()
1694 if ((v.xv1 == invalid_view.xv1) && in is_valid_bbox()
1717 vtmp.xv1 = MIN2(v1.xv1, v2.xv1); in merge_bboxes()
1748 bbp->v.xv1 = MIN2(bbp->v.xv1, vp.x); in update_bbox()
1753 bbp->v.xv1 = vp.x; in update_bbox()
1810 v->xv1 -= w; in view_extend()
1825 vp.x = v->xv1; in update_bboxes_with_view()
1864 v.xv1 = xmin; in update_bboxes_with_vpoints()
1883 bb->xv1 = vp1->x; in VPoints2bbox()
[all …]
|
| /dports/math/gnuplot/gnuplot-5.4.1/demo/ |
| H A D | spline.dem | 56 xv1 = -0.4
80 set arrow from x2,y2 to x2+xv1/3,y2+yv1/3
82 set arrow from x2,y2 to x2+xv1,y2+yv1
84 cub_hermit_x1(t) = h00(t) * x1 + h01(t) * x2 + h10(t) * xv0 + h11(t) * xv1
86 cub_hermit_x2(t) = h00(t) * x1 + h01(t) * x2 + h10(t) * xv0*3 + h11(t) * xv1*3
|
| /dports/math/gnuplot-lite/gnuplot-5.4.1/demo/ |
| H A D | spline.dem | 56 xv1 = -0.4
80 set arrow from x2,y2 to x2+xv1/3,y2+yv1/3
82 set arrow from x2,y2 to x2+xv1,y2+yv1
84 cub_hermit_x1(t) = h00(t) * x1 + h01(t) * x2 + h10(t) * xv0 + h11(t) * xv1
86 cub_hermit_x2(t) = h00(t) * x1 + h01(t) * x2 + h10(t) * xv0*3 + h11(t) * xv1*3
|
| /dports/math/blis/blis-0.8.1/kernels/old/nacl/pnacl/1/ |
| H A D | bli_axpyv_opt.c | 139 const v4sf xv1 = __builtin_shufflevector(xv0, xv0, 1, 0, 3, 2); in bli_caxpyv_opt() local
140 yv += xv0 * alphav0 + xv1 * alphav1; in bli_caxpyv_opt()
167 const v4sf xv1 = __builtin_shufflevector(xv0, xv0, 1, 0, 3, 2); in bli_caxpyv_opt() local
168 yv += xv0 * alphav0 + xv1 * alphav1; in bli_caxpyv_opt()
|
| /dports/math/gnuplot-tex-extras/gnuplot-5.2.8/demo/ |
| H A D | spline.dem | 58 xv1 = -0.4
82 set arrow from x2,y2 to x2+xv1/3,y2+yv1/3
84 set arrow from x2,y2 to x2+xv1,y2+yv1
86 cub_hermit_x1(t) = h00(t) * x1 + h01(t) * x2 + h10(t) * xv0 + h11(t) * xv1
88 cub_hermit_x2(t) = h00(t) * x1 + h01(t) * x2 + h10(t) * xv0*3 + h11(t) * xv1*3
|
| /dports/science/tfel/tfel-3.4.0/include/TFEL/Math/Kriging/ |
| H A D | FactorizedKriging.ixx | 43 … FactorizedKriging<N,M,T,Model1,Model2>::operator()(const typename KrigingVariable<N,T>::type& xv1,
51 r+=a[i]*(m1.covariance(xv1-this->x1[i])*m2.covariance(xv2-this->x2[i]));
53 ApplySpecificationDrifts<0,Model1::nb,N,T,Model1>::apply(r,p,xv1);
61 FactorizedKriging<N,M,T,Model1,Model2>::addValue(const typename KrigingVariable<N,T>::type& xv1,
65 this->x1.push_back(xv1);
|
| /dports/science/tfel-edf/tfel-3.2.1/include/TFEL/Math/Kriging/ |
| H A D | FactorizedKriging.ixx | 43 … FactorizedKriging<N,M,T,Model1,Model2>::operator()(const typename KrigingVariable<N,T>::type& xv1,
51 r+=a[i]*(m1.covariance(xv1-this->x1[i])*m2.covariance(xv2-this->x2[i]));
53 ApplySpecificationDrifts<0,Model1::nb,N,T,Model1>::apply(r,p,xv1);
61 FactorizedKriging<N,M,T,Model1,Model2>::addValue(const typename KrigingVariable<N,T>::type& xv1,
65 this->x1.push_back(xv1);
|