1 // Auto-generated file. Do not edit!
2 // Template: src/f16-raddstoreexpminusmax/neonfp16arith-rr2-p2.c.in
3 // Generator: tools/xngen
4 //
5 // Copyright 2022 Google LLC
6 //
7 // This source code is licensed under the BSD-style license found in the
8 // LICENSE file in the root directory of this source tree.
9
10 #include <assert.h>
11
12 #include <arm_neon.h>
13
14 #include <xnnpack/common.h>
15 #include <xnnpack/raddstoreexpminusmax.h>
16
17
xnn_f16_raddstoreexpminusmax_ukernel__neonfp16arith_rr2_p2_x32(size_t batch,const void * input,const void * max,void * output,void * sum,const union xnn_f16_expminus_params params[restrict XNN_MIN_ELEMENTS (1)])18 void xnn_f16_raddstoreexpminusmax_ukernel__neonfp16arith_rr2_p2_x32(
19 size_t batch,
20 const void* input,
21 const void* max,
22 void* output,
23 void* sum,
24 const union xnn_f16_expminus_params params[restrict XNN_MIN_ELEMENTS(1)]) XNN_OOB_READS
25 {
26 assert(batch % sizeof(__fp16) == 0);
27
28 const float16x8_t vi_max = vld1q_dup_f16(max);
29 const float16x8_t vlog2e = vreinterpretq_f16_u16(vld1q_dup_u16(¶ms->neonfp16arith_rr2_p2.log2e));
30 const float16x8_t vmagic_bias = vreinterpretq_f16_u16(vld1q_dup_u16(¶ms->neonfp16arith_rr2_p2.magic_bias));
31 const float16x8_t vminus_ln2_hi = vreinterpretq_f16_u16(vld1q_dup_u16(¶ms->neonfp16arith_rr2_p2.minus_ln2_hi));
32 const float16x8_t vminus_ln2_lo = vreinterpretq_f16_u16(vld1q_dup_u16(¶ms->neonfp16arith_rr2_p2.minus_ln2_lo));
33 const float16x8_t vc2 = vreinterpretq_f16_u16(vld1q_dup_u16(¶ms->neonfp16arith_rr2_p2.c2));
34 const float16x8_t vc1 = vreinterpretq_f16_u16(vld1q_dup_u16(¶ms->neonfp16arith_rr2_p2.c1));
35 const float16x8_t vdenorm_cutoff = vreinterpretq_f16_u16(vld1q_dup_u16(¶ms->neonfp16arith_rr2_p2.denorm_cutoff));
36
37 const __fp16* i = (const __fp16*) input;
38 __fp16* o = (__fp16*) output;
39 float16x8_t vacc0 = vmovq_n_f16(0.0f);
40 for (; batch >= 32 * sizeof(__fp16); batch -= 32 * sizeof(__fp16)) {
41 const float16x8_t vi0 = vld1q_f16(i); i += 8;
42 const float16x8_t vi1 = vld1q_f16(i); i += 8;
43 const float16x8_t vi2 = vld1q_f16(i); i += 8;
44 const float16x8_t vi3 = vld1q_f16(i); i += 8;
45
46 const float16x8_t vx0 = vsubq_f16(vi0, vi_max);
47 const float16x8_t vx1 = vsubq_f16(vi1, vi_max);
48 const float16x8_t vx2 = vsubq_f16(vi2, vi_max);
49 const float16x8_t vx3 = vsubq_f16(vi3, vi_max);
50
51 float16x8_t vn0 = vfmaq_f16(vmagic_bias, vx0, vlog2e);
52 float16x8_t vn1 = vfmaq_f16(vmagic_bias, vx1, vlog2e);
53 float16x8_t vn2 = vfmaq_f16(vmagic_bias, vx2, vlog2e);
54 float16x8_t vn3 = vfmaq_f16(vmagic_bias, vx3, vlog2e);
55
56 const float16x8_t vs0 = vreinterpretq_f16_s16(vshlq_n_s16(vreinterpretq_s16_f16(vn0), 10));
57 const float16x8_t vs1 = vreinterpretq_f16_s16(vshlq_n_s16(vreinterpretq_s16_f16(vn1), 10));
58 const float16x8_t vs2 = vreinterpretq_f16_s16(vshlq_n_s16(vreinterpretq_s16_f16(vn2), 10));
59 const float16x8_t vs3 = vreinterpretq_f16_s16(vshlq_n_s16(vreinterpretq_s16_f16(vn3), 10));
60
61 vn0 = vsubq_f16(vn0, vmagic_bias);
62 vn1 = vsubq_f16(vn1, vmagic_bias);
63 vn2 = vsubq_f16(vn2, vmagic_bias);
64 vn3 = vsubq_f16(vn3, vmagic_bias);
65
66 float16x8_t vt0 = vfmaq_f16(vx0, vn0, vminus_ln2_hi);
67 float16x8_t vt1 = vfmaq_f16(vx1, vn1, vminus_ln2_hi);
68 float16x8_t vt2 = vfmaq_f16(vx2, vn2, vminus_ln2_hi);
69 float16x8_t vt3 = vfmaq_f16(vx3, vn3, vminus_ln2_hi);
70
71 vt0 = vfmaq_f16(vt0, vn0, vminus_ln2_lo);
72 vt1 = vfmaq_f16(vt1, vn1, vminus_ln2_lo);
73 vt2 = vfmaq_f16(vt2, vn2, vminus_ln2_lo);
74 vt3 = vfmaq_f16(vt3, vn3, vminus_ln2_lo);
75
76 const float16x8_t vp0 = vfmaq_f16(vc1, vc2, vt0);
77 const float16x8_t vp1 = vfmaq_f16(vc1, vc2, vt1);
78 const float16x8_t vp2 = vfmaq_f16(vc1, vc2, vt2);
79 const float16x8_t vp3 = vfmaq_f16(vc1, vc2, vt3);
80
81 vt0 = vmulq_f16(vt0, vs0);
82 vt1 = vmulq_f16(vt1, vs1);
83 vt2 = vmulq_f16(vt2, vs2);
84 vt3 = vmulq_f16(vt3, vs3);
85
86 float16x8_t vf0 = vfmaq_f16(vs0, vp0, vt0);
87 const uint16x8_t vm0 = vcltq_f16(vx0, vdenorm_cutoff);
88 float16x8_t vf1 = vfmaq_f16(vs1, vp1, vt1);
89 const uint16x8_t vm1 = vcltq_f16(vx1, vdenorm_cutoff);
90 float16x8_t vf2 = vfmaq_f16(vs2, vp2, vt2);
91 const uint16x8_t vm2 = vcltq_f16(vx2, vdenorm_cutoff);
92 float16x8_t vf3 = vfmaq_f16(vs3, vp3, vt3);
93 const uint16x8_t vm3 = vcltq_f16(vx3, vdenorm_cutoff);
94
95 vf0 = vreinterpretq_f16_u16(vbicq_u16(vreinterpretq_u16_f16(vf0), vm0));
96 vf1 = vreinterpretq_f16_u16(vbicq_u16(vreinterpretq_u16_f16(vf1), vm1));
97 vf2 = vreinterpretq_f16_u16(vbicq_u16(vreinterpretq_u16_f16(vf2), vm2));
98 vf3 = vreinterpretq_f16_u16(vbicq_u16(vreinterpretq_u16_f16(vf3), vm3));
99
100 vst1q_f16(o, vf0); o += 8;
101 vst1q_f16(o, vf1); o += 8;
102 vst1q_f16(o, vf2); o += 8;
103 vst1q_f16(o, vf3); o += 8;
104
105 vacc0 = vaddq_f16(vacc0, vf0);
106 vacc0 = vaddq_f16(vacc0, vf1);
107 vacc0 = vaddq_f16(vacc0, vf2);
108 vacc0 = vaddq_f16(vacc0, vf3);
109 }
110
111 float16x8_t vacc = vacc0;
112 for (; batch >= 8 * sizeof(__fp16); batch -= 8 * sizeof(__fp16)) {
113 const float16x8_t vi = vld1q_f16(i); i += 8;
114
115 const float16x8_t vx = vsubq_f16(vi, vi_max);
116
117 float16x8_t vn = vfmaq_f16(vmagic_bias, vx, vlog2e);
118 const float16x8_t vs = vreinterpretq_f16_s16(vshlq_n_s16(vreinterpretq_s16_f16(vn), 10));
119 vn = vsubq_f16(vn, vmagic_bias);
120
121 float16x8_t vt = vfmaq_f16(vx, vn, vminus_ln2_hi);
122 vt = vfmaq_f16(vt, vn, vminus_ln2_lo);
123
124 const float16x8_t vp = vfmaq_f16(vc1, vc2, vt);
125 vt = vmulq_f16(vt, vs);
126
127 float16x8_t vf = vfmaq_f16(vs, vp, vt);
128 const uint16x8_t vm = vcltq_f16(vx, vdenorm_cutoff);
129 vf = vreinterpretq_f16_u16(vbicq_u16(vreinterpretq_u16_f16(vf), vm));
130
131 vst1q_f16(o, vf); o += 8;
132
133 vacc = vaddq_f16(vacc, vf);
134 }
135 float16x4_t vacc_lo = vadd_f16(vget_low_f16(vacc), vget_high_f16(vacc));
136 if (batch != 0) {
137 assert(batch >= 1 * sizeof(__fp16));
138 assert(batch <= 7 * sizeof(__fp16));
139 const float16x8_t vi = vld1q_f16(i);
140
141 const float16x8_t vx = vsubq_f16(vi, vi_max);
142
143 float16x8_t vn = vfmaq_f16(vmagic_bias, vx, vlog2e);
144 const float16x8_t vs = vreinterpretq_f16_s16(vshlq_n_s16(vreinterpretq_s16_f16(vn), 10));
145 vn = vsubq_f16(vn, vmagic_bias);
146
147 float16x8_t vt = vfmaq_f16(vx, vn, vminus_ln2_hi);
148 vt = vfmaq_f16(vt, vn, vminus_ln2_lo);
149
150 const float16x8_t vp = vfmaq_f16(vc1, vc2, vt);
151 vt = vmulq_f16(vt, vs);
152
153 float16x8_t vf = vfmaq_f16(vs, vp, vt);
154 const uint16x8_t vm = vcltq_f16(vx, vdenorm_cutoff);
155 vf = vreinterpretq_f16_u16(vbicq_u16(vreinterpretq_u16_f16(vf), vm));
156
157 float16x4_t vf_lo = vget_low_f16(vf);
158 if (batch & (4 * sizeof(__fp16))) {
159 vst1_f16(o, vf_lo); o += 4;
160 vacc_lo = vadd_f16(vacc_lo, vf_lo);
161 vf_lo = vget_high_f16(vf);
162 }
163 if (batch & (2 * sizeof(__fp16))) {
164 vst1_lane_u32((void*) o, vreinterpret_u32_f16(vf_lo), 0); o += 2;
165 vacc_lo = vadd_f16(vacc_lo, vreinterpret_f16_u64(vshl_n_u64(vreinterpret_u64_f16(vf_lo), 32)));
166 vf_lo = vext_f16(vf_lo, vf_lo, 2);
167 }
168 if (batch & (1 * sizeof(__fp16))) {
169 vst1_lane_f16(o, vf_lo, 0);
170 vacc_lo = vadd_f16(vacc_lo, vreinterpret_f16_u64(vshl_n_u64(vreinterpret_u64_f16(vf_lo), 48)));
171 }
172 }
173 vacc_lo = vpadd_f16(vacc_lo, vacc_lo);
174 *((__fp16*) sum) = vget_lane_f16(vacc_lo, 0) + vget_lane_f16(vacc_lo, 1);
175 }
176