Home
last modified time | relevance | path

Searched refs:alpha_r (Results 1 – 25 of 603) sorted by relevance

12345678910>>...25

/dports/math/openblas/OpenBLAS-0.3.18/kernel/power/
H A Dzgemv_t_4.c152 y[0] += alpha_r * temp_r0 - alpha_i * temp_i0; in zgemv_kernel_4x4()
153 y[1] += alpha_r * temp_i0 + alpha_i * temp_r0; in zgemv_kernel_4x4()
154 y[2] += alpha_r * temp_r1 - alpha_i * temp_i1; in zgemv_kernel_4x4()
155 y[3] += alpha_r * temp_i1 + alpha_i * temp_r1; in zgemv_kernel_4x4()
156 y[4] += alpha_r * temp_r2 - alpha_i * temp_i2; in zgemv_kernel_4x4()
157 y[5] += alpha_r * temp_i2 + alpha_i * temp_r2; in zgemv_kernel_4x4()
158 y[6] += alpha_r * temp_r3 - alpha_i * temp_i3; in zgemv_kernel_4x4()
159 y[7] += alpha_r * temp_i3 + alpha_i * temp_r3; in zgemv_kernel_4x4()
163 y[0] += alpha_r * temp_r0 + alpha_i * temp_i0; in zgemv_kernel_4x4()
164 y[1] -= alpha_r * temp_i0 - alpha_i * temp_r0; in zgemv_kernel_4x4()
[all …]
H A Dcgemv_t.c121 y[0] += alpha_r * temp_r0 - alpha_i * temp_i0; in cgemv_kernel_4x4()
122 y[1] += alpha_r * temp_i0 + alpha_i * temp_r0; in cgemv_kernel_4x4()
123 y[2] += alpha_r * temp_r1 - alpha_i * temp_i1; in cgemv_kernel_4x4()
124 y[3] += alpha_r * temp_i1 + alpha_i * temp_r1; in cgemv_kernel_4x4()
125 y[4] += alpha_r * temp_r2 - alpha_i * temp_i2; in cgemv_kernel_4x4()
126 y[5] += alpha_r * temp_i2 + alpha_i * temp_r2; in cgemv_kernel_4x4()
127 y[6] += alpha_r * temp_r3 - alpha_i * temp_i3; in cgemv_kernel_4x4()
128 y[7] += alpha_r * temp_i3 + alpha_i * temp_r3; in cgemv_kernel_4x4()
132 y[0] += alpha_r * temp_r0 + alpha_i * temp_i0; in cgemv_kernel_4x4()
133 y[1] -= alpha_r * temp_i0 - alpha_i * temp_r0; in cgemv_kernel_4x4()
[all …]
/dports/multimedia/opentoonz/opentoonz-1.5.0/thirdparty/openblas/xianyi-OpenBLAS-e6e87a2/driver/level2/
H A Dzhpmv_k.c43 int CNAME(BLASLONG m, FLOAT alpha_r, FLOAT alpha_i, in CNAME() argument
81 Y[i * 2 + 0] += alpha_r * temp[0] - alpha_i * temp[1]; in CNAME()
82 Y[i * 2 + 1] += alpha_r * temp[1] + alpha_i * temp[0]; in CNAME()
86 alpha_r * X[i * 2 + 0] - alpha_i * X[i * 2 + 1], in CNAME()
87 alpha_r * X[i * 2 + 1] + alpha_i * X[i * 2 + 0], in CNAME()
110 alpha_r * X[i * 2 + 0] - alpha_i * X[i * 2 + 1], in CNAME()
111 alpha_r * X[i * 2 + 1] + alpha_i * X[i * 2 + 0], in CNAME()
135 alpha_r * X[i * 2 + 0] - alpha_i * X[i * 2 + 1], in CNAME()
136 alpha_r * X[i * 2 + 1] + alpha_i * X[i * 2 + 0], in CNAME()
159 alpha_r * X[i * 2 + 0] - alpha_i * X[i * 2 + 1], in CNAME()
[all …]
H A Dzhbmv_k.c84 alpha_r * X[i * 2 + 0] - alpha_i * X[i * 2 + 1], in CNAME()
85 alpha_r * X[i * 2 + 1] + alpha_i * X[i * 2 + 0], in CNAME()
92 Y[i * 2 + 0] += alpha_r * temp[0] - alpha_i * temp[1]; in CNAME()
93 Y[i * 2 + 1] += alpha_r * temp[1] + alpha_i * temp[0]; in CNAME()
109 alpha_r * X[i * 2 + 0] - alpha_i * X[i * 2 + 1], in CNAME()
110 alpha_r * X[i * 2 + 1] + alpha_i * X[i * 2 + 0], in CNAME()
117 Y[i * 2 + 0] += alpha_r * temp[0] - alpha_i * temp[1]; in CNAME()
134 alpha_r * X[i * 2 + 0] - alpha_i * X[i * 2 + 1], in CNAME()
135 alpha_r * X[i * 2 + 1] + alpha_i * X[i * 2 + 0], in CNAME()
159 alpha_r * X[i * 2 + 0] - alpha_i * X[i * 2 + 1], in CNAME()
[all …]
H A Dzher2_k.c43 int CNAME(BLASLONG m, FLOAT alpha_r, FLOAT alpha_i, in CNAME() argument
69 alpha_r * X[i * 2 + 0] - alpha_i * X[i * 2 + 1], in CNAME()
70 - alpha_i * X[i * 2 + 0] - alpha_r * X[i * 2 + 1], in CNAME()
73 alpha_r * Y[i * 2 + 0] + alpha_i * Y[i * 2 + 1], in CNAME()
74 alpha_i * Y[i * 2 + 0] - alpha_r * Y[i * 2 + 1], in CNAME()
80 alpha_r * X[i * 2 + 0] - alpha_i * X[i * 2 + 1], in CNAME()
81 - alpha_i * X[i * 2 + 0] - alpha_r * X[i * 2 + 1], in CNAME()
84 alpha_r * Y[i * 2 + 0] + alpha_i * Y[i * 2 + 1], in CNAME()
85 alpha_i * Y[i * 2 + 0] - alpha_r * Y[i * 2 + 1], in CNAME()
93 alpha_r * X[i * 2 + 0] - alpha_i * X[i * 2 + 1], in CNAME()
[all …]
H A Dzhpr2_k.c43 int CNAME(BLASLONG m, FLOAT alpha_r, FLOAT alpha_i, in CNAME() argument
67 alpha_r * X[i * 2 + 0] - alpha_i * X[i * 2 + 1], in CNAME()
68 - alpha_i * X[i * 2 + 0] - alpha_r * X[i * 2 + 1], in CNAME()
71 alpha_r * Y[i * 2 + 0] + alpha_i * Y[i * 2 + 1], in CNAME()
72 alpha_i * Y[i * 2 + 0] - alpha_r * Y[i * 2 + 1], in CNAME()
78 alpha_r * X[i * 2 + 0] - alpha_i * X[i * 2 + 1], in CNAME()
79 - alpha_i * X[i * 2 + 0] - alpha_r * X[i * 2 + 1], in CNAME()
82 alpha_r * Y[i * 2 + 0] + alpha_i * Y[i * 2 + 1], in CNAME()
83 alpha_i * Y[i * 2 + 0] - alpha_r * Y[i * 2 + 1], in CNAME()
91 alpha_r * X[i * 2 + 0] - alpha_i * X[i * 2 + 1], in CNAME()
[all …]
H A Dsyr2_thread.c48 FLOAT alpha_r; in syr_kernel() local
61 alpha_r = *((FLOAT *)args -> alpha + 0); in syr_kernel()
116 alpha_r * x[i * COMPSIZE + 0] - alpha_i * x[i * COMPSIZE + 1], in syr_kernel()
117 alpha_i * x[i * COMPSIZE + 0] + alpha_r * x[i * COMPSIZE + 1], in syr_kernel()
121 alpha_r * x[i * COMPSIZE + 0] - alpha_i * x[i * COMPSIZE + 1], in syr_kernel()
122 alpha_i * x[i * COMPSIZE + 0] + alpha_r * x[i * COMPSIZE + 1], in syr_kernel()
129 alpha_r * y[i * COMPSIZE + 0] - alpha_i * y[i * COMPSIZE + 1], in syr_kernel()
130 alpha_i * y[i * COMPSIZE + 0] + alpha_r * y[i * COMPSIZE + 1], in syr_kernel()
134 alpha_r * y[i * COMPSIZE + 0] - alpha_i * y[i * COMPSIZE + 1], in syr_kernel()
135 alpha_i * y[i * COMPSIZE + 0] + alpha_r * y[i * COMPSIZE + 1], in syr_kernel()
[all …]
H A Dspr2_thread.c48 FLOAT alpha_r; in syr_kernel() local
61 alpha_r = *((FLOAT *)args -> alpha + 0); in syr_kernel()
120 alpha_r * x[i * COMPSIZE + 0] - alpha_i * x[i * COMPSIZE + 1], in syr_kernel()
121 alpha_i * x[i * COMPSIZE + 0] + alpha_r * x[i * COMPSIZE + 1], in syr_kernel()
125 alpha_r * x[i * COMPSIZE + 0] - alpha_i * x[i * COMPSIZE + 1], in syr_kernel()
126 alpha_i * x[i * COMPSIZE + 0] + alpha_r * x[i * COMPSIZE + 1], in syr_kernel()
133 alpha_r * y[i * COMPSIZE + 0] - alpha_i * y[i * COMPSIZE + 1], in syr_kernel()
134 alpha_i * y[i * COMPSIZE + 0] + alpha_r * y[i * COMPSIZE + 1], in syr_kernel()
138 alpha_r * y[i * COMPSIZE + 0] - alpha_i * y[i * COMPSIZE + 1], in syr_kernel()
139 alpha_i * y[i * COMPSIZE + 0] + alpha_r * y[i * COMPSIZE + 1], in syr_kernel()
[all …]
/dports/cad/meshlab/meshlab-Meshlab-2020.05/src/plugins_unsupported/external/GotoBLAS2/driver/level2/
H A Dzhpmv_k.c26 int CNAME(BLASLONG m, FLOAT alpha_r, FLOAT alpha_i, in CNAME() argument
64 Y[i * 2 + 0] += alpha_r * temp[0] - alpha_i * temp[1]; in CNAME()
65 Y[i * 2 + 1] += alpha_r * temp[1] + alpha_i * temp[0]; in CNAME()
69 alpha_r * X[i * 2 + 0] - alpha_i * X[i * 2 + 1], in CNAME()
70 alpha_r * X[i * 2 + 1] + alpha_i * X[i * 2 + 0], in CNAME()
93 alpha_r * X[i * 2 + 0] - alpha_i * X[i * 2 + 1], in CNAME()
94 alpha_r * X[i * 2 + 1] + alpha_i * X[i * 2 + 0], in CNAME()
118 alpha_r * X[i * 2 + 0] - alpha_i * X[i * 2 + 1], in CNAME()
119 alpha_r * X[i * 2 + 1] + alpha_i * X[i * 2 + 0], in CNAME()
142 alpha_r * X[i * 2 + 0] - alpha_i * X[i * 2 + 1], in CNAME()
[all …]
H A Dzhbmv_k.c67 alpha_r * X[i * 2 + 0] - alpha_i * X[i * 2 + 1], in CNAME()
68 alpha_r * X[i * 2 + 1] + alpha_i * X[i * 2 + 0], in CNAME()
75 Y[i * 2 + 0] += alpha_r * temp[0] - alpha_i * temp[1]; in CNAME()
76 Y[i * 2 + 1] += alpha_r * temp[1] + alpha_i * temp[0]; in CNAME()
92 alpha_r * X[i * 2 + 0] - alpha_i * X[i * 2 + 1], in CNAME()
93 alpha_r * X[i * 2 + 1] + alpha_i * X[i * 2 + 0], in CNAME()
100 Y[i * 2 + 0] += alpha_r * temp[0] - alpha_i * temp[1]; in CNAME()
117 alpha_r * X[i * 2 + 0] - alpha_i * X[i * 2 + 1], in CNAME()
118 alpha_r * X[i * 2 + 1] + alpha_i * X[i * 2 + 0], in CNAME()
142 alpha_r * X[i * 2 + 0] - alpha_i * X[i * 2 + 1], in CNAME()
[all …]
H A Dzher2_k.c26 int CNAME(BLASLONG m, FLOAT alpha_r, FLOAT alpha_i, in CNAME() argument
52 alpha_r * X[i * 2 + 0] - alpha_i * X[i * 2 + 1], in CNAME()
53 - alpha_i * X[i * 2 + 0] - alpha_r * X[i * 2 + 1], in CNAME()
56 alpha_r * Y[i * 2 + 0] + alpha_i * Y[i * 2 + 1], in CNAME()
57 alpha_i * Y[i * 2 + 0] - alpha_r * Y[i * 2 + 1], in CNAME()
63 alpha_r * X[i * 2 + 0] - alpha_i * X[i * 2 + 1], in CNAME()
64 - alpha_i * X[i * 2 + 0] - alpha_r * X[i * 2 + 1], in CNAME()
67 alpha_r * Y[i * 2 + 0] + alpha_i * Y[i * 2 + 1], in CNAME()
68 alpha_i * Y[i * 2 + 0] - alpha_r * Y[i * 2 + 1], in CNAME()
76 alpha_r * X[i * 2 + 0] - alpha_i * X[i * 2 + 1], in CNAME()
[all …]
H A Dzhpr2_k.c26 int CNAME(BLASLONG m, FLOAT alpha_r, FLOAT alpha_i, in CNAME() argument
50 alpha_r * X[i * 2 + 0] - alpha_i * X[i * 2 + 1], in CNAME()
51 - alpha_i * X[i * 2 + 0] - alpha_r * X[i * 2 + 1], in CNAME()
54 alpha_r * Y[i * 2 + 0] + alpha_i * Y[i * 2 + 1], in CNAME()
55 alpha_i * Y[i * 2 + 0] - alpha_r * Y[i * 2 + 1], in CNAME()
61 alpha_r * X[i * 2 + 0] - alpha_i * X[i * 2 + 1], in CNAME()
62 - alpha_i * X[i * 2 + 0] - alpha_r * X[i * 2 + 1], in CNAME()
65 alpha_r * Y[i * 2 + 0] + alpha_i * Y[i * 2 + 1], in CNAME()
66 alpha_i * Y[i * 2 + 0] - alpha_r * Y[i * 2 + 1], in CNAME()
74 alpha_r * X[i * 2 + 0] - alpha_i * X[i * 2 + 1], in CNAME()
[all …]
/dports/math/openblas/OpenBLAS-0.3.18/driver/level2/
H A Dzhpmv_k.c43 int CNAME(BLASLONG m, FLOAT alpha_r, FLOAT alpha_i, in CNAME() argument
83 Y[i * 2 + 0] += alpha_r * temp[0] - alpha_i * temp[1]; in CNAME()
84 Y[i * 2 + 1] += alpha_r * temp[1] + alpha_i * temp[0]; in CNAME()
88 alpha_r * X[i * 2 + 0] - alpha_i * X[i * 2 + 1], in CNAME()
89 alpha_r * X[i * 2 + 1] + alpha_i * X[i * 2 + 0], in CNAME()
112 alpha_r * X[i * 2 + 0] - alpha_i * X[i * 2 + 1], in CNAME()
113 alpha_r * X[i * 2 + 1] + alpha_i * X[i * 2 + 0], in CNAME()
137 alpha_r * X[i * 2 + 0] - alpha_i * X[i * 2 + 1], in CNAME()
138 alpha_r * X[i * 2 + 1] + alpha_i * X[i * 2 + 0], in CNAME()
161 alpha_r * X[i * 2 + 0] - alpha_i * X[i * 2 + 1], in CNAME()
[all …]
H A Dzhbmv_k.c86 alpha_r * X[i * 2 + 0] - alpha_i * X[i * 2 + 1], in CNAME()
87 alpha_r * X[i * 2 + 1] + alpha_i * X[i * 2 + 0], in CNAME()
94 Y[i * 2 + 0] += alpha_r * temp[0] - alpha_i * temp[1]; in CNAME()
95 Y[i * 2 + 1] += alpha_r * temp[1] + alpha_i * temp[0]; in CNAME()
111 alpha_r * X[i * 2 + 0] - alpha_i * X[i * 2 + 1], in CNAME()
112 alpha_r * X[i * 2 + 1] + alpha_i * X[i * 2 + 0], in CNAME()
119 Y[i * 2 + 0] += alpha_r * temp[0] - alpha_i * temp[1]; in CNAME()
136 alpha_r * X[i * 2 + 0] - alpha_i * X[i * 2 + 1], in CNAME()
137 alpha_r * X[i * 2 + 1] + alpha_i * X[i * 2 + 0], in CNAME()
161 alpha_r * X[i * 2 + 0] - alpha_i * X[i * 2 + 1], in CNAME()
[all …]
H A Dzhpr2_k.c43 int CNAME(BLASLONG m, FLOAT alpha_r, FLOAT alpha_i, in CNAME() argument
67 alpha_r * X[i * 2 + 0] - alpha_i * X[i * 2 + 1], in CNAME()
68 - alpha_i * X[i * 2 + 0] - alpha_r * X[i * 2 + 1], in CNAME()
71 alpha_r * Y[i * 2 + 0] + alpha_i * Y[i * 2 + 1], in CNAME()
72 alpha_i * Y[i * 2 + 0] - alpha_r * Y[i * 2 + 1], in CNAME()
78 alpha_r * X[i * 2 + 0] - alpha_i * X[i * 2 + 1], in CNAME()
79 - alpha_i * X[i * 2 + 0] - alpha_r * X[i * 2 + 1], in CNAME()
82 alpha_r * Y[i * 2 + 0] + alpha_i * Y[i * 2 + 1], in CNAME()
83 alpha_i * Y[i * 2 + 0] - alpha_r * Y[i * 2 + 1], in CNAME()
91 alpha_r * X[i * 2 + 0] - alpha_i * X[i * 2 + 1], in CNAME()
[all …]
H A Dzher2_k.c43 int CNAME(BLASLONG m, FLOAT alpha_r, FLOAT alpha_i, in CNAME() argument
69 alpha_r * X[i * 2 + 0] - alpha_i * X[i * 2 + 1], in CNAME()
70 - alpha_i * X[i * 2 + 0] - alpha_r * X[i * 2 + 1], in CNAME()
73 alpha_r * Y[i * 2 + 0] + alpha_i * Y[i * 2 + 1], in CNAME()
74 alpha_i * Y[i * 2 + 0] - alpha_r * Y[i * 2 + 1], in CNAME()
80 alpha_r * X[i * 2 + 0] - alpha_i * X[i * 2 + 1], in CNAME()
81 - alpha_i * X[i * 2 + 0] - alpha_r * X[i * 2 + 1], in CNAME()
84 alpha_r * Y[i * 2 + 0] + alpha_i * Y[i * 2 + 1], in CNAME()
85 alpha_i * Y[i * 2 + 0] - alpha_r * Y[i * 2 + 1], in CNAME()
93 alpha_r * X[i * 2 + 0] - alpha_i * X[i * 2 + 1], in CNAME()
[all …]
H A Dspr2_thread.c48 FLOAT alpha_r; in syr_kernel() local
60 alpha_r = *((FLOAT *)args -> alpha + 0); in syr_kernel()
119 alpha_r * x[i * COMPSIZE + 0] - alpha_i * x[i * COMPSIZE + 1], in syr_kernel()
120 alpha_i * x[i * COMPSIZE + 0] + alpha_r * x[i * COMPSIZE + 1], in syr_kernel()
124 alpha_r * x[i * COMPSIZE + 0] - alpha_i * x[i * COMPSIZE + 1], in syr_kernel()
125 alpha_i * x[i * COMPSIZE + 0] + alpha_r * x[i * COMPSIZE + 1], in syr_kernel()
132 alpha_r * y[i * COMPSIZE + 0] - alpha_i * y[i * COMPSIZE + 1], in syr_kernel()
133 alpha_i * y[i * COMPSIZE + 0] + alpha_r * y[i * COMPSIZE + 1], in syr_kernel()
137 alpha_r * y[i * COMPSIZE + 0] - alpha_i * y[i * COMPSIZE + 1], in syr_kernel()
138 alpha_i * y[i * COMPSIZE + 0] + alpha_r * y[i * COMPSIZE + 1], in syr_kernel()
[all …]
/dports/math/gotoblas/GotoBLAS2/driver/level2/
H A Dzhpmv_k.c43 int CNAME(BLASLONG m, FLOAT alpha_r, FLOAT alpha_i, in CNAME() argument
81 Y[i * 2 + 0] += alpha_r * temp[0] - alpha_i * temp[1]; in CNAME()
82 Y[i * 2 + 1] += alpha_r * temp[1] + alpha_i * temp[0]; in CNAME()
86 alpha_r * X[i * 2 + 0] - alpha_i * X[i * 2 + 1], in CNAME()
87 alpha_r * X[i * 2 + 1] + alpha_i * X[i * 2 + 0], in CNAME()
110 alpha_r * X[i * 2 + 0] - alpha_i * X[i * 2 + 1], in CNAME()
111 alpha_r * X[i * 2 + 1] + alpha_i * X[i * 2 + 0], in CNAME()
135 alpha_r * X[i * 2 + 0] - alpha_i * X[i * 2 + 1], in CNAME()
136 alpha_r * X[i * 2 + 1] + alpha_i * X[i * 2 + 0], in CNAME()
159 alpha_r * X[i * 2 + 0] - alpha_i * X[i * 2 + 1], in CNAME()
[all …]
H A Dzhbmv_k.c84 alpha_r * X[i * 2 + 0] - alpha_i * X[i * 2 + 1], in CNAME()
85 alpha_r * X[i * 2 + 1] + alpha_i * X[i * 2 + 0], in CNAME()
92 Y[i * 2 + 0] += alpha_r * temp[0] - alpha_i * temp[1]; in CNAME()
93 Y[i * 2 + 1] += alpha_r * temp[1] + alpha_i * temp[0]; in CNAME()
109 alpha_r * X[i * 2 + 0] - alpha_i * X[i * 2 + 1], in CNAME()
110 alpha_r * X[i * 2 + 1] + alpha_i * X[i * 2 + 0], in CNAME()
117 Y[i * 2 + 0] += alpha_r * temp[0] - alpha_i * temp[1]; in CNAME()
134 alpha_r * X[i * 2 + 0] - alpha_i * X[i * 2 + 1], in CNAME()
135 alpha_r * X[i * 2 + 1] + alpha_i * X[i * 2 + 0], in CNAME()
159 alpha_r * X[i * 2 + 0] - alpha_i * X[i * 2 + 1], in CNAME()
[all …]
H A Dzhpr2_k.c43 int CNAME(BLASLONG m, FLOAT alpha_r, FLOAT alpha_i, in CNAME() argument
67 alpha_r * X[i * 2 + 0] - alpha_i * X[i * 2 + 1], in CNAME()
68 - alpha_i * X[i * 2 + 0] - alpha_r * X[i * 2 + 1], in CNAME()
71 alpha_r * Y[i * 2 + 0] + alpha_i * Y[i * 2 + 1], in CNAME()
72 alpha_i * Y[i * 2 + 0] - alpha_r * Y[i * 2 + 1], in CNAME()
78 alpha_r * X[i * 2 + 0] - alpha_i * X[i * 2 + 1], in CNAME()
79 - alpha_i * X[i * 2 + 0] - alpha_r * X[i * 2 + 1], in CNAME()
82 alpha_r * Y[i * 2 + 0] + alpha_i * Y[i * 2 + 1], in CNAME()
83 alpha_i * Y[i * 2 + 0] - alpha_r * Y[i * 2 + 1], in CNAME()
91 alpha_r * X[i * 2 + 0] - alpha_i * X[i * 2 + 1], in CNAME()
[all …]
H A Dzher2_k.c43 int CNAME(BLASLONG m, FLOAT alpha_r, FLOAT alpha_i, in CNAME() argument
69 alpha_r * X[i * 2 + 0] - alpha_i * X[i * 2 + 1], in CNAME()
70 - alpha_i * X[i * 2 + 0] - alpha_r * X[i * 2 + 1], in CNAME()
73 alpha_r * Y[i * 2 + 0] + alpha_i * Y[i * 2 + 1], in CNAME()
74 alpha_i * Y[i * 2 + 0] - alpha_r * Y[i * 2 + 1], in CNAME()
80 alpha_r * X[i * 2 + 0] - alpha_i * X[i * 2 + 1], in CNAME()
81 - alpha_i * X[i * 2 + 0] - alpha_r * X[i * 2 + 1], in CNAME()
84 alpha_r * Y[i * 2 + 0] + alpha_i * Y[i * 2 + 1], in CNAME()
85 alpha_i * Y[i * 2 + 0] - alpha_r * Y[i * 2 + 1], in CNAME()
93 alpha_r * X[i * 2 + 0] - alpha_i * X[i * 2 + 1], in CNAME()
[all …]
/dports/math/blis/blis-0.8.1/examples/oapi/
H A D02obj_ij.c84 double alpha_r, alpha_i; in main() local
85 bli_getijm( i, j, &a1, &alpha_r, &alpha_i ); in main()
116 bli_setijm( alpha_r, alpha_i, i, j, &a1 ); in main()
119 bli_setijm( alpha_r, alpha_i, i, j, &a1 ); in main()
122 bli_setijm( alpha_r, alpha_i, i, j, &a1 ); in main()
158 alpha_r *= -1.0; alpha_i *= -1.0; in main()
159 bli_setijm( alpha_r, alpha_i, i, j, &a3 ); in main()
163 alpha_r *= -1.0; alpha_i *= -1.0; in main()
164 bli_setijm( alpha_r, alpha_i, i, j, &a3 ); in main()
168 alpha_r *= -1.0; alpha_i *= -1.0; in main()
[all …]
/dports/math/openblas/OpenBLAS-0.3.18/kernel/mips/
H A Dzgemm_kernel_4x4_msa.c631 dst0_r = alpha_r * res0_r; \
633 dst0_i = alpha_r * res0_i; \
638 dst0_r = alpha_r * res2_r; \
640 dst0_i = alpha_r * res2_i; \
648 dst0_r = alpha_r * res4_r; \
650 dst0_i = alpha_r * res4_i; \
655 dst0_r = alpha_r * res6_r; \
657 dst0_i = alpha_r * res6_i; \
668 dst0_r = alpha_r * res0_r; \
670 dst0_i = alpha_r * res0_i; \
[all …]
/dports/math/openblas/OpenBLAS-0.3.18/kernel/x86_64/
H A Dzgemv_n_4.c154 temp_r = alpha_r * src[0] - alpha_i * src[1]; in add_y()
155 temp_i = alpha_r * src[1] + alpha_i * src[0]; in add_y()
157 temp_r = alpha_r * src[0] + alpha_i * src[1]; in add_y()
181 temp_r0 = alpha_r * src[0] - alpha_i * src[1]; in add_y()
182 temp_i0 = alpha_r * src[1] + alpha_i * src[0]; in add_y()
183 temp_r1 = alpha_r * src[2] - alpha_i * src[3]; in add_y()
184 temp_i1 = alpha_r * src[3] + alpha_i * src[2]; in add_y()
185 temp_r2 = alpha_r * src[4] - alpha_i * src[5]; in add_y()
186 temp_i2 = alpha_r * src[5] + alpha_i * src[4]; in add_y()
187 temp_r3 = alpha_r * src[6] - alpha_i * src[7]; in add_y()
[all …]
H A Dcgemv_n_4.c152 temp_r = alpha_r * src[0] - alpha_i * src[1]; in add_y()
153 temp_i = alpha_r * src[1] + alpha_i * src[0]; in add_y()
155 temp_r = alpha_r * src[0] + alpha_i * src[1]; in add_y()
179 temp_r0 = alpha_r * src[0] - alpha_i * src[1]; in add_y()
180 temp_i0 = alpha_r * src[1] + alpha_i * src[0]; in add_y()
181 temp_r1 = alpha_r * src[2] - alpha_i * src[3]; in add_y()
182 temp_i1 = alpha_r * src[3] + alpha_i * src[2]; in add_y()
183 temp_r2 = alpha_r * src[4] - alpha_i * src[5]; in add_y()
184 temp_i2 = alpha_r * src[5] + alpha_i * src[4]; in add_y()
185 temp_r3 = alpha_r * src[6] - alpha_i * src[7]; in add_y()
[all …]

12345678910>>...25