1 #include <freehdl/kernel.h>
2 #include <freehdl/std.h>
3
4
5
6 /* package :ieee:numeric_bit */
7 /* External declarations */
8 /* End of external declarations */
9 extern array_info L4ieee_Q11numeric_bit_I3_t0_INFO;
10 #define L4ieee_Q11numeric_bit_T3_t0 array_type<enumeration >
11 #define L4ieee_Q11numeric_bit_I3_t0 array_info
12
13 extern array_info L4ieee_Q11numeric_bit_I8unsigned_INFO;
14 #define L4ieee_Q11numeric_bit_T8unsigned array_type<enumeration >
15 #define L4ieee_Q11numeric_bit_I8unsigned array_info
16
17 extern array_info L4ieee_Q11numeric_bit_I6signed_INFO;
18 #define L4ieee_Q11numeric_bit_T6signed array_type<enumeration >
19 #define L4ieee_Q11numeric_bit_I6signed array_info
20
21 /* Prototype for subprogram :ieee:numeric_bit:"abs" */
22 L4ieee_Q11numeric_bit_T6signed L4ieee_Q11numeric_bit_Y6op_abs_i54(const L4ieee_Q11numeric_bit_T6signed &);
23 /* Prototype for subprogram :ieee:numeric_bit:"-" */
24 L4ieee_Q11numeric_bit_T6signed L4ieee_Q11numeric_bit_Y8op_minus_i56(const L4ieee_Q11numeric_bit_T6signed &);
25 /* Prototype for subprogram :ieee:numeric_bit:"+" */
26 L4ieee_Q11numeric_bit_T8unsigned L4ieee_Q11numeric_bit_Y7op_plus_i59(const L4ieee_Q11numeric_bit_T8unsigned &,const L4ieee_Q11numeric_bit_T8unsigned &);
27 /* Prototype for subprogram :ieee:numeric_bit:"+" */
28 L4ieee_Q11numeric_bit_T6signed L4ieee_Q11numeric_bit_Y7op_plus_i62(const L4ieee_Q11numeric_bit_T6signed &,const L4ieee_Q11numeric_bit_T6signed &);
29 /* Prototype for subprogram :ieee:numeric_bit:"+" */
30 L4ieee_Q11numeric_bit_T8unsigned L4ieee_Q11numeric_bit_Y7op_plus_i65(const L4ieee_Q11numeric_bit_T8unsigned &,const integer );
31 /* Prototype for subprogram :ieee:numeric_bit:"+" */
32 L4ieee_Q11numeric_bit_T8unsigned L4ieee_Q11numeric_bit_Y7op_plus_i68(const integer ,const L4ieee_Q11numeric_bit_T8unsigned &);
33 /* Prototype for subprogram :ieee:numeric_bit:"+" */
34 L4ieee_Q11numeric_bit_T6signed L4ieee_Q11numeric_bit_Y7op_plus_i71(const integer ,const L4ieee_Q11numeric_bit_T6signed &);
35 /* Prototype for subprogram :ieee:numeric_bit:"+" */
36 L4ieee_Q11numeric_bit_T6signed L4ieee_Q11numeric_bit_Y7op_plus_i74(const L4ieee_Q11numeric_bit_T6signed &,const integer );
37 /* Prototype for subprogram :ieee:numeric_bit:"-" */
38 L4ieee_Q11numeric_bit_T8unsigned L4ieee_Q11numeric_bit_Y8op_minus_i77(const L4ieee_Q11numeric_bit_T8unsigned &,const L4ieee_Q11numeric_bit_T8unsigned &);
39 /* Prototype for subprogram :ieee:numeric_bit:"-" */
40 L4ieee_Q11numeric_bit_T6signed L4ieee_Q11numeric_bit_Y8op_minus_i80(const L4ieee_Q11numeric_bit_T6signed &,const L4ieee_Q11numeric_bit_T6signed &);
41 /* Prototype for subprogram :ieee:numeric_bit:"-" */
42 L4ieee_Q11numeric_bit_T8unsigned L4ieee_Q11numeric_bit_Y8op_minus_i83(const L4ieee_Q11numeric_bit_T8unsigned &,const integer );
43 /* Prototype for subprogram :ieee:numeric_bit:"-" */
44 L4ieee_Q11numeric_bit_T8unsigned L4ieee_Q11numeric_bit_Y8op_minus_i86(const integer ,const L4ieee_Q11numeric_bit_T8unsigned &);
45 /* Prototype for subprogram :ieee:numeric_bit:"-" */
46 L4ieee_Q11numeric_bit_T6signed L4ieee_Q11numeric_bit_Y8op_minus_i89(const L4ieee_Q11numeric_bit_T6signed &,const integer );
47 /* Prototype for subprogram :ieee:numeric_bit:"-" */
48 L4ieee_Q11numeric_bit_T6signed L4ieee_Q11numeric_bit_Y8op_minus_i92(const integer ,const L4ieee_Q11numeric_bit_T6signed &);
49 /* Prototype for subprogram :ieee:numeric_bit:"*" */
50 L4ieee_Q11numeric_bit_T8unsigned L4ieee_Q11numeric_bit_Y7op_mult_i95(const L4ieee_Q11numeric_bit_T8unsigned &,const L4ieee_Q11numeric_bit_T8unsigned &);
51 /* Prototype for subprogram :ieee:numeric_bit:"*" */
52 L4ieee_Q11numeric_bit_T6signed L4ieee_Q11numeric_bit_Y7op_mult_i98(const L4ieee_Q11numeric_bit_T6signed &,const L4ieee_Q11numeric_bit_T6signed &);
53 /* Prototype for subprogram :ieee:numeric_bit:"*" */
54 L4ieee_Q11numeric_bit_T8unsigned L4ieee_Q11numeric_bit_Y7op_mult_i101(const L4ieee_Q11numeric_bit_T8unsigned &,const integer );
55 /* Prototype for subprogram :ieee:numeric_bit:"*" */
56 L4ieee_Q11numeric_bit_T8unsigned L4ieee_Q11numeric_bit_Y7op_mult_i104(const integer ,const L4ieee_Q11numeric_bit_T8unsigned &);
57 /* Prototype for subprogram :ieee:numeric_bit:"*" */
58 L4ieee_Q11numeric_bit_T6signed L4ieee_Q11numeric_bit_Y7op_mult_i107(const L4ieee_Q11numeric_bit_T6signed &,const integer );
59 /* Prototype for subprogram :ieee:numeric_bit:"*" */
60 L4ieee_Q11numeric_bit_T6signed L4ieee_Q11numeric_bit_Y7op_mult_i110(const integer ,const L4ieee_Q11numeric_bit_T6signed &);
61 /* Prototype for subprogram :ieee:numeric_bit:"/" */
62 L4ieee_Q11numeric_bit_T8unsigned L4ieee_Q11numeric_bit_Y6op_div_i113(const L4ieee_Q11numeric_bit_T8unsigned &,const L4ieee_Q11numeric_bit_T8unsigned &);
63 /* Prototype for subprogram :ieee:numeric_bit:"/" */
64 L4ieee_Q11numeric_bit_T6signed L4ieee_Q11numeric_bit_Y6op_div_i116(const L4ieee_Q11numeric_bit_T6signed &,const L4ieee_Q11numeric_bit_T6signed &);
65 /* Prototype for subprogram :ieee:numeric_bit:"/" */
66 L4ieee_Q11numeric_bit_T8unsigned L4ieee_Q11numeric_bit_Y6op_div_i119(const L4ieee_Q11numeric_bit_T8unsigned &,const integer );
67 /* Prototype for subprogram :ieee:numeric_bit:"/" */
68 L4ieee_Q11numeric_bit_T8unsigned L4ieee_Q11numeric_bit_Y6op_div_i122(const integer ,const L4ieee_Q11numeric_bit_T8unsigned &);
69 /* Prototype for subprogram :ieee:numeric_bit:"/" */
70 L4ieee_Q11numeric_bit_T6signed L4ieee_Q11numeric_bit_Y6op_div_i125(const L4ieee_Q11numeric_bit_T6signed &,const integer );
71 /* Prototype for subprogram :ieee:numeric_bit:"/" */
72 L4ieee_Q11numeric_bit_T6signed L4ieee_Q11numeric_bit_Y6op_div_i128(const integer ,const L4ieee_Q11numeric_bit_T6signed &);
73 /* Prototype for subprogram :ieee:numeric_bit:"rem" */
74 L4ieee_Q11numeric_bit_T8unsigned L4ieee_Q11numeric_bit_Y6op_rem_i131(const L4ieee_Q11numeric_bit_T8unsigned &,const L4ieee_Q11numeric_bit_T8unsigned &);
75 /* Prototype for subprogram :ieee:numeric_bit:"rem" */
76 L4ieee_Q11numeric_bit_T6signed L4ieee_Q11numeric_bit_Y6op_rem_i134(const L4ieee_Q11numeric_bit_T6signed &,const L4ieee_Q11numeric_bit_T6signed &);
77 /* Prototype for subprogram :ieee:numeric_bit:"rem" */
78 L4ieee_Q11numeric_bit_T8unsigned L4ieee_Q11numeric_bit_Y6op_rem_i137(const L4ieee_Q11numeric_bit_T8unsigned &,const integer );
79 /* Prototype for subprogram :ieee:numeric_bit:"rem" */
80 L4ieee_Q11numeric_bit_T8unsigned L4ieee_Q11numeric_bit_Y6op_rem_i140(const integer ,const L4ieee_Q11numeric_bit_T8unsigned &);
81 /* Prototype for subprogram :ieee:numeric_bit:"rem" */
82 L4ieee_Q11numeric_bit_T6signed L4ieee_Q11numeric_bit_Y6op_rem_i143(const L4ieee_Q11numeric_bit_T6signed &,const integer );
83 /* Prototype for subprogram :ieee:numeric_bit:"rem" */
84 L4ieee_Q11numeric_bit_T6signed L4ieee_Q11numeric_bit_Y6op_rem_i146(const integer ,const L4ieee_Q11numeric_bit_T6signed &);
85 /* Prototype for subprogram :ieee:numeric_bit:"mod" */
86 L4ieee_Q11numeric_bit_T8unsigned L4ieee_Q11numeric_bit_Y6op_mod_i149(const L4ieee_Q11numeric_bit_T8unsigned &,const L4ieee_Q11numeric_bit_T8unsigned &);
87 /* Prototype for subprogram :ieee:numeric_bit:"mod" */
88 L4ieee_Q11numeric_bit_T6signed L4ieee_Q11numeric_bit_Y6op_mod_i152(const L4ieee_Q11numeric_bit_T6signed &,const L4ieee_Q11numeric_bit_T6signed &);
89 /* Prototype for subprogram :ieee:numeric_bit:"mod" */
90 L4ieee_Q11numeric_bit_T8unsigned L4ieee_Q11numeric_bit_Y6op_mod_i155(const L4ieee_Q11numeric_bit_T8unsigned &,const integer );
91 /* Prototype for subprogram :ieee:numeric_bit:"mod" */
92 L4ieee_Q11numeric_bit_T8unsigned L4ieee_Q11numeric_bit_Y6op_mod_i158(const integer ,const L4ieee_Q11numeric_bit_T8unsigned &);
93 /* Prototype for subprogram :ieee:numeric_bit:"mod" */
94 L4ieee_Q11numeric_bit_T6signed L4ieee_Q11numeric_bit_Y6op_mod_i161(const L4ieee_Q11numeric_bit_T6signed &,const integer );
95 /* Prototype for subprogram :ieee:numeric_bit:"mod" */
96 L4ieee_Q11numeric_bit_T6signed L4ieee_Q11numeric_bit_Y6op_mod_i164(const integer ,const L4ieee_Q11numeric_bit_T6signed &);
97 /* Prototype for subprogram :ieee:numeric_bit:">" */
98 enumeration L4ieee_Q11numeric_bit_Y5op_gt_i167(const L4ieee_Q11numeric_bit_T8unsigned &,const L4ieee_Q11numeric_bit_T8unsigned &);
99 /* Prototype for subprogram :ieee:numeric_bit:">" */
100 enumeration L4ieee_Q11numeric_bit_Y5op_gt_i170(const L4ieee_Q11numeric_bit_T6signed &,const L4ieee_Q11numeric_bit_T6signed &);
101 /* Prototype for subprogram :ieee:numeric_bit:">" */
102 enumeration L4ieee_Q11numeric_bit_Y5op_gt_i173(const integer ,const L4ieee_Q11numeric_bit_T8unsigned &);
103 /* Prototype for subprogram :ieee:numeric_bit:">" */
104 enumeration L4ieee_Q11numeric_bit_Y5op_gt_i176(const integer ,const L4ieee_Q11numeric_bit_T6signed &);
105 /* Prototype for subprogram :ieee:numeric_bit:">" */
106 enumeration L4ieee_Q11numeric_bit_Y5op_gt_i179(const L4ieee_Q11numeric_bit_T8unsigned &,const integer );
107 /* Prototype for subprogram :ieee:numeric_bit:">" */
108 enumeration L4ieee_Q11numeric_bit_Y5op_gt_i182(const L4ieee_Q11numeric_bit_T6signed &,const integer );
109 /* Prototype for subprogram :ieee:numeric_bit:"<" */
110 enumeration L4ieee_Q11numeric_bit_Y5op_lt_i185(const L4ieee_Q11numeric_bit_T8unsigned &,const L4ieee_Q11numeric_bit_T8unsigned &);
111 /* Prototype for subprogram :ieee:numeric_bit:"<" */
112 enumeration L4ieee_Q11numeric_bit_Y5op_lt_i188(const L4ieee_Q11numeric_bit_T6signed &,const L4ieee_Q11numeric_bit_T6signed &);
113 /* Prototype for subprogram :ieee:numeric_bit:"<" */
114 enumeration L4ieee_Q11numeric_bit_Y5op_lt_i191(const integer ,const L4ieee_Q11numeric_bit_T8unsigned &);
115 /* Prototype for subprogram :ieee:numeric_bit:"<" */
116 enumeration L4ieee_Q11numeric_bit_Y5op_lt_i194(const integer ,const L4ieee_Q11numeric_bit_T6signed &);
117 /* Prototype for subprogram :ieee:numeric_bit:"<" */
118 enumeration L4ieee_Q11numeric_bit_Y5op_lt_i197(const L4ieee_Q11numeric_bit_T8unsigned &,const integer );
119 /* Prototype for subprogram :ieee:numeric_bit:"<" */
120 enumeration L4ieee_Q11numeric_bit_Y5op_lt_i200(const L4ieee_Q11numeric_bit_T6signed &,const integer );
121 /* Prototype for subprogram :ieee:numeric_bit:"<=" */
122 enumeration L4ieee_Q11numeric_bit_Y5op_le_i203(const L4ieee_Q11numeric_bit_T8unsigned &,const L4ieee_Q11numeric_bit_T8unsigned &);
123 /* Prototype for subprogram :ieee:numeric_bit:"<=" */
124 enumeration L4ieee_Q11numeric_bit_Y5op_le_i206(const L4ieee_Q11numeric_bit_T6signed &,const L4ieee_Q11numeric_bit_T6signed &);
125 /* Prototype for subprogram :ieee:numeric_bit:"<=" */
126 enumeration L4ieee_Q11numeric_bit_Y5op_le_i209(const integer ,const L4ieee_Q11numeric_bit_T8unsigned &);
127 /* Prototype for subprogram :ieee:numeric_bit:"<=" */
128 enumeration L4ieee_Q11numeric_bit_Y5op_le_i212(const integer ,const L4ieee_Q11numeric_bit_T6signed &);
129 /* Prototype for subprogram :ieee:numeric_bit:"<=" */
130 enumeration L4ieee_Q11numeric_bit_Y5op_le_i215(const L4ieee_Q11numeric_bit_T8unsigned &,const integer );
131 /* Prototype for subprogram :ieee:numeric_bit:"<=" */
132 enumeration L4ieee_Q11numeric_bit_Y5op_le_i218(const L4ieee_Q11numeric_bit_T6signed &,const integer );
133 /* Prototype for subprogram :ieee:numeric_bit:">=" */
134 enumeration L4ieee_Q11numeric_bit_Y5op_ge_i221(const L4ieee_Q11numeric_bit_T8unsigned &,const L4ieee_Q11numeric_bit_T8unsigned &);
135 /* Prototype for subprogram :ieee:numeric_bit:">=" */
136 enumeration L4ieee_Q11numeric_bit_Y5op_ge_i224(const L4ieee_Q11numeric_bit_T6signed &,const L4ieee_Q11numeric_bit_T6signed &);
137 /* Prototype for subprogram :ieee:numeric_bit:">=" */
138 enumeration L4ieee_Q11numeric_bit_Y5op_ge_i227(const integer ,const L4ieee_Q11numeric_bit_T8unsigned &);
139 /* Prototype for subprogram :ieee:numeric_bit:">=" */
140 enumeration L4ieee_Q11numeric_bit_Y5op_ge_i230(const integer ,const L4ieee_Q11numeric_bit_T6signed &);
141 /* Prototype for subprogram :ieee:numeric_bit:">=" */
142 enumeration L4ieee_Q11numeric_bit_Y5op_ge_i233(const L4ieee_Q11numeric_bit_T8unsigned &,const integer );
143 /* Prototype for subprogram :ieee:numeric_bit:">=" */
144 enumeration L4ieee_Q11numeric_bit_Y5op_ge_i236(const L4ieee_Q11numeric_bit_T6signed &,const integer );
145 /* Prototype for subprogram :ieee:numeric_bit:"=" */
146 enumeration L4ieee_Q11numeric_bit_Y5op_eq_i239(const L4ieee_Q11numeric_bit_T8unsigned &,const L4ieee_Q11numeric_bit_T8unsigned &);
147 /* Prototype for subprogram :ieee:numeric_bit:"=" */
148 enumeration L4ieee_Q11numeric_bit_Y5op_eq_i242(const L4ieee_Q11numeric_bit_T6signed &,const L4ieee_Q11numeric_bit_T6signed &);
149 /* Prototype for subprogram :ieee:numeric_bit:"=" */
150 enumeration L4ieee_Q11numeric_bit_Y5op_eq_i245(const integer ,const L4ieee_Q11numeric_bit_T8unsigned &);
151 /* Prototype for subprogram :ieee:numeric_bit:"=" */
152 enumeration L4ieee_Q11numeric_bit_Y5op_eq_i248(const integer ,const L4ieee_Q11numeric_bit_T6signed &);
153 /* Prototype for subprogram :ieee:numeric_bit:"=" */
154 enumeration L4ieee_Q11numeric_bit_Y5op_eq_i251(const L4ieee_Q11numeric_bit_T8unsigned &,const integer );
155 /* Prototype for subprogram :ieee:numeric_bit:"=" */
156 enumeration L4ieee_Q11numeric_bit_Y5op_eq_i254(const L4ieee_Q11numeric_bit_T6signed &,const integer );
157 /* Prototype for subprogram :ieee:numeric_bit:"/=" */
158 enumeration L4ieee_Q11numeric_bit_Y5op_ne_i257(const L4ieee_Q11numeric_bit_T8unsigned &,const L4ieee_Q11numeric_bit_T8unsigned &);
159 /* Prototype for subprogram :ieee:numeric_bit:"/=" */
160 enumeration L4ieee_Q11numeric_bit_Y5op_ne_i260(const L4ieee_Q11numeric_bit_T6signed &,const L4ieee_Q11numeric_bit_T6signed &);
161 /* Prototype for subprogram :ieee:numeric_bit:"/=" */
162 enumeration L4ieee_Q11numeric_bit_Y5op_ne_i263(const integer ,const L4ieee_Q11numeric_bit_T8unsigned &);
163 /* Prototype for subprogram :ieee:numeric_bit:"/=" */
164 enumeration L4ieee_Q11numeric_bit_Y5op_ne_i266(const integer ,const L4ieee_Q11numeric_bit_T6signed &);
165 /* Prototype for subprogram :ieee:numeric_bit:"/=" */
166 enumeration L4ieee_Q11numeric_bit_Y5op_ne_i269(const L4ieee_Q11numeric_bit_T8unsigned &,const integer );
167 /* Prototype for subprogram :ieee:numeric_bit:"/=" */
168 enumeration L4ieee_Q11numeric_bit_Y5op_ne_i272(const L4ieee_Q11numeric_bit_T6signed &,const integer );
169 /* Prototype for subprogram :ieee:numeric_bit:shift_left */
170 L4ieee_Q11numeric_bit_T8unsigned L4ieee_Q11numeric_bit_Y10shift_left_i275(const L4ieee_Q11numeric_bit_T8unsigned &,const integer );
171 /* Prototype for subprogram :ieee:numeric_bit:shift_right */
172 L4ieee_Q11numeric_bit_T8unsigned L4ieee_Q11numeric_bit_Y11shift_right_i278(const L4ieee_Q11numeric_bit_T8unsigned &,const integer );
173 /* Prototype for subprogram :ieee:numeric_bit:shift_left */
174 L4ieee_Q11numeric_bit_T6signed L4ieee_Q11numeric_bit_Y10shift_left_i281(const L4ieee_Q11numeric_bit_T6signed &,const integer );
175 /* Prototype for subprogram :ieee:numeric_bit:shift_right */
176 L4ieee_Q11numeric_bit_T6signed L4ieee_Q11numeric_bit_Y11shift_right_i284(const L4ieee_Q11numeric_bit_T6signed &,const integer );
177 /* Prototype for subprogram :ieee:numeric_bit:rotate_left */
178 L4ieee_Q11numeric_bit_T8unsigned L4ieee_Q11numeric_bit_Y11rotate_left_i287(const L4ieee_Q11numeric_bit_T8unsigned &,const integer );
179 /* Prototype for subprogram :ieee:numeric_bit:rotate_right */
180 L4ieee_Q11numeric_bit_T8unsigned L4ieee_Q11numeric_bit_Y12rotate_right_i290(const L4ieee_Q11numeric_bit_T8unsigned &,const integer );
181 /* Prototype for subprogram :ieee:numeric_bit:rotate_left */
182 L4ieee_Q11numeric_bit_T6signed L4ieee_Q11numeric_bit_Y11rotate_left_i293(const L4ieee_Q11numeric_bit_T6signed &,const integer );
183 /* Prototype for subprogram :ieee:numeric_bit:rotate_right */
184 L4ieee_Q11numeric_bit_T6signed L4ieee_Q11numeric_bit_Y12rotate_right_i296(const L4ieee_Q11numeric_bit_T6signed &,const integer );
185 /* Prototype for subprogram :ieee:numeric_bit:"sll" */
186 L4ieee_Q11numeric_bit_T8unsigned L4ieee_Q11numeric_bit_Y6op_sll_i299(const L4ieee_Q11numeric_bit_T8unsigned &,const integer );
187 /* Prototype for subprogram :ieee:numeric_bit:"sll" */
188 L4ieee_Q11numeric_bit_T6signed L4ieee_Q11numeric_bit_Y6op_sll_i302(const L4ieee_Q11numeric_bit_T6signed &,const integer );
189 /* Prototype for subprogram :ieee:numeric_bit:"srl" */
190 L4ieee_Q11numeric_bit_T8unsigned L4ieee_Q11numeric_bit_Y6op_srl_i305(const L4ieee_Q11numeric_bit_T8unsigned &,const integer );
191 /* Prototype for subprogram :ieee:numeric_bit:"srl" */
192 L4ieee_Q11numeric_bit_T6signed L4ieee_Q11numeric_bit_Y6op_srl_i308(const L4ieee_Q11numeric_bit_T6signed &,const integer );
193 /* Prototype for subprogram :ieee:numeric_bit:"rol" */
194 L4ieee_Q11numeric_bit_T8unsigned L4ieee_Q11numeric_bit_Y6op_rol_i311(const L4ieee_Q11numeric_bit_T8unsigned &,const integer );
195 /* Prototype for subprogram :ieee:numeric_bit:"rol" */
196 L4ieee_Q11numeric_bit_T6signed L4ieee_Q11numeric_bit_Y6op_rol_i314(const L4ieee_Q11numeric_bit_T6signed &,const integer );
197 /* Prototype for subprogram :ieee:numeric_bit:"ror" */
198 L4ieee_Q11numeric_bit_T8unsigned L4ieee_Q11numeric_bit_Y6op_ror_i317(const L4ieee_Q11numeric_bit_T8unsigned &,const integer );
199 /* Prototype for subprogram :ieee:numeric_bit:"ror" */
200 L4ieee_Q11numeric_bit_T6signed L4ieee_Q11numeric_bit_Y6op_ror_i320(const L4ieee_Q11numeric_bit_T6signed &,const integer );
201 /* Prototype for subprogram :ieee:numeric_bit:resize */
202 L4ieee_Q11numeric_bit_T6signed L4ieee_Q11numeric_bit_Y6resize_i323(const L4ieee_Q11numeric_bit_T6signed &,const integer );
203 /* Prototype for subprogram :ieee:numeric_bit:resize */
204 L4ieee_Q11numeric_bit_T8unsigned L4ieee_Q11numeric_bit_Y6resize_i326(const L4ieee_Q11numeric_bit_T8unsigned &,const integer );
205 /* Prototype for subprogram :ieee:numeric_bit:to_integer */
206 integer L4ieee_Q11numeric_bit_Y10to_integer_i328(const L4ieee_Q11numeric_bit_T8unsigned &);
207 /* Prototype for subprogram :ieee:numeric_bit:to_integer */
208 integer L4ieee_Q11numeric_bit_Y10to_integer_i330(const L4ieee_Q11numeric_bit_T6signed &);
209 /* Prototype for subprogram :ieee:numeric_bit:to_unsigned */
210 L4ieee_Q11numeric_bit_T8unsigned L4ieee_Q11numeric_bit_Y11to_unsigned_i333(const integer ,const integer );
211 /* Prototype for subprogram :ieee:numeric_bit:to_signed */
212 L4ieee_Q11numeric_bit_T6signed L4ieee_Q11numeric_bit_Y9to_signed_i336(const integer ,const integer );
213 /* Prototype for subprogram :ieee:numeric_bit:"not" */
214 L4ieee_Q11numeric_bit_T8unsigned L4ieee_Q11numeric_bit_Y6op_not_i338(const L4ieee_Q11numeric_bit_T8unsigned &);
215 /* Prototype for subprogram :ieee:numeric_bit:"and" */
216 L4ieee_Q11numeric_bit_T8unsigned L4ieee_Q11numeric_bit_Y6op_and_i341(const L4ieee_Q11numeric_bit_T8unsigned &,const L4ieee_Q11numeric_bit_T8unsigned &);
217 /* Prototype for subprogram :ieee:numeric_bit:"or" */
218 L4ieee_Q11numeric_bit_T8unsigned L4ieee_Q11numeric_bit_Y5op_or_i344(const L4ieee_Q11numeric_bit_T8unsigned &,const L4ieee_Q11numeric_bit_T8unsigned &);
219 /* Prototype for subprogram :ieee:numeric_bit:"nand" */
220 L4ieee_Q11numeric_bit_T8unsigned L4ieee_Q11numeric_bit_Y7op_nand_i347(const L4ieee_Q11numeric_bit_T8unsigned &,const L4ieee_Q11numeric_bit_T8unsigned &);
221 /* Prototype for subprogram :ieee:numeric_bit:"nor" */
222 L4ieee_Q11numeric_bit_T8unsigned L4ieee_Q11numeric_bit_Y6op_nor_i350(const L4ieee_Q11numeric_bit_T8unsigned &,const L4ieee_Q11numeric_bit_T8unsigned &);
223 /* Prototype for subprogram :ieee:numeric_bit:"xor" */
224 L4ieee_Q11numeric_bit_T8unsigned L4ieee_Q11numeric_bit_Y6op_xor_i353(const L4ieee_Q11numeric_bit_T8unsigned &,const L4ieee_Q11numeric_bit_T8unsigned &);
225 /* Prototype for subprogram :ieee:numeric_bit:"xnor" */
226 L4ieee_Q11numeric_bit_T8unsigned L4ieee_Q11numeric_bit_Y7op_xnor_i356(const L4ieee_Q11numeric_bit_T8unsigned &,const L4ieee_Q11numeric_bit_T8unsigned &);
227 /* Prototype for subprogram :ieee:numeric_bit:"not" */
228 L4ieee_Q11numeric_bit_T6signed L4ieee_Q11numeric_bit_Y6op_not_i358(const L4ieee_Q11numeric_bit_T6signed &);
229 /* Prototype for subprogram :ieee:numeric_bit:"and" */
230 L4ieee_Q11numeric_bit_T6signed L4ieee_Q11numeric_bit_Y6op_and_i361(const L4ieee_Q11numeric_bit_T6signed &,const L4ieee_Q11numeric_bit_T6signed &);
231 /* Prototype for subprogram :ieee:numeric_bit:"or" */
232 L4ieee_Q11numeric_bit_T6signed L4ieee_Q11numeric_bit_Y5op_or_i364(const L4ieee_Q11numeric_bit_T6signed &,const L4ieee_Q11numeric_bit_T6signed &);
233 /* Prototype for subprogram :ieee:numeric_bit:"nand" */
234 L4ieee_Q11numeric_bit_T6signed L4ieee_Q11numeric_bit_Y7op_nand_i367(const L4ieee_Q11numeric_bit_T6signed &,const L4ieee_Q11numeric_bit_T6signed &);
235 /* Prototype for subprogram :ieee:numeric_bit:"nor" */
236 L4ieee_Q11numeric_bit_T6signed L4ieee_Q11numeric_bit_Y6op_nor_i370(const L4ieee_Q11numeric_bit_T6signed &,const L4ieee_Q11numeric_bit_T6signed &);
237 /* Prototype for subprogram :ieee:numeric_bit:"xor" */
238 L4ieee_Q11numeric_bit_T6signed L4ieee_Q11numeric_bit_Y6op_xor_i373(const L4ieee_Q11numeric_bit_T6signed &,const L4ieee_Q11numeric_bit_T6signed &);
239 /* Prototype for subprogram :ieee:numeric_bit:"xnor" */
240 L4ieee_Q11numeric_bit_T6signed L4ieee_Q11numeric_bit_Y7op_xnor_i376(const L4ieee_Q11numeric_bit_T6signed &,const L4ieee_Q11numeric_bit_T6signed &);
241 /* Prototype for subprogram :ieee:numeric_bit:rising_edge */
242 enumeration L4ieee_Q11numeric_bit_Y11rising_edge_i378(sig_info<enumeration> *,enumeration *);
243 /* Prototype for subprogram :ieee:numeric_bit:falling_edge */
244 enumeration L4ieee_Q11numeric_bit_Y12falling_edge_i380(sig_info<enumeration> *,enumeration *);
245 L4ieee_Q11numeric_bit_T3_t0 L4ieee_Q11numeric_bit_C15copyrightnotice;
246 L4ieee_Q11numeric_bit_I3_t0 L4ieee_Q11numeric_bit_I3_t0_INFO;
247 enumeration L4ieee_Q11numeric_bit_itn1_lit[]={67,111,112,121,114,105,103,104,116,32,49,57,57,53,32,73,69,69,69,46,32,65,108,108,32,114,105,103,104,116,115,32,114,101,115,101,114,118,101,100,46};
248 L4ieee_Q11numeric_bit_I8unsigned L4ieee_Q11numeric_bit_I8unsigned_INFO;
249 L4ieee_Q11numeric_bit_I6signed L4ieee_Q11numeric_bit_I6signed_INFO;
250 /* Initialization function for package :ieee:numeric_bit */
251 int L3std_Q8standard_init ();
252 bool L4ieee_Q11numeric_bit_init_done = false;
L4ieee_Q11numeric_bit_init()253 int L4ieee_Q11numeric_bit_init(){
254 if (L4ieee_Q11numeric_bit_init_done) return 1;
255 L4ieee_Q11numeric_bit_init_done=true;
256 L3std_Q8standard_init ();
257 register_source_file("/home/stefan/cvs-local/freehdl-teaser/ieee/numeric_bit.vhdl","numeric_bit.vhdl");
258 name_stack iname;
259 iname.push("");
260 void *sref=register_package(":ieee",":numeric_bit");
261 L4ieee_Q11numeric_bit_I3_t0_INFO.set((&L3std_Q8standard_I6string_INFO)->element_type,parray_info((&L3std_Q8standard_I6string_INFO))->index_type,1,to,41,-1).register_type(":ieee:numeric_bit",":ieee:numeric_bit:_t0",":_t0",NULL);
262 L4ieee_Q11numeric_bit_I8unsigned_INFO.set((&L3std_Q8standard_I3bit_INFO),(&L3std_Q8standard_I7natural_INFO),-1).register_type(":ieee:numeric_bit",":ieee:numeric_bit:unsigned",":UNSIGNED",NULL);
263 L4ieee_Q11numeric_bit_I6signed_INFO.set((&L3std_Q8standard_I3bit_INFO),(&L3std_Q8standard_I7natural_INFO),-1).register_type(":ieee:numeric_bit",":ieee:numeric_bit:signed",":SIGNED",NULL);
264 L4ieee_Q11numeric_bit_C15copyrightnotice.init((&L4ieee_Q11numeric_bit_I3_t0_INFO),enumeration(0));
265 L4ieee_Q11numeric_bit_C15copyrightnotice=array_alias<L4ieee_Q11numeric_bit_T3_t0 >(new array_info((&L3std_Q8standard_I6string_INFO)->element_type,(&L3std_Q8standard_I6string_INFO)->index_type,1,to,41,0),L4ieee_Q11numeric_bit_itn1_lit);
266 iname.pop();
267 handle_info *h = get_handle ("ieee","numeric_bit",NULL);
268 if (h != NULL) (*h->init_function) ();
269 return 1;
270 }
271
272 /* end of package :ieee:numeric_bit */
273
274 /* package body :ieee:numeric_bit */
275 /* External declarations */
276 /* End of external declarations */
277 extern array_info L4ieee_W11numeric_bit_I3_t2_INFO;
278 #define L4ieee_W11numeric_bit_T3_t2 array_type<enumeration >
279 #define L4ieee_W11numeric_bit_I3_t2 array_info
280
281 extern array_info L4ieee_W11numeric_bit_I3_t3_INFO;
282 #define L4ieee_W11numeric_bit_T3_t3 array_type<enumeration >
283 #define L4ieee_W11numeric_bit_I3_t3 array_info
284
285 /* Prototype for subprogram :ieee:numeric_bit:max */
286 integer L4ieee_W11numeric_bit_Y3max_i9(const integer ,const integer );
287 /* Prototype for subprogram :ieee:numeric_bit:min */
288 integer L4ieee_W11numeric_bit_Y3min_i12(const integer ,const integer );
289 /* Prototype for subprogram :ieee:numeric_bit:signed_num_bits */
290 integer L4ieee_W11numeric_bit_Y15signed_num_bits_i14(const integer );
291 /* Prototype for subprogram :ieee:numeric_bit:unsigned_num_bits */
292 integer L4ieee_W11numeric_bit_Y17unsigned_num_bits_i19(const integer );
293 /* Prototype for subprogram :ieee:numeric_bit:add_unsigned */
294 L4ieee_Q11numeric_bit_T8unsigned L4ieee_W11numeric_bit_Y12add_unsigned_i26(const L4ieee_Q11numeric_bit_T8unsigned &,const L4ieee_Q11numeric_bit_T8unsigned &,const enumeration );
295 /* Prototype for subprogram :ieee:numeric_bit:add_signed */
296 L4ieee_Q11numeric_bit_T6signed L4ieee_W11numeric_bit_Y10add_signed_i37(const L4ieee_Q11numeric_bit_T6signed &,const L4ieee_Q11numeric_bit_T6signed &,const enumeration );
297 /* Prototype for subprogram :ieee:numeric_bit:divmod */
298 void L4ieee_W11numeric_bit_X6divmod_i49(const L4ieee_Q11numeric_bit_T8unsigned &,const L4ieee_Q11numeric_bit_T8unsigned &,L4ieee_Q11numeric_bit_T8unsigned &,L4ieee_Q11numeric_bit_T8unsigned &);
299 /* Prototype for subprogram :ieee:numeric_bit:xsll */
300 L3std_Q8standard_T10bit_vector L4ieee_W11numeric_bit_Y4xsll_i60(const L3std_Q8standard_T10bit_vector &,const integer );
301 /* Prototype for subprogram :ieee:numeric_bit:xsrl */
302 L3std_Q8standard_T10bit_vector L4ieee_W11numeric_bit_Y4xsrl_i66(const L3std_Q8standard_T10bit_vector &,const integer );
303 /* Prototype for subprogram :ieee:numeric_bit:xsra */
304 L3std_Q8standard_T10bit_vector L4ieee_W11numeric_bit_Y4xsra_i72(const L3std_Q8standard_T10bit_vector &,const integer );
305 /* Prototype for subprogram :ieee:numeric_bit:xrol */
306 L3std_Q8standard_T10bit_vector L4ieee_W11numeric_bit_Y4xrol_i79(const L3std_Q8standard_T10bit_vector &,const integer );
307 /* Prototype for subprogram :ieee:numeric_bit:xror */
308 L3std_Q8standard_T10bit_vector L4ieee_W11numeric_bit_Y4xror_i86(const L3std_Q8standard_T10bit_vector &,const integer );
309 /* Prototype for subprogram :ieee:numeric_bit:unsigned_equal */
310 enumeration L4ieee_W11numeric_bit_Y14unsigned_equal_i93(const L4ieee_Q11numeric_bit_T8unsigned &,const L4ieee_Q11numeric_bit_T8unsigned &);
311 /* Prototype for subprogram :ieee:numeric_bit:signed_equal */
312 enumeration L4ieee_W11numeric_bit_Y12signed_equal_i96(const L4ieee_Q11numeric_bit_T6signed &,const L4ieee_Q11numeric_bit_T6signed &);
313 /* Prototype for subprogram :ieee:numeric_bit:unsigned_less */
314 enumeration L4ieee_W11numeric_bit_Y13unsigned_less_i99(const L4ieee_Q11numeric_bit_T8unsigned &,const L4ieee_Q11numeric_bit_T8unsigned &);
315 /* Prototype for subprogram :ieee:numeric_bit:signed_less */
316 enumeration L4ieee_W11numeric_bit_Y11signed_less_i102(const L4ieee_Q11numeric_bit_T6signed &,const L4ieee_Q11numeric_bit_T6signed &);
317 /* Prototype for subprogram :ieee:numeric_bit:unsigned_less_or_equal */
318 enumeration L4ieee_W11numeric_bit_Y22unsigned_less_or_equal_i107(const L4ieee_Q11numeric_bit_T8unsigned &,const L4ieee_Q11numeric_bit_T8unsigned &);
319 /* Prototype for subprogram :ieee:numeric_bit:signed_less_or_equal */
320 enumeration L4ieee_W11numeric_bit_Y20signed_less_or_equal_i110(const L4ieee_Q11numeric_bit_T6signed &,const L4ieee_Q11numeric_bit_T6signed &);
321 /* Prototype for subprogram :ieee:numeric_bit:"abs" */
322 L4ieee_Q11numeric_bit_T6signed L4ieee_Q11numeric_bit_Y6op_abs_i54(const L4ieee_Q11numeric_bit_T6signed &);
323 /* Prototype for subprogram :ieee:numeric_bit:"-" */
324 L4ieee_Q11numeric_bit_T6signed L4ieee_Q11numeric_bit_Y8op_minus_i56(const L4ieee_Q11numeric_bit_T6signed &);
325 /* Prototype for subprogram :ieee:numeric_bit:"+" */
326 L4ieee_Q11numeric_bit_T8unsigned L4ieee_Q11numeric_bit_Y7op_plus_i59(const L4ieee_Q11numeric_bit_T8unsigned &,const L4ieee_Q11numeric_bit_T8unsigned &);
327 /* Prototype for subprogram :ieee:numeric_bit:"+" */
328 L4ieee_Q11numeric_bit_T6signed L4ieee_Q11numeric_bit_Y7op_plus_i62(const L4ieee_Q11numeric_bit_T6signed &,const L4ieee_Q11numeric_bit_T6signed &);
329 /* Prototype for subprogram :ieee:numeric_bit:"+" */
330 L4ieee_Q11numeric_bit_T8unsigned L4ieee_Q11numeric_bit_Y7op_plus_i65(const L4ieee_Q11numeric_bit_T8unsigned &,const integer );
331 /* Prototype for subprogram :ieee:numeric_bit:"+" */
332 L4ieee_Q11numeric_bit_T8unsigned L4ieee_Q11numeric_bit_Y7op_plus_i68(const integer ,const L4ieee_Q11numeric_bit_T8unsigned &);
333 /* Prototype for subprogram :ieee:numeric_bit:"+" */
334 L4ieee_Q11numeric_bit_T6signed L4ieee_Q11numeric_bit_Y7op_plus_i74(const L4ieee_Q11numeric_bit_T6signed &,const integer );
335 /* Prototype for subprogram :ieee:numeric_bit:"+" */
336 L4ieee_Q11numeric_bit_T6signed L4ieee_Q11numeric_bit_Y7op_plus_i71(const integer ,const L4ieee_Q11numeric_bit_T6signed &);
337 /* Prototype for subprogram :ieee:numeric_bit:"-" */
338 L4ieee_Q11numeric_bit_T8unsigned L4ieee_Q11numeric_bit_Y8op_minus_i77(const L4ieee_Q11numeric_bit_T8unsigned &,const L4ieee_Q11numeric_bit_T8unsigned &);
339 /* Prototype for subprogram :ieee:numeric_bit:"-" */
340 L4ieee_Q11numeric_bit_T6signed L4ieee_Q11numeric_bit_Y8op_minus_i80(const L4ieee_Q11numeric_bit_T6signed &,const L4ieee_Q11numeric_bit_T6signed &);
341 /* Prototype for subprogram :ieee:numeric_bit:"-" */
342 L4ieee_Q11numeric_bit_T8unsigned L4ieee_Q11numeric_bit_Y8op_minus_i83(const L4ieee_Q11numeric_bit_T8unsigned &,const integer );
343 /* Prototype for subprogram :ieee:numeric_bit:"-" */
344 L4ieee_Q11numeric_bit_T8unsigned L4ieee_Q11numeric_bit_Y8op_minus_i86(const integer ,const L4ieee_Q11numeric_bit_T8unsigned &);
345 /* Prototype for subprogram :ieee:numeric_bit:"-" */
346 L4ieee_Q11numeric_bit_T6signed L4ieee_Q11numeric_bit_Y8op_minus_i89(const L4ieee_Q11numeric_bit_T6signed &,const integer );
347 /* Prototype for subprogram :ieee:numeric_bit:"-" */
348 L4ieee_Q11numeric_bit_T6signed L4ieee_Q11numeric_bit_Y8op_minus_i92(const integer ,const L4ieee_Q11numeric_bit_T6signed &);
349 /* Prototype for subprogram :ieee:numeric_bit:"*" */
350 L4ieee_Q11numeric_bit_T8unsigned L4ieee_Q11numeric_bit_Y7op_mult_i95(const L4ieee_Q11numeric_bit_T8unsigned &,const L4ieee_Q11numeric_bit_T8unsigned &);
351 /* Prototype for subprogram :ieee:numeric_bit:"*" */
352 L4ieee_Q11numeric_bit_T6signed L4ieee_Q11numeric_bit_Y7op_mult_i98(const L4ieee_Q11numeric_bit_T6signed &,const L4ieee_Q11numeric_bit_T6signed &);
353 /* Prototype for subprogram :ieee:numeric_bit:"*" */
354 L4ieee_Q11numeric_bit_T8unsigned L4ieee_Q11numeric_bit_Y7op_mult_i101(const L4ieee_Q11numeric_bit_T8unsigned &,const integer );
355 /* Prototype for subprogram :ieee:numeric_bit:"*" */
356 L4ieee_Q11numeric_bit_T8unsigned L4ieee_Q11numeric_bit_Y7op_mult_i104(const integer ,const L4ieee_Q11numeric_bit_T8unsigned &);
357 /* Prototype for subprogram :ieee:numeric_bit:"*" */
358 L4ieee_Q11numeric_bit_T6signed L4ieee_Q11numeric_bit_Y7op_mult_i107(const L4ieee_Q11numeric_bit_T6signed &,const integer );
359 /* Prototype for subprogram :ieee:numeric_bit:"*" */
360 L4ieee_Q11numeric_bit_T6signed L4ieee_Q11numeric_bit_Y7op_mult_i110(const integer ,const L4ieee_Q11numeric_bit_T6signed &);
361 /* Prototype for subprogram :ieee:numeric_bit:"/" */
362 L4ieee_Q11numeric_bit_T8unsigned L4ieee_Q11numeric_bit_Y6op_div_i113(const L4ieee_Q11numeric_bit_T8unsigned &,const L4ieee_Q11numeric_bit_T8unsigned &);
363 /* Prototype for subprogram :ieee:numeric_bit:"/" */
364 L4ieee_Q11numeric_bit_T6signed L4ieee_Q11numeric_bit_Y6op_div_i116(const L4ieee_Q11numeric_bit_T6signed &,const L4ieee_Q11numeric_bit_T6signed &);
365 /* Prototype for subprogram :ieee:numeric_bit:"/" */
366 L4ieee_Q11numeric_bit_T8unsigned L4ieee_Q11numeric_bit_Y6op_div_i119(const L4ieee_Q11numeric_bit_T8unsigned &,const integer );
367 /* Prototype for subprogram :ieee:numeric_bit:"/" */
368 L4ieee_Q11numeric_bit_T8unsigned L4ieee_Q11numeric_bit_Y6op_div_i122(const integer ,const L4ieee_Q11numeric_bit_T8unsigned &);
369 /* Prototype for subprogram :ieee:numeric_bit:"/" */
370 L4ieee_Q11numeric_bit_T6signed L4ieee_Q11numeric_bit_Y6op_div_i125(const L4ieee_Q11numeric_bit_T6signed &,const integer );
371 /* Prototype for subprogram :ieee:numeric_bit:"/" */
372 L4ieee_Q11numeric_bit_T6signed L4ieee_Q11numeric_bit_Y6op_div_i128(const integer ,const L4ieee_Q11numeric_bit_T6signed &);
373 /* Prototype for subprogram :ieee:numeric_bit:"rem" */
374 L4ieee_Q11numeric_bit_T8unsigned L4ieee_Q11numeric_bit_Y6op_rem_i131(const L4ieee_Q11numeric_bit_T8unsigned &,const L4ieee_Q11numeric_bit_T8unsigned &);
375 /* Prototype for subprogram :ieee:numeric_bit:"rem" */
376 L4ieee_Q11numeric_bit_T6signed L4ieee_Q11numeric_bit_Y6op_rem_i134(const L4ieee_Q11numeric_bit_T6signed &,const L4ieee_Q11numeric_bit_T6signed &);
377 /* Prototype for subprogram :ieee:numeric_bit:"rem" */
378 L4ieee_Q11numeric_bit_T8unsigned L4ieee_Q11numeric_bit_Y6op_rem_i137(const L4ieee_Q11numeric_bit_T8unsigned &,const integer );
379 /* Prototype for subprogram :ieee:numeric_bit:"rem" */
380 L4ieee_Q11numeric_bit_T8unsigned L4ieee_Q11numeric_bit_Y6op_rem_i140(const integer ,const L4ieee_Q11numeric_bit_T8unsigned &);
381 /* Prototype for subprogram :ieee:numeric_bit:"rem" */
382 L4ieee_Q11numeric_bit_T6signed L4ieee_Q11numeric_bit_Y6op_rem_i143(const L4ieee_Q11numeric_bit_T6signed &,const integer );
383 /* Prototype for subprogram :ieee:numeric_bit:"rem" */
384 L4ieee_Q11numeric_bit_T6signed L4ieee_Q11numeric_bit_Y6op_rem_i146(const integer ,const L4ieee_Q11numeric_bit_T6signed &);
385 /* Prototype for subprogram :ieee:numeric_bit:"mod" */
386 L4ieee_Q11numeric_bit_T8unsigned L4ieee_Q11numeric_bit_Y6op_mod_i149(const L4ieee_Q11numeric_bit_T8unsigned &,const L4ieee_Q11numeric_bit_T8unsigned &);
387 /* Prototype for subprogram :ieee:numeric_bit:"mod" */
388 L4ieee_Q11numeric_bit_T6signed L4ieee_Q11numeric_bit_Y6op_mod_i152(const L4ieee_Q11numeric_bit_T6signed &,const L4ieee_Q11numeric_bit_T6signed &);
389 /* Prototype for subprogram :ieee:numeric_bit:"mod" */
390 L4ieee_Q11numeric_bit_T8unsigned L4ieee_Q11numeric_bit_Y6op_mod_i155(const L4ieee_Q11numeric_bit_T8unsigned &,const integer );
391 /* Prototype for subprogram :ieee:numeric_bit:"mod" */
392 L4ieee_Q11numeric_bit_T8unsigned L4ieee_Q11numeric_bit_Y6op_mod_i158(const integer ,const L4ieee_Q11numeric_bit_T8unsigned &);
393 /* Prototype for subprogram :ieee:numeric_bit:"mod" */
394 L4ieee_Q11numeric_bit_T6signed L4ieee_Q11numeric_bit_Y6op_mod_i161(const L4ieee_Q11numeric_bit_T6signed &,const integer );
395 /* Prototype for subprogram :ieee:numeric_bit:"mod" */
396 L4ieee_Q11numeric_bit_T6signed L4ieee_Q11numeric_bit_Y6op_mod_i164(const integer ,const L4ieee_Q11numeric_bit_T6signed &);
397 /* Prototype for subprogram :ieee:numeric_bit:">" */
398 enumeration L4ieee_Q11numeric_bit_Y5op_gt_i167(const L4ieee_Q11numeric_bit_T8unsigned &,const L4ieee_Q11numeric_bit_T8unsigned &);
399 /* Prototype for subprogram :ieee:numeric_bit:">" */
400 enumeration L4ieee_Q11numeric_bit_Y5op_gt_i170(const L4ieee_Q11numeric_bit_T6signed &,const L4ieee_Q11numeric_bit_T6signed &);
401 /* Prototype for subprogram :ieee:numeric_bit:">" */
402 enumeration L4ieee_Q11numeric_bit_Y5op_gt_i173(const integer ,const L4ieee_Q11numeric_bit_T8unsigned &);
403 /* Prototype for subprogram :ieee:numeric_bit:">" */
404 enumeration L4ieee_Q11numeric_bit_Y5op_gt_i176(const integer ,const L4ieee_Q11numeric_bit_T6signed &);
405 /* Prototype for subprogram :ieee:numeric_bit:">" */
406 enumeration L4ieee_Q11numeric_bit_Y5op_gt_i179(const L4ieee_Q11numeric_bit_T8unsigned &,const integer );
407 /* Prototype for subprogram :ieee:numeric_bit:">" */
408 enumeration L4ieee_Q11numeric_bit_Y5op_gt_i182(const L4ieee_Q11numeric_bit_T6signed &,const integer );
409 /* Prototype for subprogram :ieee:numeric_bit:"<" */
410 enumeration L4ieee_Q11numeric_bit_Y5op_lt_i185(const L4ieee_Q11numeric_bit_T8unsigned &,const L4ieee_Q11numeric_bit_T8unsigned &);
411 /* Prototype for subprogram :ieee:numeric_bit:"<" */
412 enumeration L4ieee_Q11numeric_bit_Y5op_lt_i188(const L4ieee_Q11numeric_bit_T6signed &,const L4ieee_Q11numeric_bit_T6signed &);
413 /* Prototype for subprogram :ieee:numeric_bit:"<" */
414 enumeration L4ieee_Q11numeric_bit_Y5op_lt_i191(const integer ,const L4ieee_Q11numeric_bit_T8unsigned &);
415 /* Prototype for subprogram :ieee:numeric_bit:"<" */
416 enumeration L4ieee_Q11numeric_bit_Y5op_lt_i194(const integer ,const L4ieee_Q11numeric_bit_T6signed &);
417 /* Prototype for subprogram :ieee:numeric_bit:"<" */
418 enumeration L4ieee_Q11numeric_bit_Y5op_lt_i197(const L4ieee_Q11numeric_bit_T8unsigned &,const integer );
419 /* Prototype for subprogram :ieee:numeric_bit:"<" */
420 enumeration L4ieee_Q11numeric_bit_Y5op_lt_i200(const L4ieee_Q11numeric_bit_T6signed &,const integer );
421 /* Prototype for subprogram :ieee:numeric_bit:"<=" */
422 enumeration L4ieee_Q11numeric_bit_Y5op_le_i203(const L4ieee_Q11numeric_bit_T8unsigned &,const L4ieee_Q11numeric_bit_T8unsigned &);
423 /* Prototype for subprogram :ieee:numeric_bit:"<=" */
424 enumeration L4ieee_Q11numeric_bit_Y5op_le_i206(const L4ieee_Q11numeric_bit_T6signed &,const L4ieee_Q11numeric_bit_T6signed &);
425 /* Prototype for subprogram :ieee:numeric_bit:"<=" */
426 enumeration L4ieee_Q11numeric_bit_Y5op_le_i209(const integer ,const L4ieee_Q11numeric_bit_T8unsigned &);
427 /* Prototype for subprogram :ieee:numeric_bit:"<=" */
428 enumeration L4ieee_Q11numeric_bit_Y5op_le_i212(const integer ,const L4ieee_Q11numeric_bit_T6signed &);
429 /* Prototype for subprogram :ieee:numeric_bit:"<=" */
430 enumeration L4ieee_Q11numeric_bit_Y5op_le_i215(const L4ieee_Q11numeric_bit_T8unsigned &,const integer );
431 /* Prototype for subprogram :ieee:numeric_bit:"<=" */
432 enumeration L4ieee_Q11numeric_bit_Y5op_le_i218(const L4ieee_Q11numeric_bit_T6signed &,const integer );
433 /* Prototype for subprogram :ieee:numeric_bit:">=" */
434 enumeration L4ieee_Q11numeric_bit_Y5op_ge_i221(const L4ieee_Q11numeric_bit_T8unsigned &,const L4ieee_Q11numeric_bit_T8unsigned &);
435 /* Prototype for subprogram :ieee:numeric_bit:">=" */
436 enumeration L4ieee_Q11numeric_bit_Y5op_ge_i224(const L4ieee_Q11numeric_bit_T6signed &,const L4ieee_Q11numeric_bit_T6signed &);
437 /* Prototype for subprogram :ieee:numeric_bit:">=" */
438 enumeration L4ieee_Q11numeric_bit_Y5op_ge_i227(const integer ,const L4ieee_Q11numeric_bit_T8unsigned &);
439 /* Prototype for subprogram :ieee:numeric_bit:">=" */
440 enumeration L4ieee_Q11numeric_bit_Y5op_ge_i230(const integer ,const L4ieee_Q11numeric_bit_T6signed &);
441 /* Prototype for subprogram :ieee:numeric_bit:">=" */
442 enumeration L4ieee_Q11numeric_bit_Y5op_ge_i233(const L4ieee_Q11numeric_bit_T8unsigned &,const integer );
443 /* Prototype for subprogram :ieee:numeric_bit:">=" */
444 enumeration L4ieee_Q11numeric_bit_Y5op_ge_i236(const L4ieee_Q11numeric_bit_T6signed &,const integer );
445 /* Prototype for subprogram :ieee:numeric_bit:"=" */
446 enumeration L4ieee_Q11numeric_bit_Y5op_eq_i239(const L4ieee_Q11numeric_bit_T8unsigned &,const L4ieee_Q11numeric_bit_T8unsigned &);
447 /* Prototype for subprogram :ieee:numeric_bit:"=" */
448 enumeration L4ieee_Q11numeric_bit_Y5op_eq_i242(const L4ieee_Q11numeric_bit_T6signed &,const L4ieee_Q11numeric_bit_T6signed &);
449 /* Prototype for subprogram :ieee:numeric_bit:"=" */
450 enumeration L4ieee_Q11numeric_bit_Y5op_eq_i245(const integer ,const L4ieee_Q11numeric_bit_T8unsigned &);
451 /* Prototype for subprogram :ieee:numeric_bit:"=" */
452 enumeration L4ieee_Q11numeric_bit_Y5op_eq_i248(const integer ,const L4ieee_Q11numeric_bit_T6signed &);
453 /* Prototype for subprogram :ieee:numeric_bit:"=" */
454 enumeration L4ieee_Q11numeric_bit_Y5op_eq_i251(const L4ieee_Q11numeric_bit_T8unsigned &,const integer );
455 /* Prototype for subprogram :ieee:numeric_bit:"=" */
456 enumeration L4ieee_Q11numeric_bit_Y5op_eq_i254(const L4ieee_Q11numeric_bit_T6signed &,const integer );
457 /* Prototype for subprogram :ieee:numeric_bit:"/=" */
458 enumeration L4ieee_Q11numeric_bit_Y5op_ne_i257(const L4ieee_Q11numeric_bit_T8unsigned &,const L4ieee_Q11numeric_bit_T8unsigned &);
459 /* Prototype for subprogram :ieee:numeric_bit:"/=" */
460 enumeration L4ieee_Q11numeric_bit_Y5op_ne_i260(const L4ieee_Q11numeric_bit_T6signed &,const L4ieee_Q11numeric_bit_T6signed &);
461 /* Prototype for subprogram :ieee:numeric_bit:"/=" */
462 enumeration L4ieee_Q11numeric_bit_Y5op_ne_i263(const integer ,const L4ieee_Q11numeric_bit_T8unsigned &);
463 /* Prototype for subprogram :ieee:numeric_bit:"/=" */
464 enumeration L4ieee_Q11numeric_bit_Y5op_ne_i266(const integer ,const L4ieee_Q11numeric_bit_T6signed &);
465 /* Prototype for subprogram :ieee:numeric_bit:"/=" */
466 enumeration L4ieee_Q11numeric_bit_Y5op_ne_i269(const L4ieee_Q11numeric_bit_T8unsigned &,const integer );
467 /* Prototype for subprogram :ieee:numeric_bit:"/=" */
468 enumeration L4ieee_Q11numeric_bit_Y5op_ne_i272(const L4ieee_Q11numeric_bit_T6signed &,const integer );
469 /* Prototype for subprogram :ieee:numeric_bit:shift_left */
470 L4ieee_Q11numeric_bit_T8unsigned L4ieee_Q11numeric_bit_Y10shift_left_i275(const L4ieee_Q11numeric_bit_T8unsigned &,const integer );
471 /* Prototype for subprogram :ieee:numeric_bit:shift_right */
472 L4ieee_Q11numeric_bit_T8unsigned L4ieee_Q11numeric_bit_Y11shift_right_i278(const L4ieee_Q11numeric_bit_T8unsigned &,const integer );
473 /* Prototype for subprogram :ieee:numeric_bit:shift_left */
474 L4ieee_Q11numeric_bit_T6signed L4ieee_Q11numeric_bit_Y10shift_left_i281(const L4ieee_Q11numeric_bit_T6signed &,const integer );
475 /* Prototype for subprogram :ieee:numeric_bit:shift_right */
476 L4ieee_Q11numeric_bit_T6signed L4ieee_Q11numeric_bit_Y11shift_right_i284(const L4ieee_Q11numeric_bit_T6signed &,const integer );
477 /* Prototype for subprogram :ieee:numeric_bit:rotate_left */
478 L4ieee_Q11numeric_bit_T8unsigned L4ieee_Q11numeric_bit_Y11rotate_left_i287(const L4ieee_Q11numeric_bit_T8unsigned &,const integer );
479 /* Prototype for subprogram :ieee:numeric_bit:rotate_right */
480 L4ieee_Q11numeric_bit_T8unsigned L4ieee_Q11numeric_bit_Y12rotate_right_i290(const L4ieee_Q11numeric_bit_T8unsigned &,const integer );
481 /* Prototype for subprogram :ieee:numeric_bit:rotate_left */
482 L4ieee_Q11numeric_bit_T6signed L4ieee_Q11numeric_bit_Y11rotate_left_i293(const L4ieee_Q11numeric_bit_T6signed &,const integer );
483 /* Prototype for subprogram :ieee:numeric_bit:rotate_right */
484 L4ieee_Q11numeric_bit_T6signed L4ieee_Q11numeric_bit_Y12rotate_right_i296(const L4ieee_Q11numeric_bit_T6signed &,const integer );
485 /* Prototype for subprogram :ieee:numeric_bit:"sll" */
486 L4ieee_Q11numeric_bit_T8unsigned L4ieee_Q11numeric_bit_Y6op_sll_i299(const L4ieee_Q11numeric_bit_T8unsigned &,const integer );
487 /* Prototype for subprogram :ieee:numeric_bit:"sll" */
488 L4ieee_Q11numeric_bit_T6signed L4ieee_Q11numeric_bit_Y6op_sll_i302(const L4ieee_Q11numeric_bit_T6signed &,const integer );
489 /* Prototype for subprogram :ieee:numeric_bit:"srl" */
490 L4ieee_Q11numeric_bit_T8unsigned L4ieee_Q11numeric_bit_Y6op_srl_i305(const L4ieee_Q11numeric_bit_T8unsigned &,const integer );
491 /* Prototype for subprogram :ieee:numeric_bit:"srl" */
492 L4ieee_Q11numeric_bit_T6signed L4ieee_Q11numeric_bit_Y6op_srl_i308(const L4ieee_Q11numeric_bit_T6signed &,const integer );
493 /* Prototype for subprogram :ieee:numeric_bit:"rol" */
494 L4ieee_Q11numeric_bit_T8unsigned L4ieee_Q11numeric_bit_Y6op_rol_i311(const L4ieee_Q11numeric_bit_T8unsigned &,const integer );
495 /* Prototype for subprogram :ieee:numeric_bit:"rol" */
496 L4ieee_Q11numeric_bit_T6signed L4ieee_Q11numeric_bit_Y6op_rol_i314(const L4ieee_Q11numeric_bit_T6signed &,const integer );
497 /* Prototype for subprogram :ieee:numeric_bit:"ror" */
498 L4ieee_Q11numeric_bit_T8unsigned L4ieee_Q11numeric_bit_Y6op_ror_i317(const L4ieee_Q11numeric_bit_T8unsigned &,const integer );
499 /* Prototype for subprogram :ieee:numeric_bit:"ror" */
500 L4ieee_Q11numeric_bit_T6signed L4ieee_Q11numeric_bit_Y6op_ror_i320(const L4ieee_Q11numeric_bit_T6signed &,const integer );
501 /* Prototype for subprogram :ieee:numeric_bit:to_integer */
502 integer L4ieee_Q11numeric_bit_Y10to_integer_i328(const L4ieee_Q11numeric_bit_T8unsigned &);
503 /* Prototype for subprogram :ieee:numeric_bit:to_integer */
504 integer L4ieee_Q11numeric_bit_Y10to_integer_i330(const L4ieee_Q11numeric_bit_T6signed &);
505 /* Prototype for subprogram :ieee:numeric_bit:to_unsigned */
506 L4ieee_Q11numeric_bit_T8unsigned L4ieee_Q11numeric_bit_Y11to_unsigned_i333(const integer ,const integer );
507 /* Prototype for subprogram :ieee:numeric_bit:to_signed */
508 L4ieee_Q11numeric_bit_T6signed L4ieee_Q11numeric_bit_Y9to_signed_i336(const integer ,const integer );
509 /* Prototype for subprogram :ieee:numeric_bit:resize */
510 L4ieee_Q11numeric_bit_T6signed L4ieee_Q11numeric_bit_Y6resize_i323(const L4ieee_Q11numeric_bit_T6signed &,const integer );
511 /* Prototype for subprogram :ieee:numeric_bit:resize */
512 L4ieee_Q11numeric_bit_T8unsigned L4ieee_Q11numeric_bit_Y6resize_i326(const L4ieee_Q11numeric_bit_T8unsigned &,const integer );
513 /* Prototype for subprogram :ieee:numeric_bit:"not" */
514 L4ieee_Q11numeric_bit_T8unsigned L4ieee_Q11numeric_bit_Y6op_not_i338(const L4ieee_Q11numeric_bit_T8unsigned &);
515 /* Prototype for subprogram :ieee:numeric_bit:"and" */
516 L4ieee_Q11numeric_bit_T8unsigned L4ieee_Q11numeric_bit_Y6op_and_i341(const L4ieee_Q11numeric_bit_T8unsigned &,const L4ieee_Q11numeric_bit_T8unsigned &);
517 /* Prototype for subprogram :ieee:numeric_bit:"or" */
518 L4ieee_Q11numeric_bit_T8unsigned L4ieee_Q11numeric_bit_Y5op_or_i344(const L4ieee_Q11numeric_bit_T8unsigned &,const L4ieee_Q11numeric_bit_T8unsigned &);
519 /* Prototype for subprogram :ieee:numeric_bit:"nand" */
520 L4ieee_Q11numeric_bit_T8unsigned L4ieee_Q11numeric_bit_Y7op_nand_i347(const L4ieee_Q11numeric_bit_T8unsigned &,const L4ieee_Q11numeric_bit_T8unsigned &);
521 /* Prototype for subprogram :ieee:numeric_bit:"nor" */
522 L4ieee_Q11numeric_bit_T8unsigned L4ieee_Q11numeric_bit_Y6op_nor_i350(const L4ieee_Q11numeric_bit_T8unsigned &,const L4ieee_Q11numeric_bit_T8unsigned &);
523 /* Prototype for subprogram :ieee:numeric_bit:"xor" */
524 L4ieee_Q11numeric_bit_T8unsigned L4ieee_Q11numeric_bit_Y6op_xor_i353(const L4ieee_Q11numeric_bit_T8unsigned &,const L4ieee_Q11numeric_bit_T8unsigned &);
525 /* Prototype for subprogram :ieee:numeric_bit:"xnor" */
526 L4ieee_Q11numeric_bit_T8unsigned L4ieee_Q11numeric_bit_Y7op_xnor_i356(const L4ieee_Q11numeric_bit_T8unsigned &,const L4ieee_Q11numeric_bit_T8unsigned &);
527 /* Prototype for subprogram :ieee:numeric_bit:"not" */
528 L4ieee_Q11numeric_bit_T6signed L4ieee_Q11numeric_bit_Y6op_not_i358(const L4ieee_Q11numeric_bit_T6signed &);
529 /* Prototype for subprogram :ieee:numeric_bit:"and" */
530 L4ieee_Q11numeric_bit_T6signed L4ieee_Q11numeric_bit_Y6op_and_i361(const L4ieee_Q11numeric_bit_T6signed &,const L4ieee_Q11numeric_bit_T6signed &);
531 /* Prototype for subprogram :ieee:numeric_bit:"or" */
532 L4ieee_Q11numeric_bit_T6signed L4ieee_Q11numeric_bit_Y5op_or_i364(const L4ieee_Q11numeric_bit_T6signed &,const L4ieee_Q11numeric_bit_T6signed &);
533 /* Prototype for subprogram :ieee:numeric_bit:"nand" */
534 L4ieee_Q11numeric_bit_T6signed L4ieee_Q11numeric_bit_Y7op_nand_i367(const L4ieee_Q11numeric_bit_T6signed &,const L4ieee_Q11numeric_bit_T6signed &);
535 /* Prototype for subprogram :ieee:numeric_bit:"nor" */
536 L4ieee_Q11numeric_bit_T6signed L4ieee_Q11numeric_bit_Y6op_nor_i370(const L4ieee_Q11numeric_bit_T6signed &,const L4ieee_Q11numeric_bit_T6signed &);
537 /* Prototype for subprogram :ieee:numeric_bit:"xor" */
538 L4ieee_Q11numeric_bit_T6signed L4ieee_Q11numeric_bit_Y6op_xor_i373(const L4ieee_Q11numeric_bit_T6signed &,const L4ieee_Q11numeric_bit_T6signed &);
539 /* Prototype for subprogram :ieee:numeric_bit:"xnor" */
540 L4ieee_Q11numeric_bit_T6signed L4ieee_Q11numeric_bit_Y7op_xnor_i376(const L4ieee_Q11numeric_bit_T6signed &,const L4ieee_Q11numeric_bit_T6signed &);
541 /* Prototype for subprogram :ieee:numeric_bit:rising_edge */
542 enumeration L4ieee_Q11numeric_bit_Y11rising_edge_i378(sig_info<enumeration> *,enumeration *);
543 /* Prototype for subprogram :ieee:numeric_bit:falling_edge */
544 enumeration L4ieee_Q11numeric_bit_Y12falling_edge_i380(sig_info<enumeration> *,enumeration *);
545 L4ieee_W11numeric_bit_T3_t2 L4ieee_W11numeric_bit_C3nau;
546 L4ieee_W11numeric_bit_T3_t3 L4ieee_W11numeric_bit_C3nas;
547 enumeration L4ieee_W11numeric_bit_C10no_warning;
548 L4ieee_W11numeric_bit_I3_t2 L4ieee_W11numeric_bit_I3_t2_INFO;
549 L4ieee_W11numeric_bit_I3_t3 L4ieee_W11numeric_bit_I3_t3_INFO;
550 /* Implementation of subprogram :ieee:numeric_bit:max */
L4ieee_W11numeric_bit_Y3max_i9(const integer L4ieee_W11numeric_bit_Y3max_i9_C4left,const integer L4ieee_W11numeric_bit_Y3max_i9_C5right)551 integer L4ieee_W11numeric_bit_Y3max_i9(const integer L4ieee_W11numeric_bit_Y3max_i9_C4left,const integer L4ieee_W11numeric_bit_Y3max_i9_C5right)
552 {
553 if((L4ieee_W11numeric_bit_Y3max_i9_C4left>L4ieee_W11numeric_bit_Y3max_i9_C5right)) {
554 return L4ieee_W11numeric_bit_Y3max_i9_C4left;
555 } else {
556 return L4ieee_W11numeric_bit_Y3max_i9_C5right;
557 }
558 }
559 /* Implementation of subprogram :ieee:numeric_bit:min */
L4ieee_W11numeric_bit_Y3min_i12(const integer L4ieee_W11numeric_bit_Y3min_i12_C4left,const integer L4ieee_W11numeric_bit_Y3min_i12_C5right)560 integer L4ieee_W11numeric_bit_Y3min_i12(const integer L4ieee_W11numeric_bit_Y3min_i12_C4left,const integer L4ieee_W11numeric_bit_Y3min_i12_C5right)
561 {
562 if((L4ieee_W11numeric_bit_Y3min_i12_C4left<L4ieee_W11numeric_bit_Y3min_i12_C5right)) {
563 return L4ieee_W11numeric_bit_Y3min_i12_C4left;
564 } else {
565 return L4ieee_W11numeric_bit_Y3min_i12_C5right;
566 }
567 }
568 /* Implementation of subprogram :ieee:numeric_bit:signed_num_bits */
L4ieee_W11numeric_bit_Y15signed_num_bits_i14(const integer L4ieee_W11numeric_bit_Y15signed_num_bits_i14_C3arg)569 integer L4ieee_W11numeric_bit_Y15signed_num_bits_i14(const integer L4ieee_W11numeric_bit_Y15signed_num_bits_i14_C3arg)
570 {
571 integer L4ieee_W11numeric_bit_Y15signed_num_bits_i14_V5nbits,L4ieee_W11numeric_bit_Y15signed_num_bits_i14_V1n;
572 L4ieee_W11numeric_bit_Y15signed_num_bits_i14_V5nbits=0;
573 L4ieee_W11numeric_bit_Y15signed_num_bits_i14_V1n=0;
574 if((L4ieee_W11numeric_bit_Y15signed_num_bits_i14_C3arg>=0)) {
575 L4ieee_W11numeric_bit_Y15signed_num_bits_i14_V1n=L4ieee_W11numeric_bit_Y15signed_num_bits_i14_C3arg;
576 } else {
577 L4ieee_W11numeric_bit_Y15signed_num_bits_i14_V1n=(-(L4ieee_W11numeric_bit_Y15signed_num_bits_i14_C3arg+1));
578 }
579 L4ieee_W11numeric_bit_Y15signed_num_bits_i14_V5nbits=1;
580 while((L4ieee_W11numeric_bit_Y15signed_num_bits_i14_V1n>0)) {
581 L4ieee_W11numeric_bit_Y15signed_num_bits_i14_V5nbits=(L4ieee_W11numeric_bit_Y15signed_num_bits_i14_V5nbits+1);
582 L4ieee_W11numeric_bit_Y15signed_num_bits_i14_V1n=(L4ieee_W11numeric_bit_Y15signed_num_bits_i14_V1n/2);
583 }
584 return L4ieee_W11numeric_bit_Y15signed_num_bits_i14_V5nbits;
585 }
586 /* Implementation of subprogram :ieee:numeric_bit:unsigned_num_bits */
L4ieee_W11numeric_bit_Y17unsigned_num_bits_i19(const integer L4ieee_W11numeric_bit_Y17unsigned_num_bits_i19_C3arg)587 integer L4ieee_W11numeric_bit_Y17unsigned_num_bits_i19(const integer L4ieee_W11numeric_bit_Y17unsigned_num_bits_i19_C3arg)
588 {
589 integer L4ieee_W11numeric_bit_Y17unsigned_num_bits_i19_V5nbits,L4ieee_W11numeric_bit_Y17unsigned_num_bits_i19_V1n;
590 L4ieee_W11numeric_bit_Y17unsigned_num_bits_i19_V5nbits=0;
591 L4ieee_W11numeric_bit_Y17unsigned_num_bits_i19_V1n=0;
592 L4ieee_W11numeric_bit_Y17unsigned_num_bits_i19_V1n=L4ieee_W11numeric_bit_Y17unsigned_num_bits_i19_C3arg;
593 L4ieee_W11numeric_bit_Y17unsigned_num_bits_i19_V5nbits=1;
594 while((L4ieee_W11numeric_bit_Y17unsigned_num_bits_i19_V1n>1)) {
595 L4ieee_W11numeric_bit_Y17unsigned_num_bits_i19_V5nbits=(L4ieee_W11numeric_bit_Y17unsigned_num_bits_i19_V5nbits+1);
596 L4ieee_W11numeric_bit_Y17unsigned_num_bits_i19_V1n=(L4ieee_W11numeric_bit_Y17unsigned_num_bits_i19_V1n/2);
597 }
598 return L4ieee_W11numeric_bit_Y17unsigned_num_bits_i19_V5nbits;
599 }
600 /* Implementation of subprogram :ieee:numeric_bit:add_unsigned */
L4ieee_W11numeric_bit_Y12add_unsigned_i26(const L4ieee_Q11numeric_bit_T8unsigned & L4ieee_W11numeric_bit_Y12add_unsigned_i26_C1l,const L4ieee_Q11numeric_bit_T8unsigned & L4ieee_W11numeric_bit_Y12add_unsigned_i26_C1r,const enumeration L4ieee_W11numeric_bit_Y12add_unsigned_i26_C1c)601 L4ieee_Q11numeric_bit_T8unsigned L4ieee_W11numeric_bit_Y12add_unsigned_i26(const L4ieee_Q11numeric_bit_T8unsigned &L4ieee_W11numeric_bit_Y12add_unsigned_i26_C1l,const L4ieee_Q11numeric_bit_T8unsigned &L4ieee_W11numeric_bit_Y12add_unsigned_i26_C1r,const enumeration L4ieee_W11numeric_bit_Y12add_unsigned_i26_C1c)
602 {
603 integer L4ieee_W11numeric_bit_Y12add_unsigned_i26_C6l_left;
604 array_alias<L4ieee_Q11numeric_bit_T8unsigned > L4ieee_W11numeric_bit_Y12add_unsigned_i26_H2xl,L4ieee_W11numeric_bit_Y12add_unsigned_i26_H2xr;
605 L4ieee_Q11numeric_bit_T8unsigned L4ieee_W11numeric_bit_Y12add_unsigned_i26_V6result;
606 enumeration L4ieee_W11numeric_bit_Y12add_unsigned_i26_V4cbit;
607 integer L4ieee_W11numeric_bit_Y12add_unsigned_i26_L432ln_C1i,L4ieee_W11numeric_bit_Y12add_unsigned_i26_L432ln_C1i_lc;
608 L4ieee_W11numeric_bit_Y12add_unsigned_i26_C6l_left=(L4ieee_W11numeric_bit_Y12add_unsigned_i26_C1l.info->length-1);
609 L4ieee_W11numeric_bit_Y12add_unsigned_i26_H2xl.set((new array_info((&L4ieee_Q11numeric_bit_I8unsigned_INFO)->element_type,(&L4ieee_Q11numeric_bit_I8unsigned_INFO)->index_type,L4ieee_W11numeric_bit_Y12add_unsigned_i26_C6l_left,downto,0,0)), L4ieee_W11numeric_bit_Y12add_unsigned_i26_C1l.data);
610 L4ieee_W11numeric_bit_Y12add_unsigned_i26_H2xr.set((new array_info((&L4ieee_Q11numeric_bit_I8unsigned_INFO)->element_type,(&L4ieee_Q11numeric_bit_I8unsigned_INFO)->index_type,L4ieee_W11numeric_bit_Y12add_unsigned_i26_C6l_left,downto,0,0)), L4ieee_W11numeric_bit_Y12add_unsigned_i26_C1r.data);
611 L4ieee_W11numeric_bit_Y12add_unsigned_i26_V6result.init((new array_info((&L4ieee_Q11numeric_bit_I8unsigned_INFO)->element_type,(&L4ieee_Q11numeric_bit_I8unsigned_INFO)->index_type,L4ieee_W11numeric_bit_Y12add_unsigned_i26_C6l_left,downto,0,0)),enumeration(0));
612 L4ieee_W11numeric_bit_Y12add_unsigned_i26_V4cbit=L4ieee_W11numeric_bit_Y12add_unsigned_i26_C1c;
613 for (L4ieee_W11numeric_bit_Y12add_unsigned_i26_L432ln_C1i=0,L4ieee_W11numeric_bit_Y12add_unsigned_i26_L432ln_C1i_lc=up_range_to_length<integer>(0,L4ieee_W11numeric_bit_Y12add_unsigned_i26_C6l_left); L4ieee_W11numeric_bit_Y12add_unsigned_i26_L432ln_C1i_lc!=0; L4ieee_W11numeric_bit_Y12add_unsigned_i26_L432ln_C1i++,L4ieee_W11numeric_bit_Y12add_unsigned_i26_L432ln_C1i_lc--) {
614 L4ieee_W11numeric_bit_Y12add_unsigned_i26_V6result[L4ieee_W11numeric_bit_Y12add_unsigned_i26_L432ln_C1i]=op_xor(op_xor(L4ieee_W11numeric_bit_Y12add_unsigned_i26_V4cbit,L4ieee_W11numeric_bit_Y12add_unsigned_i26_H2xl[L4ieee_W11numeric_bit_Y12add_unsigned_i26_L432ln_C1i]),L4ieee_W11numeric_bit_Y12add_unsigned_i26_H2xr[L4ieee_W11numeric_bit_Y12add_unsigned_i26_L432ln_C1i]);
615 L4ieee_W11numeric_bit_Y12add_unsigned_i26_V4cbit=(((L4ieee_W11numeric_bit_Y12add_unsigned_i26_V4cbit&&L4ieee_W11numeric_bit_Y12add_unsigned_i26_H2xl[L4ieee_W11numeric_bit_Y12add_unsigned_i26_L432ln_C1i])||(L4ieee_W11numeric_bit_Y12add_unsigned_i26_V4cbit&&L4ieee_W11numeric_bit_Y12add_unsigned_i26_H2xr[L4ieee_W11numeric_bit_Y12add_unsigned_i26_L432ln_C1i]))||(L4ieee_W11numeric_bit_Y12add_unsigned_i26_H2xl[L4ieee_W11numeric_bit_Y12add_unsigned_i26_L432ln_C1i]&&L4ieee_W11numeric_bit_Y12add_unsigned_i26_H2xr[L4ieee_W11numeric_bit_Y12add_unsigned_i26_L432ln_C1i]));
616 }
617 return array_alias<L4ieee_Q11numeric_bit_T8unsigned >((&L4ieee_Q11numeric_bit_I8unsigned_INFO),L4ieee_W11numeric_bit_Y12add_unsigned_i26_V6result);
618 }
619 /* Implementation of subprogram :ieee:numeric_bit:add_signed */
L4ieee_W11numeric_bit_Y10add_signed_i37(const L4ieee_Q11numeric_bit_T6signed & L4ieee_W11numeric_bit_Y10add_signed_i37_C1l,const L4ieee_Q11numeric_bit_T6signed & L4ieee_W11numeric_bit_Y10add_signed_i37_C1r,const enumeration L4ieee_W11numeric_bit_Y10add_signed_i37_C1c)620 L4ieee_Q11numeric_bit_T6signed L4ieee_W11numeric_bit_Y10add_signed_i37(const L4ieee_Q11numeric_bit_T6signed &L4ieee_W11numeric_bit_Y10add_signed_i37_C1l,const L4ieee_Q11numeric_bit_T6signed &L4ieee_W11numeric_bit_Y10add_signed_i37_C1r,const enumeration L4ieee_W11numeric_bit_Y10add_signed_i37_C1c)
621 {
622 integer L4ieee_W11numeric_bit_Y10add_signed_i37_C6l_left;
623 array_alias<L4ieee_Q11numeric_bit_T6signed > L4ieee_W11numeric_bit_Y10add_signed_i37_H2xl,L4ieee_W11numeric_bit_Y10add_signed_i37_H2xr;
624 L4ieee_Q11numeric_bit_T6signed L4ieee_W11numeric_bit_Y10add_signed_i37_V6result;
625 enumeration L4ieee_W11numeric_bit_Y10add_signed_i37_V4cbit;
626 integer L4ieee_W11numeric_bit_Y10add_signed_i37_L443ln_C1i,L4ieee_W11numeric_bit_Y10add_signed_i37_L443ln_C1i_lc;
627 L4ieee_W11numeric_bit_Y10add_signed_i37_C6l_left=(L4ieee_W11numeric_bit_Y10add_signed_i37_C1l.info->length-1);
628 L4ieee_W11numeric_bit_Y10add_signed_i37_H2xl.set((new array_info((&L4ieee_Q11numeric_bit_I6signed_INFO)->element_type,(&L4ieee_Q11numeric_bit_I6signed_INFO)->index_type,L4ieee_W11numeric_bit_Y10add_signed_i37_C6l_left,downto,0,0)), L4ieee_W11numeric_bit_Y10add_signed_i37_C1l.data);
629 L4ieee_W11numeric_bit_Y10add_signed_i37_H2xr.set((new array_info((&L4ieee_Q11numeric_bit_I6signed_INFO)->element_type,(&L4ieee_Q11numeric_bit_I6signed_INFO)->index_type,L4ieee_W11numeric_bit_Y10add_signed_i37_C6l_left,downto,0,0)), L4ieee_W11numeric_bit_Y10add_signed_i37_C1r.data);
630 L4ieee_W11numeric_bit_Y10add_signed_i37_V6result.init((new array_info((&L4ieee_Q11numeric_bit_I6signed_INFO)->element_type,(&L4ieee_Q11numeric_bit_I6signed_INFO)->index_type,L4ieee_W11numeric_bit_Y10add_signed_i37_C6l_left,downto,0,0)),enumeration(0));
631 L4ieee_W11numeric_bit_Y10add_signed_i37_V4cbit=L4ieee_W11numeric_bit_Y10add_signed_i37_C1c;
632 for (L4ieee_W11numeric_bit_Y10add_signed_i37_L443ln_C1i=0,L4ieee_W11numeric_bit_Y10add_signed_i37_L443ln_C1i_lc=up_range_to_length<integer>(0,L4ieee_W11numeric_bit_Y10add_signed_i37_C6l_left); L4ieee_W11numeric_bit_Y10add_signed_i37_L443ln_C1i_lc!=0; L4ieee_W11numeric_bit_Y10add_signed_i37_L443ln_C1i++,L4ieee_W11numeric_bit_Y10add_signed_i37_L443ln_C1i_lc--) {
633 L4ieee_W11numeric_bit_Y10add_signed_i37_V6result[L4ieee_W11numeric_bit_Y10add_signed_i37_L443ln_C1i]=op_xor(op_xor(L4ieee_W11numeric_bit_Y10add_signed_i37_V4cbit,L4ieee_W11numeric_bit_Y10add_signed_i37_H2xl[L4ieee_W11numeric_bit_Y10add_signed_i37_L443ln_C1i]),L4ieee_W11numeric_bit_Y10add_signed_i37_H2xr[L4ieee_W11numeric_bit_Y10add_signed_i37_L443ln_C1i]);
634 L4ieee_W11numeric_bit_Y10add_signed_i37_V4cbit=(((L4ieee_W11numeric_bit_Y10add_signed_i37_V4cbit&&L4ieee_W11numeric_bit_Y10add_signed_i37_H2xl[L4ieee_W11numeric_bit_Y10add_signed_i37_L443ln_C1i])||(L4ieee_W11numeric_bit_Y10add_signed_i37_V4cbit&&L4ieee_W11numeric_bit_Y10add_signed_i37_H2xr[L4ieee_W11numeric_bit_Y10add_signed_i37_L443ln_C1i]))||(L4ieee_W11numeric_bit_Y10add_signed_i37_H2xl[L4ieee_W11numeric_bit_Y10add_signed_i37_L443ln_C1i]&&L4ieee_W11numeric_bit_Y10add_signed_i37_H2xr[L4ieee_W11numeric_bit_Y10add_signed_i37_L443ln_C1i]));
635 }
636 return array_alias<L4ieee_Q11numeric_bit_T6signed >((&L4ieee_Q11numeric_bit_I6signed_INFO),L4ieee_W11numeric_bit_Y10add_signed_i37_V6result);
637 }
638 enumeration L4ieee_W11numeric_bit_itn16_lit[]={0};
639 enumeration L4ieee_W11numeric_bit_itn17_lit[]={68,73,86,44,32,77,79,68,44,32,111,114,32,82,69,77,32,98,121,32,122,101,114,111};
640 enumeration L4ieee_W11numeric_bit_itn18_lit[]={0};
641 enumeration L4ieee_W11numeric_bit_itn19_lit[]={0};
642 enumeration L4ieee_W11numeric_bit_itn20_lit[]={105,110,116,101,114,110,97,108,32,101,114,114,111,114,32,105,110,32,116,104,101,32,100,105,118,105,115,105,111,110,32,97,108,103,111,114,105,116,104,109};
643 /* Implementation of subprogram :ieee:numeric_bit:divmod */
L4ieee_W11numeric_bit_X6divmod_i49(const L4ieee_Q11numeric_bit_T8unsigned & L4ieee_W11numeric_bit_X6divmod_i49_C3num,const L4ieee_Q11numeric_bit_T8unsigned & L4ieee_W11numeric_bit_X6divmod_i49_C6xdenom,L4ieee_Q11numeric_bit_T8unsigned & L4ieee_W11numeric_bit_X6divmod_i49_V5xquot,L4ieee_Q11numeric_bit_T8unsigned & L4ieee_W11numeric_bit_X6divmod_i49_V7xremain)644 void L4ieee_W11numeric_bit_X6divmod_i49(const L4ieee_Q11numeric_bit_T8unsigned &L4ieee_W11numeric_bit_X6divmod_i49_C3num,const L4ieee_Q11numeric_bit_T8unsigned &L4ieee_W11numeric_bit_X6divmod_i49_C6xdenom,L4ieee_Q11numeric_bit_T8unsigned &L4ieee_W11numeric_bit_X6divmod_i49_V5xquot,L4ieee_Q11numeric_bit_T8unsigned &L4ieee_W11numeric_bit_X6divmod_i49_V7xremain)
645 {
646 L4ieee_Q11numeric_bit_T8unsigned L4ieee_W11numeric_bit_X6divmod_i49_V4temp,L4ieee_W11numeric_bit_X6divmod_i49_V4quot;
647 array_alias<L4ieee_Q11numeric_bit_T8unsigned > L4ieee_W11numeric_bit_X6divmod_i49_H5denom;
648 integer L4ieee_W11numeric_bit_X6divmod_i49_V6topbit,L4ieee_W11numeric_bit_X6divmod_i49_L454ln_C1j,L4ieee_W11numeric_bit_X6divmod_i49_L454ln_C1j_lc,L4ieee_W11numeric_bit_X6divmod_i49_L456ln_C1j,L4ieee_W11numeric_bit_X6divmod_i49_L456ln_C1j_lc;
649 L4ieee_W11numeric_bit_X6divmod_i49_V4temp.init((new array_info((&L4ieee_Q11numeric_bit_I8unsigned_INFO)->element_type,(&L4ieee_Q11numeric_bit_I8unsigned_INFO)->index_type,L4ieee_W11numeric_bit_X6divmod_i49_C3num.info->length,downto,0,0)),enumeration(0));
650 L4ieee_W11numeric_bit_X6divmod_i49_V4quot.init((new array_info((&L4ieee_Q11numeric_bit_I8unsigned_INFO)->element_type,(&L4ieee_Q11numeric_bit_I8unsigned_INFO)->index_type,(L4ieee_W11numeric_bit_Y3max_i9 (L4ieee_W11numeric_bit_X6divmod_i49_C3num.info->length,L4ieee_W11numeric_bit_X6divmod_i49_C6xdenom.info->length)-1),downto,0,0)),enumeration(0));
651 L4ieee_W11numeric_bit_X6divmod_i49_H5denom.set((new array_info((&L4ieee_Q11numeric_bit_I8unsigned_INFO)->element_type,(&L4ieee_Q11numeric_bit_I8unsigned_INFO)->index_type,(L4ieee_W11numeric_bit_X6divmod_i49_C6xdenom.info->length-1),downto,0,0)), L4ieee_W11numeric_bit_X6divmod_i49_C6xdenom.data);
652 L4ieee_W11numeric_bit_X6divmod_i49_V6topbit=-2147483648LL;
653 L4ieee_W11numeric_bit_X6divmod_i49_V4temp=concat<L4ieee_Q11numeric_bit_T8unsigned,enumeration>(array_alias<L4ieee_Q11numeric_bit_T8unsigned >(new array_info((&L4ieee_Q11numeric_bit_I8unsigned_INFO)->element_type,(&L4ieee_Q11numeric_bit_I8unsigned_INFO)->index_type,0,to,0+0,0),L4ieee_W11numeric_bit_itn16_lit),L4ieee_W11numeric_bit_X6divmod_i49_C3num);
654 L4ieee_W11numeric_bit_X6divmod_i49_V4quot=L4ieee_Q11numeric_bit_T8unsigned(new array_info((new array_info((&L4ieee_Q11numeric_bit_I8unsigned_INFO)->element_type,(&L4ieee_Q11numeric_bit_I8unsigned_INFO)->index_type,(L4ieee_W11numeric_bit_Y3max_i9 (L4ieee_W11numeric_bit_X6divmod_i49_C3num.info->length,L4ieee_W11numeric_bit_X6divmod_i49_C6xdenom.info->length)-1),downto,0,0))->element_type,(new array_info((&L4ieee_Q11numeric_bit_I8unsigned_INFO)->element_type,(&L4ieee_Q11numeric_bit_I8unsigned_INFO)->index_type,(L4ieee_W11numeric_bit_Y3max_i9 (L4ieee_W11numeric_bit_X6divmod_i49_C3num.info->length,L4ieee_W11numeric_bit_X6divmod_i49_C6xdenom.info->length)-1),downto,0,0))->index_type,(L4ieee_W11numeric_bit_Y3max_i9 (L4ieee_W11numeric_bit_X6divmod_i49_C3num.info->length,L4ieee_W11numeric_bit_X6divmod_i49_C6xdenom.info->length)-1),downto,0,0),enumeration(0));
655 L4ieee_W11numeric_bit_X6divmod_i49_V6topbit=-1;
656 for (L4ieee_W11numeric_bit_X6divmod_i49_L454ln_C1j=(L4ieee_W11numeric_bit_X6divmod_i49_C6xdenom.info->length-1),L4ieee_W11numeric_bit_X6divmod_i49_L454ln_C1j_lc=down_range_to_length<integer>((L4ieee_W11numeric_bit_X6divmod_i49_C6xdenom.info->length-1),0); L4ieee_W11numeric_bit_X6divmod_i49_L454ln_C1j_lc!=0; L4ieee_W11numeric_bit_X6divmod_i49_L454ln_C1j--,L4ieee_W11numeric_bit_X6divmod_i49_L454ln_C1j_lc--) {
657 if((L4ieee_W11numeric_bit_X6divmod_i49_H5denom[L4ieee_W11numeric_bit_X6divmod_i49_L454ln_C1j]==enumeration(1))) {
658 L4ieee_W11numeric_bit_X6divmod_i49_V6topbit=L4ieee_W11numeric_bit_X6divmod_i49_L454ln_C1j;
659 goto exit_8;
660 }
661 } exit_8:;
662 if(!(L4ieee_W11numeric_bit_X6divmod_i49_V6topbit>=0))
663 report(array_alias<L3std_Q8standard_T6string >(new array_info((&L3std_Q8standard_I6string_INFO)->element_type,(&L3std_Q8standard_I6string_INFO)->index_type,1,to,1+23,0),L4ieee_W11numeric_bit_itn17_lit),enumeration(2));
664 for (L4ieee_W11numeric_bit_X6divmod_i49_L456ln_C1j=(L4ieee_W11numeric_bit_X6divmod_i49_C3num.info->length-(L4ieee_W11numeric_bit_X6divmod_i49_V6topbit+1)),L4ieee_W11numeric_bit_X6divmod_i49_L456ln_C1j_lc=down_range_to_length<integer>((L4ieee_W11numeric_bit_X6divmod_i49_C3num.info->length-(L4ieee_W11numeric_bit_X6divmod_i49_V6topbit+1)),0); L4ieee_W11numeric_bit_X6divmod_i49_L456ln_C1j_lc!=0; L4ieee_W11numeric_bit_X6divmod_i49_L456ln_C1j--,L4ieee_W11numeric_bit_X6divmod_i49_L456ln_C1j_lc--) {
665 if(L4ieee_Q11numeric_bit_Y5op_ge_i221 (array_alias<L4ieee_Q11numeric_bit_T8unsigned >(new array_info((&L4ieee_Q11numeric_bit_I8unsigned_INFO)->element_type,(&L4ieee_Q11numeric_bit_I8unsigned_INFO)->index_type,((L4ieee_W11numeric_bit_X6divmod_i49_V6topbit+L4ieee_W11numeric_bit_X6divmod_i49_L456ln_C1j)+1),downto,L4ieee_W11numeric_bit_X6divmod_i49_L456ln_C1j,0),&L4ieee_W11numeric_bit_X6divmod_i49_V4temp[((L4ieee_W11numeric_bit_X6divmod_i49_V6topbit+L4ieee_W11numeric_bit_X6divmod_i49_L456ln_C1j)+1)]),concat<L4ieee_Q11numeric_bit_T8unsigned,enumeration>(array_alias<L4ieee_Q11numeric_bit_T8unsigned >(new array_info((&L4ieee_Q11numeric_bit_I8unsigned_INFO)->element_type,(&L4ieee_Q11numeric_bit_I8unsigned_INFO)->index_type,0,to,0+0,0),L4ieee_W11numeric_bit_itn18_lit),array_alias<L4ieee_Q11numeric_bit_T8unsigned >(new array_info((&L4ieee_Q11numeric_bit_I8unsigned_INFO)->element_type,(&L4ieee_Q11numeric_bit_I8unsigned_INFO)->index_type,L4ieee_W11numeric_bit_X6divmod_i49_V6topbit,downto,0,0),&L4ieee_W11numeric_bit_X6divmod_i49_H5denom[L4ieee_W11numeric_bit_X6divmod_i49_V6topbit])))) {
666 array_alias<L4ieee_Q11numeric_bit_T8unsigned >(new array_info((&L4ieee_Q11numeric_bit_I8unsigned_INFO)->element_type,(&L4ieee_Q11numeric_bit_I8unsigned_INFO)->index_type,((L4ieee_W11numeric_bit_X6divmod_i49_V6topbit+L4ieee_W11numeric_bit_X6divmod_i49_L456ln_C1j)+1),downto,L4ieee_W11numeric_bit_X6divmod_i49_L456ln_C1j,0),&L4ieee_W11numeric_bit_X6divmod_i49_V4temp[((L4ieee_W11numeric_bit_X6divmod_i49_V6topbit+L4ieee_W11numeric_bit_X6divmod_i49_L456ln_C1j)+1)])=L4ieee_Q11numeric_bit_Y8op_minus_i77 (array_alias<L4ieee_Q11numeric_bit_T8unsigned >(new array_info((&L4ieee_Q11numeric_bit_I8unsigned_INFO)->element_type,(&L4ieee_Q11numeric_bit_I8unsigned_INFO)->index_type,((L4ieee_W11numeric_bit_X6divmod_i49_V6topbit+L4ieee_W11numeric_bit_X6divmod_i49_L456ln_C1j)+1),downto,L4ieee_W11numeric_bit_X6divmod_i49_L456ln_C1j,0),&L4ieee_W11numeric_bit_X6divmod_i49_V4temp[((L4ieee_W11numeric_bit_X6divmod_i49_V6topbit+L4ieee_W11numeric_bit_X6divmod_i49_L456ln_C1j)+1)]),concat<L4ieee_Q11numeric_bit_T8unsigned,enumeration>(array_alias<L4ieee_Q11numeric_bit_T8unsigned >(new array_info((&L4ieee_Q11numeric_bit_I8unsigned_INFO)->element_type,(&L4ieee_Q11numeric_bit_I8unsigned_INFO)->index_type,0,to,0+0,0),L4ieee_W11numeric_bit_itn19_lit),array_alias<L4ieee_Q11numeric_bit_T8unsigned >(new array_info((&L4ieee_Q11numeric_bit_I8unsigned_INFO)->element_type,(&L4ieee_Q11numeric_bit_I8unsigned_INFO)->index_type,L4ieee_W11numeric_bit_X6divmod_i49_V6topbit,downto,0,0),&L4ieee_W11numeric_bit_X6divmod_i49_H5denom[L4ieee_W11numeric_bit_X6divmod_i49_V6topbit])));
667 L4ieee_W11numeric_bit_X6divmod_i49_V4quot[L4ieee_W11numeric_bit_X6divmod_i49_L456ln_C1j]=enumeration(1);
668 }
669 if(!(L4ieee_W11numeric_bit_X6divmod_i49_V4temp[((L4ieee_W11numeric_bit_X6divmod_i49_V6topbit+L4ieee_W11numeric_bit_X6divmod_i49_L456ln_C1j)+1)]==enumeration(0)))
670 report(array_alias<L3std_Q8standard_T6string >(new array_info((&L3std_Q8standard_I6string_INFO)->element_type,(&L3std_Q8standard_I6string_INFO)->index_type,1,to,1+39,0),L4ieee_W11numeric_bit_itn20_lit),enumeration(2));
671 }
672 L4ieee_W11numeric_bit_X6divmod_i49_V5xquot=L4ieee_Q11numeric_bit_Y6resize_i326 (L4ieee_W11numeric_bit_X6divmod_i49_V4quot,L4ieee_W11numeric_bit_X6divmod_i49_V5xquot.info->length);
673 L4ieee_W11numeric_bit_X6divmod_i49_V7xremain=L4ieee_Q11numeric_bit_Y6resize_i326 (L4ieee_W11numeric_bit_X6divmod_i49_V4temp,L4ieee_W11numeric_bit_X6divmod_i49_V7xremain.info->length);
674 rlabel:
675 return;
676 }
677 /* Implementation of subprogram :ieee:numeric_bit:xsll */
L4ieee_W11numeric_bit_Y4xsll_i60(const L3std_Q8standard_T10bit_vector & L4ieee_W11numeric_bit_Y4xsll_i60_C3arg,const integer L4ieee_W11numeric_bit_Y4xsll_i60_C5count)678 L3std_Q8standard_T10bit_vector L4ieee_W11numeric_bit_Y4xsll_i60(const L3std_Q8standard_T10bit_vector &L4ieee_W11numeric_bit_Y4xsll_i60_C3arg,const integer L4ieee_W11numeric_bit_Y4xsll_i60_C5count)
679 {
680 integer L4ieee_W11numeric_bit_Y4xsll_i60_C5arg_l;
681 array_alias<L3std_Q8standard_T10bit_vector > L4ieee_W11numeric_bit_Y4xsll_i60_H4xarg;
682 L3std_Q8standard_T10bit_vector L4ieee_W11numeric_bit_Y4xsll_i60_V6result;
683 L4ieee_W11numeric_bit_Y4xsll_i60_C5arg_l=(L4ieee_W11numeric_bit_Y4xsll_i60_C3arg.info->length-1);
684 L4ieee_W11numeric_bit_Y4xsll_i60_H4xarg.set((new array_info((&L3std_Q8standard_I10bit_vector_INFO)->element_type,(&L3std_Q8standard_I10bit_vector_INFO)->index_type,L4ieee_W11numeric_bit_Y4xsll_i60_C5arg_l,downto,0,0)), L4ieee_W11numeric_bit_Y4xsll_i60_C3arg.data);
685 L4ieee_W11numeric_bit_Y4xsll_i60_V6result.init((new array_info((&L3std_Q8standard_I10bit_vector_INFO)->element_type,(&L3std_Q8standard_I10bit_vector_INFO)->index_type,L4ieee_W11numeric_bit_Y4xsll_i60_C5arg_l,downto,0,0)),enumeration(0));
686 L4ieee_W11numeric_bit_Y4xsll_i60_V6result=L3std_Q8standard_T10bit_vector(new array_info((new array_info((&L3std_Q8standard_I10bit_vector_INFO)->element_type,(&L3std_Q8standard_I10bit_vector_INFO)->index_type,L4ieee_W11numeric_bit_Y4xsll_i60_C5arg_l,downto,0,0))->element_type,(new array_info((&L3std_Q8standard_I10bit_vector_INFO)->element_type,(&L3std_Q8standard_I10bit_vector_INFO)->index_type,L4ieee_W11numeric_bit_Y4xsll_i60_C5arg_l,downto,0,0))->index_type,L4ieee_W11numeric_bit_Y4xsll_i60_C5arg_l,downto,0,0),enumeration(0));
687 if((L4ieee_W11numeric_bit_Y4xsll_i60_C5count<=L4ieee_W11numeric_bit_Y4xsll_i60_C5arg_l)) {
688 array_alias<L3std_Q8standard_T10bit_vector >(new array_info((&L3std_Q8standard_I10bit_vector_INFO)->element_type,(&L3std_Q8standard_I10bit_vector_INFO)->index_type,L4ieee_W11numeric_bit_Y4xsll_i60_C5arg_l,downto,L4ieee_W11numeric_bit_Y4xsll_i60_C5count,0),&L4ieee_W11numeric_bit_Y4xsll_i60_V6result[L4ieee_W11numeric_bit_Y4xsll_i60_C5arg_l])=array_alias<L3std_Q8standard_T10bit_vector >(new array_info((&L3std_Q8standard_I10bit_vector_INFO)->element_type,(&L3std_Q8standard_I10bit_vector_INFO)->index_type,(L4ieee_W11numeric_bit_Y4xsll_i60_C5arg_l-L4ieee_W11numeric_bit_Y4xsll_i60_C5count),downto,0,0),&L4ieee_W11numeric_bit_Y4xsll_i60_H4xarg[(L4ieee_W11numeric_bit_Y4xsll_i60_C5arg_l-L4ieee_W11numeric_bit_Y4xsll_i60_C5count)]);
689 }
690 return array_alias<L3std_Q8standard_T10bit_vector >((&L3std_Q8standard_I10bit_vector_INFO),L4ieee_W11numeric_bit_Y4xsll_i60_V6result);
691 }
692 /* Implementation of subprogram :ieee:numeric_bit:xsrl */
L4ieee_W11numeric_bit_Y4xsrl_i66(const L3std_Q8standard_T10bit_vector & L4ieee_W11numeric_bit_Y4xsrl_i66_C3arg,const integer L4ieee_W11numeric_bit_Y4xsrl_i66_C5count)693 L3std_Q8standard_T10bit_vector L4ieee_W11numeric_bit_Y4xsrl_i66(const L3std_Q8standard_T10bit_vector &L4ieee_W11numeric_bit_Y4xsrl_i66_C3arg,const integer L4ieee_W11numeric_bit_Y4xsrl_i66_C5count)
694 {
695 integer L4ieee_W11numeric_bit_Y4xsrl_i66_C5arg_l;
696 array_alias<L3std_Q8standard_T10bit_vector > L4ieee_W11numeric_bit_Y4xsrl_i66_H4xarg;
697 L3std_Q8standard_T10bit_vector L4ieee_W11numeric_bit_Y4xsrl_i66_V6result;
698 L4ieee_W11numeric_bit_Y4xsrl_i66_C5arg_l=(L4ieee_W11numeric_bit_Y4xsrl_i66_C3arg.info->length-1);
699 L4ieee_W11numeric_bit_Y4xsrl_i66_H4xarg.set((new array_info((&L3std_Q8standard_I10bit_vector_INFO)->element_type,(&L3std_Q8standard_I10bit_vector_INFO)->index_type,L4ieee_W11numeric_bit_Y4xsrl_i66_C5arg_l,downto,0,0)), L4ieee_W11numeric_bit_Y4xsrl_i66_C3arg.data);
700 L4ieee_W11numeric_bit_Y4xsrl_i66_V6result.init((new array_info((&L3std_Q8standard_I10bit_vector_INFO)->element_type,(&L3std_Q8standard_I10bit_vector_INFO)->index_type,L4ieee_W11numeric_bit_Y4xsrl_i66_C5arg_l,downto,0,0)),enumeration(0));
701 L4ieee_W11numeric_bit_Y4xsrl_i66_V6result=L3std_Q8standard_T10bit_vector(new array_info((new array_info((&L3std_Q8standard_I10bit_vector_INFO)->element_type,(&L3std_Q8standard_I10bit_vector_INFO)->index_type,L4ieee_W11numeric_bit_Y4xsrl_i66_C5arg_l,downto,0,0))->element_type,(new array_info((&L3std_Q8standard_I10bit_vector_INFO)->element_type,(&L3std_Q8standard_I10bit_vector_INFO)->index_type,L4ieee_W11numeric_bit_Y4xsrl_i66_C5arg_l,downto,0,0))->index_type,L4ieee_W11numeric_bit_Y4xsrl_i66_C5arg_l,downto,0,0),enumeration(0));
702 if((L4ieee_W11numeric_bit_Y4xsrl_i66_C5count<=L4ieee_W11numeric_bit_Y4xsrl_i66_C5arg_l)) {
703 array_alias<L3std_Q8standard_T10bit_vector >(new array_info((&L3std_Q8standard_I10bit_vector_INFO)->element_type,(&L3std_Q8standard_I10bit_vector_INFO)->index_type,(L4ieee_W11numeric_bit_Y4xsrl_i66_C5arg_l-L4ieee_W11numeric_bit_Y4xsrl_i66_C5count),downto,0,0),&L4ieee_W11numeric_bit_Y4xsrl_i66_V6result[(L4ieee_W11numeric_bit_Y4xsrl_i66_C5arg_l-L4ieee_W11numeric_bit_Y4xsrl_i66_C5count)])=array_alias<L3std_Q8standard_T10bit_vector >(new array_info((&L3std_Q8standard_I10bit_vector_INFO)->element_type,(&L3std_Q8standard_I10bit_vector_INFO)->index_type,L4ieee_W11numeric_bit_Y4xsrl_i66_C5arg_l,downto,L4ieee_W11numeric_bit_Y4xsrl_i66_C5count,0),&L4ieee_W11numeric_bit_Y4xsrl_i66_H4xarg[L4ieee_W11numeric_bit_Y4xsrl_i66_C5arg_l]);
704 }
705 return array_alias<L3std_Q8standard_T10bit_vector >((&L3std_Q8standard_I10bit_vector_INFO),L4ieee_W11numeric_bit_Y4xsrl_i66_V6result);
706 }
707 /* Implementation of subprogram :ieee:numeric_bit:xsra */
L4ieee_W11numeric_bit_Y4xsra_i72(const L3std_Q8standard_T10bit_vector & L4ieee_W11numeric_bit_Y4xsra_i72_C3arg,const integer L4ieee_W11numeric_bit_Y4xsra_i72_C5count)708 L3std_Q8standard_T10bit_vector L4ieee_W11numeric_bit_Y4xsra_i72(const L3std_Q8standard_T10bit_vector &L4ieee_W11numeric_bit_Y4xsra_i72_C3arg,const integer L4ieee_W11numeric_bit_Y4xsra_i72_C5count)
709 {
710 integer L4ieee_W11numeric_bit_Y4xsra_i72_C5arg_l;
711 array_alias<L3std_Q8standard_T10bit_vector > L4ieee_W11numeric_bit_Y4xsra_i72_H4xarg;
712 L3std_Q8standard_T10bit_vector L4ieee_W11numeric_bit_Y4xsra_i72_V6result;
713 integer L4ieee_W11numeric_bit_Y4xsra_i72_V6xcount;
714 L4ieee_W11numeric_bit_Y4xsra_i72_C5arg_l=(L4ieee_W11numeric_bit_Y4xsra_i72_C3arg.info->length-1);
715 L4ieee_W11numeric_bit_Y4xsra_i72_H4xarg.set((new array_info((&L3std_Q8standard_I10bit_vector_INFO)->element_type,(&L3std_Q8standard_I10bit_vector_INFO)->index_type,L4ieee_W11numeric_bit_Y4xsra_i72_C5arg_l,downto,0,0)), L4ieee_W11numeric_bit_Y4xsra_i72_C3arg.data);
716 L4ieee_W11numeric_bit_Y4xsra_i72_V6result.init((new array_info((&L3std_Q8standard_I10bit_vector_INFO)->element_type,(&L3std_Q8standard_I10bit_vector_INFO)->index_type,L4ieee_W11numeric_bit_Y4xsra_i72_C5arg_l,downto,0,0)),enumeration(0));
717 L4ieee_W11numeric_bit_Y4xsra_i72_V6xcount=L4ieee_W11numeric_bit_Y4xsra_i72_C5count;
718 if(((L4ieee_W11numeric_bit_Y4xsra_i72_C3arg.info->length<=1)||(L4ieee_W11numeric_bit_Y4xsra_i72_V6xcount==0))) {
719 return array_alias<L3std_Q8standard_T10bit_vector >((&L3std_Q8standard_I10bit_vector_INFO),L4ieee_W11numeric_bit_Y4xsra_i72_C3arg);
720 } else {
721 if((L4ieee_W11numeric_bit_Y4xsra_i72_V6xcount>L4ieee_W11numeric_bit_Y4xsra_i72_C5arg_l)) {
722 L4ieee_W11numeric_bit_Y4xsra_i72_V6xcount=L4ieee_W11numeric_bit_Y4xsra_i72_C5arg_l;
723 }
724 array_alias<L3std_Q8standard_T10bit_vector >(new array_info((&L3std_Q8standard_I10bit_vector_INFO)->element_type,(&L3std_Q8standard_I10bit_vector_INFO)->index_type,(L4ieee_W11numeric_bit_Y4xsra_i72_C5arg_l-L4ieee_W11numeric_bit_Y4xsra_i72_V6xcount),downto,0,0),&L4ieee_W11numeric_bit_Y4xsra_i72_V6result[(L4ieee_W11numeric_bit_Y4xsra_i72_C5arg_l-L4ieee_W11numeric_bit_Y4xsra_i72_V6xcount)])=array_alias<L3std_Q8standard_T10bit_vector >(new array_info((&L3std_Q8standard_I10bit_vector_INFO)->element_type,(&L3std_Q8standard_I10bit_vector_INFO)->index_type,L4ieee_W11numeric_bit_Y4xsra_i72_C5arg_l,downto,L4ieee_W11numeric_bit_Y4xsra_i72_V6xcount,0),&L4ieee_W11numeric_bit_Y4xsra_i72_H4xarg[L4ieee_W11numeric_bit_Y4xsra_i72_C5arg_l]);
725 array_alias<L3std_Q8standard_T10bit_vector >(new array_info((&L3std_Q8standard_I10bit_vector_INFO)->element_type,(&L3std_Q8standard_I10bit_vector_INFO)->index_type,L4ieee_W11numeric_bit_Y4xsra_i72_C5arg_l,downto,((L4ieee_W11numeric_bit_Y4xsra_i72_C5arg_l-L4ieee_W11numeric_bit_Y4xsra_i72_V6xcount)+1),0),&L4ieee_W11numeric_bit_Y4xsra_i72_V6result[L4ieee_W11numeric_bit_Y4xsra_i72_C5arg_l])=L3std_Q8standard_T10bit_vector(new array_info((new array_info((&L3std_Q8standard_I10bit_vector_INFO)->element_type,(&L3std_Q8standard_I10bit_vector_INFO)->index_type,L4ieee_W11numeric_bit_Y4xsra_i72_C5arg_l,downto,((L4ieee_W11numeric_bit_Y4xsra_i72_C5arg_l-L4ieee_W11numeric_bit_Y4xsra_i72_V6xcount)+1),0))->element_type,(new array_info((&L3std_Q8standard_I10bit_vector_INFO)->element_type,(&L3std_Q8standard_I10bit_vector_INFO)->index_type,L4ieee_W11numeric_bit_Y4xsra_i72_C5arg_l,downto,((L4ieee_W11numeric_bit_Y4xsra_i72_C5arg_l-L4ieee_W11numeric_bit_Y4xsra_i72_V6xcount)+1),0))->index_type,L4ieee_W11numeric_bit_Y4xsra_i72_C5arg_l,downto,((L4ieee_W11numeric_bit_Y4xsra_i72_C5arg_l-L4ieee_W11numeric_bit_Y4xsra_i72_V6xcount)+1),0),L4ieee_W11numeric_bit_Y4xsra_i72_H4xarg[L4ieee_W11numeric_bit_Y4xsra_i72_C5arg_l]);
726 }
727 return array_alias<L3std_Q8standard_T10bit_vector >((&L3std_Q8standard_I10bit_vector_INFO),L4ieee_W11numeric_bit_Y4xsra_i72_V6result);
728 }
729 /* Implementation of subprogram :ieee:numeric_bit:xrol */
L4ieee_W11numeric_bit_Y4xrol_i79(const L3std_Q8standard_T10bit_vector & L4ieee_W11numeric_bit_Y4xrol_i79_C3arg,const integer L4ieee_W11numeric_bit_Y4xrol_i79_C5count)730 L3std_Q8standard_T10bit_vector L4ieee_W11numeric_bit_Y4xrol_i79(const L3std_Q8standard_T10bit_vector &L4ieee_W11numeric_bit_Y4xrol_i79_C3arg,const integer L4ieee_W11numeric_bit_Y4xrol_i79_C5count)
731 {
732 integer L4ieee_W11numeric_bit_Y4xrol_i79_C5arg_l;
733 array_alias<L3std_Q8standard_T10bit_vector > L4ieee_W11numeric_bit_Y4xrol_i79_H4xarg;
734 L3std_Q8standard_T10bit_vector L4ieee_W11numeric_bit_Y4xrol_i79_V6result;
735 integer L4ieee_W11numeric_bit_Y4xrol_i79_V6countm;
736 L4ieee_W11numeric_bit_Y4xrol_i79_C5arg_l=(L4ieee_W11numeric_bit_Y4xrol_i79_C3arg.info->length-1);
737 L4ieee_W11numeric_bit_Y4xrol_i79_H4xarg.set((new array_info((&L3std_Q8standard_I10bit_vector_INFO)->element_type,(&L3std_Q8standard_I10bit_vector_INFO)->index_type,L4ieee_W11numeric_bit_Y4xrol_i79_C5arg_l,downto,0,0)), L4ieee_W11numeric_bit_Y4xrol_i79_C3arg.data);
738 L4ieee_W11numeric_bit_Y4xrol_i79_V6result.init((new array_info((&L3std_Q8standard_I10bit_vector_INFO)->element_type,(&L3std_Q8standard_I10bit_vector_INFO)->index_type,L4ieee_W11numeric_bit_Y4xrol_i79_C5arg_l,downto,0,0)),enumeration(0));
739 L4ieee_W11numeric_bit_Y4xrol_i79_V6result=L4ieee_W11numeric_bit_Y4xrol_i79_H4xarg;
740 L4ieee_W11numeric_bit_Y4xrol_i79_V6countm=-2147483648LL;
741 L4ieee_W11numeric_bit_Y4xrol_i79_V6countm=op_mod(L4ieee_W11numeric_bit_Y4xrol_i79_C5count,(L4ieee_W11numeric_bit_Y4xrol_i79_C5arg_l+1));
742 if((L4ieee_W11numeric_bit_Y4xrol_i79_V6countm!=0)) {
743 array_alias<L3std_Q8standard_T10bit_vector >(new array_info((&L3std_Q8standard_I10bit_vector_INFO)->element_type,(&L3std_Q8standard_I10bit_vector_INFO)->index_type,L4ieee_W11numeric_bit_Y4xrol_i79_C5arg_l,downto,L4ieee_W11numeric_bit_Y4xrol_i79_V6countm,0),&L4ieee_W11numeric_bit_Y4xrol_i79_V6result[L4ieee_W11numeric_bit_Y4xrol_i79_C5arg_l])=array_alias<L3std_Q8standard_T10bit_vector >(new array_info((&L3std_Q8standard_I10bit_vector_INFO)->element_type,(&L3std_Q8standard_I10bit_vector_INFO)->index_type,(L4ieee_W11numeric_bit_Y4xrol_i79_C5arg_l-L4ieee_W11numeric_bit_Y4xrol_i79_V6countm),downto,0,0),&L4ieee_W11numeric_bit_Y4xrol_i79_H4xarg[(L4ieee_W11numeric_bit_Y4xrol_i79_C5arg_l-L4ieee_W11numeric_bit_Y4xrol_i79_V6countm)]);
744 array_alias<L3std_Q8standard_T10bit_vector >(new array_info((&L3std_Q8standard_I10bit_vector_INFO)->element_type,(&L3std_Q8standard_I10bit_vector_INFO)->index_type,(L4ieee_W11numeric_bit_Y4xrol_i79_V6countm-1),downto,0,0),&L4ieee_W11numeric_bit_Y4xrol_i79_V6result[(L4ieee_W11numeric_bit_Y4xrol_i79_V6countm-1)])=array_alias<L3std_Q8standard_T10bit_vector >(new array_info((&L3std_Q8standard_I10bit_vector_INFO)->element_type,(&L3std_Q8standard_I10bit_vector_INFO)->index_type,L4ieee_W11numeric_bit_Y4xrol_i79_C5arg_l,downto,((L4ieee_W11numeric_bit_Y4xrol_i79_C5arg_l-L4ieee_W11numeric_bit_Y4xrol_i79_V6countm)+1),0),&L4ieee_W11numeric_bit_Y4xrol_i79_H4xarg[L4ieee_W11numeric_bit_Y4xrol_i79_C5arg_l]);
745 }
746 return array_alias<L3std_Q8standard_T10bit_vector >((&L3std_Q8standard_I10bit_vector_INFO),L4ieee_W11numeric_bit_Y4xrol_i79_V6result);
747 }
748 /* Implementation of subprogram :ieee:numeric_bit:xror */
L4ieee_W11numeric_bit_Y4xror_i86(const L3std_Q8standard_T10bit_vector & L4ieee_W11numeric_bit_Y4xror_i86_C3arg,const integer L4ieee_W11numeric_bit_Y4xror_i86_C5count)749 L3std_Q8standard_T10bit_vector L4ieee_W11numeric_bit_Y4xror_i86(const L3std_Q8standard_T10bit_vector &L4ieee_W11numeric_bit_Y4xror_i86_C3arg,const integer L4ieee_W11numeric_bit_Y4xror_i86_C5count)
750 {
751 integer L4ieee_W11numeric_bit_Y4xror_i86_C5arg_l;
752 array_alias<L3std_Q8standard_T10bit_vector > L4ieee_W11numeric_bit_Y4xror_i86_H4xarg;
753 L3std_Q8standard_T10bit_vector L4ieee_W11numeric_bit_Y4xror_i86_V6result;
754 integer L4ieee_W11numeric_bit_Y4xror_i86_V6countm;
755 L4ieee_W11numeric_bit_Y4xror_i86_C5arg_l=(L4ieee_W11numeric_bit_Y4xror_i86_C3arg.info->length-1);
756 L4ieee_W11numeric_bit_Y4xror_i86_H4xarg.set((new array_info((&L3std_Q8standard_I10bit_vector_INFO)->element_type,(&L3std_Q8standard_I10bit_vector_INFO)->index_type,L4ieee_W11numeric_bit_Y4xror_i86_C5arg_l,downto,0,0)), L4ieee_W11numeric_bit_Y4xror_i86_C3arg.data);
757 L4ieee_W11numeric_bit_Y4xror_i86_V6result.init((new array_info((&L3std_Q8standard_I10bit_vector_INFO)->element_type,(&L3std_Q8standard_I10bit_vector_INFO)->index_type,L4ieee_W11numeric_bit_Y4xror_i86_C5arg_l,downto,0,0)),enumeration(0));
758 L4ieee_W11numeric_bit_Y4xror_i86_V6result=L4ieee_W11numeric_bit_Y4xror_i86_H4xarg;
759 L4ieee_W11numeric_bit_Y4xror_i86_V6countm=-2147483648LL;
760 L4ieee_W11numeric_bit_Y4xror_i86_V6countm=op_mod(L4ieee_W11numeric_bit_Y4xror_i86_C5count,(L4ieee_W11numeric_bit_Y4xror_i86_C5arg_l+1));
761 if((L4ieee_W11numeric_bit_Y4xror_i86_V6countm!=0)) {
762 array_alias<L3std_Q8standard_T10bit_vector >(new array_info((&L3std_Q8standard_I10bit_vector_INFO)->element_type,(&L3std_Q8standard_I10bit_vector_INFO)->index_type,(L4ieee_W11numeric_bit_Y4xror_i86_C5arg_l-L4ieee_W11numeric_bit_Y4xror_i86_V6countm),downto,0,0),&L4ieee_W11numeric_bit_Y4xror_i86_V6result[(L4ieee_W11numeric_bit_Y4xror_i86_C5arg_l-L4ieee_W11numeric_bit_Y4xror_i86_V6countm)])=array_alias<L3std_Q8standard_T10bit_vector >(new array_info((&L3std_Q8standard_I10bit_vector_INFO)->element_type,(&L3std_Q8standard_I10bit_vector_INFO)->index_type,L4ieee_W11numeric_bit_Y4xror_i86_C5arg_l,downto,L4ieee_W11numeric_bit_Y4xror_i86_V6countm,0),&L4ieee_W11numeric_bit_Y4xror_i86_H4xarg[L4ieee_W11numeric_bit_Y4xror_i86_C5arg_l]);
763 array_alias<L3std_Q8standard_T10bit_vector >(new array_info((&L3std_Q8standard_I10bit_vector_INFO)->element_type,(&L3std_Q8standard_I10bit_vector_INFO)->index_type,L4ieee_W11numeric_bit_Y4xror_i86_C5arg_l,downto,((L4ieee_W11numeric_bit_Y4xror_i86_C5arg_l-L4ieee_W11numeric_bit_Y4xror_i86_V6countm)+1),0),&L4ieee_W11numeric_bit_Y4xror_i86_V6result[L4ieee_W11numeric_bit_Y4xror_i86_C5arg_l])=array_alias<L3std_Q8standard_T10bit_vector >(new array_info((&L3std_Q8standard_I10bit_vector_INFO)->element_type,(&L3std_Q8standard_I10bit_vector_INFO)->index_type,(L4ieee_W11numeric_bit_Y4xror_i86_V6countm-1),downto,0,0),&L4ieee_W11numeric_bit_Y4xror_i86_H4xarg[(L4ieee_W11numeric_bit_Y4xror_i86_V6countm-1)]);
764 }
765 return array_alias<L3std_Q8standard_T10bit_vector >((&L3std_Q8standard_I10bit_vector_INFO),L4ieee_W11numeric_bit_Y4xror_i86_V6result);
766 }
767 /* Implementation of subprogram :ieee:numeric_bit:unsigned_equal */
L4ieee_W11numeric_bit_Y14unsigned_equal_i93(const L4ieee_Q11numeric_bit_T8unsigned & L4ieee_W11numeric_bit_Y14unsigned_equal_i93_C1l,const L4ieee_Q11numeric_bit_T8unsigned & L4ieee_W11numeric_bit_Y14unsigned_equal_i93_C1r)768 enumeration L4ieee_W11numeric_bit_Y14unsigned_equal_i93(const L4ieee_Q11numeric_bit_T8unsigned &L4ieee_W11numeric_bit_Y14unsigned_equal_i93_C1l,const L4ieee_Q11numeric_bit_T8unsigned &L4ieee_W11numeric_bit_Y14unsigned_equal_i93_C1r)
769 {
770 return (array_alias<L3std_Q8standard_T10bit_vector >((&L3std_Q8standard_I10bit_vector_INFO),L4ieee_W11numeric_bit_Y14unsigned_equal_i93_C1l)==array_alias<L3std_Q8standard_T10bit_vector >((&L3std_Q8standard_I10bit_vector_INFO),L4ieee_W11numeric_bit_Y14unsigned_equal_i93_C1r));
771 }
772 /* Implementation of subprogram :ieee:numeric_bit:signed_equal */
L4ieee_W11numeric_bit_Y12signed_equal_i96(const L4ieee_Q11numeric_bit_T6signed & L4ieee_W11numeric_bit_Y12signed_equal_i96_C1l,const L4ieee_Q11numeric_bit_T6signed & L4ieee_W11numeric_bit_Y12signed_equal_i96_C1r)773 enumeration L4ieee_W11numeric_bit_Y12signed_equal_i96(const L4ieee_Q11numeric_bit_T6signed &L4ieee_W11numeric_bit_Y12signed_equal_i96_C1l,const L4ieee_Q11numeric_bit_T6signed &L4ieee_W11numeric_bit_Y12signed_equal_i96_C1r)
774 {
775 return (array_alias<L3std_Q8standard_T10bit_vector >((&L3std_Q8standard_I10bit_vector_INFO),L4ieee_W11numeric_bit_Y12signed_equal_i96_C1l)==array_alias<L3std_Q8standard_T10bit_vector >((&L3std_Q8standard_I10bit_vector_INFO),L4ieee_W11numeric_bit_Y12signed_equal_i96_C1r));
776 }
777 /* Implementation of subprogram :ieee:numeric_bit:unsigned_less */
L4ieee_W11numeric_bit_Y13unsigned_less_i99(const L4ieee_Q11numeric_bit_T8unsigned & L4ieee_W11numeric_bit_Y13unsigned_less_i99_C1l,const L4ieee_Q11numeric_bit_T8unsigned & L4ieee_W11numeric_bit_Y13unsigned_less_i99_C1r)778 enumeration L4ieee_W11numeric_bit_Y13unsigned_less_i99(const L4ieee_Q11numeric_bit_T8unsigned &L4ieee_W11numeric_bit_Y13unsigned_less_i99_C1l,const L4ieee_Q11numeric_bit_T8unsigned &L4ieee_W11numeric_bit_Y13unsigned_less_i99_C1r)
779 {
780 return op_array_lt(array_alias<L3std_Q8standard_T10bit_vector >((&L3std_Q8standard_I10bit_vector_INFO),L4ieee_W11numeric_bit_Y13unsigned_less_i99_C1l),array_alias<L3std_Q8standard_T10bit_vector >((&L3std_Q8standard_I10bit_vector_INFO),L4ieee_W11numeric_bit_Y13unsigned_less_i99_C1r));
781 }
782 /* Implementation of subprogram :ieee:numeric_bit:signed_less */
L4ieee_W11numeric_bit_Y11signed_less_i102(const L4ieee_Q11numeric_bit_T6signed & L4ieee_W11numeric_bit_Y11signed_less_i102_C1l,const L4ieee_Q11numeric_bit_T6signed & L4ieee_W11numeric_bit_Y11signed_less_i102_C1r)783 enumeration L4ieee_W11numeric_bit_Y11signed_less_i102(const L4ieee_Q11numeric_bit_T6signed &L4ieee_W11numeric_bit_Y11signed_less_i102_C1l,const L4ieee_Q11numeric_bit_T6signed &L4ieee_W11numeric_bit_Y11signed_less_i102_C1r)
784 {
785 L4ieee_Q11numeric_bit_T6signed L4ieee_W11numeric_bit_Y11signed_less_i102_V8intern_l,L4ieee_W11numeric_bit_Y11signed_less_i102_V8intern_r;
786 L4ieee_W11numeric_bit_Y11signed_less_i102_V8intern_l.init((new array_info((&L4ieee_Q11numeric_bit_I6signed_INFO)->element_type,(&L4ieee_Q11numeric_bit_I6signed_INFO)->index_type,0,to,(L4ieee_W11numeric_bit_Y11signed_less_i102_C1l.info->length-1),0)),enumeration(0));
787 L4ieee_W11numeric_bit_Y11signed_less_i102_V8intern_r.init((new array_info((&L4ieee_Q11numeric_bit_I6signed_INFO)->element_type,(&L4ieee_Q11numeric_bit_I6signed_INFO)->index_type,0,to,(L4ieee_W11numeric_bit_Y11signed_less_i102_C1r.info->length-1),0)),enumeration(0));
788 L4ieee_W11numeric_bit_Y11signed_less_i102_V8intern_l=L4ieee_W11numeric_bit_Y11signed_less_i102_C1l;
789 L4ieee_W11numeric_bit_Y11signed_less_i102_V8intern_r=L4ieee_W11numeric_bit_Y11signed_less_i102_C1r;
790 L4ieee_W11numeric_bit_Y11signed_less_i102_V8intern_l[0]=op_not(L4ieee_W11numeric_bit_Y11signed_less_i102_V8intern_l[0]);
791 L4ieee_W11numeric_bit_Y11signed_less_i102_V8intern_r[0]=op_not(L4ieee_W11numeric_bit_Y11signed_less_i102_V8intern_r[0]);
792 return op_array_lt(array_alias<L3std_Q8standard_T10bit_vector >((&L3std_Q8standard_I10bit_vector_INFO),L4ieee_W11numeric_bit_Y11signed_less_i102_V8intern_l),array_alias<L3std_Q8standard_T10bit_vector >((&L3std_Q8standard_I10bit_vector_INFO),L4ieee_W11numeric_bit_Y11signed_less_i102_V8intern_r));
793 }
794 /* Implementation of subprogram :ieee:numeric_bit:unsigned_less_or_equal */
L4ieee_W11numeric_bit_Y22unsigned_less_or_equal_i107(const L4ieee_Q11numeric_bit_T8unsigned & L4ieee_W11numeric_bit_Y22unsigned_less_or_equal_i107_C1l,const L4ieee_Q11numeric_bit_T8unsigned & L4ieee_W11numeric_bit_Y22unsigned_less_or_equal_i107_C1r)795 enumeration L4ieee_W11numeric_bit_Y22unsigned_less_or_equal_i107(const L4ieee_Q11numeric_bit_T8unsigned &L4ieee_W11numeric_bit_Y22unsigned_less_or_equal_i107_C1l,const L4ieee_Q11numeric_bit_T8unsigned &L4ieee_W11numeric_bit_Y22unsigned_less_or_equal_i107_C1r)
796 {
797 return op_array_le(array_alias<L3std_Q8standard_T10bit_vector >((&L3std_Q8standard_I10bit_vector_INFO),L4ieee_W11numeric_bit_Y22unsigned_less_or_equal_i107_C1l),array_alias<L3std_Q8standard_T10bit_vector >((&L3std_Q8standard_I10bit_vector_INFO),L4ieee_W11numeric_bit_Y22unsigned_less_or_equal_i107_C1r));
798 }
799 /* Implementation of subprogram :ieee:numeric_bit:signed_less_or_equal */
L4ieee_W11numeric_bit_Y20signed_less_or_equal_i110(const L4ieee_Q11numeric_bit_T6signed & L4ieee_W11numeric_bit_Y20signed_less_or_equal_i110_C1l,const L4ieee_Q11numeric_bit_T6signed & L4ieee_W11numeric_bit_Y20signed_less_or_equal_i110_C1r)800 enumeration L4ieee_W11numeric_bit_Y20signed_less_or_equal_i110(const L4ieee_Q11numeric_bit_T6signed &L4ieee_W11numeric_bit_Y20signed_less_or_equal_i110_C1l,const L4ieee_Q11numeric_bit_T6signed &L4ieee_W11numeric_bit_Y20signed_less_or_equal_i110_C1r)
801 {
802 L4ieee_Q11numeric_bit_T6signed L4ieee_W11numeric_bit_Y20signed_less_or_equal_i110_V8intern_l,L4ieee_W11numeric_bit_Y20signed_less_or_equal_i110_V8intern_r;
803 L4ieee_W11numeric_bit_Y20signed_less_or_equal_i110_V8intern_l.init((new array_info((&L4ieee_Q11numeric_bit_I6signed_INFO)->element_type,(&L4ieee_Q11numeric_bit_I6signed_INFO)->index_type,0,to,(L4ieee_W11numeric_bit_Y20signed_less_or_equal_i110_C1l.info->length-1),0)),enumeration(0));
804 L4ieee_W11numeric_bit_Y20signed_less_or_equal_i110_V8intern_r.init((new array_info((&L4ieee_Q11numeric_bit_I6signed_INFO)->element_type,(&L4ieee_Q11numeric_bit_I6signed_INFO)->index_type,0,to,(L4ieee_W11numeric_bit_Y20signed_less_or_equal_i110_C1r.info->length-1),0)),enumeration(0));
805 L4ieee_W11numeric_bit_Y20signed_less_or_equal_i110_V8intern_l=L4ieee_W11numeric_bit_Y20signed_less_or_equal_i110_C1l;
806 L4ieee_W11numeric_bit_Y20signed_less_or_equal_i110_V8intern_r=L4ieee_W11numeric_bit_Y20signed_less_or_equal_i110_C1r;
807 L4ieee_W11numeric_bit_Y20signed_less_or_equal_i110_V8intern_l[0]=op_not(L4ieee_W11numeric_bit_Y20signed_less_or_equal_i110_V8intern_l[0]);
808 L4ieee_W11numeric_bit_Y20signed_less_or_equal_i110_V8intern_r[0]=op_not(L4ieee_W11numeric_bit_Y20signed_less_or_equal_i110_V8intern_r[0]);
809 return op_array_le(array_alias<L3std_Q8standard_T10bit_vector >((&L3std_Q8standard_I10bit_vector_INFO),L4ieee_W11numeric_bit_Y20signed_less_or_equal_i110_V8intern_l),array_alias<L3std_Q8standard_T10bit_vector >((&L3std_Q8standard_I10bit_vector_INFO),L4ieee_W11numeric_bit_Y20signed_less_or_equal_i110_V8intern_r));
810 }
811 /* Implementation of subprogram :ieee:numeric_bit:"abs" */
L4ieee_Q11numeric_bit_Y6op_abs_i54(const L4ieee_Q11numeric_bit_T6signed & L4ieee_Q11numeric_bit_Y6op_abs_i54_C3arg)812 L4ieee_Q11numeric_bit_T6signed L4ieee_Q11numeric_bit_Y6op_abs_i54(const L4ieee_Q11numeric_bit_T6signed &L4ieee_Q11numeric_bit_Y6op_abs_i54_C3arg)
813 {
814 integer L4ieee_Q11numeric_bit_Y6op_abs_i54_C8arg_left;
815 L4ieee_Q11numeric_bit_T6signed L4ieee_Q11numeric_bit_Y6op_abs_i54_V6result;
816 L4ieee_Q11numeric_bit_Y6op_abs_i54_C8arg_left=(L4ieee_Q11numeric_bit_Y6op_abs_i54_C3arg.info->length-1);
817 L4ieee_Q11numeric_bit_Y6op_abs_i54_V6result.init((new array_info((&L4ieee_Q11numeric_bit_I6signed_INFO)->element_type,(&L4ieee_Q11numeric_bit_I6signed_INFO)->index_type,L4ieee_Q11numeric_bit_Y6op_abs_i54_C8arg_left,downto,0,0)),enumeration(0));
818 if((L4ieee_Q11numeric_bit_Y6op_abs_i54_C3arg.info->length<1)) {
819 return array_alias<L4ieee_Q11numeric_bit_T6signed >((&L4ieee_Q11numeric_bit_I6signed_INFO),L4ieee_W11numeric_bit_C3nas);
820 }
821 L4ieee_Q11numeric_bit_Y6op_abs_i54_V6result=L4ieee_Q11numeric_bit_Y6op_abs_i54_C3arg;
822 if((L4ieee_Q11numeric_bit_Y6op_abs_i54_V6result[L4ieee_Q11numeric_bit_Y6op_abs_i54_V6result.info->left_bound]==enumeration(1))) {
823 L4ieee_Q11numeric_bit_Y6op_abs_i54_V6result=L4ieee_Q11numeric_bit_Y8op_minus_i56 (L4ieee_Q11numeric_bit_Y6op_abs_i54_V6result);
824 }
825 return array_alias<L4ieee_Q11numeric_bit_T6signed >((&L4ieee_Q11numeric_bit_I6signed_INFO),L4ieee_Q11numeric_bit_Y6op_abs_i54_V6result);
826 }
827 /* Implementation of subprogram :ieee:numeric_bit:"-" */
L4ieee_Q11numeric_bit_Y8op_minus_i56(const L4ieee_Q11numeric_bit_T6signed & L4ieee_Q11numeric_bit_Y8op_minus_i56_C3arg)828 L4ieee_Q11numeric_bit_T6signed L4ieee_Q11numeric_bit_Y8op_minus_i56(const L4ieee_Q11numeric_bit_T6signed &L4ieee_Q11numeric_bit_Y8op_minus_i56_C3arg)
829 {
830 integer L4ieee_Q11numeric_bit_Y8op_minus_i56_C8arg_left;
831 array_alias<L4ieee_Q11numeric_bit_T6signed > L4ieee_Q11numeric_bit_Y8op_minus_i56_H4xarg;
832 L4ieee_Q11numeric_bit_T6signed L4ieee_Q11numeric_bit_Y8op_minus_i56_V6result;
833 enumeration L4ieee_Q11numeric_bit_Y8op_minus_i56_V4cbit;
834 integer L4ieee_Q11numeric_bit_Y8op_minus_i56_L5123ln_C1i,L4ieee_Q11numeric_bit_Y8op_minus_i56_L5123ln_C1i_lc;
835 L4ieee_Q11numeric_bit_Y8op_minus_i56_C8arg_left=(L4ieee_Q11numeric_bit_Y8op_minus_i56_C3arg.info->length-1);
836 L4ieee_Q11numeric_bit_Y8op_minus_i56_H4xarg.set((new array_info((&L4ieee_Q11numeric_bit_I6signed_INFO)->element_type,(&L4ieee_Q11numeric_bit_I6signed_INFO)->index_type,L4ieee_Q11numeric_bit_Y8op_minus_i56_C8arg_left,downto,0,0)), L4ieee_Q11numeric_bit_Y8op_minus_i56_C3arg.data);
837 L4ieee_Q11numeric_bit_Y8op_minus_i56_V6result.init((new array_info((&L4ieee_Q11numeric_bit_I6signed_INFO)->element_type,(&L4ieee_Q11numeric_bit_I6signed_INFO)->index_type,L4ieee_Q11numeric_bit_Y8op_minus_i56_C8arg_left,downto,0,0)),enumeration(0));
838 L4ieee_Q11numeric_bit_Y8op_minus_i56_V4cbit=enumeration(1);
839 if((L4ieee_Q11numeric_bit_Y8op_minus_i56_C3arg.info->length<1)) {
840 return array_alias<L4ieee_Q11numeric_bit_T6signed >((&L4ieee_Q11numeric_bit_I6signed_INFO),L4ieee_W11numeric_bit_C3nas);
841 }
842 for (L4ieee_Q11numeric_bit_Y8op_minus_i56_L5123ln_C1i=0,L4ieee_Q11numeric_bit_Y8op_minus_i56_L5123ln_C1i_lc=up_range_to_length<integer>(0,L4ieee_Q11numeric_bit_Y8op_minus_i56_V6result.info->left_bound); L4ieee_Q11numeric_bit_Y8op_minus_i56_L5123ln_C1i_lc!=0; L4ieee_Q11numeric_bit_Y8op_minus_i56_L5123ln_C1i++,L4ieee_Q11numeric_bit_Y8op_minus_i56_L5123ln_C1i_lc--) {
843 L4ieee_Q11numeric_bit_Y8op_minus_i56_V6result[L4ieee_Q11numeric_bit_Y8op_minus_i56_L5123ln_C1i]=op_xor(op_not(L4ieee_Q11numeric_bit_Y8op_minus_i56_H4xarg[L4ieee_Q11numeric_bit_Y8op_minus_i56_L5123ln_C1i]),L4ieee_Q11numeric_bit_Y8op_minus_i56_V4cbit);
844 L4ieee_Q11numeric_bit_Y8op_minus_i56_V4cbit=(L4ieee_Q11numeric_bit_Y8op_minus_i56_V4cbit&&op_not(L4ieee_Q11numeric_bit_Y8op_minus_i56_H4xarg[L4ieee_Q11numeric_bit_Y8op_minus_i56_L5123ln_C1i]));
845 }
846 return array_alias<L4ieee_Q11numeric_bit_T6signed >((&L4ieee_Q11numeric_bit_I6signed_INFO),L4ieee_Q11numeric_bit_Y8op_minus_i56_V6result);
847 }
848 /* Implementation of subprogram :ieee:numeric_bit:"+" */
L4ieee_Q11numeric_bit_Y7op_plus_i59(const L4ieee_Q11numeric_bit_T8unsigned & L4ieee_Q11numeric_bit_Y7op_plus_i59_C1l,const L4ieee_Q11numeric_bit_T8unsigned & L4ieee_Q11numeric_bit_Y7op_plus_i59_C1r)849 L4ieee_Q11numeric_bit_T8unsigned L4ieee_Q11numeric_bit_Y7op_plus_i59(const L4ieee_Q11numeric_bit_T8unsigned &L4ieee_Q11numeric_bit_Y7op_plus_i59_C1l,const L4ieee_Q11numeric_bit_T8unsigned &L4ieee_Q11numeric_bit_Y7op_plus_i59_C1r)
850 {
851 integer L4ieee_Q11numeric_bit_Y7op_plus_i59_C6l_left,L4ieee_Q11numeric_bit_Y7op_plus_i59_C6r_left,L4ieee_Q11numeric_bit_Y7op_plus_i59_C4size;
852 L4ieee_Q11numeric_bit_Y7op_plus_i59_C6l_left=(L4ieee_Q11numeric_bit_Y7op_plus_i59_C1l.info->length-1);
853 L4ieee_Q11numeric_bit_Y7op_plus_i59_C6r_left=(L4ieee_Q11numeric_bit_Y7op_plus_i59_C1r.info->length-1);
854 L4ieee_Q11numeric_bit_Y7op_plus_i59_C4size=L4ieee_W11numeric_bit_Y3max_i9 (L4ieee_Q11numeric_bit_Y7op_plus_i59_C1l.info->length,L4ieee_Q11numeric_bit_Y7op_plus_i59_C1r.info->length);
855 if(((L4ieee_Q11numeric_bit_Y7op_plus_i59_C1l.info->length<1)||(L4ieee_Q11numeric_bit_Y7op_plus_i59_C1r.info->length<1))) {
856 return array_alias<L4ieee_Q11numeric_bit_T8unsigned >((&L4ieee_Q11numeric_bit_I8unsigned_INFO),L4ieee_W11numeric_bit_C3nau);
857 }
858 return array_alias<L4ieee_Q11numeric_bit_T8unsigned >((&L4ieee_Q11numeric_bit_I8unsigned_INFO),L4ieee_W11numeric_bit_Y12add_unsigned_i26 (L4ieee_Q11numeric_bit_Y6resize_i326 (L4ieee_Q11numeric_bit_Y7op_plus_i59_C1l,L4ieee_Q11numeric_bit_Y7op_plus_i59_C4size),L4ieee_Q11numeric_bit_Y6resize_i326 (L4ieee_Q11numeric_bit_Y7op_plus_i59_C1r,L4ieee_Q11numeric_bit_Y7op_plus_i59_C4size),enumeration(0)));
859 }
860 /* Implementation of subprogram :ieee:numeric_bit:"+" */
L4ieee_Q11numeric_bit_Y7op_plus_i62(const L4ieee_Q11numeric_bit_T6signed & L4ieee_Q11numeric_bit_Y7op_plus_i62_C1l,const L4ieee_Q11numeric_bit_T6signed & L4ieee_Q11numeric_bit_Y7op_plus_i62_C1r)861 L4ieee_Q11numeric_bit_T6signed L4ieee_Q11numeric_bit_Y7op_plus_i62(const L4ieee_Q11numeric_bit_T6signed &L4ieee_Q11numeric_bit_Y7op_plus_i62_C1l,const L4ieee_Q11numeric_bit_T6signed &L4ieee_Q11numeric_bit_Y7op_plus_i62_C1r)
862 {
863 integer L4ieee_Q11numeric_bit_Y7op_plus_i62_C6l_left,L4ieee_Q11numeric_bit_Y7op_plus_i62_C6r_left,L4ieee_Q11numeric_bit_Y7op_plus_i62_C4size;
864 L4ieee_Q11numeric_bit_Y7op_plus_i62_C6l_left=(L4ieee_Q11numeric_bit_Y7op_plus_i62_C1l.info->length-1);
865 L4ieee_Q11numeric_bit_Y7op_plus_i62_C6r_left=(L4ieee_Q11numeric_bit_Y7op_plus_i62_C1r.info->length-1);
866 L4ieee_Q11numeric_bit_Y7op_plus_i62_C4size=L4ieee_W11numeric_bit_Y3max_i9 (L4ieee_Q11numeric_bit_Y7op_plus_i62_C1l.info->length,L4ieee_Q11numeric_bit_Y7op_plus_i62_C1r.info->length);
867 if(((L4ieee_Q11numeric_bit_Y7op_plus_i62_C1l.info->length<1)||(L4ieee_Q11numeric_bit_Y7op_plus_i62_C1r.info->length<1))) {
868 return array_alias<L4ieee_Q11numeric_bit_T6signed >((&L4ieee_Q11numeric_bit_I6signed_INFO),L4ieee_W11numeric_bit_C3nas);
869 }
870 return array_alias<L4ieee_Q11numeric_bit_T6signed >((&L4ieee_Q11numeric_bit_I6signed_INFO),L4ieee_W11numeric_bit_Y10add_signed_i37 (L4ieee_Q11numeric_bit_Y6resize_i323 (L4ieee_Q11numeric_bit_Y7op_plus_i62_C1l,L4ieee_Q11numeric_bit_Y7op_plus_i62_C4size),L4ieee_Q11numeric_bit_Y6resize_i323 (L4ieee_Q11numeric_bit_Y7op_plus_i62_C1r,L4ieee_Q11numeric_bit_Y7op_plus_i62_C4size),enumeration(0)));
871 }
872 /* Implementation of subprogram :ieee:numeric_bit:"+" */
L4ieee_Q11numeric_bit_Y7op_plus_i65(const L4ieee_Q11numeric_bit_T8unsigned & L4ieee_Q11numeric_bit_Y7op_plus_i65_C1l,const integer L4ieee_Q11numeric_bit_Y7op_plus_i65_C1r)873 L4ieee_Q11numeric_bit_T8unsigned L4ieee_Q11numeric_bit_Y7op_plus_i65(const L4ieee_Q11numeric_bit_T8unsigned &L4ieee_Q11numeric_bit_Y7op_plus_i65_C1l,const integer L4ieee_Q11numeric_bit_Y7op_plus_i65_C1r)
874 {
875 return array_alias<L4ieee_Q11numeric_bit_T8unsigned >((&L4ieee_Q11numeric_bit_I8unsigned_INFO),L4ieee_Q11numeric_bit_Y7op_plus_i59 (L4ieee_Q11numeric_bit_Y7op_plus_i65_C1l,L4ieee_Q11numeric_bit_Y11to_unsigned_i333 (L4ieee_Q11numeric_bit_Y7op_plus_i65_C1r,L4ieee_Q11numeric_bit_Y7op_plus_i65_C1l.info->length)));
876 }
877 /* Implementation of subprogram :ieee:numeric_bit:"+" */
L4ieee_Q11numeric_bit_Y7op_plus_i68(const integer L4ieee_Q11numeric_bit_Y7op_plus_i68_C1l,const L4ieee_Q11numeric_bit_T8unsigned & L4ieee_Q11numeric_bit_Y7op_plus_i68_C1r)878 L4ieee_Q11numeric_bit_T8unsigned L4ieee_Q11numeric_bit_Y7op_plus_i68(const integer L4ieee_Q11numeric_bit_Y7op_plus_i68_C1l,const L4ieee_Q11numeric_bit_T8unsigned &L4ieee_Q11numeric_bit_Y7op_plus_i68_C1r)
879 {
880 return array_alias<L4ieee_Q11numeric_bit_T8unsigned >((&L4ieee_Q11numeric_bit_I8unsigned_INFO),L4ieee_Q11numeric_bit_Y7op_plus_i59 (L4ieee_Q11numeric_bit_Y11to_unsigned_i333 (L4ieee_Q11numeric_bit_Y7op_plus_i68_C1l,L4ieee_Q11numeric_bit_Y7op_plus_i68_C1r.info->length),L4ieee_Q11numeric_bit_Y7op_plus_i68_C1r));
881 }
882 /* Implementation of subprogram :ieee:numeric_bit:"+" */
L4ieee_Q11numeric_bit_Y7op_plus_i74(const L4ieee_Q11numeric_bit_T6signed & L4ieee_Q11numeric_bit_Y7op_plus_i74_C1l,const integer L4ieee_Q11numeric_bit_Y7op_plus_i74_C1r)883 L4ieee_Q11numeric_bit_T6signed L4ieee_Q11numeric_bit_Y7op_plus_i74(const L4ieee_Q11numeric_bit_T6signed &L4ieee_Q11numeric_bit_Y7op_plus_i74_C1l,const integer L4ieee_Q11numeric_bit_Y7op_plus_i74_C1r)
884 {
885 return array_alias<L4ieee_Q11numeric_bit_T6signed >((&L4ieee_Q11numeric_bit_I6signed_INFO),L4ieee_Q11numeric_bit_Y7op_plus_i62 (L4ieee_Q11numeric_bit_Y7op_plus_i74_C1l,L4ieee_Q11numeric_bit_Y9to_signed_i336 (L4ieee_Q11numeric_bit_Y7op_plus_i74_C1r,L4ieee_Q11numeric_bit_Y7op_plus_i74_C1l.info->length)));
886 }
887 /* Implementation of subprogram :ieee:numeric_bit:"+" */
L4ieee_Q11numeric_bit_Y7op_plus_i71(const integer L4ieee_Q11numeric_bit_Y7op_plus_i71_C1l,const L4ieee_Q11numeric_bit_T6signed & L4ieee_Q11numeric_bit_Y7op_plus_i71_C1r)888 L4ieee_Q11numeric_bit_T6signed L4ieee_Q11numeric_bit_Y7op_plus_i71(const integer L4ieee_Q11numeric_bit_Y7op_plus_i71_C1l,const L4ieee_Q11numeric_bit_T6signed &L4ieee_Q11numeric_bit_Y7op_plus_i71_C1r)
889 {
890 return array_alias<L4ieee_Q11numeric_bit_T6signed >((&L4ieee_Q11numeric_bit_I6signed_INFO),L4ieee_Q11numeric_bit_Y7op_plus_i62 (L4ieee_Q11numeric_bit_Y9to_signed_i336 (L4ieee_Q11numeric_bit_Y7op_plus_i71_C1l,L4ieee_Q11numeric_bit_Y7op_plus_i71_C1r.info->length),L4ieee_Q11numeric_bit_Y7op_plus_i71_C1r));
891 }
892 /* Implementation of subprogram :ieee:numeric_bit:"-" */
L4ieee_Q11numeric_bit_Y8op_minus_i77(const L4ieee_Q11numeric_bit_T8unsigned & L4ieee_Q11numeric_bit_Y8op_minus_i77_C1l,const L4ieee_Q11numeric_bit_T8unsigned & L4ieee_Q11numeric_bit_Y8op_minus_i77_C1r)893 L4ieee_Q11numeric_bit_T8unsigned L4ieee_Q11numeric_bit_Y8op_minus_i77(const L4ieee_Q11numeric_bit_T8unsigned &L4ieee_Q11numeric_bit_Y8op_minus_i77_C1l,const L4ieee_Q11numeric_bit_T8unsigned &L4ieee_Q11numeric_bit_Y8op_minus_i77_C1r)
894 {
895 integer L4ieee_Q11numeric_bit_Y8op_minus_i77_C6l_left,L4ieee_Q11numeric_bit_Y8op_minus_i77_C6r_left,L4ieee_Q11numeric_bit_Y8op_minus_i77_C4size;
896 L4ieee_Q11numeric_bit_Y8op_minus_i77_C6l_left=(L4ieee_Q11numeric_bit_Y8op_minus_i77_C1l.info->length-1);
897 L4ieee_Q11numeric_bit_Y8op_minus_i77_C6r_left=(L4ieee_Q11numeric_bit_Y8op_minus_i77_C1r.info->length-1);
898 L4ieee_Q11numeric_bit_Y8op_minus_i77_C4size=L4ieee_W11numeric_bit_Y3max_i9 (L4ieee_Q11numeric_bit_Y8op_minus_i77_C1l.info->length,L4ieee_Q11numeric_bit_Y8op_minus_i77_C1r.info->length);
899 if(((L4ieee_Q11numeric_bit_Y8op_minus_i77_C1l.info->length<1)||(L4ieee_Q11numeric_bit_Y8op_minus_i77_C1r.info->length<1))) {
900 return array_alias<L4ieee_Q11numeric_bit_T8unsigned >((&L4ieee_Q11numeric_bit_I8unsigned_INFO),L4ieee_W11numeric_bit_C3nau);
901 }
902 return array_alias<L4ieee_Q11numeric_bit_T8unsigned >((&L4ieee_Q11numeric_bit_I8unsigned_INFO),L4ieee_W11numeric_bit_Y12add_unsigned_i26 (L4ieee_Q11numeric_bit_Y6resize_i326 (L4ieee_Q11numeric_bit_Y8op_minus_i77_C1l,L4ieee_Q11numeric_bit_Y8op_minus_i77_C4size),L4ieee_Q11numeric_bit_Y6op_not_i338 (L4ieee_Q11numeric_bit_Y6resize_i326 (L4ieee_Q11numeric_bit_Y8op_minus_i77_C1r,L4ieee_Q11numeric_bit_Y8op_minus_i77_C4size)),enumeration(1)));
903 }
904 /* Implementation of subprogram :ieee:numeric_bit:"-" */
L4ieee_Q11numeric_bit_Y8op_minus_i80(const L4ieee_Q11numeric_bit_T6signed & L4ieee_Q11numeric_bit_Y8op_minus_i80_C1l,const L4ieee_Q11numeric_bit_T6signed & L4ieee_Q11numeric_bit_Y8op_minus_i80_C1r)905 L4ieee_Q11numeric_bit_T6signed L4ieee_Q11numeric_bit_Y8op_minus_i80(const L4ieee_Q11numeric_bit_T6signed &L4ieee_Q11numeric_bit_Y8op_minus_i80_C1l,const L4ieee_Q11numeric_bit_T6signed &L4ieee_Q11numeric_bit_Y8op_minus_i80_C1r)
906 {
907 integer L4ieee_Q11numeric_bit_Y8op_minus_i80_C6l_left,L4ieee_Q11numeric_bit_Y8op_minus_i80_C6r_left,L4ieee_Q11numeric_bit_Y8op_minus_i80_C4size;
908 L4ieee_Q11numeric_bit_Y8op_minus_i80_C6l_left=(L4ieee_Q11numeric_bit_Y8op_minus_i80_C1l.info->length-1);
909 L4ieee_Q11numeric_bit_Y8op_minus_i80_C6r_left=(L4ieee_Q11numeric_bit_Y8op_minus_i80_C1r.info->length-1);
910 L4ieee_Q11numeric_bit_Y8op_minus_i80_C4size=L4ieee_W11numeric_bit_Y3max_i9 (L4ieee_Q11numeric_bit_Y8op_minus_i80_C1l.info->length,L4ieee_Q11numeric_bit_Y8op_minus_i80_C1r.info->length);
911 if(((L4ieee_Q11numeric_bit_Y8op_minus_i80_C1l.info->length<1)||(L4ieee_Q11numeric_bit_Y8op_minus_i80_C1r.info->length<1))) {
912 return array_alias<L4ieee_Q11numeric_bit_T6signed >((&L4ieee_Q11numeric_bit_I6signed_INFO),L4ieee_W11numeric_bit_C3nas);
913 }
914 return array_alias<L4ieee_Q11numeric_bit_T6signed >((&L4ieee_Q11numeric_bit_I6signed_INFO),L4ieee_W11numeric_bit_Y10add_signed_i37 (L4ieee_Q11numeric_bit_Y6resize_i323 (L4ieee_Q11numeric_bit_Y8op_minus_i80_C1l,L4ieee_Q11numeric_bit_Y8op_minus_i80_C4size),L4ieee_Q11numeric_bit_Y6op_not_i358 (L4ieee_Q11numeric_bit_Y6resize_i323 (L4ieee_Q11numeric_bit_Y8op_minus_i80_C1r,L4ieee_Q11numeric_bit_Y8op_minus_i80_C4size)),enumeration(1)));
915 }
916 /* Implementation of subprogram :ieee:numeric_bit:"-" */
L4ieee_Q11numeric_bit_Y8op_minus_i83(const L4ieee_Q11numeric_bit_T8unsigned & L4ieee_Q11numeric_bit_Y8op_minus_i83_C1l,const integer L4ieee_Q11numeric_bit_Y8op_minus_i83_C1r)917 L4ieee_Q11numeric_bit_T8unsigned L4ieee_Q11numeric_bit_Y8op_minus_i83(const L4ieee_Q11numeric_bit_T8unsigned &L4ieee_Q11numeric_bit_Y8op_minus_i83_C1l,const integer L4ieee_Q11numeric_bit_Y8op_minus_i83_C1r)
918 {
919 return array_alias<L4ieee_Q11numeric_bit_T8unsigned >((&L4ieee_Q11numeric_bit_I8unsigned_INFO),L4ieee_Q11numeric_bit_Y8op_minus_i77 (L4ieee_Q11numeric_bit_Y8op_minus_i83_C1l,L4ieee_Q11numeric_bit_Y11to_unsigned_i333 (L4ieee_Q11numeric_bit_Y8op_minus_i83_C1r,L4ieee_Q11numeric_bit_Y8op_minus_i83_C1l.info->length)));
920 }
921 /* Implementation of subprogram :ieee:numeric_bit:"-" */
L4ieee_Q11numeric_bit_Y8op_minus_i86(const integer L4ieee_Q11numeric_bit_Y8op_minus_i86_C1l,const L4ieee_Q11numeric_bit_T8unsigned & L4ieee_Q11numeric_bit_Y8op_minus_i86_C1r)922 L4ieee_Q11numeric_bit_T8unsigned L4ieee_Q11numeric_bit_Y8op_minus_i86(const integer L4ieee_Q11numeric_bit_Y8op_minus_i86_C1l,const L4ieee_Q11numeric_bit_T8unsigned &L4ieee_Q11numeric_bit_Y8op_minus_i86_C1r)
923 {
924 return array_alias<L4ieee_Q11numeric_bit_T8unsigned >((&L4ieee_Q11numeric_bit_I8unsigned_INFO),L4ieee_Q11numeric_bit_Y8op_minus_i77 (L4ieee_Q11numeric_bit_Y11to_unsigned_i333 (L4ieee_Q11numeric_bit_Y8op_minus_i86_C1l,L4ieee_Q11numeric_bit_Y8op_minus_i86_C1r.info->length),L4ieee_Q11numeric_bit_Y8op_minus_i86_C1r));
925 }
926 /* Implementation of subprogram :ieee:numeric_bit:"-" */
L4ieee_Q11numeric_bit_Y8op_minus_i89(const L4ieee_Q11numeric_bit_T6signed & L4ieee_Q11numeric_bit_Y8op_minus_i89_C1l,const integer L4ieee_Q11numeric_bit_Y8op_minus_i89_C1r)927 L4ieee_Q11numeric_bit_T6signed L4ieee_Q11numeric_bit_Y8op_minus_i89(const L4ieee_Q11numeric_bit_T6signed &L4ieee_Q11numeric_bit_Y8op_minus_i89_C1l,const integer L4ieee_Q11numeric_bit_Y8op_minus_i89_C1r)
928 {
929 return array_alias<L4ieee_Q11numeric_bit_T6signed >((&L4ieee_Q11numeric_bit_I6signed_INFO),L4ieee_Q11numeric_bit_Y8op_minus_i80 (L4ieee_Q11numeric_bit_Y8op_minus_i89_C1l,L4ieee_Q11numeric_bit_Y9to_signed_i336 (L4ieee_Q11numeric_bit_Y8op_minus_i89_C1r,L4ieee_Q11numeric_bit_Y8op_minus_i89_C1l.info->length)));
930 }
931 /* Implementation of subprogram :ieee:numeric_bit:"-" */
L4ieee_Q11numeric_bit_Y8op_minus_i92(const integer L4ieee_Q11numeric_bit_Y8op_minus_i92_C1l,const L4ieee_Q11numeric_bit_T6signed & L4ieee_Q11numeric_bit_Y8op_minus_i92_C1r)932 L4ieee_Q11numeric_bit_T6signed L4ieee_Q11numeric_bit_Y8op_minus_i92(const integer L4ieee_Q11numeric_bit_Y8op_minus_i92_C1l,const L4ieee_Q11numeric_bit_T6signed &L4ieee_Q11numeric_bit_Y8op_minus_i92_C1r)
933 {
934 return array_alias<L4ieee_Q11numeric_bit_T6signed >((&L4ieee_Q11numeric_bit_I6signed_INFO),L4ieee_Q11numeric_bit_Y8op_minus_i80 (L4ieee_Q11numeric_bit_Y9to_signed_i336 (L4ieee_Q11numeric_bit_Y8op_minus_i92_C1l,L4ieee_Q11numeric_bit_Y8op_minus_i92_C1r.info->length),L4ieee_Q11numeric_bit_Y8op_minus_i92_C1r));
935 }
936 /* Implementation of subprogram :ieee:numeric_bit:"*" */
L4ieee_Q11numeric_bit_Y7op_mult_i95(const L4ieee_Q11numeric_bit_T8unsigned & L4ieee_Q11numeric_bit_Y7op_mult_i95_C1l,const L4ieee_Q11numeric_bit_T8unsigned & L4ieee_Q11numeric_bit_Y7op_mult_i95_C1r)937 L4ieee_Q11numeric_bit_T8unsigned L4ieee_Q11numeric_bit_Y7op_mult_i95(const L4ieee_Q11numeric_bit_T8unsigned &L4ieee_Q11numeric_bit_Y7op_mult_i95_C1l,const L4ieee_Q11numeric_bit_T8unsigned &L4ieee_Q11numeric_bit_Y7op_mult_i95_C1r)
938 {
939 integer L4ieee_Q11numeric_bit_Y7op_mult_i95_C6l_left,L4ieee_Q11numeric_bit_Y7op_mult_i95_C6r_left;
940 array_alias<L4ieee_Q11numeric_bit_T8unsigned > L4ieee_Q11numeric_bit_Y7op_mult_i95_H2xl,L4ieee_Q11numeric_bit_Y7op_mult_i95_H2xr;
941 L4ieee_Q11numeric_bit_T8unsigned L4ieee_Q11numeric_bit_Y7op_mult_i95_V6result,L4ieee_Q11numeric_bit_Y7op_mult_i95_V5adval;
942 integer L4ieee_Q11numeric_bit_Y7op_mult_i95_L5182ln_C1i,L4ieee_Q11numeric_bit_Y7op_mult_i95_L5182ln_C1i_lc;
943 L4ieee_Q11numeric_bit_Y7op_mult_i95_C6l_left=(L4ieee_Q11numeric_bit_Y7op_mult_i95_C1l.info->length-1);
944 L4ieee_Q11numeric_bit_Y7op_mult_i95_C6r_left=(L4ieee_Q11numeric_bit_Y7op_mult_i95_C1r.info->length-1);
945 L4ieee_Q11numeric_bit_Y7op_mult_i95_H2xl.set((new array_info((&L4ieee_Q11numeric_bit_I8unsigned_INFO)->element_type,(&L4ieee_Q11numeric_bit_I8unsigned_INFO)->index_type,L4ieee_Q11numeric_bit_Y7op_mult_i95_C6l_left,downto,0,0)), L4ieee_Q11numeric_bit_Y7op_mult_i95_C1l.data);
946 L4ieee_Q11numeric_bit_Y7op_mult_i95_H2xr.set((new array_info((&L4ieee_Q11numeric_bit_I8unsigned_INFO)->element_type,(&L4ieee_Q11numeric_bit_I8unsigned_INFO)->index_type,L4ieee_Q11numeric_bit_Y7op_mult_i95_C6r_left,downto,0,0)), L4ieee_Q11numeric_bit_Y7op_mult_i95_C1r.data);
947 L4ieee_Q11numeric_bit_Y7op_mult_i95_V6result.init((new array_info((&L4ieee_Q11numeric_bit_I8unsigned_INFO)->element_type,(&L4ieee_Q11numeric_bit_I8unsigned_INFO)->index_type,((L4ieee_Q11numeric_bit_Y7op_mult_i95_C1l.info->length+L4ieee_Q11numeric_bit_Y7op_mult_i95_C1r.info->length)-1),downto,0,0)),enumeration(0));
948 L4ieee_Q11numeric_bit_Y7op_mult_i95_V6result=L4ieee_Q11numeric_bit_T8unsigned(new array_info((new array_info((&L4ieee_Q11numeric_bit_I8unsigned_INFO)->element_type,(&L4ieee_Q11numeric_bit_I8unsigned_INFO)->index_type,((L4ieee_Q11numeric_bit_Y7op_mult_i95_C1l.info->length+L4ieee_Q11numeric_bit_Y7op_mult_i95_C1r.info->length)-1),downto,0,0))->element_type,(new array_info((&L4ieee_Q11numeric_bit_I8unsigned_INFO)->element_type,(&L4ieee_Q11numeric_bit_I8unsigned_INFO)->index_type,((L4ieee_Q11numeric_bit_Y7op_mult_i95_C1l.info->length+L4ieee_Q11numeric_bit_Y7op_mult_i95_C1r.info->length)-1),downto,0,0))->index_type,((L4ieee_Q11numeric_bit_Y7op_mult_i95_C1l.info->length+L4ieee_Q11numeric_bit_Y7op_mult_i95_C1r.info->length)-1),downto,0,0),enumeration(0));
949 L4ieee_Q11numeric_bit_Y7op_mult_i95_V5adval.init((new array_info((&L4ieee_Q11numeric_bit_I8unsigned_INFO)->element_type,(&L4ieee_Q11numeric_bit_I8unsigned_INFO)->index_type,((L4ieee_Q11numeric_bit_Y7op_mult_i95_C1l.info->length+L4ieee_Q11numeric_bit_Y7op_mult_i95_C1r.info->length)-1),downto,0,0)),enumeration(0));
950 if(((L4ieee_Q11numeric_bit_Y7op_mult_i95_C1l.info->length<1)||(L4ieee_Q11numeric_bit_Y7op_mult_i95_C1r.info->length<1))) {
951 return array_alias<L4ieee_Q11numeric_bit_T8unsigned >((&L4ieee_Q11numeric_bit_I8unsigned_INFO),L4ieee_W11numeric_bit_C3nau);
952 }
953 L4ieee_Q11numeric_bit_Y7op_mult_i95_V5adval=L4ieee_Q11numeric_bit_Y6resize_i326 (L4ieee_Q11numeric_bit_Y7op_mult_i95_H2xr,L4ieee_Q11numeric_bit_Y7op_mult_i95_V6result.info->length);
954 for (L4ieee_Q11numeric_bit_Y7op_mult_i95_L5182ln_C1i=0,L4ieee_Q11numeric_bit_Y7op_mult_i95_L5182ln_C1i_lc=up_range_to_length<integer>(0,L4ieee_Q11numeric_bit_Y7op_mult_i95_C6l_left); L4ieee_Q11numeric_bit_Y7op_mult_i95_L5182ln_C1i_lc!=0; L4ieee_Q11numeric_bit_Y7op_mult_i95_L5182ln_C1i++,L4ieee_Q11numeric_bit_Y7op_mult_i95_L5182ln_C1i_lc--) {
955 if((L4ieee_Q11numeric_bit_Y7op_mult_i95_H2xl[L4ieee_Q11numeric_bit_Y7op_mult_i95_L5182ln_C1i]==enumeration(1))) {
956 L4ieee_Q11numeric_bit_Y7op_mult_i95_V6result=L4ieee_Q11numeric_bit_Y7op_plus_i59 (L4ieee_Q11numeric_bit_Y7op_mult_i95_V6result,L4ieee_Q11numeric_bit_Y7op_mult_i95_V5adval);
957 }
958 L4ieee_Q11numeric_bit_Y7op_mult_i95_V5adval=L4ieee_Q11numeric_bit_Y10shift_left_i275 (L4ieee_Q11numeric_bit_Y7op_mult_i95_V5adval,1);
959 }
960 return array_alias<L4ieee_Q11numeric_bit_T8unsigned >((&L4ieee_Q11numeric_bit_I8unsigned_INFO),L4ieee_Q11numeric_bit_Y7op_mult_i95_V6result);
961 }
962 /* Implementation of subprogram :ieee:numeric_bit:"*" */
L4ieee_Q11numeric_bit_Y7op_mult_i98(const L4ieee_Q11numeric_bit_T6signed & L4ieee_Q11numeric_bit_Y7op_mult_i98_C1l,const L4ieee_Q11numeric_bit_T6signed & L4ieee_Q11numeric_bit_Y7op_mult_i98_C1r)963 L4ieee_Q11numeric_bit_T6signed L4ieee_Q11numeric_bit_Y7op_mult_i98(const L4ieee_Q11numeric_bit_T6signed &L4ieee_Q11numeric_bit_Y7op_mult_i98_C1l,const L4ieee_Q11numeric_bit_T6signed &L4ieee_Q11numeric_bit_Y7op_mult_i98_C1r)
964 {
965 integer L4ieee_Q11numeric_bit_Y7op_mult_i98_C6l_left,L4ieee_Q11numeric_bit_Y7op_mult_i98_C6r_left;
966 L4ieee_Q11numeric_bit_T6signed L4ieee_Q11numeric_bit_Y7op_mult_i98_V2xl,L4ieee_Q11numeric_bit_Y7op_mult_i98_V2xr,L4ieee_Q11numeric_bit_Y7op_mult_i98_V6result,L4ieee_Q11numeric_bit_Y7op_mult_i98_V5adval;
967 integer L4ieee_Q11numeric_bit_Y7op_mult_i98_L5193ln_C1i,L4ieee_Q11numeric_bit_Y7op_mult_i98_L5193ln_C1i_lc;
968 L4ieee_Q11numeric_bit_Y7op_mult_i98_C6l_left=(L4ieee_Q11numeric_bit_Y7op_mult_i98_C1l.info->length-1);
969 L4ieee_Q11numeric_bit_Y7op_mult_i98_C6r_left=(L4ieee_Q11numeric_bit_Y7op_mult_i98_C1r.info->length-1);
970 L4ieee_Q11numeric_bit_Y7op_mult_i98_V2xl.init((new array_info((&L4ieee_Q11numeric_bit_I6signed_INFO)->element_type,(&L4ieee_Q11numeric_bit_I6signed_INFO)->index_type,L4ieee_Q11numeric_bit_Y7op_mult_i98_C6l_left,downto,0,0)),enumeration(0));
971 L4ieee_Q11numeric_bit_Y7op_mult_i98_V2xr.init((new array_info((&L4ieee_Q11numeric_bit_I6signed_INFO)->element_type,(&L4ieee_Q11numeric_bit_I6signed_INFO)->index_type,L4ieee_Q11numeric_bit_Y7op_mult_i98_C6r_left,downto,0,0)),enumeration(0));
972 L4ieee_Q11numeric_bit_Y7op_mult_i98_V6result.init((new array_info((&L4ieee_Q11numeric_bit_I6signed_INFO)->element_type,(&L4ieee_Q11numeric_bit_I6signed_INFO)->index_type,((L4ieee_Q11numeric_bit_Y7op_mult_i98_C6l_left+L4ieee_Q11numeric_bit_Y7op_mult_i98_C6r_left)+1),downto,0,0)),enumeration(0));
973 L4ieee_Q11numeric_bit_Y7op_mult_i98_V6result=L4ieee_Q11numeric_bit_T6signed(new array_info((new array_info((&L4ieee_Q11numeric_bit_I6signed_INFO)->element_type,(&L4ieee_Q11numeric_bit_I6signed_INFO)->index_type,((L4ieee_Q11numeric_bit_Y7op_mult_i98_C6l_left+L4ieee_Q11numeric_bit_Y7op_mult_i98_C6r_left)+1),downto,0,0))->element_type,(new array_info((&L4ieee_Q11numeric_bit_I6signed_INFO)->element_type,(&L4ieee_Q11numeric_bit_I6signed_INFO)->index_type,((L4ieee_Q11numeric_bit_Y7op_mult_i98_C6l_left+L4ieee_Q11numeric_bit_Y7op_mult_i98_C6r_left)+1),downto,0,0))->index_type,((L4ieee_Q11numeric_bit_Y7op_mult_i98_C6l_left+L4ieee_Q11numeric_bit_Y7op_mult_i98_C6r_left)+1),downto,0,0),enumeration(0));
974 L4ieee_Q11numeric_bit_Y7op_mult_i98_V5adval.init((new array_info((&L4ieee_Q11numeric_bit_I6signed_INFO)->element_type,(&L4ieee_Q11numeric_bit_I6signed_INFO)->index_type,((L4ieee_Q11numeric_bit_Y7op_mult_i98_C6l_left+L4ieee_Q11numeric_bit_Y7op_mult_i98_C6r_left)+1),downto,0,0)),enumeration(0));
975 if(((L4ieee_Q11numeric_bit_Y7op_mult_i98_C6l_left<0)||(L4ieee_Q11numeric_bit_Y7op_mult_i98_C6r_left<0))) {
976 return array_alias<L4ieee_Q11numeric_bit_T6signed >((&L4ieee_Q11numeric_bit_I6signed_INFO),L4ieee_W11numeric_bit_C3nas);
977 }
978 L4ieee_Q11numeric_bit_Y7op_mult_i98_V2xl=L4ieee_Q11numeric_bit_Y7op_mult_i98_C1l;
979 L4ieee_Q11numeric_bit_Y7op_mult_i98_V2xr=L4ieee_Q11numeric_bit_Y7op_mult_i98_C1r;
980 L4ieee_Q11numeric_bit_Y7op_mult_i98_V5adval=L4ieee_Q11numeric_bit_Y6resize_i323 (L4ieee_Q11numeric_bit_Y7op_mult_i98_V2xr,L4ieee_Q11numeric_bit_Y7op_mult_i98_V6result.info->length);
981 for (L4ieee_Q11numeric_bit_Y7op_mult_i98_L5193ln_C1i=0,L4ieee_Q11numeric_bit_Y7op_mult_i98_L5193ln_C1i_lc=up_range_to_length<integer>(0,(L4ieee_Q11numeric_bit_Y7op_mult_i98_C6l_left-1)); L4ieee_Q11numeric_bit_Y7op_mult_i98_L5193ln_C1i_lc!=0; L4ieee_Q11numeric_bit_Y7op_mult_i98_L5193ln_C1i++,L4ieee_Q11numeric_bit_Y7op_mult_i98_L5193ln_C1i_lc--) {
982 if((L4ieee_Q11numeric_bit_Y7op_mult_i98_V2xl[L4ieee_Q11numeric_bit_Y7op_mult_i98_L5193ln_C1i]==enumeration(1))) {
983 L4ieee_Q11numeric_bit_Y7op_mult_i98_V6result=L4ieee_Q11numeric_bit_Y7op_plus_i62 (L4ieee_Q11numeric_bit_Y7op_mult_i98_V6result,L4ieee_Q11numeric_bit_Y7op_mult_i98_V5adval);
984 }
985 L4ieee_Q11numeric_bit_Y7op_mult_i98_V5adval=L4ieee_Q11numeric_bit_Y10shift_left_i281 (L4ieee_Q11numeric_bit_Y7op_mult_i98_V5adval,1);
986 }
987 if((L4ieee_Q11numeric_bit_Y7op_mult_i98_V2xl[L4ieee_Q11numeric_bit_Y7op_mult_i98_C6l_left]==enumeration(1))) {
988 L4ieee_Q11numeric_bit_Y7op_mult_i98_V6result=L4ieee_Q11numeric_bit_Y8op_minus_i80 (L4ieee_Q11numeric_bit_Y7op_mult_i98_V6result,L4ieee_Q11numeric_bit_Y7op_mult_i98_V5adval);
989 }
990 return array_alias<L4ieee_Q11numeric_bit_T6signed >((&L4ieee_Q11numeric_bit_I6signed_INFO),L4ieee_Q11numeric_bit_Y7op_mult_i98_V6result);
991 }
992 /* Implementation of subprogram :ieee:numeric_bit:"*" */
L4ieee_Q11numeric_bit_Y7op_mult_i101(const L4ieee_Q11numeric_bit_T8unsigned & L4ieee_Q11numeric_bit_Y7op_mult_i101_C1l,const integer L4ieee_Q11numeric_bit_Y7op_mult_i101_C1r)993 L4ieee_Q11numeric_bit_T8unsigned L4ieee_Q11numeric_bit_Y7op_mult_i101(const L4ieee_Q11numeric_bit_T8unsigned &L4ieee_Q11numeric_bit_Y7op_mult_i101_C1l,const integer L4ieee_Q11numeric_bit_Y7op_mult_i101_C1r)
994 {
995 return array_alias<L4ieee_Q11numeric_bit_T8unsigned >((&L4ieee_Q11numeric_bit_I8unsigned_INFO),L4ieee_Q11numeric_bit_Y7op_mult_i95 (L4ieee_Q11numeric_bit_Y7op_mult_i101_C1l,L4ieee_Q11numeric_bit_Y11to_unsigned_i333 (L4ieee_Q11numeric_bit_Y7op_mult_i101_C1r,L4ieee_Q11numeric_bit_Y7op_mult_i101_C1l.info->length)));
996 }
997 /* Implementation of subprogram :ieee:numeric_bit:"*" */
L4ieee_Q11numeric_bit_Y7op_mult_i104(const integer L4ieee_Q11numeric_bit_Y7op_mult_i104_C1l,const L4ieee_Q11numeric_bit_T8unsigned & L4ieee_Q11numeric_bit_Y7op_mult_i104_C1r)998 L4ieee_Q11numeric_bit_T8unsigned L4ieee_Q11numeric_bit_Y7op_mult_i104(const integer L4ieee_Q11numeric_bit_Y7op_mult_i104_C1l,const L4ieee_Q11numeric_bit_T8unsigned &L4ieee_Q11numeric_bit_Y7op_mult_i104_C1r)
999 {
1000 return array_alias<L4ieee_Q11numeric_bit_T8unsigned >((&L4ieee_Q11numeric_bit_I8unsigned_INFO),L4ieee_Q11numeric_bit_Y7op_mult_i95 (L4ieee_Q11numeric_bit_Y11to_unsigned_i333 (L4ieee_Q11numeric_bit_Y7op_mult_i104_C1l,L4ieee_Q11numeric_bit_Y7op_mult_i104_C1r.info->length),L4ieee_Q11numeric_bit_Y7op_mult_i104_C1r));
1001 }
1002 /* Implementation of subprogram :ieee:numeric_bit:"*" */
L4ieee_Q11numeric_bit_Y7op_mult_i107(const L4ieee_Q11numeric_bit_T6signed & L4ieee_Q11numeric_bit_Y7op_mult_i107_C1l,const integer L4ieee_Q11numeric_bit_Y7op_mult_i107_C1r)1003 L4ieee_Q11numeric_bit_T6signed L4ieee_Q11numeric_bit_Y7op_mult_i107(const L4ieee_Q11numeric_bit_T6signed &L4ieee_Q11numeric_bit_Y7op_mult_i107_C1l,const integer L4ieee_Q11numeric_bit_Y7op_mult_i107_C1r)
1004 {
1005 return array_alias<L4ieee_Q11numeric_bit_T6signed >((&L4ieee_Q11numeric_bit_I6signed_INFO),L4ieee_Q11numeric_bit_Y7op_mult_i98 (L4ieee_Q11numeric_bit_Y7op_mult_i107_C1l,L4ieee_Q11numeric_bit_Y9to_signed_i336 (L4ieee_Q11numeric_bit_Y7op_mult_i107_C1r,L4ieee_Q11numeric_bit_Y7op_mult_i107_C1l.info->length)));
1006 }
1007 /* Implementation of subprogram :ieee:numeric_bit:"*" */
L4ieee_Q11numeric_bit_Y7op_mult_i110(const integer L4ieee_Q11numeric_bit_Y7op_mult_i110_C1l,const L4ieee_Q11numeric_bit_T6signed & L4ieee_Q11numeric_bit_Y7op_mult_i110_C1r)1008 L4ieee_Q11numeric_bit_T6signed L4ieee_Q11numeric_bit_Y7op_mult_i110(const integer L4ieee_Q11numeric_bit_Y7op_mult_i110_C1l,const L4ieee_Q11numeric_bit_T6signed &L4ieee_Q11numeric_bit_Y7op_mult_i110_C1r)
1009 {
1010 return array_alias<L4ieee_Q11numeric_bit_T6signed >((&L4ieee_Q11numeric_bit_I6signed_INFO),L4ieee_Q11numeric_bit_Y7op_mult_i98 (L4ieee_Q11numeric_bit_Y9to_signed_i336 (L4ieee_Q11numeric_bit_Y7op_mult_i110_C1l,L4ieee_Q11numeric_bit_Y7op_mult_i110_C1r.info->length),L4ieee_Q11numeric_bit_Y7op_mult_i110_C1r));
1011 }
1012 /* Implementation of subprogram :ieee:numeric_bit:"/" */
L4ieee_Q11numeric_bit_Y6op_div_i113(const L4ieee_Q11numeric_bit_T8unsigned & L4ieee_Q11numeric_bit_Y6op_div_i113_C1l,const L4ieee_Q11numeric_bit_T8unsigned & L4ieee_Q11numeric_bit_Y6op_div_i113_C1r)1013 L4ieee_Q11numeric_bit_T8unsigned L4ieee_Q11numeric_bit_Y6op_div_i113(const L4ieee_Q11numeric_bit_T8unsigned &L4ieee_Q11numeric_bit_Y6op_div_i113_C1l,const L4ieee_Q11numeric_bit_T8unsigned &L4ieee_Q11numeric_bit_Y6op_div_i113_C1r)
1014 {
1015 L4ieee_Q11numeric_bit_T8unsigned L4ieee_Q11numeric_bit_Y6op_div_i113_V5fquot,L4ieee_Q11numeric_bit_Y6op_div_i113_V7fremain;
1016 L4ieee_Q11numeric_bit_Y6op_div_i113_V5fquot.init((new array_info((&L4ieee_Q11numeric_bit_I8unsigned_INFO)->element_type,(&L4ieee_Q11numeric_bit_I8unsigned_INFO)->index_type,(L4ieee_Q11numeric_bit_Y6op_div_i113_C1l.info->length-1),downto,0,0)),enumeration(0));
1017 L4ieee_Q11numeric_bit_Y6op_div_i113_V7fremain.init((new array_info((&L4ieee_Q11numeric_bit_I8unsigned_INFO)->element_type,(&L4ieee_Q11numeric_bit_I8unsigned_INFO)->index_type,(L4ieee_Q11numeric_bit_Y6op_div_i113_C1r.info->length-1),downto,0,0)),enumeration(0));
1018 if(((L4ieee_Q11numeric_bit_Y6op_div_i113_C1l.info->length<1)||(L4ieee_Q11numeric_bit_Y6op_div_i113_C1r.info->length<1))) {
1019 return array_alias<L4ieee_Q11numeric_bit_T8unsigned >((&L4ieee_Q11numeric_bit_I8unsigned_INFO),L4ieee_W11numeric_bit_C3nau);
1020 }
1021 L4ieee_W11numeric_bit_X6divmod_i49 (L4ieee_Q11numeric_bit_Y6op_div_i113_C1l,L4ieee_Q11numeric_bit_Y6op_div_i113_C1r,L4ieee_Q11numeric_bit_Y6op_div_i113_V5fquot,L4ieee_Q11numeric_bit_Y6op_div_i113_V7fremain);
1022 return array_alias<L4ieee_Q11numeric_bit_T8unsigned >((&L4ieee_Q11numeric_bit_I8unsigned_INFO),L4ieee_Q11numeric_bit_Y6op_div_i113_V5fquot);
1023 }
1024 enumeration L4ieee_W11numeric_bit_itn21_lit[]={0};
1025 /* Implementation of subprogram :ieee:numeric_bit:"/" */
L4ieee_Q11numeric_bit_Y6op_div_i116(const L4ieee_Q11numeric_bit_T6signed & L4ieee_Q11numeric_bit_Y6op_div_i116_C1l,const L4ieee_Q11numeric_bit_T6signed & L4ieee_Q11numeric_bit_Y6op_div_i116_C1r)1026 L4ieee_Q11numeric_bit_T6signed L4ieee_Q11numeric_bit_Y6op_div_i116(const L4ieee_Q11numeric_bit_T6signed &L4ieee_Q11numeric_bit_Y6op_div_i116_C1l,const L4ieee_Q11numeric_bit_T6signed &L4ieee_Q11numeric_bit_Y6op_div_i116_C1r)
1027 {
1028 L4ieee_Q11numeric_bit_T8unsigned L4ieee_Q11numeric_bit_Y6op_div_i116_V5fquot,L4ieee_Q11numeric_bit_Y6op_div_i116_V7fremain,L4ieee_Q11numeric_bit_Y6op_div_i116_V4xnum,L4ieee_Q11numeric_bit_Y6op_div_i116_V6xdenom;
1029 enumeration L4ieee_Q11numeric_bit_Y6op_div_i116_V4qneg;
1030 L4ieee_Q11numeric_bit_Y6op_div_i116_V5fquot.init((new array_info((&L4ieee_Q11numeric_bit_I8unsigned_INFO)->element_type,(&L4ieee_Q11numeric_bit_I8unsigned_INFO)->index_type,(L4ieee_Q11numeric_bit_Y6op_div_i116_C1l.info->length-1),downto,0,0)),enumeration(0));
1031 L4ieee_Q11numeric_bit_Y6op_div_i116_V7fremain.init((new array_info((&L4ieee_Q11numeric_bit_I8unsigned_INFO)->element_type,(&L4ieee_Q11numeric_bit_I8unsigned_INFO)->index_type,(L4ieee_Q11numeric_bit_Y6op_div_i116_C1r.info->length-1),downto,0,0)),enumeration(0));
1032 L4ieee_Q11numeric_bit_Y6op_div_i116_V4xnum.init((new array_info((&L4ieee_Q11numeric_bit_I8unsigned_INFO)->element_type,(&L4ieee_Q11numeric_bit_I8unsigned_INFO)->index_type,(L4ieee_Q11numeric_bit_Y6op_div_i116_C1l.info->length-1),downto,0,0)),enumeration(0));
1033 L4ieee_Q11numeric_bit_Y6op_div_i116_V6xdenom.init((new array_info((&L4ieee_Q11numeric_bit_I8unsigned_INFO)->element_type,(&L4ieee_Q11numeric_bit_I8unsigned_INFO)->index_type,(L4ieee_Q11numeric_bit_Y6op_div_i116_C1r.info->length-1),downto,0,0)),enumeration(0));
1034 L4ieee_Q11numeric_bit_Y6op_div_i116_V4qneg=enumeration(0);
1035 if(((L4ieee_Q11numeric_bit_Y6op_div_i116_C1l.info->length<1)||(L4ieee_Q11numeric_bit_Y6op_div_i116_C1r.info->length<1))) {
1036 return array_alias<L4ieee_Q11numeric_bit_T6signed >((&L4ieee_Q11numeric_bit_I6signed_INFO),L4ieee_W11numeric_bit_C3nas);
1037 }
1038 if((L4ieee_Q11numeric_bit_Y6op_div_i116_C1l[L4ieee_Q11numeric_bit_Y6op_div_i116_C1l.info->left_bound]==enumeration(1))) {
1039 L4ieee_Q11numeric_bit_Y6op_div_i116_V4xnum=array_alias<L4ieee_Q11numeric_bit_T8unsigned >((&L4ieee_Q11numeric_bit_I8unsigned_INFO),L4ieee_Q11numeric_bit_Y8op_minus_i56 (L4ieee_Q11numeric_bit_Y6op_div_i116_C1l));
1040 L4ieee_Q11numeric_bit_Y6op_div_i116_V4qneg=enumeration(1);
1041 } else {
1042 L4ieee_Q11numeric_bit_Y6op_div_i116_V4xnum=array_alias<L4ieee_Q11numeric_bit_T8unsigned >((&L4ieee_Q11numeric_bit_I8unsigned_INFO),L4ieee_Q11numeric_bit_Y6op_div_i116_C1l);
1043 }
1044 if((L4ieee_Q11numeric_bit_Y6op_div_i116_C1r[L4ieee_Q11numeric_bit_Y6op_div_i116_C1r.info->left_bound]==enumeration(1))) {
1045 L4ieee_Q11numeric_bit_Y6op_div_i116_V6xdenom=array_alias<L4ieee_Q11numeric_bit_T8unsigned >((&L4ieee_Q11numeric_bit_I8unsigned_INFO),L4ieee_Q11numeric_bit_Y8op_minus_i56 (L4ieee_Q11numeric_bit_Y6op_div_i116_C1r));
1046 L4ieee_Q11numeric_bit_Y6op_div_i116_V4qneg=op_not(L4ieee_Q11numeric_bit_Y6op_div_i116_V4qneg);
1047 } else {
1048 L4ieee_Q11numeric_bit_Y6op_div_i116_V6xdenom=array_alias<L4ieee_Q11numeric_bit_T8unsigned >((&L4ieee_Q11numeric_bit_I8unsigned_INFO),L4ieee_Q11numeric_bit_Y6op_div_i116_C1r);
1049 }
1050 L4ieee_W11numeric_bit_X6divmod_i49 (L4ieee_Q11numeric_bit_Y6op_div_i116_V4xnum,L4ieee_Q11numeric_bit_Y6op_div_i116_V6xdenom,L4ieee_Q11numeric_bit_Y6op_div_i116_V5fquot,L4ieee_Q11numeric_bit_Y6op_div_i116_V7fremain);
1051 if(L4ieee_Q11numeric_bit_Y6op_div_i116_V4qneg) {
1052 L4ieee_Q11numeric_bit_Y6op_div_i116_V5fquot=L4ieee_Q11numeric_bit_Y8op_minus_i77 (array_alias<L4ieee_Q11numeric_bit_T8unsigned >(new array_info((&L4ieee_Q11numeric_bit_I8unsigned_INFO)->element_type,(&L4ieee_Q11numeric_bit_I8unsigned_INFO)->index_type,0,to,0+0,0),L4ieee_W11numeric_bit_itn21_lit),L4ieee_Q11numeric_bit_Y6op_div_i116_V5fquot);
1053 }
1054 return array_alias<L4ieee_Q11numeric_bit_T6signed >((&L4ieee_Q11numeric_bit_I6signed_INFO),array_alias<L4ieee_Q11numeric_bit_T6signed >((&L4ieee_Q11numeric_bit_I6signed_INFO),L4ieee_Q11numeric_bit_Y6op_div_i116_V5fquot));
1055 }
1056 /* Implementation of subprogram :ieee:numeric_bit:"/" */
L4ieee_Q11numeric_bit_Y6op_div_i119(const L4ieee_Q11numeric_bit_T8unsigned & L4ieee_Q11numeric_bit_Y6op_div_i119_C1l,const integer L4ieee_Q11numeric_bit_Y6op_div_i119_C1r)1057 L4ieee_Q11numeric_bit_T8unsigned L4ieee_Q11numeric_bit_Y6op_div_i119(const L4ieee_Q11numeric_bit_T8unsigned &L4ieee_Q11numeric_bit_Y6op_div_i119_C1l,const integer L4ieee_Q11numeric_bit_Y6op_div_i119_C1r)
1058 {
1059 integer L4ieee_Q11numeric_bit_Y6op_div_i119_C8r_length;
1060 L4ieee_Q11numeric_bit_T8unsigned L4ieee_Q11numeric_bit_Y6op_div_i119_V4quot,L4ieee_Q11numeric_bit_Y6op_div_i119_V2xr;
1061 L4ieee_Q11numeric_bit_Y6op_div_i119_C8r_length=L4ieee_W11numeric_bit_Y3max_i9 (L4ieee_Q11numeric_bit_Y6op_div_i119_C1l.info->length,L4ieee_W11numeric_bit_Y17unsigned_num_bits_i19 (L4ieee_Q11numeric_bit_Y6op_div_i119_C1r));
1062 L4ieee_Q11numeric_bit_Y6op_div_i119_V4quot.init((new array_info((&L4ieee_Q11numeric_bit_I8unsigned_INFO)->element_type,(&L4ieee_Q11numeric_bit_I8unsigned_INFO)->index_type,(L4ieee_Q11numeric_bit_Y6op_div_i119_C8r_length-1),downto,0,0)),enumeration(0));
1063 L4ieee_Q11numeric_bit_Y6op_div_i119_V2xr.init((new array_info((&L4ieee_Q11numeric_bit_I8unsigned_INFO)->element_type,(&L4ieee_Q11numeric_bit_I8unsigned_INFO)->index_type,(L4ieee_Q11numeric_bit_Y6op_div_i119_C8r_length-1),downto,0,0)),enumeration(0));
1064 if((L4ieee_Q11numeric_bit_Y6op_div_i119_C1l.info->length<1)) {
1065 return array_alias<L4ieee_Q11numeric_bit_T8unsigned >((&L4ieee_Q11numeric_bit_I8unsigned_INFO),L4ieee_W11numeric_bit_C3nau);
1066 }
1067 if((L4ieee_Q11numeric_bit_Y6op_div_i119_C8r_length>L4ieee_Q11numeric_bit_Y6op_div_i119_C1l.info->length)) {
1068 L4ieee_Q11numeric_bit_Y6op_div_i119_V4quot=L4ieee_Q11numeric_bit_T8unsigned(new array_info((new array_info((&L4ieee_Q11numeric_bit_I8unsigned_INFO)->element_type,(&L4ieee_Q11numeric_bit_I8unsigned_INFO)->index_type,(L4ieee_Q11numeric_bit_Y6op_div_i119_C8r_length-1),downto,0,0))->element_type,(new array_info((&L4ieee_Q11numeric_bit_I8unsigned_INFO)->element_type,(&L4ieee_Q11numeric_bit_I8unsigned_INFO)->index_type,(L4ieee_Q11numeric_bit_Y6op_div_i119_C8r_length-1),downto,0,0))->index_type,(L4ieee_Q11numeric_bit_Y6op_div_i119_C8r_length-1),downto,0,0),enumeration(0));
1069 return array_alias<L4ieee_Q11numeric_bit_T8unsigned >((&L4ieee_Q11numeric_bit_I8unsigned_INFO),L4ieee_Q11numeric_bit_Y6resize_i326 (L4ieee_Q11numeric_bit_Y6op_div_i119_V4quot,L4ieee_Q11numeric_bit_Y6op_div_i119_C1l.info->length));
1070 }
1071 L4ieee_Q11numeric_bit_Y6op_div_i119_V2xr=L4ieee_Q11numeric_bit_Y11to_unsigned_i333 (L4ieee_Q11numeric_bit_Y6op_div_i119_C1r,L4ieee_Q11numeric_bit_Y6op_div_i119_C8r_length);
1072 L4ieee_Q11numeric_bit_Y6op_div_i119_V4quot=L4ieee_Q11numeric_bit_Y6resize_i326 (L4ieee_Q11numeric_bit_Y6op_div_i113 (L4ieee_Q11numeric_bit_Y6op_div_i119_C1l,L4ieee_Q11numeric_bit_Y6op_div_i119_V2xr),L4ieee_Q11numeric_bit_Y6op_div_i119_V4quot.info->length);
1073 return array_alias<L4ieee_Q11numeric_bit_T8unsigned >((&L4ieee_Q11numeric_bit_I8unsigned_INFO),L4ieee_Q11numeric_bit_Y6resize_i326 (L4ieee_Q11numeric_bit_Y6op_div_i119_V4quot,L4ieee_Q11numeric_bit_Y6op_div_i119_C1l.info->length));
1074 }
1075 enumeration L4ieee_W11numeric_bit_itn22_lit[]={78,85,77,69,82,73,67,95,66,73,84,46,34,34,47,34,34,58,32,81,117,111,116,105,101,110,116,32,84,114,117,110,99,97,116,101,100};
1076 /* Implementation of subprogram :ieee:numeric_bit:"/" */
L4ieee_Q11numeric_bit_Y6op_div_i122(const integer L4ieee_Q11numeric_bit_Y6op_div_i122_C1l,const L4ieee_Q11numeric_bit_T8unsigned & L4ieee_Q11numeric_bit_Y6op_div_i122_C1r)1077 L4ieee_Q11numeric_bit_T8unsigned L4ieee_Q11numeric_bit_Y6op_div_i122(const integer L4ieee_Q11numeric_bit_Y6op_div_i122_C1l,const L4ieee_Q11numeric_bit_T8unsigned &L4ieee_Q11numeric_bit_Y6op_div_i122_C1r)
1078 {
1079 integer L4ieee_Q11numeric_bit_Y6op_div_i122_C8l_length;
1080 L4ieee_Q11numeric_bit_T8unsigned L4ieee_Q11numeric_bit_Y6op_div_i122_V4quot,L4ieee_Q11numeric_bit_Y6op_div_i122_V2xl;
1081 L4ieee_Q11numeric_bit_Y6op_div_i122_C8l_length=L4ieee_W11numeric_bit_Y3max_i9 (L4ieee_W11numeric_bit_Y17unsigned_num_bits_i19 (L4ieee_Q11numeric_bit_Y6op_div_i122_C1l),L4ieee_Q11numeric_bit_Y6op_div_i122_C1r.info->length);
1082 L4ieee_Q11numeric_bit_Y6op_div_i122_V4quot.init((new array_info((&L4ieee_Q11numeric_bit_I8unsigned_INFO)->element_type,(&L4ieee_Q11numeric_bit_I8unsigned_INFO)->index_type,(L4ieee_Q11numeric_bit_Y6op_div_i122_C8l_length-1),downto,0,0)),enumeration(0));
1083 L4ieee_Q11numeric_bit_Y6op_div_i122_V2xl.init((new array_info((&L4ieee_Q11numeric_bit_I8unsigned_INFO)->element_type,(&L4ieee_Q11numeric_bit_I8unsigned_INFO)->index_type,(L4ieee_Q11numeric_bit_Y6op_div_i122_C8l_length-1),downto,0,0)),enumeration(0));
1084 if((L4ieee_Q11numeric_bit_Y6op_div_i122_C1r.info->length<1)) {
1085 return array_alias<L4ieee_Q11numeric_bit_T8unsigned >((&L4ieee_Q11numeric_bit_I8unsigned_INFO),L4ieee_W11numeric_bit_C3nau);
1086 }
1087 L4ieee_Q11numeric_bit_Y6op_div_i122_V2xl=L4ieee_Q11numeric_bit_Y11to_unsigned_i333 (L4ieee_Q11numeric_bit_Y6op_div_i122_C1l,L4ieee_Q11numeric_bit_Y6op_div_i122_C8l_length);
1088 L4ieee_Q11numeric_bit_Y6op_div_i122_V4quot=L4ieee_Q11numeric_bit_Y6resize_i326 (L4ieee_Q11numeric_bit_Y6op_div_i113 (L4ieee_Q11numeric_bit_Y6op_div_i122_V2xl,L4ieee_Q11numeric_bit_Y6op_div_i122_C1r),L4ieee_Q11numeric_bit_Y6op_div_i122_V4quot.info->length);
1089 if(((L4ieee_Q11numeric_bit_Y6op_div_i122_C8l_length>L4ieee_Q11numeric_bit_Y6op_div_i122_C1r.info->length)&&L4ieee_Q11numeric_bit_Y5op_ne_i257 (array_alias<L4ieee_Q11numeric_bit_T8unsigned >(new array_info((&L4ieee_Q11numeric_bit_I8unsigned_INFO)->element_type,(&L4ieee_Q11numeric_bit_I8unsigned_INFO)->index_type,(L4ieee_Q11numeric_bit_Y6op_div_i122_C8l_length-1),downto,L4ieee_Q11numeric_bit_Y6op_div_i122_C1r.info->length,0),&L4ieee_Q11numeric_bit_Y6op_div_i122_V4quot[(L4ieee_Q11numeric_bit_Y6op_div_i122_C8l_length-1)]),L4ieee_Q11numeric_bit_T8unsigned(new array_info((&L4ieee_Q11numeric_bit_I8unsigned_INFO)->element_type,(&L4ieee_Q11numeric_bit_I8unsigned_INFO)->index_type,(L4ieee_Q11numeric_bit_Y6op_div_i122_C8l_length-1),downto,L4ieee_Q11numeric_bit_Y6op_div_i122_C1r.info->length,0),enumeration(0))))) {
1090 if(!enumeration(0))
1091 report(array_alias<L3std_Q8standard_T6string >(new array_info((&L3std_Q8standard_I6string_INFO)->element_type,(&L3std_Q8standard_I6string_INFO)->index_type,1,to,1+36,0),L4ieee_W11numeric_bit_itn22_lit),enumeration(1));
1092 }
1093 return array_alias<L4ieee_Q11numeric_bit_T8unsigned >((&L4ieee_Q11numeric_bit_I8unsigned_INFO),L4ieee_Q11numeric_bit_Y6resize_i326 (L4ieee_Q11numeric_bit_Y6op_div_i122_V4quot,L4ieee_Q11numeric_bit_Y6op_div_i122_C1r.info->length));
1094 }
1095 /* Implementation of subprogram :ieee:numeric_bit:"/" */
L4ieee_Q11numeric_bit_Y6op_div_i125(const L4ieee_Q11numeric_bit_T6signed & L4ieee_Q11numeric_bit_Y6op_div_i125_C1l,const integer L4ieee_Q11numeric_bit_Y6op_div_i125_C1r)1096 L4ieee_Q11numeric_bit_T6signed L4ieee_Q11numeric_bit_Y6op_div_i125(const L4ieee_Q11numeric_bit_T6signed &L4ieee_Q11numeric_bit_Y6op_div_i125_C1l,const integer L4ieee_Q11numeric_bit_Y6op_div_i125_C1r)
1097 {
1098 integer L4ieee_Q11numeric_bit_Y6op_div_i125_C8r_length;
1099 L4ieee_Q11numeric_bit_T6signed L4ieee_Q11numeric_bit_Y6op_div_i125_V4quot,L4ieee_Q11numeric_bit_Y6op_div_i125_V2xr;
1100 L4ieee_Q11numeric_bit_Y6op_div_i125_C8r_length=L4ieee_W11numeric_bit_Y3max_i9 (L4ieee_Q11numeric_bit_Y6op_div_i125_C1l.info->length,L4ieee_W11numeric_bit_Y15signed_num_bits_i14 (L4ieee_Q11numeric_bit_Y6op_div_i125_C1r));
1101 L4ieee_Q11numeric_bit_Y6op_div_i125_V4quot.init((new array_info((&L4ieee_Q11numeric_bit_I6signed_INFO)->element_type,(&L4ieee_Q11numeric_bit_I6signed_INFO)->index_type,(L4ieee_Q11numeric_bit_Y6op_div_i125_C8r_length-1),downto,0,0)),enumeration(0));
1102 L4ieee_Q11numeric_bit_Y6op_div_i125_V2xr.init((new array_info((&L4ieee_Q11numeric_bit_I6signed_INFO)->element_type,(&L4ieee_Q11numeric_bit_I6signed_INFO)->index_type,(L4ieee_Q11numeric_bit_Y6op_div_i125_C8r_length-1),downto,0,0)),enumeration(0));
1103 if((L4ieee_Q11numeric_bit_Y6op_div_i125_C1l.info->length<1)) {
1104 return array_alias<L4ieee_Q11numeric_bit_T6signed >((&L4ieee_Q11numeric_bit_I6signed_INFO),L4ieee_W11numeric_bit_C3nas);
1105 }
1106 if((L4ieee_Q11numeric_bit_Y6op_div_i125_C8r_length>L4ieee_Q11numeric_bit_Y6op_div_i125_C1l.info->length)) {
1107 L4ieee_Q11numeric_bit_Y6op_div_i125_V4quot=L4ieee_Q11numeric_bit_T6signed(new array_info((new array_info((&L4ieee_Q11numeric_bit_I6signed_INFO)->element_type,(&L4ieee_Q11numeric_bit_I6signed_INFO)->index_type,(L4ieee_Q11numeric_bit_Y6op_div_i125_C8r_length-1),downto,0,0))->element_type,(new array_info((&L4ieee_Q11numeric_bit_I6signed_INFO)->element_type,(&L4ieee_Q11numeric_bit_I6signed_INFO)->index_type,(L4ieee_Q11numeric_bit_Y6op_div_i125_C8r_length-1),downto,0,0))->index_type,(L4ieee_Q11numeric_bit_Y6op_div_i125_C8r_length-1),downto,0,0),enumeration(0));
1108 return array_alias<L4ieee_Q11numeric_bit_T6signed >((&L4ieee_Q11numeric_bit_I6signed_INFO),L4ieee_Q11numeric_bit_Y6resize_i323 (L4ieee_Q11numeric_bit_Y6op_div_i125_V4quot,L4ieee_Q11numeric_bit_Y6op_div_i125_C1l.info->length));
1109 }
1110 L4ieee_Q11numeric_bit_Y6op_div_i125_V2xr=L4ieee_Q11numeric_bit_Y9to_signed_i336 (L4ieee_Q11numeric_bit_Y6op_div_i125_C1r,L4ieee_Q11numeric_bit_Y6op_div_i125_C8r_length);
1111 L4ieee_Q11numeric_bit_Y6op_div_i125_V4quot=L4ieee_Q11numeric_bit_Y6resize_i323 (L4ieee_Q11numeric_bit_Y6op_div_i116 (L4ieee_Q11numeric_bit_Y6op_div_i125_C1l,L4ieee_Q11numeric_bit_Y6op_div_i125_V2xr),L4ieee_Q11numeric_bit_Y6op_div_i125_V4quot.info->length);
1112 return array_alias<L4ieee_Q11numeric_bit_T6signed >((&L4ieee_Q11numeric_bit_I6signed_INFO),L4ieee_Q11numeric_bit_Y6resize_i323 (L4ieee_Q11numeric_bit_Y6op_div_i125_V4quot,L4ieee_Q11numeric_bit_Y6op_div_i125_C1l.info->length));
1113 }
1114 enumeration L4ieee_W11numeric_bit_itn23_lit[]={78,85,77,69,82,73,67,95,66,73,84,46,34,34,47,34,34,58,32,81,117,111,116,105,101,110,116,32,84,114,117,110,99,97,116,101,100};
1115 /* Implementation of subprogram :ieee:numeric_bit:"/" */
L4ieee_Q11numeric_bit_Y6op_div_i128(const integer L4ieee_Q11numeric_bit_Y6op_div_i128_C1l,const L4ieee_Q11numeric_bit_T6signed & L4ieee_Q11numeric_bit_Y6op_div_i128_C1r)1116 L4ieee_Q11numeric_bit_T6signed L4ieee_Q11numeric_bit_Y6op_div_i128(const integer L4ieee_Q11numeric_bit_Y6op_div_i128_C1l,const L4ieee_Q11numeric_bit_T6signed &L4ieee_Q11numeric_bit_Y6op_div_i128_C1r)
1117 {
1118 integer L4ieee_Q11numeric_bit_Y6op_div_i128_C8l_length;
1119 L4ieee_Q11numeric_bit_T6signed L4ieee_Q11numeric_bit_Y6op_div_i128_V4quot,L4ieee_Q11numeric_bit_Y6op_div_i128_V2xl;
1120 L4ieee_Q11numeric_bit_Y6op_div_i128_C8l_length=L4ieee_W11numeric_bit_Y3max_i9 (L4ieee_W11numeric_bit_Y15signed_num_bits_i14 (L4ieee_Q11numeric_bit_Y6op_div_i128_C1l),L4ieee_Q11numeric_bit_Y6op_div_i128_C1r.info->length);
1121 L4ieee_Q11numeric_bit_Y6op_div_i128_V4quot.init((new array_info((&L4ieee_Q11numeric_bit_I6signed_INFO)->element_type,(&L4ieee_Q11numeric_bit_I6signed_INFO)->index_type,(L4ieee_Q11numeric_bit_Y6op_div_i128_C8l_length-1),downto,0,0)),enumeration(0));
1122 L4ieee_Q11numeric_bit_Y6op_div_i128_V2xl.init((new array_info((&L4ieee_Q11numeric_bit_I6signed_INFO)->element_type,(&L4ieee_Q11numeric_bit_I6signed_INFO)->index_type,(L4ieee_Q11numeric_bit_Y6op_div_i128_C8l_length-1),downto,0,0)),enumeration(0));
1123 if((L4ieee_Q11numeric_bit_Y6op_div_i128_C1r.info->length<1)) {
1124 return array_alias<L4ieee_Q11numeric_bit_T6signed >((&L4ieee_Q11numeric_bit_I6signed_INFO),L4ieee_W11numeric_bit_C3nas);
1125 }
1126 L4ieee_Q11numeric_bit_Y6op_div_i128_V2xl=L4ieee_Q11numeric_bit_Y9to_signed_i336 (L4ieee_Q11numeric_bit_Y6op_div_i128_C1l,L4ieee_Q11numeric_bit_Y6op_div_i128_C8l_length);
1127 L4ieee_Q11numeric_bit_Y6op_div_i128_V4quot=L4ieee_Q11numeric_bit_Y6resize_i323 (L4ieee_Q11numeric_bit_Y6op_div_i116 (L4ieee_Q11numeric_bit_Y6op_div_i128_V2xl,L4ieee_Q11numeric_bit_Y6op_div_i128_C1r),L4ieee_Q11numeric_bit_Y6op_div_i128_V4quot.info->length);
1128 if(((L4ieee_Q11numeric_bit_Y6op_div_i128_C8l_length>L4ieee_Q11numeric_bit_Y6op_div_i128_C1r.info->length)&&L4ieee_Q11numeric_bit_Y5op_ne_i260 (array_alias<L4ieee_Q11numeric_bit_T6signed >(new array_info((&L4ieee_Q11numeric_bit_I6signed_INFO)->element_type,(&L4ieee_Q11numeric_bit_I6signed_INFO)->index_type,(L4ieee_Q11numeric_bit_Y6op_div_i128_C8l_length-1),downto,L4ieee_Q11numeric_bit_Y6op_div_i128_C1r.info->length,0),&L4ieee_Q11numeric_bit_Y6op_div_i128_V4quot[(L4ieee_Q11numeric_bit_Y6op_div_i128_C8l_length-1)]),L4ieee_Q11numeric_bit_T6signed(new array_info((&L4ieee_Q11numeric_bit_I6signed_INFO)->element_type,(&L4ieee_Q11numeric_bit_I6signed_INFO)->index_type,(L4ieee_Q11numeric_bit_Y6op_div_i128_C8l_length-1),downto,L4ieee_Q11numeric_bit_Y6op_div_i128_C1r.info->length,0),L4ieee_Q11numeric_bit_Y6op_div_i128_V4quot[(L4ieee_Q11numeric_bit_Y6op_div_i128_C1r.info->length-1)])))) {
1129 if(!enumeration(0))
1130 report(array_alias<L3std_Q8standard_T6string >(new array_info((&L3std_Q8standard_I6string_INFO)->element_type,(&L3std_Q8standard_I6string_INFO)->index_type,1,to,1+36,0),L4ieee_W11numeric_bit_itn23_lit),enumeration(1));
1131 }
1132 return array_alias<L4ieee_Q11numeric_bit_T6signed >((&L4ieee_Q11numeric_bit_I6signed_INFO),L4ieee_Q11numeric_bit_Y6resize_i323 (L4ieee_Q11numeric_bit_Y6op_div_i128_V4quot,L4ieee_Q11numeric_bit_Y6op_div_i128_C1r.info->length));
1133 }
1134 /* Implementation of subprogram :ieee:numeric_bit:"rem" */
L4ieee_Q11numeric_bit_Y6op_rem_i131(const L4ieee_Q11numeric_bit_T8unsigned & L4ieee_Q11numeric_bit_Y6op_rem_i131_C1l,const L4ieee_Q11numeric_bit_T8unsigned & L4ieee_Q11numeric_bit_Y6op_rem_i131_C1r)1135 L4ieee_Q11numeric_bit_T8unsigned L4ieee_Q11numeric_bit_Y6op_rem_i131(const L4ieee_Q11numeric_bit_T8unsigned &L4ieee_Q11numeric_bit_Y6op_rem_i131_C1l,const L4ieee_Q11numeric_bit_T8unsigned &L4ieee_Q11numeric_bit_Y6op_rem_i131_C1r)
1136 {
1137 L4ieee_Q11numeric_bit_T8unsigned L4ieee_Q11numeric_bit_Y6op_rem_i131_V5fquot,L4ieee_Q11numeric_bit_Y6op_rem_i131_V7fremain;
1138 L4ieee_Q11numeric_bit_Y6op_rem_i131_V5fquot.init((new array_info((&L4ieee_Q11numeric_bit_I8unsigned_INFO)->element_type,(&L4ieee_Q11numeric_bit_I8unsigned_INFO)->index_type,(L4ieee_Q11numeric_bit_Y6op_rem_i131_C1l.info->length-1),downto,0,0)),enumeration(0));
1139 L4ieee_Q11numeric_bit_Y6op_rem_i131_V7fremain.init((new array_info((&L4ieee_Q11numeric_bit_I8unsigned_INFO)->element_type,(&L4ieee_Q11numeric_bit_I8unsigned_INFO)->index_type,(L4ieee_Q11numeric_bit_Y6op_rem_i131_C1r.info->length-1),downto,0,0)),enumeration(0));
1140 if(((L4ieee_Q11numeric_bit_Y6op_rem_i131_C1l.info->length<1)||(L4ieee_Q11numeric_bit_Y6op_rem_i131_C1r.info->length<1))) {
1141 return array_alias<L4ieee_Q11numeric_bit_T8unsigned >((&L4ieee_Q11numeric_bit_I8unsigned_INFO),L4ieee_W11numeric_bit_C3nau);
1142 }
1143 L4ieee_W11numeric_bit_X6divmod_i49 (L4ieee_Q11numeric_bit_Y6op_rem_i131_C1l,L4ieee_Q11numeric_bit_Y6op_rem_i131_C1r,L4ieee_Q11numeric_bit_Y6op_rem_i131_V5fquot,L4ieee_Q11numeric_bit_Y6op_rem_i131_V7fremain);
1144 return array_alias<L4ieee_Q11numeric_bit_T8unsigned >((&L4ieee_Q11numeric_bit_I8unsigned_INFO),L4ieee_Q11numeric_bit_Y6op_rem_i131_V7fremain);
1145 }
1146 enumeration L4ieee_W11numeric_bit_itn24_lit[]={0};
1147 /* Implementation of subprogram :ieee:numeric_bit:"rem" */
L4ieee_Q11numeric_bit_Y6op_rem_i134(const L4ieee_Q11numeric_bit_T6signed & L4ieee_Q11numeric_bit_Y6op_rem_i134_C1l,const L4ieee_Q11numeric_bit_T6signed & L4ieee_Q11numeric_bit_Y6op_rem_i134_C1r)1148 L4ieee_Q11numeric_bit_T6signed L4ieee_Q11numeric_bit_Y6op_rem_i134(const L4ieee_Q11numeric_bit_T6signed &L4ieee_Q11numeric_bit_Y6op_rem_i134_C1l,const L4ieee_Q11numeric_bit_T6signed &L4ieee_Q11numeric_bit_Y6op_rem_i134_C1r)
1149 {
1150 L4ieee_Q11numeric_bit_T8unsigned L4ieee_Q11numeric_bit_Y6op_rem_i134_V5fquot,L4ieee_Q11numeric_bit_Y6op_rem_i134_V7fremain,L4ieee_Q11numeric_bit_Y6op_rem_i134_V4xnum,L4ieee_Q11numeric_bit_Y6op_rem_i134_V6xdenom;
1151 enumeration L4ieee_Q11numeric_bit_Y6op_rem_i134_V4rneg;
1152 L4ieee_Q11numeric_bit_Y6op_rem_i134_V5fquot.init((new array_info((&L4ieee_Q11numeric_bit_I8unsigned_INFO)->element_type,(&L4ieee_Q11numeric_bit_I8unsigned_INFO)->index_type,(L4ieee_Q11numeric_bit_Y6op_rem_i134_C1l.info->length-1),downto,0,0)),enumeration(0));
1153 L4ieee_Q11numeric_bit_Y6op_rem_i134_V7fremain.init((new array_info((&L4ieee_Q11numeric_bit_I8unsigned_INFO)->element_type,(&L4ieee_Q11numeric_bit_I8unsigned_INFO)->index_type,(L4ieee_Q11numeric_bit_Y6op_rem_i134_C1r.info->length-1),downto,0,0)),enumeration(0));
1154 L4ieee_Q11numeric_bit_Y6op_rem_i134_V4xnum.init((new array_info((&L4ieee_Q11numeric_bit_I8unsigned_INFO)->element_type,(&L4ieee_Q11numeric_bit_I8unsigned_INFO)->index_type,(L4ieee_Q11numeric_bit_Y6op_rem_i134_C1l.info->length-1),downto,0,0)),enumeration(0));
1155 L4ieee_Q11numeric_bit_Y6op_rem_i134_V6xdenom.init((new array_info((&L4ieee_Q11numeric_bit_I8unsigned_INFO)->element_type,(&L4ieee_Q11numeric_bit_I8unsigned_INFO)->index_type,(L4ieee_Q11numeric_bit_Y6op_rem_i134_C1r.info->length-1),downto,0,0)),enumeration(0));
1156 L4ieee_Q11numeric_bit_Y6op_rem_i134_V4rneg=enumeration(0);
1157 if(((L4ieee_Q11numeric_bit_Y6op_rem_i134_C1l.info->length<1)||(L4ieee_Q11numeric_bit_Y6op_rem_i134_C1r.info->length<1))) {
1158 return array_alias<L4ieee_Q11numeric_bit_T6signed >((&L4ieee_Q11numeric_bit_I6signed_INFO),L4ieee_W11numeric_bit_C3nas);
1159 }
1160 if((L4ieee_Q11numeric_bit_Y6op_rem_i134_C1l[L4ieee_Q11numeric_bit_Y6op_rem_i134_C1l.info->left_bound]==enumeration(1))) {
1161 L4ieee_Q11numeric_bit_Y6op_rem_i134_V4xnum=array_alias<L4ieee_Q11numeric_bit_T8unsigned >((&L4ieee_Q11numeric_bit_I8unsigned_INFO),L4ieee_Q11numeric_bit_Y8op_minus_i56 (L4ieee_Q11numeric_bit_Y6op_rem_i134_C1l));
1162 L4ieee_Q11numeric_bit_Y6op_rem_i134_V4rneg=enumeration(1);
1163 } else {
1164 L4ieee_Q11numeric_bit_Y6op_rem_i134_V4xnum=array_alias<L4ieee_Q11numeric_bit_T8unsigned >((&L4ieee_Q11numeric_bit_I8unsigned_INFO),L4ieee_Q11numeric_bit_Y6op_rem_i134_C1l);
1165 }
1166 if((L4ieee_Q11numeric_bit_Y6op_rem_i134_C1r[L4ieee_Q11numeric_bit_Y6op_rem_i134_C1r.info->left_bound]==enumeration(1))) {
1167 L4ieee_Q11numeric_bit_Y6op_rem_i134_V6xdenom=array_alias<L4ieee_Q11numeric_bit_T8unsigned >((&L4ieee_Q11numeric_bit_I8unsigned_INFO),L4ieee_Q11numeric_bit_Y8op_minus_i56 (L4ieee_Q11numeric_bit_Y6op_rem_i134_C1r));
1168 } else {
1169 L4ieee_Q11numeric_bit_Y6op_rem_i134_V6xdenom=array_alias<L4ieee_Q11numeric_bit_T8unsigned >((&L4ieee_Q11numeric_bit_I8unsigned_INFO),L4ieee_Q11numeric_bit_Y6op_rem_i134_C1r);
1170 }
1171 L4ieee_W11numeric_bit_X6divmod_i49 (L4ieee_Q11numeric_bit_Y6op_rem_i134_V4xnum,L4ieee_Q11numeric_bit_Y6op_rem_i134_V6xdenom,L4ieee_Q11numeric_bit_Y6op_rem_i134_V5fquot,L4ieee_Q11numeric_bit_Y6op_rem_i134_V7fremain);
1172 if(L4ieee_Q11numeric_bit_Y6op_rem_i134_V4rneg) {
1173 L4ieee_Q11numeric_bit_Y6op_rem_i134_V7fremain=L4ieee_Q11numeric_bit_Y8op_minus_i77 (array_alias<L4ieee_Q11numeric_bit_T8unsigned >(new array_info((&L4ieee_Q11numeric_bit_I8unsigned_INFO)->element_type,(&L4ieee_Q11numeric_bit_I8unsigned_INFO)->index_type,0,to,0+0,0),L4ieee_W11numeric_bit_itn24_lit),L4ieee_Q11numeric_bit_Y6op_rem_i134_V7fremain);
1174 }
1175 return array_alias<L4ieee_Q11numeric_bit_T6signed >((&L4ieee_Q11numeric_bit_I6signed_INFO),array_alias<L4ieee_Q11numeric_bit_T6signed >((&L4ieee_Q11numeric_bit_I6signed_INFO),L4ieee_Q11numeric_bit_Y6op_rem_i134_V7fremain));
1176 }
1177 enumeration L4ieee_W11numeric_bit_itn25_lit[]={78,85,77,69,82,73,67,95,66,73,84,46,34,34,114,101,109,34,34,58,32,82,101,109,97,105,110,100,101,114,32,84,114,117,110,99,97,116,101,100};
1178 /* Implementation of subprogram :ieee:numeric_bit:"rem" */
L4ieee_Q11numeric_bit_Y6op_rem_i137(const L4ieee_Q11numeric_bit_T8unsigned & L4ieee_Q11numeric_bit_Y6op_rem_i137_C1l,const integer L4ieee_Q11numeric_bit_Y6op_rem_i137_C1r)1179 L4ieee_Q11numeric_bit_T8unsigned L4ieee_Q11numeric_bit_Y6op_rem_i137(const L4ieee_Q11numeric_bit_T8unsigned &L4ieee_Q11numeric_bit_Y6op_rem_i137_C1l,const integer L4ieee_Q11numeric_bit_Y6op_rem_i137_C1r)
1180 {
1181 integer L4ieee_Q11numeric_bit_Y6op_rem_i137_C8r_length;
1182 L4ieee_Q11numeric_bit_T8unsigned L4ieee_Q11numeric_bit_Y6op_rem_i137_V4xrem,L4ieee_Q11numeric_bit_Y6op_rem_i137_V2xr;
1183 L4ieee_Q11numeric_bit_Y6op_rem_i137_C8r_length=L4ieee_W11numeric_bit_Y3max_i9 (L4ieee_Q11numeric_bit_Y6op_rem_i137_C1l.info->length,L4ieee_W11numeric_bit_Y17unsigned_num_bits_i19 (L4ieee_Q11numeric_bit_Y6op_rem_i137_C1r));
1184 L4ieee_Q11numeric_bit_Y6op_rem_i137_V4xrem.init((new array_info((&L4ieee_Q11numeric_bit_I8unsigned_INFO)->element_type,(&L4ieee_Q11numeric_bit_I8unsigned_INFO)->index_type,(L4ieee_Q11numeric_bit_Y6op_rem_i137_C8r_length-1),downto,0,0)),enumeration(0));
1185 L4ieee_Q11numeric_bit_Y6op_rem_i137_V2xr.init((new array_info((&L4ieee_Q11numeric_bit_I8unsigned_INFO)->element_type,(&L4ieee_Q11numeric_bit_I8unsigned_INFO)->index_type,(L4ieee_Q11numeric_bit_Y6op_rem_i137_C8r_length-1),downto,0,0)),enumeration(0));
1186 if((L4ieee_Q11numeric_bit_Y6op_rem_i137_C1l.info->length<1)) {
1187 return array_alias<L4ieee_Q11numeric_bit_T8unsigned >((&L4ieee_Q11numeric_bit_I8unsigned_INFO),L4ieee_W11numeric_bit_C3nau);
1188 }
1189 L4ieee_Q11numeric_bit_Y6op_rem_i137_V2xr=L4ieee_Q11numeric_bit_Y11to_unsigned_i333 (L4ieee_Q11numeric_bit_Y6op_rem_i137_C1r,L4ieee_Q11numeric_bit_Y6op_rem_i137_C8r_length);
1190 L4ieee_Q11numeric_bit_Y6op_rem_i137_V4xrem=L4ieee_Q11numeric_bit_Y6resize_i326 (L4ieee_Q11numeric_bit_Y6op_rem_i131 (L4ieee_Q11numeric_bit_Y6op_rem_i137_C1l,L4ieee_Q11numeric_bit_Y6op_rem_i137_V2xr),L4ieee_Q11numeric_bit_Y6op_rem_i137_V4xrem.info->length);
1191 if(((L4ieee_Q11numeric_bit_Y6op_rem_i137_C8r_length>L4ieee_Q11numeric_bit_Y6op_rem_i137_C1l.info->length)&&L4ieee_Q11numeric_bit_Y5op_ne_i257 (array_alias<L4ieee_Q11numeric_bit_T8unsigned >(new array_info((&L4ieee_Q11numeric_bit_I8unsigned_INFO)->element_type,(&L4ieee_Q11numeric_bit_I8unsigned_INFO)->index_type,(L4ieee_Q11numeric_bit_Y6op_rem_i137_C8r_length-1),downto,L4ieee_Q11numeric_bit_Y6op_rem_i137_C1l.info->length,0),&L4ieee_Q11numeric_bit_Y6op_rem_i137_V4xrem[(L4ieee_Q11numeric_bit_Y6op_rem_i137_C8r_length-1)]),L4ieee_Q11numeric_bit_T8unsigned(new array_info((&L4ieee_Q11numeric_bit_I8unsigned_INFO)->element_type,(&L4ieee_Q11numeric_bit_I8unsigned_INFO)->index_type,(L4ieee_Q11numeric_bit_Y6op_rem_i137_C8r_length-1),downto,L4ieee_Q11numeric_bit_Y6op_rem_i137_C1l.info->length,0),enumeration(0))))) {
1192 if(!enumeration(0))
1193 report(array_alias<L3std_Q8standard_T6string >(new array_info((&L3std_Q8standard_I6string_INFO)->element_type,(&L3std_Q8standard_I6string_INFO)->index_type,1,to,1+39,0),L4ieee_W11numeric_bit_itn25_lit),enumeration(1));
1194 }
1195 return array_alias<L4ieee_Q11numeric_bit_T8unsigned >((&L4ieee_Q11numeric_bit_I8unsigned_INFO),L4ieee_Q11numeric_bit_Y6resize_i326 (L4ieee_Q11numeric_bit_Y6op_rem_i137_V4xrem,L4ieee_Q11numeric_bit_Y6op_rem_i137_C1l.info->length));
1196 }
1197 enumeration L4ieee_W11numeric_bit_itn26_lit[]={78,85,77,69,82,73,67,95,66,73,84,46,34,34,114,101,109,34,34,58,32,82,101,109,97,105,110,100,101,114,32,84,114,117,110,99,97,116,101,100};
1198 /* Implementation of subprogram :ieee:numeric_bit:"rem" */
L4ieee_Q11numeric_bit_Y6op_rem_i140(const integer L4ieee_Q11numeric_bit_Y6op_rem_i140_C1l,const L4ieee_Q11numeric_bit_T8unsigned & L4ieee_Q11numeric_bit_Y6op_rem_i140_C1r)1199 L4ieee_Q11numeric_bit_T8unsigned L4ieee_Q11numeric_bit_Y6op_rem_i140(const integer L4ieee_Q11numeric_bit_Y6op_rem_i140_C1l,const L4ieee_Q11numeric_bit_T8unsigned &L4ieee_Q11numeric_bit_Y6op_rem_i140_C1r)
1200 {
1201 integer L4ieee_Q11numeric_bit_Y6op_rem_i140_C8l_length;
1202 L4ieee_Q11numeric_bit_T8unsigned L4ieee_Q11numeric_bit_Y6op_rem_i140_V4xrem,L4ieee_Q11numeric_bit_Y6op_rem_i140_V2xl;
1203 L4ieee_Q11numeric_bit_Y6op_rem_i140_C8l_length=L4ieee_W11numeric_bit_Y3max_i9 (L4ieee_W11numeric_bit_Y17unsigned_num_bits_i19 (L4ieee_Q11numeric_bit_Y6op_rem_i140_C1l),L4ieee_Q11numeric_bit_Y6op_rem_i140_C1r.info->length);
1204 L4ieee_Q11numeric_bit_Y6op_rem_i140_V4xrem.init((new array_info((&L4ieee_Q11numeric_bit_I8unsigned_INFO)->element_type,(&L4ieee_Q11numeric_bit_I8unsigned_INFO)->index_type,(L4ieee_Q11numeric_bit_Y6op_rem_i140_C8l_length-1),downto,0,0)),enumeration(0));
1205 L4ieee_Q11numeric_bit_Y6op_rem_i140_V2xl.init((new array_info((&L4ieee_Q11numeric_bit_I8unsigned_INFO)->element_type,(&L4ieee_Q11numeric_bit_I8unsigned_INFO)->index_type,(L4ieee_Q11numeric_bit_Y6op_rem_i140_C8l_length-1),downto,0,0)),enumeration(0));
1206 if((L4ieee_Q11numeric_bit_Y6op_rem_i140_C1r.info->length<1)) {
1207 return array_alias<L4ieee_Q11numeric_bit_T8unsigned >((&L4ieee_Q11numeric_bit_I8unsigned_INFO),L4ieee_W11numeric_bit_C3nau);
1208 }
1209 L4ieee_Q11numeric_bit_Y6op_rem_i140_V2xl=L4ieee_Q11numeric_bit_Y11to_unsigned_i333 (L4ieee_Q11numeric_bit_Y6op_rem_i140_C1l,L4ieee_Q11numeric_bit_Y6op_rem_i140_C8l_length);
1210 L4ieee_Q11numeric_bit_Y6op_rem_i140_V4xrem=L4ieee_Q11numeric_bit_Y6resize_i326 (L4ieee_Q11numeric_bit_Y6op_rem_i131 (L4ieee_Q11numeric_bit_Y6op_rem_i140_V2xl,L4ieee_Q11numeric_bit_Y6op_rem_i140_C1r),L4ieee_Q11numeric_bit_Y6op_rem_i140_V4xrem.info->length);
1211 if(((L4ieee_Q11numeric_bit_Y6op_rem_i140_C8l_length>L4ieee_Q11numeric_bit_Y6op_rem_i140_C1r.info->length)&&L4ieee_Q11numeric_bit_Y5op_ne_i257 (array_alias<L4ieee_Q11numeric_bit_T8unsigned >(new array_info((&L4ieee_Q11numeric_bit_I8unsigned_INFO)->element_type,(&L4ieee_Q11numeric_bit_I8unsigned_INFO)->index_type,(L4ieee_Q11numeric_bit_Y6op_rem_i140_C8l_length-1),downto,L4ieee_Q11numeric_bit_Y6op_rem_i140_C1r.info->length,0),&L4ieee_Q11numeric_bit_Y6op_rem_i140_V4xrem[(L4ieee_Q11numeric_bit_Y6op_rem_i140_C8l_length-1)]),L4ieee_Q11numeric_bit_T8unsigned(new array_info((&L4ieee_Q11numeric_bit_I8unsigned_INFO)->element_type,(&L4ieee_Q11numeric_bit_I8unsigned_INFO)->index_type,(L4ieee_Q11numeric_bit_Y6op_rem_i140_C8l_length-1),downto,L4ieee_Q11numeric_bit_Y6op_rem_i140_C1r.info->length,0),enumeration(0))))) {
1212 if(!enumeration(0))
1213 report(array_alias<L3std_Q8standard_T6string >(new array_info((&L3std_Q8standard_I6string_INFO)->element_type,(&L3std_Q8standard_I6string_INFO)->index_type,1,to,1+39,0),L4ieee_W11numeric_bit_itn26_lit),enumeration(1));
1214 }
1215 return array_alias<L4ieee_Q11numeric_bit_T8unsigned >((&L4ieee_Q11numeric_bit_I8unsigned_INFO),L4ieee_Q11numeric_bit_Y6resize_i326 (L4ieee_Q11numeric_bit_Y6op_rem_i140_V4xrem,L4ieee_Q11numeric_bit_Y6op_rem_i140_C1r.info->length));
1216 }
1217 enumeration L4ieee_W11numeric_bit_itn27_lit[]={78,85,77,69,82,73,67,95,66,73,84,46,34,34,114,101,109,34,34,58,32,82,101,109,97,105,110,100,101,114,32,84,114,117,110,99,97,116,101,100};
1218 /* Implementation of subprogram :ieee:numeric_bit:"rem" */
L4ieee_Q11numeric_bit_Y6op_rem_i143(const L4ieee_Q11numeric_bit_T6signed & L4ieee_Q11numeric_bit_Y6op_rem_i143_C1l,const integer L4ieee_Q11numeric_bit_Y6op_rem_i143_C1r)1219 L4ieee_Q11numeric_bit_T6signed L4ieee_Q11numeric_bit_Y6op_rem_i143(const L4ieee_Q11numeric_bit_T6signed &L4ieee_Q11numeric_bit_Y6op_rem_i143_C1l,const integer L4ieee_Q11numeric_bit_Y6op_rem_i143_C1r)
1220 {
1221 integer L4ieee_Q11numeric_bit_Y6op_rem_i143_C8r_length;
1222 L4ieee_Q11numeric_bit_T6signed L4ieee_Q11numeric_bit_Y6op_rem_i143_V4xrem,L4ieee_Q11numeric_bit_Y6op_rem_i143_V2xr;
1223 L4ieee_Q11numeric_bit_Y6op_rem_i143_C8r_length=L4ieee_W11numeric_bit_Y3max_i9 (L4ieee_Q11numeric_bit_Y6op_rem_i143_C1l.info->length,L4ieee_W11numeric_bit_Y15signed_num_bits_i14 (L4ieee_Q11numeric_bit_Y6op_rem_i143_C1r));
1224 L4ieee_Q11numeric_bit_Y6op_rem_i143_V4xrem.init((new array_info((&L4ieee_Q11numeric_bit_I6signed_INFO)->element_type,(&L4ieee_Q11numeric_bit_I6signed_INFO)->index_type,(L4ieee_Q11numeric_bit_Y6op_rem_i143_C8r_length-1),downto,0,0)),enumeration(0));
1225 L4ieee_Q11numeric_bit_Y6op_rem_i143_V2xr.init((new array_info((&L4ieee_Q11numeric_bit_I6signed_INFO)->element_type,(&L4ieee_Q11numeric_bit_I6signed_INFO)->index_type,(L4ieee_Q11numeric_bit_Y6op_rem_i143_C8r_length-1),downto,0,0)),enumeration(0));
1226 if((L4ieee_Q11numeric_bit_Y6op_rem_i143_C1l.info->length<1)) {
1227 return array_alias<L4ieee_Q11numeric_bit_T6signed >((&L4ieee_Q11numeric_bit_I6signed_INFO),L4ieee_W11numeric_bit_C3nas);
1228 }
1229 L4ieee_Q11numeric_bit_Y6op_rem_i143_V2xr=L4ieee_Q11numeric_bit_Y9to_signed_i336 (L4ieee_Q11numeric_bit_Y6op_rem_i143_C1r,L4ieee_Q11numeric_bit_Y6op_rem_i143_C8r_length);
1230 L4ieee_Q11numeric_bit_Y6op_rem_i143_V4xrem=L4ieee_Q11numeric_bit_Y6resize_i323 (L4ieee_Q11numeric_bit_Y6op_rem_i134 (L4ieee_Q11numeric_bit_Y6op_rem_i143_C1l,L4ieee_Q11numeric_bit_Y6op_rem_i143_V2xr),L4ieee_Q11numeric_bit_Y6op_rem_i143_V4xrem.info->length);
1231 if(((L4ieee_Q11numeric_bit_Y6op_rem_i143_C8r_length>L4ieee_Q11numeric_bit_Y6op_rem_i143_C1l.info->length)&&L4ieee_Q11numeric_bit_Y5op_ne_i260 (array_alias<L4ieee_Q11numeric_bit_T6signed >(new array_info((&L4ieee_Q11numeric_bit_I6signed_INFO)->element_type,(&L4ieee_Q11numeric_bit_I6signed_INFO)->index_type,(L4ieee_Q11numeric_bit_Y6op_rem_i143_C8r_length-1),downto,L4ieee_Q11numeric_bit_Y6op_rem_i143_C1l.info->length,0),&L4ieee_Q11numeric_bit_Y6op_rem_i143_V4xrem[(L4ieee_Q11numeric_bit_Y6op_rem_i143_C8r_length-1)]),L4ieee_Q11numeric_bit_T6signed(new array_info((&L4ieee_Q11numeric_bit_I6signed_INFO)->element_type,(&L4ieee_Q11numeric_bit_I6signed_INFO)->index_type,(L4ieee_Q11numeric_bit_Y6op_rem_i143_C8r_length-1),downto,L4ieee_Q11numeric_bit_Y6op_rem_i143_C1l.info->length,0),L4ieee_Q11numeric_bit_Y6op_rem_i143_V4xrem[(L4ieee_Q11numeric_bit_Y6op_rem_i143_C1l.info->length-1)])))) {
1232 if(!enumeration(0))
1233 report(array_alias<L3std_Q8standard_T6string >(new array_info((&L3std_Q8standard_I6string_INFO)->element_type,(&L3std_Q8standard_I6string_INFO)->index_type,1,to,1+39,0),L4ieee_W11numeric_bit_itn27_lit),enumeration(1));
1234 }
1235 return array_alias<L4ieee_Q11numeric_bit_T6signed >((&L4ieee_Q11numeric_bit_I6signed_INFO),L4ieee_Q11numeric_bit_Y6resize_i323 (L4ieee_Q11numeric_bit_Y6op_rem_i143_V4xrem,L4ieee_Q11numeric_bit_Y6op_rem_i143_C1l.info->length));
1236 }
1237 enumeration L4ieee_W11numeric_bit_itn28_lit[]={78,85,77,69,82,73,67,95,66,73,84,46,34,34,114,101,109,34,34,58,32,82,101,109,97,105,110,100,101,114,32,84,114,117,110,99,97,116,101,100};
1238 /* Implementation of subprogram :ieee:numeric_bit:"rem" */
L4ieee_Q11numeric_bit_Y6op_rem_i146(const integer L4ieee_Q11numeric_bit_Y6op_rem_i146_C1l,const L4ieee_Q11numeric_bit_T6signed & L4ieee_Q11numeric_bit_Y6op_rem_i146_C1r)1239 L4ieee_Q11numeric_bit_T6signed L4ieee_Q11numeric_bit_Y6op_rem_i146(const integer L4ieee_Q11numeric_bit_Y6op_rem_i146_C1l,const L4ieee_Q11numeric_bit_T6signed &L4ieee_Q11numeric_bit_Y6op_rem_i146_C1r)
1240 {
1241 integer L4ieee_Q11numeric_bit_Y6op_rem_i146_C8l_length;
1242 L4ieee_Q11numeric_bit_T6signed L4ieee_Q11numeric_bit_Y6op_rem_i146_V4xrem,L4ieee_Q11numeric_bit_Y6op_rem_i146_V2xl;
1243 L4ieee_Q11numeric_bit_Y6op_rem_i146_C8l_length=L4ieee_W11numeric_bit_Y3max_i9 (L4ieee_W11numeric_bit_Y15signed_num_bits_i14 (L4ieee_Q11numeric_bit_Y6op_rem_i146_C1l),L4ieee_Q11numeric_bit_Y6op_rem_i146_C1r.info->length);
1244 L4ieee_Q11numeric_bit_Y6op_rem_i146_V4xrem.init((new array_info((&L4ieee_Q11numeric_bit_I6signed_INFO)->element_type,(&L4ieee_Q11numeric_bit_I6signed_INFO)->index_type,(L4ieee_Q11numeric_bit_Y6op_rem_i146_C8l_length-1),downto,0,0)),enumeration(0));
1245 L4ieee_Q11numeric_bit_Y6op_rem_i146_V2xl.init((new array_info((&L4ieee_Q11numeric_bit_I6signed_INFO)->element_type,(&L4ieee_Q11numeric_bit_I6signed_INFO)->index_type,(L4ieee_Q11numeric_bit_Y6op_rem_i146_C8l_length-1),downto,0,0)),enumeration(0));
1246 if((L4ieee_Q11numeric_bit_Y6op_rem_i146_C1r.info->length<1)) {
1247 return array_alias<L4ieee_Q11numeric_bit_T6signed >((&L4ieee_Q11numeric_bit_I6signed_INFO),L4ieee_W11numeric_bit_C3nas);
1248 }
1249 L4ieee_Q11numeric_bit_Y6op_rem_i146_V2xl=L4ieee_Q11numeric_bit_Y9to_signed_i336 (L4ieee_Q11numeric_bit_Y6op_rem_i146_C1l,L4ieee_Q11numeric_bit_Y6op_rem_i146_C8l_length);
1250 L4ieee_Q11numeric_bit_Y6op_rem_i146_V4xrem=L4ieee_Q11numeric_bit_Y6resize_i323 (L4ieee_Q11numeric_bit_Y6op_rem_i134 (L4ieee_Q11numeric_bit_Y6op_rem_i146_V2xl,L4ieee_Q11numeric_bit_Y6op_rem_i146_C1r),L4ieee_Q11numeric_bit_Y6op_rem_i146_V4xrem.info->length);
1251 if(((L4ieee_Q11numeric_bit_Y6op_rem_i146_C8l_length>L4ieee_Q11numeric_bit_Y6op_rem_i146_C1r.info->length)&&L4ieee_Q11numeric_bit_Y5op_ne_i260 (array_alias<L4ieee_Q11numeric_bit_T6signed >(new array_info((&L4ieee_Q11numeric_bit_I6signed_INFO)->element_type,(&L4ieee_Q11numeric_bit_I6signed_INFO)->index_type,(L4ieee_Q11numeric_bit_Y6op_rem_i146_C8l_length-1),downto,L4ieee_Q11numeric_bit_Y6op_rem_i146_C1r.info->length,0),&L4ieee_Q11numeric_bit_Y6op_rem_i146_V4xrem[(L4ieee_Q11numeric_bit_Y6op_rem_i146_C8l_length-1)]),L4ieee_Q11numeric_bit_T6signed(new array_info((&L4ieee_Q11numeric_bit_I6signed_INFO)->element_type,(&L4ieee_Q11numeric_bit_I6signed_INFO)->index_type,(L4ieee_Q11numeric_bit_Y6op_rem_i146_C8l_length-1),downto,L4ieee_Q11numeric_bit_Y6op_rem_i146_C1r.info->length,0),L4ieee_Q11numeric_bit_Y6op_rem_i146_V4xrem[(L4ieee_Q11numeric_bit_Y6op_rem_i146_C1r.info->length-1)])))) {
1252 if(!enumeration(0))
1253 report(array_alias<L3std_Q8standard_T6string >(new array_info((&L3std_Q8standard_I6string_INFO)->element_type,(&L3std_Q8standard_I6string_INFO)->index_type,1,to,1+39,0),L4ieee_W11numeric_bit_itn28_lit),enumeration(1));
1254 }
1255 return array_alias<L4ieee_Q11numeric_bit_T6signed >((&L4ieee_Q11numeric_bit_I6signed_INFO),L4ieee_Q11numeric_bit_Y6resize_i323 (L4ieee_Q11numeric_bit_Y6op_rem_i146_V4xrem,L4ieee_Q11numeric_bit_Y6op_rem_i146_C1r.info->length));
1256 }
1257 /* Implementation of subprogram :ieee:numeric_bit:"mod" */
L4ieee_Q11numeric_bit_Y6op_mod_i149(const L4ieee_Q11numeric_bit_T8unsigned & L4ieee_Q11numeric_bit_Y6op_mod_i149_C1l,const L4ieee_Q11numeric_bit_T8unsigned & L4ieee_Q11numeric_bit_Y6op_mod_i149_C1r)1258 L4ieee_Q11numeric_bit_T8unsigned L4ieee_Q11numeric_bit_Y6op_mod_i149(const L4ieee_Q11numeric_bit_T8unsigned &L4ieee_Q11numeric_bit_Y6op_mod_i149_C1l,const L4ieee_Q11numeric_bit_T8unsigned &L4ieee_Q11numeric_bit_Y6op_mod_i149_C1r)
1259 {
1260 L4ieee_Q11numeric_bit_T8unsigned L4ieee_Q11numeric_bit_Y6op_mod_i149_V5fquot,L4ieee_Q11numeric_bit_Y6op_mod_i149_V7fremain;
1261 L4ieee_Q11numeric_bit_Y6op_mod_i149_V5fquot.init((new array_info((&L4ieee_Q11numeric_bit_I8unsigned_INFO)->element_type,(&L4ieee_Q11numeric_bit_I8unsigned_INFO)->index_type,(L4ieee_Q11numeric_bit_Y6op_mod_i149_C1l.info->length-1),downto,0,0)),enumeration(0));
1262 L4ieee_Q11numeric_bit_Y6op_mod_i149_V7fremain.init((new array_info((&L4ieee_Q11numeric_bit_I8unsigned_INFO)->element_type,(&L4ieee_Q11numeric_bit_I8unsigned_INFO)->index_type,(L4ieee_Q11numeric_bit_Y6op_mod_i149_C1r.info->length-1),downto,0,0)),enumeration(0));
1263 if(((L4ieee_Q11numeric_bit_Y6op_mod_i149_C1l.info->length<1)||(L4ieee_Q11numeric_bit_Y6op_mod_i149_C1r.info->length<1))) {
1264 return array_alias<L4ieee_Q11numeric_bit_T8unsigned >((&L4ieee_Q11numeric_bit_I8unsigned_INFO),L4ieee_W11numeric_bit_C3nau);
1265 }
1266 L4ieee_W11numeric_bit_X6divmod_i49 (L4ieee_Q11numeric_bit_Y6op_mod_i149_C1l,L4ieee_Q11numeric_bit_Y6op_mod_i149_C1r,L4ieee_Q11numeric_bit_Y6op_mod_i149_V5fquot,L4ieee_Q11numeric_bit_Y6op_mod_i149_V7fremain);
1267 return array_alias<L4ieee_Q11numeric_bit_T8unsigned >((&L4ieee_Q11numeric_bit_I8unsigned_INFO),L4ieee_Q11numeric_bit_Y6op_mod_i149_V7fremain);
1268 }
1269 enumeration L4ieee_W11numeric_bit_itn29_lit[]={0};
1270 enumeration L4ieee_W11numeric_bit_itn30_lit[]={0};
1271 enumeration L4ieee_W11numeric_bit_itn31_lit[]={0};
1272 /* Implementation of subprogram :ieee:numeric_bit:"mod" */
L4ieee_Q11numeric_bit_Y6op_mod_i152(const L4ieee_Q11numeric_bit_T6signed & L4ieee_Q11numeric_bit_Y6op_mod_i152_C1l,const L4ieee_Q11numeric_bit_T6signed & L4ieee_Q11numeric_bit_Y6op_mod_i152_C1r)1273 L4ieee_Q11numeric_bit_T6signed L4ieee_Q11numeric_bit_Y6op_mod_i152(const L4ieee_Q11numeric_bit_T6signed &L4ieee_Q11numeric_bit_Y6op_mod_i152_C1l,const L4ieee_Q11numeric_bit_T6signed &L4ieee_Q11numeric_bit_Y6op_mod_i152_C1r)
1274 {
1275 L4ieee_Q11numeric_bit_T8unsigned L4ieee_Q11numeric_bit_Y6op_mod_i152_V5fquot,L4ieee_Q11numeric_bit_Y6op_mod_i152_V7fremain,L4ieee_Q11numeric_bit_Y6op_mod_i152_V4xnum,L4ieee_Q11numeric_bit_Y6op_mod_i152_V6xdenom;
1276 enumeration L4ieee_Q11numeric_bit_Y6op_mod_i152_V4rneg;
1277 L4ieee_Q11numeric_bit_Y6op_mod_i152_V5fquot.init((new array_info((&L4ieee_Q11numeric_bit_I8unsigned_INFO)->element_type,(&L4ieee_Q11numeric_bit_I8unsigned_INFO)->index_type,(L4ieee_Q11numeric_bit_Y6op_mod_i152_C1l.info->length-1),downto,0,0)),enumeration(0));
1278 L4ieee_Q11numeric_bit_Y6op_mod_i152_V7fremain.init((new array_info((&L4ieee_Q11numeric_bit_I8unsigned_INFO)->element_type,(&L4ieee_Q11numeric_bit_I8unsigned_INFO)->index_type,(L4ieee_Q11numeric_bit_Y6op_mod_i152_C1r.info->length-1),downto,0,0)),enumeration(0));
1279 L4ieee_Q11numeric_bit_Y6op_mod_i152_V4xnum.init((new array_info((&L4ieee_Q11numeric_bit_I8unsigned_INFO)->element_type,(&L4ieee_Q11numeric_bit_I8unsigned_INFO)->index_type,(L4ieee_Q11numeric_bit_Y6op_mod_i152_C1l.info->length-1),downto,0,0)),enumeration(0));
1280 L4ieee_Q11numeric_bit_Y6op_mod_i152_V6xdenom.init((new array_info((&L4ieee_Q11numeric_bit_I8unsigned_INFO)->element_type,(&L4ieee_Q11numeric_bit_I8unsigned_INFO)->index_type,(L4ieee_Q11numeric_bit_Y6op_mod_i152_C1r.info->length-1),downto,0,0)),enumeration(0));
1281 L4ieee_Q11numeric_bit_Y6op_mod_i152_V4rneg=enumeration(0);
1282 if(((L4ieee_Q11numeric_bit_Y6op_mod_i152_C1l.info->length<1)||(L4ieee_Q11numeric_bit_Y6op_mod_i152_C1r.info->length<1))) {
1283 return array_alias<L4ieee_Q11numeric_bit_T6signed >((&L4ieee_Q11numeric_bit_I6signed_INFO),L4ieee_W11numeric_bit_C3nas);
1284 }
1285 if((L4ieee_Q11numeric_bit_Y6op_mod_i152_C1l[L4ieee_Q11numeric_bit_Y6op_mod_i152_C1l.info->left_bound]==enumeration(1))) {
1286 L4ieee_Q11numeric_bit_Y6op_mod_i152_V4xnum=array_alias<L4ieee_Q11numeric_bit_T8unsigned >((&L4ieee_Q11numeric_bit_I8unsigned_INFO),L4ieee_Q11numeric_bit_Y8op_minus_i56 (L4ieee_Q11numeric_bit_Y6op_mod_i152_C1l));
1287 } else {
1288 L4ieee_Q11numeric_bit_Y6op_mod_i152_V4xnum=array_alias<L4ieee_Q11numeric_bit_T8unsigned >((&L4ieee_Q11numeric_bit_I8unsigned_INFO),L4ieee_Q11numeric_bit_Y6op_mod_i152_C1l);
1289 }
1290 if((L4ieee_Q11numeric_bit_Y6op_mod_i152_C1r[L4ieee_Q11numeric_bit_Y6op_mod_i152_C1r.info->left_bound]==enumeration(1))) {
1291 L4ieee_Q11numeric_bit_Y6op_mod_i152_V6xdenom=array_alias<L4ieee_Q11numeric_bit_T8unsigned >((&L4ieee_Q11numeric_bit_I8unsigned_INFO),L4ieee_Q11numeric_bit_Y8op_minus_i56 (L4ieee_Q11numeric_bit_Y6op_mod_i152_C1r));
1292 L4ieee_Q11numeric_bit_Y6op_mod_i152_V4rneg=enumeration(1);
1293 } else {
1294 L4ieee_Q11numeric_bit_Y6op_mod_i152_V6xdenom=array_alias<L4ieee_Q11numeric_bit_T8unsigned >((&L4ieee_Q11numeric_bit_I8unsigned_INFO),L4ieee_Q11numeric_bit_Y6op_mod_i152_C1r);
1295 }
1296 L4ieee_W11numeric_bit_X6divmod_i49 (L4ieee_Q11numeric_bit_Y6op_mod_i152_V4xnum,L4ieee_Q11numeric_bit_Y6op_mod_i152_V6xdenom,L4ieee_Q11numeric_bit_Y6op_mod_i152_V5fquot,L4ieee_Q11numeric_bit_Y6op_mod_i152_V7fremain);
1297 if((L4ieee_Q11numeric_bit_Y6op_mod_i152_V4rneg&&(L4ieee_Q11numeric_bit_Y6op_mod_i152_C1l[L4ieee_Q11numeric_bit_Y6op_mod_i152_C1l.info->left_bound]==enumeration(1)))) {
1298 L4ieee_Q11numeric_bit_Y6op_mod_i152_V7fremain=L4ieee_Q11numeric_bit_Y8op_minus_i77 (array_alias<L4ieee_Q11numeric_bit_T8unsigned >(new array_info((&L4ieee_Q11numeric_bit_I8unsigned_INFO)->element_type,(&L4ieee_Q11numeric_bit_I8unsigned_INFO)->index_type,0,to,0+0,0),L4ieee_W11numeric_bit_itn29_lit),L4ieee_Q11numeric_bit_Y6op_mod_i152_V7fremain);
1299 } else {
1300 if((L4ieee_Q11numeric_bit_Y6op_mod_i152_V4rneg&&L4ieee_Q11numeric_bit_Y5op_ne_i257 (L4ieee_Q11numeric_bit_Y6op_mod_i152_V7fremain,array_alias<L4ieee_Q11numeric_bit_T8unsigned >(new array_info((&L4ieee_Q11numeric_bit_I8unsigned_INFO)->element_type,(&L4ieee_Q11numeric_bit_I8unsigned_INFO)->index_type,0,to,0+0,0),L4ieee_W11numeric_bit_itn30_lit)))) {
1301 L4ieee_Q11numeric_bit_Y6op_mod_i152_V7fremain=L4ieee_Q11numeric_bit_Y8op_minus_i77 (L4ieee_Q11numeric_bit_Y6op_mod_i152_V7fremain,L4ieee_Q11numeric_bit_Y6op_mod_i152_V6xdenom);
1302 } else {
1303 if(((L4ieee_Q11numeric_bit_Y6op_mod_i152_C1l[L4ieee_Q11numeric_bit_Y6op_mod_i152_C1l.info->left_bound]==enumeration(1))&&L4ieee_Q11numeric_bit_Y5op_ne_i257 (L4ieee_Q11numeric_bit_Y6op_mod_i152_V7fremain,array_alias<L4ieee_Q11numeric_bit_T8unsigned >(new array_info((&L4ieee_Q11numeric_bit_I8unsigned_INFO)->element_type,(&L4ieee_Q11numeric_bit_I8unsigned_INFO)->index_type,0,to,0+0,0),L4ieee_W11numeric_bit_itn31_lit)))) {
1304 L4ieee_Q11numeric_bit_Y6op_mod_i152_V7fremain=L4ieee_Q11numeric_bit_Y8op_minus_i77 (L4ieee_Q11numeric_bit_Y6op_mod_i152_V6xdenom,L4ieee_Q11numeric_bit_Y6op_mod_i152_V7fremain);
1305 }
1306 }
1307 }
1308 return array_alias<L4ieee_Q11numeric_bit_T6signed >((&L4ieee_Q11numeric_bit_I6signed_INFO),array_alias<L4ieee_Q11numeric_bit_T6signed >((&L4ieee_Q11numeric_bit_I6signed_INFO),L4ieee_Q11numeric_bit_Y6op_mod_i152_V7fremain));
1309 }
1310 enumeration L4ieee_W11numeric_bit_itn32_lit[]={78,85,77,69,82,73,67,95,66,73,84,46,34,34,109,111,100,34,34,58,32,109,111,100,117,108,117,115,32,84,114,117,110,99,97,116,101,100};
1311 /* Implementation of subprogram :ieee:numeric_bit:"mod" */
L4ieee_Q11numeric_bit_Y6op_mod_i155(const L4ieee_Q11numeric_bit_T8unsigned & L4ieee_Q11numeric_bit_Y6op_mod_i155_C1l,const integer L4ieee_Q11numeric_bit_Y6op_mod_i155_C1r)1312 L4ieee_Q11numeric_bit_T8unsigned L4ieee_Q11numeric_bit_Y6op_mod_i155(const L4ieee_Q11numeric_bit_T8unsigned &L4ieee_Q11numeric_bit_Y6op_mod_i155_C1l,const integer L4ieee_Q11numeric_bit_Y6op_mod_i155_C1r)
1313 {
1314 integer L4ieee_Q11numeric_bit_Y6op_mod_i155_C8r_length;
1315 L4ieee_Q11numeric_bit_T8unsigned L4ieee_Q11numeric_bit_Y6op_mod_i155_V4xrem,L4ieee_Q11numeric_bit_Y6op_mod_i155_V2xr;
1316 L4ieee_Q11numeric_bit_Y6op_mod_i155_C8r_length=L4ieee_W11numeric_bit_Y3max_i9 (L4ieee_Q11numeric_bit_Y6op_mod_i155_C1l.info->length,L4ieee_W11numeric_bit_Y17unsigned_num_bits_i19 (L4ieee_Q11numeric_bit_Y6op_mod_i155_C1r));
1317 L4ieee_Q11numeric_bit_Y6op_mod_i155_V4xrem.init((new array_info((&L4ieee_Q11numeric_bit_I8unsigned_INFO)->element_type,(&L4ieee_Q11numeric_bit_I8unsigned_INFO)->index_type,(L4ieee_Q11numeric_bit_Y6op_mod_i155_C8r_length-1),downto,0,0)),enumeration(0));
1318 L4ieee_Q11numeric_bit_Y6op_mod_i155_V2xr.init((new array_info((&L4ieee_Q11numeric_bit_I8unsigned_INFO)->element_type,(&L4ieee_Q11numeric_bit_I8unsigned_INFO)->index_type,(L4ieee_Q11numeric_bit_Y6op_mod_i155_C8r_length-1),downto,0,0)),enumeration(0));
1319 if((L4ieee_Q11numeric_bit_Y6op_mod_i155_C1l.info->length<1)) {
1320 return array_alias<L4ieee_Q11numeric_bit_T8unsigned >((&L4ieee_Q11numeric_bit_I8unsigned_INFO),L4ieee_W11numeric_bit_C3nau);
1321 }
1322 L4ieee_Q11numeric_bit_Y6op_mod_i155_V2xr=L4ieee_Q11numeric_bit_Y11to_unsigned_i333 (L4ieee_Q11numeric_bit_Y6op_mod_i155_C1r,L4ieee_Q11numeric_bit_Y6op_mod_i155_C8r_length);
1323 L4ieee_Q11numeric_bit_Y6op_mod_i155_V4xrem=L4ieee_Q11numeric_bit_Y6resize_i326 (L4ieee_Q11numeric_bit_Y6op_mod_i149 (L4ieee_Q11numeric_bit_Y6op_mod_i155_C1l,L4ieee_Q11numeric_bit_Y6op_mod_i155_V2xr),L4ieee_Q11numeric_bit_Y6op_mod_i155_V4xrem.info->length);
1324 if(((L4ieee_Q11numeric_bit_Y6op_mod_i155_C8r_length>L4ieee_Q11numeric_bit_Y6op_mod_i155_C1l.info->length)&&L4ieee_Q11numeric_bit_Y5op_ne_i257 (array_alias<L4ieee_Q11numeric_bit_T8unsigned >(new array_info((&L4ieee_Q11numeric_bit_I8unsigned_INFO)->element_type,(&L4ieee_Q11numeric_bit_I8unsigned_INFO)->index_type,(L4ieee_Q11numeric_bit_Y6op_mod_i155_C8r_length-1),downto,L4ieee_Q11numeric_bit_Y6op_mod_i155_C1l.info->length,0),&L4ieee_Q11numeric_bit_Y6op_mod_i155_V4xrem[(L4ieee_Q11numeric_bit_Y6op_mod_i155_C8r_length-1)]),L4ieee_Q11numeric_bit_T8unsigned(new array_info((&L4ieee_Q11numeric_bit_I8unsigned_INFO)->element_type,(&L4ieee_Q11numeric_bit_I8unsigned_INFO)->index_type,(L4ieee_Q11numeric_bit_Y6op_mod_i155_C8r_length-1),downto,L4ieee_Q11numeric_bit_Y6op_mod_i155_C1l.info->length,0),enumeration(0))))) {
1325 if(!enumeration(0))
1326 report(array_alias<L3std_Q8standard_T6string >(new array_info((&L3std_Q8standard_I6string_INFO)->element_type,(&L3std_Q8standard_I6string_INFO)->index_type,1,to,1+37,0),L4ieee_W11numeric_bit_itn32_lit),enumeration(1));
1327 }
1328 return array_alias<L4ieee_Q11numeric_bit_T8unsigned >((&L4ieee_Q11numeric_bit_I8unsigned_INFO),L4ieee_Q11numeric_bit_Y6resize_i326 (L4ieee_Q11numeric_bit_Y6op_mod_i155_V4xrem,L4ieee_Q11numeric_bit_Y6op_mod_i155_C1l.info->length));
1329 }
1330 enumeration L4ieee_W11numeric_bit_itn33_lit[]={78,85,77,69,82,73,67,95,66,73,84,46,34,34,109,111,100,34,34,58,32,109,111,100,117,108,117,115,32,84,114,117,110,99,97,116,101,100};
1331 /* Implementation of subprogram :ieee:numeric_bit:"mod" */
L4ieee_Q11numeric_bit_Y6op_mod_i158(const integer L4ieee_Q11numeric_bit_Y6op_mod_i158_C1l,const L4ieee_Q11numeric_bit_T8unsigned & L4ieee_Q11numeric_bit_Y6op_mod_i158_C1r)1332 L4ieee_Q11numeric_bit_T8unsigned L4ieee_Q11numeric_bit_Y6op_mod_i158(const integer L4ieee_Q11numeric_bit_Y6op_mod_i158_C1l,const L4ieee_Q11numeric_bit_T8unsigned &L4ieee_Q11numeric_bit_Y6op_mod_i158_C1r)
1333 {
1334 integer L4ieee_Q11numeric_bit_Y6op_mod_i158_C8l_length;
1335 L4ieee_Q11numeric_bit_T8unsigned L4ieee_Q11numeric_bit_Y6op_mod_i158_V4xrem,L4ieee_Q11numeric_bit_Y6op_mod_i158_V2xl;
1336 L4ieee_Q11numeric_bit_Y6op_mod_i158_C8l_length=L4ieee_W11numeric_bit_Y3max_i9 (L4ieee_W11numeric_bit_Y17unsigned_num_bits_i19 (L4ieee_Q11numeric_bit_Y6op_mod_i158_C1l),L4ieee_Q11numeric_bit_Y6op_mod_i158_C1r.info->length);
1337 L4ieee_Q11numeric_bit_Y6op_mod_i158_V4xrem.init((new array_info((&L4ieee_Q11numeric_bit_I8unsigned_INFO)->element_type,(&L4ieee_Q11numeric_bit_I8unsigned_INFO)->index_type,(L4ieee_Q11numeric_bit_Y6op_mod_i158_C8l_length-1),downto,0,0)),enumeration(0));
1338 L4ieee_Q11numeric_bit_Y6op_mod_i158_V2xl.init((new array_info((&L4ieee_Q11numeric_bit_I8unsigned_INFO)->element_type,(&L4ieee_Q11numeric_bit_I8unsigned_INFO)->index_type,(L4ieee_Q11numeric_bit_Y6op_mod_i158_C8l_length-1),downto,0,0)),enumeration(0));
1339 if((L4ieee_Q11numeric_bit_Y6op_mod_i158_C1r.info->length<1)) {
1340 return array_alias<L4ieee_Q11numeric_bit_T8unsigned >((&L4ieee_Q11numeric_bit_I8unsigned_INFO),L4ieee_W11numeric_bit_C3nau);
1341 }
1342 L4ieee_Q11numeric_bit_Y6op_mod_i158_V2xl=L4ieee_Q11numeric_bit_Y11to_unsigned_i333 (L4ieee_Q11numeric_bit_Y6op_mod_i158_C1l,L4ieee_Q11numeric_bit_Y6op_mod_i158_C8l_length);
1343 L4ieee_Q11numeric_bit_Y6op_mod_i158_V4xrem=L4ieee_Q11numeric_bit_Y6resize_i326 (L4ieee_Q11numeric_bit_Y6op_mod_i149 (L4ieee_Q11numeric_bit_Y6op_mod_i158_V2xl,L4ieee_Q11numeric_bit_Y6op_mod_i158_C1r),L4ieee_Q11numeric_bit_Y6op_mod_i158_V4xrem.info->length);
1344 if(((L4ieee_Q11numeric_bit_Y6op_mod_i158_C8l_length>L4ieee_Q11numeric_bit_Y6op_mod_i158_C1r.info->length)&&L4ieee_Q11numeric_bit_Y5op_ne_i257 (array_alias<L4ieee_Q11numeric_bit_T8unsigned >(new array_info((&L4ieee_Q11numeric_bit_I8unsigned_INFO)->element_type,(&L4ieee_Q11numeric_bit_I8unsigned_INFO)->index_type,(L4ieee_Q11numeric_bit_Y6op_mod_i158_C8l_length-1),downto,L4ieee_Q11numeric_bit_Y6op_mod_i158_C1r.info->length,0),&L4ieee_Q11numeric_bit_Y6op_mod_i158_V4xrem[(L4ieee_Q11numeric_bit_Y6op_mod_i158_C8l_length-1)]),L4ieee_Q11numeric_bit_T8unsigned(new array_info((&L4ieee_Q11numeric_bit_I8unsigned_INFO)->element_type,(&L4ieee_Q11numeric_bit_I8unsigned_INFO)->index_type,(L4ieee_Q11numeric_bit_Y6op_mod_i158_C8l_length-1),downto,L4ieee_Q11numeric_bit_Y6op_mod_i158_C1r.info->length,0),enumeration(0))))) {
1345 if(!enumeration(0))
1346 report(array_alias<L3std_Q8standard_T6string >(new array_info((&L3std_Q8standard_I6string_INFO)->element_type,(&L3std_Q8standard_I6string_INFO)->index_type,1,to,1+37,0),L4ieee_W11numeric_bit_itn33_lit),enumeration(1));
1347 }
1348 return array_alias<L4ieee_Q11numeric_bit_T8unsigned >((&L4ieee_Q11numeric_bit_I8unsigned_INFO),L4ieee_Q11numeric_bit_Y6resize_i326 (L4ieee_Q11numeric_bit_Y6op_mod_i158_V4xrem,L4ieee_Q11numeric_bit_Y6op_mod_i158_C1r.info->length));
1349 }
1350 enumeration L4ieee_W11numeric_bit_itn34_lit[]={78,85,77,69,82,73,67,95,66,73,84,46,34,34,109,111,100,34,34,58,32,109,111,100,117,108,117,115,32,84,114,117,110,99,97,116,101,100};
1351 /* Implementation of subprogram :ieee:numeric_bit:"mod" */
L4ieee_Q11numeric_bit_Y6op_mod_i161(const L4ieee_Q11numeric_bit_T6signed & L4ieee_Q11numeric_bit_Y6op_mod_i161_C1l,const integer L4ieee_Q11numeric_bit_Y6op_mod_i161_C1r)1352 L4ieee_Q11numeric_bit_T6signed L4ieee_Q11numeric_bit_Y6op_mod_i161(const L4ieee_Q11numeric_bit_T6signed &L4ieee_Q11numeric_bit_Y6op_mod_i161_C1l,const integer L4ieee_Q11numeric_bit_Y6op_mod_i161_C1r)
1353 {
1354 integer L4ieee_Q11numeric_bit_Y6op_mod_i161_C8r_length;
1355 L4ieee_Q11numeric_bit_T6signed L4ieee_Q11numeric_bit_Y6op_mod_i161_V4xrem,L4ieee_Q11numeric_bit_Y6op_mod_i161_V2xr;
1356 L4ieee_Q11numeric_bit_Y6op_mod_i161_C8r_length=L4ieee_W11numeric_bit_Y3max_i9 (L4ieee_Q11numeric_bit_Y6op_mod_i161_C1l.info->length,L4ieee_W11numeric_bit_Y15signed_num_bits_i14 (L4ieee_Q11numeric_bit_Y6op_mod_i161_C1r));
1357 L4ieee_Q11numeric_bit_Y6op_mod_i161_V4xrem.init((new array_info((&L4ieee_Q11numeric_bit_I6signed_INFO)->element_type,(&L4ieee_Q11numeric_bit_I6signed_INFO)->index_type,(L4ieee_Q11numeric_bit_Y6op_mod_i161_C8r_length-1),downto,0,0)),enumeration(0));
1358 L4ieee_Q11numeric_bit_Y6op_mod_i161_V2xr.init((new array_info((&L4ieee_Q11numeric_bit_I6signed_INFO)->element_type,(&L4ieee_Q11numeric_bit_I6signed_INFO)->index_type,(L4ieee_Q11numeric_bit_Y6op_mod_i161_C8r_length-1),downto,0,0)),enumeration(0));
1359 if((L4ieee_Q11numeric_bit_Y6op_mod_i161_C1l.info->length<1)) {
1360 return array_alias<L4ieee_Q11numeric_bit_T6signed >((&L4ieee_Q11numeric_bit_I6signed_INFO),L4ieee_W11numeric_bit_C3nas);
1361 }
1362 L4ieee_Q11numeric_bit_Y6op_mod_i161_V2xr=L4ieee_Q11numeric_bit_Y9to_signed_i336 (L4ieee_Q11numeric_bit_Y6op_mod_i161_C1r,L4ieee_Q11numeric_bit_Y6op_mod_i161_C8r_length);
1363 L4ieee_Q11numeric_bit_Y6op_mod_i161_V4xrem=L4ieee_Q11numeric_bit_Y6resize_i323 (L4ieee_Q11numeric_bit_Y6op_mod_i152 (L4ieee_Q11numeric_bit_Y6op_mod_i161_C1l,L4ieee_Q11numeric_bit_Y6op_mod_i161_V2xr),L4ieee_Q11numeric_bit_Y6op_mod_i161_V4xrem.info->length);
1364 if(((L4ieee_Q11numeric_bit_Y6op_mod_i161_C8r_length>L4ieee_Q11numeric_bit_Y6op_mod_i161_C1l.info->length)&&L4ieee_Q11numeric_bit_Y5op_ne_i260 (array_alias<L4ieee_Q11numeric_bit_T6signed >(new array_info((&L4ieee_Q11numeric_bit_I6signed_INFO)->element_type,(&L4ieee_Q11numeric_bit_I6signed_INFO)->index_type,(L4ieee_Q11numeric_bit_Y6op_mod_i161_C8r_length-1),downto,L4ieee_Q11numeric_bit_Y6op_mod_i161_C1l.info->length,0),&L4ieee_Q11numeric_bit_Y6op_mod_i161_V4xrem[(L4ieee_Q11numeric_bit_Y6op_mod_i161_C8r_length-1)]),L4ieee_Q11numeric_bit_T6signed(new array_info((&L4ieee_Q11numeric_bit_I6signed_INFO)->element_type,(&L4ieee_Q11numeric_bit_I6signed_INFO)->index_type,(L4ieee_Q11numeric_bit_Y6op_mod_i161_C8r_length-1),downto,L4ieee_Q11numeric_bit_Y6op_mod_i161_C1l.info->length,0),L4ieee_Q11numeric_bit_Y6op_mod_i161_V4xrem[(L4ieee_Q11numeric_bit_Y6op_mod_i161_C1l.info->length-1)])))) {
1365 if(!enumeration(0))
1366 report(array_alias<L3std_Q8standard_T6string >(new array_info((&L3std_Q8standard_I6string_INFO)->element_type,(&L3std_Q8standard_I6string_INFO)->index_type,1,to,1+37,0),L4ieee_W11numeric_bit_itn34_lit),enumeration(1));
1367 }
1368 return array_alias<L4ieee_Q11numeric_bit_T6signed >((&L4ieee_Q11numeric_bit_I6signed_INFO),L4ieee_Q11numeric_bit_Y6resize_i323 (L4ieee_Q11numeric_bit_Y6op_mod_i161_V4xrem,L4ieee_Q11numeric_bit_Y6op_mod_i161_C1l.info->length));
1369 }
1370 enumeration L4ieee_W11numeric_bit_itn35_lit[]={78,85,77,69,82,73,67,95,66,73,84,46,34,34,109,111,100,34,34,58,32,109,111,100,117,108,117,115,32,84,114,117,110,99,97,116,101,100};
1371 /* Implementation of subprogram :ieee:numeric_bit:"mod" */
L4ieee_Q11numeric_bit_Y6op_mod_i164(const integer L4ieee_Q11numeric_bit_Y6op_mod_i164_C1l,const L4ieee_Q11numeric_bit_T6signed & L4ieee_Q11numeric_bit_Y6op_mod_i164_C1r)1372 L4ieee_Q11numeric_bit_T6signed L4ieee_Q11numeric_bit_Y6op_mod_i164(const integer L4ieee_Q11numeric_bit_Y6op_mod_i164_C1l,const L4ieee_Q11numeric_bit_T6signed &L4ieee_Q11numeric_bit_Y6op_mod_i164_C1r)
1373 {
1374 integer L4ieee_Q11numeric_bit_Y6op_mod_i164_C8l_length;
1375 L4ieee_Q11numeric_bit_T6signed L4ieee_Q11numeric_bit_Y6op_mod_i164_V4xrem,L4ieee_Q11numeric_bit_Y6op_mod_i164_V2xl;
1376 L4ieee_Q11numeric_bit_Y6op_mod_i164_C8l_length=L4ieee_W11numeric_bit_Y3max_i9 (L4ieee_W11numeric_bit_Y15signed_num_bits_i14 (L4ieee_Q11numeric_bit_Y6op_mod_i164_C1l),L4ieee_Q11numeric_bit_Y6op_mod_i164_C1r.info->length);
1377 L4ieee_Q11numeric_bit_Y6op_mod_i164_V4xrem.init((new array_info((&L4ieee_Q11numeric_bit_I6signed_INFO)->element_type,(&L4ieee_Q11numeric_bit_I6signed_INFO)->index_type,(L4ieee_Q11numeric_bit_Y6op_mod_i164_C8l_length-1),downto,0,0)),enumeration(0));
1378 L4ieee_Q11numeric_bit_Y6op_mod_i164_V2xl.init((new array_info((&L4ieee_Q11numeric_bit_I6signed_INFO)->element_type,(&L4ieee_Q11numeric_bit_I6signed_INFO)->index_type,(L4ieee_Q11numeric_bit_Y6op_mod_i164_C8l_length-1),downto,0,0)),enumeration(0));
1379 if((L4ieee_Q11numeric_bit_Y6op_mod_i164_C1r.info->length<1)) {
1380 return array_alias<L4ieee_Q11numeric_bit_T6signed >((&L4ieee_Q11numeric_bit_I6signed_INFO),L4ieee_W11numeric_bit_C3nas);
1381 }
1382 L4ieee_Q11numeric_bit_Y6op_mod_i164_V2xl=L4ieee_Q11numeric_bit_Y9to_signed_i336 (L4ieee_Q11numeric_bit_Y6op_mod_i164_C1l,L4ieee_Q11numeric_bit_Y6op_mod_i164_C8l_length);
1383 L4ieee_Q11numeric_bit_Y6op_mod_i164_V4xrem=L4ieee_Q11numeric_bit_Y6resize_i323 (L4ieee_Q11numeric_bit_Y6op_mod_i152 (L4ieee_Q11numeric_bit_Y6op_mod_i164_V2xl,L4ieee_Q11numeric_bit_Y6op_mod_i164_C1r),L4ieee_Q11numeric_bit_Y6op_mod_i164_V4xrem.info->length);
1384 if(((L4ieee_Q11numeric_bit_Y6op_mod_i164_C8l_length>L4ieee_Q11numeric_bit_Y6op_mod_i164_C1r.info->length)&&L4ieee_Q11numeric_bit_Y5op_ne_i260 (array_alias<L4ieee_Q11numeric_bit_T6signed >(new array_info((&L4ieee_Q11numeric_bit_I6signed_INFO)->element_type,(&L4ieee_Q11numeric_bit_I6signed_INFO)->index_type,(L4ieee_Q11numeric_bit_Y6op_mod_i164_C8l_length-1),downto,L4ieee_Q11numeric_bit_Y6op_mod_i164_C1r.info->length,0),&L4ieee_Q11numeric_bit_Y6op_mod_i164_V4xrem[(L4ieee_Q11numeric_bit_Y6op_mod_i164_C8l_length-1)]),L4ieee_Q11numeric_bit_T6signed(new array_info((&L4ieee_Q11numeric_bit_I6signed_INFO)->element_type,(&L4ieee_Q11numeric_bit_I6signed_INFO)->index_type,(L4ieee_Q11numeric_bit_Y6op_mod_i164_C8l_length-1),downto,L4ieee_Q11numeric_bit_Y6op_mod_i164_C1r.info->length,0),L4ieee_Q11numeric_bit_Y6op_mod_i164_V4xrem[(L4ieee_Q11numeric_bit_Y6op_mod_i164_C1r.info->length-1)])))) {
1385 if(!enumeration(0))
1386 report(array_alias<L3std_Q8standard_T6string >(new array_info((&L3std_Q8standard_I6string_INFO)->element_type,(&L3std_Q8standard_I6string_INFO)->index_type,1,to,1+37,0),L4ieee_W11numeric_bit_itn35_lit),enumeration(1));
1387 }
1388 return array_alias<L4ieee_Q11numeric_bit_T6signed >((&L4ieee_Q11numeric_bit_I6signed_INFO),L4ieee_Q11numeric_bit_Y6resize_i323 (L4ieee_Q11numeric_bit_Y6op_mod_i164_V4xrem,L4ieee_Q11numeric_bit_Y6op_mod_i164_C1r.info->length));
1389 }
1390 enumeration L4ieee_W11numeric_bit_itn36_lit[]={78,85,77,69,82,73,67,95,66,73,84,46,34,34,62,34,34,58,32,110,117,108,108,32,97,114,103,117,109,101,110,116,32,100,101,116,101,99,116,101,100,44,32,114,101,116,117,114,110,105,110,103,32,70,65,76,83,69};
1391 /* Implementation of subprogram :ieee:numeric_bit:">" */
L4ieee_Q11numeric_bit_Y5op_gt_i167(const L4ieee_Q11numeric_bit_T8unsigned & L4ieee_Q11numeric_bit_Y5op_gt_i167_C1l,const L4ieee_Q11numeric_bit_T8unsigned & L4ieee_Q11numeric_bit_Y5op_gt_i167_C1r)1392 enumeration L4ieee_Q11numeric_bit_Y5op_gt_i167(const L4ieee_Q11numeric_bit_T8unsigned &L4ieee_Q11numeric_bit_Y5op_gt_i167_C1l,const L4ieee_Q11numeric_bit_T8unsigned &L4ieee_Q11numeric_bit_Y5op_gt_i167_C1r)
1393 {
1394 integer L4ieee_Q11numeric_bit_Y5op_gt_i167_V4size;
1395 L4ieee_Q11numeric_bit_Y5op_gt_i167_V4size=L4ieee_W11numeric_bit_Y3max_i9 (L4ieee_Q11numeric_bit_Y5op_gt_i167_C1l.info->length,L4ieee_Q11numeric_bit_Y5op_gt_i167_C1r.info->length);
1396 if(((L4ieee_Q11numeric_bit_Y5op_gt_i167_C1l.info->length<1)||(L4ieee_Q11numeric_bit_Y5op_gt_i167_C1r.info->length<1))) {
1397 if(!enumeration(0))
1398 report(array_alias<L3std_Q8standard_T6string >(new array_info((&L3std_Q8standard_I6string_INFO)->element_type,(&L3std_Q8standard_I6string_INFO)->index_type,1,to,1+57,0),L4ieee_W11numeric_bit_itn36_lit),enumeration(1));
1399 return enumeration(0);
1400 }
1401 return op_not(L4ieee_W11numeric_bit_Y22unsigned_less_or_equal_i107 (L4ieee_Q11numeric_bit_Y6resize_i326 (L4ieee_Q11numeric_bit_Y5op_gt_i167_C1l,L4ieee_Q11numeric_bit_Y5op_gt_i167_V4size),L4ieee_Q11numeric_bit_Y6resize_i326 (L4ieee_Q11numeric_bit_Y5op_gt_i167_C1r,L4ieee_Q11numeric_bit_Y5op_gt_i167_V4size)));
1402 }
1403 enumeration L4ieee_W11numeric_bit_itn37_lit[]={78,85,77,69,82,73,67,95,66,73,84,46,34,34,62,34,34,58,32,110,117,108,108,32,97,114,103,117,109,101,110,116,32,100,101,116,101,99,116,101,100,44,32,114,101,116,117,114,110,105,110,103,32,70,65,76,83,69};
1404 /* Implementation of subprogram :ieee:numeric_bit:">" */
L4ieee_Q11numeric_bit_Y5op_gt_i170(const L4ieee_Q11numeric_bit_T6signed & L4ieee_Q11numeric_bit_Y5op_gt_i170_C1l,const L4ieee_Q11numeric_bit_T6signed & L4ieee_Q11numeric_bit_Y5op_gt_i170_C1r)1405 enumeration L4ieee_Q11numeric_bit_Y5op_gt_i170(const L4ieee_Q11numeric_bit_T6signed &L4ieee_Q11numeric_bit_Y5op_gt_i170_C1l,const L4ieee_Q11numeric_bit_T6signed &L4ieee_Q11numeric_bit_Y5op_gt_i170_C1r)
1406 {
1407 integer L4ieee_Q11numeric_bit_Y5op_gt_i170_V4size;
1408 L4ieee_Q11numeric_bit_Y5op_gt_i170_V4size=L4ieee_W11numeric_bit_Y3max_i9 (L4ieee_Q11numeric_bit_Y5op_gt_i170_C1l.info->length,L4ieee_Q11numeric_bit_Y5op_gt_i170_C1r.info->length);
1409 if(((L4ieee_Q11numeric_bit_Y5op_gt_i170_C1l.info->length<1)||(L4ieee_Q11numeric_bit_Y5op_gt_i170_C1r.info->length<1))) {
1410 if(!enumeration(0))
1411 report(array_alias<L3std_Q8standard_T6string >(new array_info((&L3std_Q8standard_I6string_INFO)->element_type,(&L3std_Q8standard_I6string_INFO)->index_type,1,to,1+57,0),L4ieee_W11numeric_bit_itn37_lit),enumeration(1));
1412 return enumeration(0);
1413 }
1414 return op_not(L4ieee_W11numeric_bit_Y20signed_less_or_equal_i110 (L4ieee_Q11numeric_bit_Y6resize_i323 (L4ieee_Q11numeric_bit_Y5op_gt_i170_C1l,L4ieee_Q11numeric_bit_Y5op_gt_i170_V4size),L4ieee_Q11numeric_bit_Y6resize_i323 (L4ieee_Q11numeric_bit_Y5op_gt_i170_C1r,L4ieee_Q11numeric_bit_Y5op_gt_i170_V4size)));
1415 }
1416 enumeration L4ieee_W11numeric_bit_itn38_lit[]={78,85,77,69,82,73,67,95,66,73,84,46,34,34,62,34,34,58,32,110,117,108,108,32,97,114,103,117,109,101,110,116,32,100,101,116,101,99,116,101,100,44,32,114,101,116,117,114,110,105,110,103,32,70,65,76,83,69};
1417 /* Implementation of subprogram :ieee:numeric_bit:">" */
L4ieee_Q11numeric_bit_Y5op_gt_i173(const integer L4ieee_Q11numeric_bit_Y5op_gt_i173_C1l,const L4ieee_Q11numeric_bit_T8unsigned & L4ieee_Q11numeric_bit_Y5op_gt_i173_C1r)1418 enumeration L4ieee_Q11numeric_bit_Y5op_gt_i173(const integer L4ieee_Q11numeric_bit_Y5op_gt_i173_C1l,const L4ieee_Q11numeric_bit_T8unsigned &L4ieee_Q11numeric_bit_Y5op_gt_i173_C1r)
1419 {
1420 if((L4ieee_Q11numeric_bit_Y5op_gt_i173_C1r.info->length<1)) {
1421 if(!enumeration(0))
1422 report(array_alias<L3std_Q8standard_T6string >(new array_info((&L3std_Q8standard_I6string_INFO)->element_type,(&L3std_Q8standard_I6string_INFO)->index_type,1,to,1+57,0),L4ieee_W11numeric_bit_itn38_lit),enumeration(1));
1423 return enumeration(0);
1424 }
1425 if((L4ieee_W11numeric_bit_Y17unsigned_num_bits_i19 (L4ieee_Q11numeric_bit_Y5op_gt_i173_C1l)>L4ieee_Q11numeric_bit_Y5op_gt_i173_C1r.info->length)) {
1426 return enumeration(1);
1427 }
1428 return op_not(L4ieee_W11numeric_bit_Y22unsigned_less_or_equal_i107 (L4ieee_Q11numeric_bit_Y11to_unsigned_i333 (L4ieee_Q11numeric_bit_Y5op_gt_i173_C1l,L4ieee_Q11numeric_bit_Y5op_gt_i173_C1r.info->length),L4ieee_Q11numeric_bit_Y5op_gt_i173_C1r));
1429 }
1430 enumeration L4ieee_W11numeric_bit_itn39_lit[]={78,85,77,69,82,73,67,95,66,73,84,46,34,34,62,34,34,58,32,110,117,108,108,32,97,114,103,117,109,101,110,116,32,100,101,116,101,99,116,101,100,44,32,114,101,116,117,114,110,105,110,103,32,70,65,76,83,69};
1431 /* Implementation of subprogram :ieee:numeric_bit:">" */
L4ieee_Q11numeric_bit_Y5op_gt_i176(const integer L4ieee_Q11numeric_bit_Y5op_gt_i176_C1l,const L4ieee_Q11numeric_bit_T6signed & L4ieee_Q11numeric_bit_Y5op_gt_i176_C1r)1432 enumeration L4ieee_Q11numeric_bit_Y5op_gt_i176(const integer L4ieee_Q11numeric_bit_Y5op_gt_i176_C1l,const L4ieee_Q11numeric_bit_T6signed &L4ieee_Q11numeric_bit_Y5op_gt_i176_C1r)
1433 {
1434 if((L4ieee_Q11numeric_bit_Y5op_gt_i176_C1r.info->length<1)) {
1435 if(!enumeration(0))
1436 report(array_alias<L3std_Q8standard_T6string >(new array_info((&L3std_Q8standard_I6string_INFO)->element_type,(&L3std_Q8standard_I6string_INFO)->index_type,1,to,1+57,0),L4ieee_W11numeric_bit_itn39_lit),enumeration(1));
1437 return enumeration(0);
1438 }
1439 if((L4ieee_W11numeric_bit_Y15signed_num_bits_i14 (L4ieee_Q11numeric_bit_Y5op_gt_i176_C1l)>L4ieee_Q11numeric_bit_Y5op_gt_i176_C1r.info->length)) {
1440 return (L4ieee_Q11numeric_bit_Y5op_gt_i176_C1l>0);
1441 }
1442 return op_not(L4ieee_W11numeric_bit_Y20signed_less_or_equal_i110 (L4ieee_Q11numeric_bit_Y9to_signed_i336 (L4ieee_Q11numeric_bit_Y5op_gt_i176_C1l,L4ieee_Q11numeric_bit_Y5op_gt_i176_C1r.info->length),L4ieee_Q11numeric_bit_Y5op_gt_i176_C1r));
1443 }
1444 enumeration L4ieee_W11numeric_bit_itn40_lit[]={78,85,77,69,82,73,67,95,66,73,84,46,34,34,62,34,34,58,32,110,117,108,108,32,97,114,103,117,109,101,110,116,32,100,101,116,101,99,116,101,100,44,32,114,101,116,117,114,110,105,110,103,32,70,65,76,83,69};
1445 /* Implementation of subprogram :ieee:numeric_bit:">" */
L4ieee_Q11numeric_bit_Y5op_gt_i179(const L4ieee_Q11numeric_bit_T8unsigned & L4ieee_Q11numeric_bit_Y5op_gt_i179_C1l,const integer L4ieee_Q11numeric_bit_Y5op_gt_i179_C1r)1446 enumeration L4ieee_Q11numeric_bit_Y5op_gt_i179(const L4ieee_Q11numeric_bit_T8unsigned &L4ieee_Q11numeric_bit_Y5op_gt_i179_C1l,const integer L4ieee_Q11numeric_bit_Y5op_gt_i179_C1r)
1447 {
1448 if((L4ieee_Q11numeric_bit_Y5op_gt_i179_C1l.info->length<1)) {
1449 if(!enumeration(0))
1450 report(array_alias<L3std_Q8standard_T6string >(new array_info((&L3std_Q8standard_I6string_INFO)->element_type,(&L3std_Q8standard_I6string_INFO)->index_type,1,to,1+57,0),L4ieee_W11numeric_bit_itn40_lit),enumeration(1));
1451 return enumeration(0);
1452 }
1453 if((L4ieee_W11numeric_bit_Y17unsigned_num_bits_i19 (L4ieee_Q11numeric_bit_Y5op_gt_i179_C1r)>L4ieee_Q11numeric_bit_Y5op_gt_i179_C1l.info->length)) {
1454 return enumeration(0);
1455 }
1456 return op_not(L4ieee_W11numeric_bit_Y22unsigned_less_or_equal_i107 (L4ieee_Q11numeric_bit_Y5op_gt_i179_C1l,L4ieee_Q11numeric_bit_Y11to_unsigned_i333 (L4ieee_Q11numeric_bit_Y5op_gt_i179_C1r,L4ieee_Q11numeric_bit_Y5op_gt_i179_C1l.info->length)));
1457 }
1458 enumeration L4ieee_W11numeric_bit_itn41_lit[]={78,85,77,69,82,73,67,95,66,73,84,46,34,34,62,34,34,58,32,110,117,108,108,32,97,114,103,117,109,101,110,116,32,100,101,116,101,99,116,101,100,44,32,114,101,116,117,114,110,105,110,103,32,70,65,76,83,69};
1459 /* Implementation of subprogram :ieee:numeric_bit:">" */
L4ieee_Q11numeric_bit_Y5op_gt_i182(const L4ieee_Q11numeric_bit_T6signed & L4ieee_Q11numeric_bit_Y5op_gt_i182_C1l,const integer L4ieee_Q11numeric_bit_Y5op_gt_i182_C1r)1460 enumeration L4ieee_Q11numeric_bit_Y5op_gt_i182(const L4ieee_Q11numeric_bit_T6signed &L4ieee_Q11numeric_bit_Y5op_gt_i182_C1l,const integer L4ieee_Q11numeric_bit_Y5op_gt_i182_C1r)
1461 {
1462 if((L4ieee_Q11numeric_bit_Y5op_gt_i182_C1l.info->length<1)) {
1463 if(!enumeration(0))
1464 report(array_alias<L3std_Q8standard_T6string >(new array_info((&L3std_Q8standard_I6string_INFO)->element_type,(&L3std_Q8standard_I6string_INFO)->index_type,1,to,1+57,0),L4ieee_W11numeric_bit_itn41_lit),enumeration(1));
1465 return enumeration(0);
1466 }
1467 if((L4ieee_W11numeric_bit_Y15signed_num_bits_i14 (L4ieee_Q11numeric_bit_Y5op_gt_i182_C1r)>L4ieee_Q11numeric_bit_Y5op_gt_i182_C1l.info->length)) {
1468 return (0>L4ieee_Q11numeric_bit_Y5op_gt_i182_C1r);
1469 }
1470 return op_not(L4ieee_W11numeric_bit_Y20signed_less_or_equal_i110 (L4ieee_Q11numeric_bit_Y5op_gt_i182_C1l,L4ieee_Q11numeric_bit_Y9to_signed_i336 (L4ieee_Q11numeric_bit_Y5op_gt_i182_C1r,L4ieee_Q11numeric_bit_Y5op_gt_i182_C1l.info->length)));
1471 }
1472 enumeration L4ieee_W11numeric_bit_itn42_lit[]={78,85,77,69,82,73,67,95,66,73,84,46,34,34,60,34,34,58,32,110,117,108,108,32,97,114,103,117,109,101,110,116,32,100,101,116,101,99,116,101,100,44,32,114,101,116,117,114,110,105,110,103,32,70,65,76,83,69};
1473 /* Implementation of subprogram :ieee:numeric_bit:"<" */
L4ieee_Q11numeric_bit_Y5op_lt_i185(const L4ieee_Q11numeric_bit_T8unsigned & L4ieee_Q11numeric_bit_Y5op_lt_i185_C1l,const L4ieee_Q11numeric_bit_T8unsigned & L4ieee_Q11numeric_bit_Y5op_lt_i185_C1r)1474 enumeration L4ieee_Q11numeric_bit_Y5op_lt_i185(const L4ieee_Q11numeric_bit_T8unsigned &L4ieee_Q11numeric_bit_Y5op_lt_i185_C1l,const L4ieee_Q11numeric_bit_T8unsigned &L4ieee_Q11numeric_bit_Y5op_lt_i185_C1r)
1475 {
1476 integer L4ieee_Q11numeric_bit_Y5op_lt_i185_V4size;
1477 L4ieee_Q11numeric_bit_Y5op_lt_i185_V4size=L4ieee_W11numeric_bit_Y3max_i9 (L4ieee_Q11numeric_bit_Y5op_lt_i185_C1l.info->length,L4ieee_Q11numeric_bit_Y5op_lt_i185_C1r.info->length);
1478 if(((L4ieee_Q11numeric_bit_Y5op_lt_i185_C1l.info->length<1)||(L4ieee_Q11numeric_bit_Y5op_lt_i185_C1r.info->length<1))) {
1479 if(!enumeration(0))
1480 report(array_alias<L3std_Q8standard_T6string >(new array_info((&L3std_Q8standard_I6string_INFO)->element_type,(&L3std_Q8standard_I6string_INFO)->index_type,1,to,1+57,0),L4ieee_W11numeric_bit_itn42_lit),enumeration(1));
1481 return enumeration(0);
1482 }
1483 return L4ieee_W11numeric_bit_Y13unsigned_less_i99 (L4ieee_Q11numeric_bit_Y6resize_i326 (L4ieee_Q11numeric_bit_Y5op_lt_i185_C1l,L4ieee_Q11numeric_bit_Y5op_lt_i185_V4size),L4ieee_Q11numeric_bit_Y6resize_i326 (L4ieee_Q11numeric_bit_Y5op_lt_i185_C1r,L4ieee_Q11numeric_bit_Y5op_lt_i185_V4size));
1484 }
1485 enumeration L4ieee_W11numeric_bit_itn43_lit[]={78,85,77,69,82,73,67,95,66,73,84,46,34,34,60,34,34,58,32,110,117,108,108,32,97,114,103,117,109,101,110,116,32,100,101,116,101,99,116,101,100,44,32,114,101,116,117,114,110,105,110,103,32,70,65,76,83,69};
1486 /* Implementation of subprogram :ieee:numeric_bit:"<" */
L4ieee_Q11numeric_bit_Y5op_lt_i188(const L4ieee_Q11numeric_bit_T6signed & L4ieee_Q11numeric_bit_Y5op_lt_i188_C1l,const L4ieee_Q11numeric_bit_T6signed & L4ieee_Q11numeric_bit_Y5op_lt_i188_C1r)1487 enumeration L4ieee_Q11numeric_bit_Y5op_lt_i188(const L4ieee_Q11numeric_bit_T6signed &L4ieee_Q11numeric_bit_Y5op_lt_i188_C1l,const L4ieee_Q11numeric_bit_T6signed &L4ieee_Q11numeric_bit_Y5op_lt_i188_C1r)
1488 {
1489 integer L4ieee_Q11numeric_bit_Y5op_lt_i188_V4size;
1490 L4ieee_Q11numeric_bit_Y5op_lt_i188_V4size=L4ieee_W11numeric_bit_Y3max_i9 (L4ieee_Q11numeric_bit_Y5op_lt_i188_C1l.info->length,L4ieee_Q11numeric_bit_Y5op_lt_i188_C1r.info->length);
1491 if(((L4ieee_Q11numeric_bit_Y5op_lt_i188_C1l.info->length<1)||(L4ieee_Q11numeric_bit_Y5op_lt_i188_C1r.info->length<1))) {
1492 if(!enumeration(0))
1493 report(array_alias<L3std_Q8standard_T6string >(new array_info((&L3std_Q8standard_I6string_INFO)->element_type,(&L3std_Q8standard_I6string_INFO)->index_type,1,to,1+57,0),L4ieee_W11numeric_bit_itn43_lit),enumeration(1));
1494 return enumeration(0);
1495 }
1496 return L4ieee_W11numeric_bit_Y11signed_less_i102 (L4ieee_Q11numeric_bit_Y6resize_i323 (L4ieee_Q11numeric_bit_Y5op_lt_i188_C1l,L4ieee_Q11numeric_bit_Y5op_lt_i188_V4size),L4ieee_Q11numeric_bit_Y6resize_i323 (L4ieee_Q11numeric_bit_Y5op_lt_i188_C1r,L4ieee_Q11numeric_bit_Y5op_lt_i188_V4size));
1497 }
1498 enumeration L4ieee_W11numeric_bit_itn44_lit[]={78,85,77,69,82,73,67,95,66,73,84,46,34,34,60,34,34,58,32,110,117,108,108,32,97,114,103,117,109,101,110,116,32,100,101,116,101,99,116,101,100,44,32,114,101,116,117,114,110,105,110,103,32,70,65,76,83,69};
1499 /* Implementation of subprogram :ieee:numeric_bit:"<" */
L4ieee_Q11numeric_bit_Y5op_lt_i191(const integer L4ieee_Q11numeric_bit_Y5op_lt_i191_C1l,const L4ieee_Q11numeric_bit_T8unsigned & L4ieee_Q11numeric_bit_Y5op_lt_i191_C1r)1500 enumeration L4ieee_Q11numeric_bit_Y5op_lt_i191(const integer L4ieee_Q11numeric_bit_Y5op_lt_i191_C1l,const L4ieee_Q11numeric_bit_T8unsigned &L4ieee_Q11numeric_bit_Y5op_lt_i191_C1r)
1501 {
1502 if((L4ieee_Q11numeric_bit_Y5op_lt_i191_C1r.info->length<1)) {
1503 if(!enumeration(0))
1504 report(array_alias<L3std_Q8standard_T6string >(new array_info((&L3std_Q8standard_I6string_INFO)->element_type,(&L3std_Q8standard_I6string_INFO)->index_type,1,to,1+57,0),L4ieee_W11numeric_bit_itn44_lit),enumeration(1));
1505 return enumeration(0);
1506 }
1507 if((L4ieee_W11numeric_bit_Y17unsigned_num_bits_i19 (L4ieee_Q11numeric_bit_Y5op_lt_i191_C1l)>L4ieee_Q11numeric_bit_Y5op_lt_i191_C1r.info->length)) {
1508 return (L4ieee_Q11numeric_bit_Y5op_lt_i191_C1l<0);
1509 }
1510 return L4ieee_W11numeric_bit_Y13unsigned_less_i99 (L4ieee_Q11numeric_bit_Y11to_unsigned_i333 (L4ieee_Q11numeric_bit_Y5op_lt_i191_C1l,L4ieee_Q11numeric_bit_Y5op_lt_i191_C1r.info->length),L4ieee_Q11numeric_bit_Y5op_lt_i191_C1r);
1511 }
1512 enumeration L4ieee_W11numeric_bit_itn45_lit[]={78,85,77,69,82,73,67,95,66,73,84,46,34,34,60,34,34,58,32,110,117,108,108,32,97,114,103,117,109,101,110,116,32,100,101,116,101,99,116,101,100,44,32,114,101,116,117,114,110,105,110,103,32,70,65,76,83,69};
1513 /* Implementation of subprogram :ieee:numeric_bit:"<" */
L4ieee_Q11numeric_bit_Y5op_lt_i194(const integer L4ieee_Q11numeric_bit_Y5op_lt_i194_C1l,const L4ieee_Q11numeric_bit_T6signed & L4ieee_Q11numeric_bit_Y5op_lt_i194_C1r)1514 enumeration L4ieee_Q11numeric_bit_Y5op_lt_i194(const integer L4ieee_Q11numeric_bit_Y5op_lt_i194_C1l,const L4ieee_Q11numeric_bit_T6signed &L4ieee_Q11numeric_bit_Y5op_lt_i194_C1r)
1515 {
1516 if((L4ieee_Q11numeric_bit_Y5op_lt_i194_C1r.info->length<1)) {
1517 if(!enumeration(0))
1518 report(array_alias<L3std_Q8standard_T6string >(new array_info((&L3std_Q8standard_I6string_INFO)->element_type,(&L3std_Q8standard_I6string_INFO)->index_type,1,to,1+57,0),L4ieee_W11numeric_bit_itn45_lit),enumeration(1));
1519 return enumeration(0);
1520 }
1521 if((L4ieee_W11numeric_bit_Y15signed_num_bits_i14 (L4ieee_Q11numeric_bit_Y5op_lt_i194_C1l)>L4ieee_Q11numeric_bit_Y5op_lt_i194_C1r.info->length)) {
1522 return (L4ieee_Q11numeric_bit_Y5op_lt_i194_C1l<0);
1523 }
1524 return L4ieee_W11numeric_bit_Y11signed_less_i102 (L4ieee_Q11numeric_bit_Y9to_signed_i336 (L4ieee_Q11numeric_bit_Y5op_lt_i194_C1l,L4ieee_Q11numeric_bit_Y5op_lt_i194_C1r.info->length),L4ieee_Q11numeric_bit_Y5op_lt_i194_C1r);
1525 }
1526 enumeration L4ieee_W11numeric_bit_itn46_lit[]={78,85,77,69,82,73,67,95,66,73,84,46,34,34,60,34,34,58,32,110,117,108,108,32,97,114,103,117,109,101,110,116,32,100,101,116,101,99,116,101,100,44,32,114,101,116,117,114,110,105,110,103,32,70,65,76,83,69};
1527 /* Implementation of subprogram :ieee:numeric_bit:"<" */
L4ieee_Q11numeric_bit_Y5op_lt_i197(const L4ieee_Q11numeric_bit_T8unsigned & L4ieee_Q11numeric_bit_Y5op_lt_i197_C1l,const integer L4ieee_Q11numeric_bit_Y5op_lt_i197_C1r)1528 enumeration L4ieee_Q11numeric_bit_Y5op_lt_i197(const L4ieee_Q11numeric_bit_T8unsigned &L4ieee_Q11numeric_bit_Y5op_lt_i197_C1l,const integer L4ieee_Q11numeric_bit_Y5op_lt_i197_C1r)
1529 {
1530 if((L4ieee_Q11numeric_bit_Y5op_lt_i197_C1l.info->length<1)) {
1531 if(!enumeration(0))
1532 report(array_alias<L3std_Q8standard_T6string >(new array_info((&L3std_Q8standard_I6string_INFO)->element_type,(&L3std_Q8standard_I6string_INFO)->index_type,1,to,1+57,0),L4ieee_W11numeric_bit_itn46_lit),enumeration(1));
1533 return enumeration(0);
1534 }
1535 if((L4ieee_W11numeric_bit_Y17unsigned_num_bits_i19 (L4ieee_Q11numeric_bit_Y5op_lt_i197_C1r)>L4ieee_Q11numeric_bit_Y5op_lt_i197_C1l.info->length)) {
1536 return (0<L4ieee_Q11numeric_bit_Y5op_lt_i197_C1r);
1537 }
1538 return L4ieee_W11numeric_bit_Y13unsigned_less_i99 (L4ieee_Q11numeric_bit_Y5op_lt_i197_C1l,L4ieee_Q11numeric_bit_Y11to_unsigned_i333 (L4ieee_Q11numeric_bit_Y5op_lt_i197_C1r,L4ieee_Q11numeric_bit_Y5op_lt_i197_C1l.info->length));
1539 }
1540 enumeration L4ieee_W11numeric_bit_itn47_lit[]={78,85,77,69,82,73,67,95,66,73,84,46,34,34,60,34,34,58,32,110,117,108,108,32,97,114,103,117,109,101,110,116,32,100,101,116,101,99,116,101,100,44,32,114,101,116,117,114,110,105,110,103,32,70,65,76,83,69};
1541 /* Implementation of subprogram :ieee:numeric_bit:"<" */
L4ieee_Q11numeric_bit_Y5op_lt_i200(const L4ieee_Q11numeric_bit_T6signed & L4ieee_Q11numeric_bit_Y5op_lt_i200_C1l,const integer L4ieee_Q11numeric_bit_Y5op_lt_i200_C1r)1542 enumeration L4ieee_Q11numeric_bit_Y5op_lt_i200(const L4ieee_Q11numeric_bit_T6signed &L4ieee_Q11numeric_bit_Y5op_lt_i200_C1l,const integer L4ieee_Q11numeric_bit_Y5op_lt_i200_C1r)
1543 {
1544 if((L4ieee_Q11numeric_bit_Y5op_lt_i200_C1l.info->length<1)) {
1545 if(!enumeration(0))
1546 report(array_alias<L3std_Q8standard_T6string >(new array_info((&L3std_Q8standard_I6string_INFO)->element_type,(&L3std_Q8standard_I6string_INFO)->index_type,1,to,1+57,0),L4ieee_W11numeric_bit_itn47_lit),enumeration(1));
1547 return enumeration(0);
1548 }
1549 if((L4ieee_W11numeric_bit_Y15signed_num_bits_i14 (L4ieee_Q11numeric_bit_Y5op_lt_i200_C1r)>L4ieee_Q11numeric_bit_Y5op_lt_i200_C1l.info->length)) {
1550 return (0<L4ieee_Q11numeric_bit_Y5op_lt_i200_C1r);
1551 }
1552 return L4ieee_W11numeric_bit_Y11signed_less_i102 (L4ieee_Q11numeric_bit_Y5op_lt_i200_C1l,L4ieee_Q11numeric_bit_Y9to_signed_i336 (L4ieee_Q11numeric_bit_Y5op_lt_i200_C1r,L4ieee_Q11numeric_bit_Y5op_lt_i200_C1l.info->length));
1553 }
1554 enumeration L4ieee_W11numeric_bit_itn48_lit[]={78,85,77,69,82,73,67,95,66,73,84,46,34,34,60,61,34,34,58,32,110,117,108,108,32,97,114,103,117,109,101,110,116,32,100,101,116,101,99,116,101,100,44,32,114,101,116,117,114,110,105,110,103,32,70,65,76,83,69};
1555 /* Implementation of subprogram :ieee:numeric_bit:"<=" */
L4ieee_Q11numeric_bit_Y5op_le_i203(const L4ieee_Q11numeric_bit_T8unsigned & L4ieee_Q11numeric_bit_Y5op_le_i203_C1l,const L4ieee_Q11numeric_bit_T8unsigned & L4ieee_Q11numeric_bit_Y5op_le_i203_C1r)1556 enumeration L4ieee_Q11numeric_bit_Y5op_le_i203(const L4ieee_Q11numeric_bit_T8unsigned &L4ieee_Q11numeric_bit_Y5op_le_i203_C1l,const L4ieee_Q11numeric_bit_T8unsigned &L4ieee_Q11numeric_bit_Y5op_le_i203_C1r)
1557 {
1558 integer L4ieee_Q11numeric_bit_Y5op_le_i203_V4size;
1559 L4ieee_Q11numeric_bit_Y5op_le_i203_V4size=L4ieee_W11numeric_bit_Y3max_i9 (L4ieee_Q11numeric_bit_Y5op_le_i203_C1l.info->length,L4ieee_Q11numeric_bit_Y5op_le_i203_C1r.info->length);
1560 if(((L4ieee_Q11numeric_bit_Y5op_le_i203_C1l.info->length<1)||(L4ieee_Q11numeric_bit_Y5op_le_i203_C1r.info->length<1))) {
1561 if(!enumeration(0))
1562 report(array_alias<L3std_Q8standard_T6string >(new array_info((&L3std_Q8standard_I6string_INFO)->element_type,(&L3std_Q8standard_I6string_INFO)->index_type,1,to,1+58,0),L4ieee_W11numeric_bit_itn48_lit),enumeration(1));
1563 return enumeration(0);
1564 }
1565 return L4ieee_W11numeric_bit_Y22unsigned_less_or_equal_i107 (L4ieee_Q11numeric_bit_Y6resize_i326 (L4ieee_Q11numeric_bit_Y5op_le_i203_C1l,L4ieee_Q11numeric_bit_Y5op_le_i203_V4size),L4ieee_Q11numeric_bit_Y6resize_i326 (L4ieee_Q11numeric_bit_Y5op_le_i203_C1r,L4ieee_Q11numeric_bit_Y5op_le_i203_V4size));
1566 }
1567 enumeration L4ieee_W11numeric_bit_itn49_lit[]={78,85,77,69,82,73,67,95,66,73,84,46,34,34,60,61,34,34,58,32,110,117,108,108,32,97,114,103,117,109,101,110,116,32,100,101,116,101,99,116,101,100,44,32,114,101,116,117,114,110,105,110,103,32,70,65,76,83,69};
1568 /* Implementation of subprogram :ieee:numeric_bit:"<=" */
L4ieee_Q11numeric_bit_Y5op_le_i206(const L4ieee_Q11numeric_bit_T6signed & L4ieee_Q11numeric_bit_Y5op_le_i206_C1l,const L4ieee_Q11numeric_bit_T6signed & L4ieee_Q11numeric_bit_Y5op_le_i206_C1r)1569 enumeration L4ieee_Q11numeric_bit_Y5op_le_i206(const L4ieee_Q11numeric_bit_T6signed &L4ieee_Q11numeric_bit_Y5op_le_i206_C1l,const L4ieee_Q11numeric_bit_T6signed &L4ieee_Q11numeric_bit_Y5op_le_i206_C1r)
1570 {
1571 integer L4ieee_Q11numeric_bit_Y5op_le_i206_V4size;
1572 L4ieee_Q11numeric_bit_Y5op_le_i206_V4size=L4ieee_W11numeric_bit_Y3max_i9 (L4ieee_Q11numeric_bit_Y5op_le_i206_C1l.info->length,L4ieee_Q11numeric_bit_Y5op_le_i206_C1r.info->length);
1573 if(((L4ieee_Q11numeric_bit_Y5op_le_i206_C1l.info->length<1)||(L4ieee_Q11numeric_bit_Y5op_le_i206_C1r.info->length<1))) {
1574 if(!enumeration(0))
1575 report(array_alias<L3std_Q8standard_T6string >(new array_info((&L3std_Q8standard_I6string_INFO)->element_type,(&L3std_Q8standard_I6string_INFO)->index_type,1,to,1+58,0),L4ieee_W11numeric_bit_itn49_lit),enumeration(1));
1576 return enumeration(0);
1577 }
1578 return L4ieee_W11numeric_bit_Y20signed_less_or_equal_i110 (L4ieee_Q11numeric_bit_Y6resize_i323 (L4ieee_Q11numeric_bit_Y5op_le_i206_C1l,L4ieee_Q11numeric_bit_Y5op_le_i206_V4size),L4ieee_Q11numeric_bit_Y6resize_i323 (L4ieee_Q11numeric_bit_Y5op_le_i206_C1r,L4ieee_Q11numeric_bit_Y5op_le_i206_V4size));
1579 }
1580 enumeration L4ieee_W11numeric_bit_itn50_lit[]={78,85,77,69,82,73,67,95,66,73,84,46,34,34,60,61,34,34,58,32,110,117,108,108,32,97,114,103,117,109,101,110,116,32,100,101,116,101,99,116,101,100,44,32,114,101,116,117,114,110,105,110,103,32,70,65,76,83,69};
1581 /* Implementation of subprogram :ieee:numeric_bit:"<=" */
L4ieee_Q11numeric_bit_Y5op_le_i209(const integer L4ieee_Q11numeric_bit_Y5op_le_i209_C1l,const L4ieee_Q11numeric_bit_T8unsigned & L4ieee_Q11numeric_bit_Y5op_le_i209_C1r)1582 enumeration L4ieee_Q11numeric_bit_Y5op_le_i209(const integer L4ieee_Q11numeric_bit_Y5op_le_i209_C1l,const L4ieee_Q11numeric_bit_T8unsigned &L4ieee_Q11numeric_bit_Y5op_le_i209_C1r)
1583 {
1584 if((L4ieee_Q11numeric_bit_Y5op_le_i209_C1r.info->length<1)) {
1585 if(!enumeration(0))
1586 report(array_alias<L3std_Q8standard_T6string >(new array_info((&L3std_Q8standard_I6string_INFO)->element_type,(&L3std_Q8standard_I6string_INFO)->index_type,1,to,1+58,0),L4ieee_W11numeric_bit_itn50_lit),enumeration(1));
1587 return enumeration(0);
1588 }
1589 if((L4ieee_W11numeric_bit_Y17unsigned_num_bits_i19 (L4ieee_Q11numeric_bit_Y5op_le_i209_C1l)>L4ieee_Q11numeric_bit_Y5op_le_i209_C1r.info->length)) {
1590 return (L4ieee_Q11numeric_bit_Y5op_le_i209_C1l<0);
1591 }
1592 return L4ieee_W11numeric_bit_Y22unsigned_less_or_equal_i107 (L4ieee_Q11numeric_bit_Y11to_unsigned_i333 (L4ieee_Q11numeric_bit_Y5op_le_i209_C1l,L4ieee_Q11numeric_bit_Y5op_le_i209_C1r.info->length),L4ieee_Q11numeric_bit_Y5op_le_i209_C1r);
1593 }
1594 enumeration L4ieee_W11numeric_bit_itn51_lit[]={78,85,77,69,82,73,67,95,66,73,84,46,34,34,60,61,34,34,58,32,110,117,108,108,32,97,114,103,117,109,101,110,116,32,100,101,116,101,99,116,101,100,44,32,114,101,116,117,114,110,105,110,103,32,70,65,76,83,69};
1595 /* Implementation of subprogram :ieee:numeric_bit:"<=" */
L4ieee_Q11numeric_bit_Y5op_le_i212(const integer L4ieee_Q11numeric_bit_Y5op_le_i212_C1l,const L4ieee_Q11numeric_bit_T6signed & L4ieee_Q11numeric_bit_Y5op_le_i212_C1r)1596 enumeration L4ieee_Q11numeric_bit_Y5op_le_i212(const integer L4ieee_Q11numeric_bit_Y5op_le_i212_C1l,const L4ieee_Q11numeric_bit_T6signed &L4ieee_Q11numeric_bit_Y5op_le_i212_C1r)
1597 {
1598 if((L4ieee_Q11numeric_bit_Y5op_le_i212_C1r.info->length<1)) {
1599 if(!enumeration(0))
1600 report(array_alias<L3std_Q8standard_T6string >(new array_info((&L3std_Q8standard_I6string_INFO)->element_type,(&L3std_Q8standard_I6string_INFO)->index_type,1,to,1+58,0),L4ieee_W11numeric_bit_itn51_lit),enumeration(1));
1601 return enumeration(0);
1602 }
1603 if((L4ieee_W11numeric_bit_Y15signed_num_bits_i14 (L4ieee_Q11numeric_bit_Y5op_le_i212_C1l)>L4ieee_Q11numeric_bit_Y5op_le_i212_C1r.info->length)) {
1604 return (L4ieee_Q11numeric_bit_Y5op_le_i212_C1l<0);
1605 }
1606 return L4ieee_W11numeric_bit_Y20signed_less_or_equal_i110 (L4ieee_Q11numeric_bit_Y9to_signed_i336 (L4ieee_Q11numeric_bit_Y5op_le_i212_C1l,L4ieee_Q11numeric_bit_Y5op_le_i212_C1r.info->length),L4ieee_Q11numeric_bit_Y5op_le_i212_C1r);
1607 }
1608 enumeration L4ieee_W11numeric_bit_itn52_lit[]={78,85,77,69,82,73,67,95,66,73,84,46,34,34,60,61,34,34,58,32,110,117,108,108,32,97,114,103,117,109,101,110,116,32,100,101,116,101,99,116,101,100,44,32,114,101,116,117,114,110,105,110,103,32,70,65,76,83,69};
1609 /* Implementation of subprogram :ieee:numeric_bit:"<=" */
L4ieee_Q11numeric_bit_Y5op_le_i215(const L4ieee_Q11numeric_bit_T8unsigned & L4ieee_Q11numeric_bit_Y5op_le_i215_C1l,const integer L4ieee_Q11numeric_bit_Y5op_le_i215_C1r)1610 enumeration L4ieee_Q11numeric_bit_Y5op_le_i215(const L4ieee_Q11numeric_bit_T8unsigned &L4ieee_Q11numeric_bit_Y5op_le_i215_C1l,const integer L4ieee_Q11numeric_bit_Y5op_le_i215_C1r)
1611 {
1612 if((L4ieee_Q11numeric_bit_Y5op_le_i215_C1l.info->length<1)) {
1613 if(!enumeration(0))
1614 report(array_alias<L3std_Q8standard_T6string >(new array_info((&L3std_Q8standard_I6string_INFO)->element_type,(&L3std_Q8standard_I6string_INFO)->index_type,1,to,1+58,0),L4ieee_W11numeric_bit_itn52_lit),enumeration(1));
1615 return enumeration(0);
1616 }
1617 if((L4ieee_W11numeric_bit_Y17unsigned_num_bits_i19 (L4ieee_Q11numeric_bit_Y5op_le_i215_C1r)>L4ieee_Q11numeric_bit_Y5op_le_i215_C1l.info->length)) {
1618 return (0<L4ieee_Q11numeric_bit_Y5op_le_i215_C1r);
1619 }
1620 return L4ieee_W11numeric_bit_Y22unsigned_less_or_equal_i107 (L4ieee_Q11numeric_bit_Y5op_le_i215_C1l,L4ieee_Q11numeric_bit_Y11to_unsigned_i333 (L4ieee_Q11numeric_bit_Y5op_le_i215_C1r,L4ieee_Q11numeric_bit_Y5op_le_i215_C1l.info->length));
1621 }
1622 enumeration L4ieee_W11numeric_bit_itn53_lit[]={78,85,77,69,82,73,67,95,66,73,84,46,34,34,60,61,34,34,58,32,110,117,108,108,32,97,114,103,117,109,101,110,116,32,100,101,116,101,99,116,101,100,44,32,114,101,116,117,114,110,105,110,103,32,70,65,76,83,69};
1623 /* Implementation of subprogram :ieee:numeric_bit:"<=" */
L4ieee_Q11numeric_bit_Y5op_le_i218(const L4ieee_Q11numeric_bit_T6signed & L4ieee_Q11numeric_bit_Y5op_le_i218_C1l,const integer L4ieee_Q11numeric_bit_Y5op_le_i218_C1r)1624 enumeration L4ieee_Q11numeric_bit_Y5op_le_i218(const L4ieee_Q11numeric_bit_T6signed &L4ieee_Q11numeric_bit_Y5op_le_i218_C1l,const integer L4ieee_Q11numeric_bit_Y5op_le_i218_C1r)
1625 {
1626 if((L4ieee_Q11numeric_bit_Y5op_le_i218_C1l.info->length<1)) {
1627 if(!enumeration(0))
1628 report(array_alias<L3std_Q8standard_T6string >(new array_info((&L3std_Q8standard_I6string_INFO)->element_type,(&L3std_Q8standard_I6string_INFO)->index_type,1,to,1+58,0),L4ieee_W11numeric_bit_itn53_lit),enumeration(1));
1629 return enumeration(0);
1630 }
1631 if((L4ieee_W11numeric_bit_Y15signed_num_bits_i14 (L4ieee_Q11numeric_bit_Y5op_le_i218_C1r)>L4ieee_Q11numeric_bit_Y5op_le_i218_C1l.info->length)) {
1632 return (0<L4ieee_Q11numeric_bit_Y5op_le_i218_C1r);
1633 }
1634 return L4ieee_W11numeric_bit_Y20signed_less_or_equal_i110 (L4ieee_Q11numeric_bit_Y5op_le_i218_C1l,L4ieee_Q11numeric_bit_Y9to_signed_i336 (L4ieee_Q11numeric_bit_Y5op_le_i218_C1r,L4ieee_Q11numeric_bit_Y5op_le_i218_C1l.info->length));
1635 }
1636 enumeration L4ieee_W11numeric_bit_itn54_lit[]={78,85,77,69,82,73,67,95,66,73,84,46,34,34,62,61,34,34,58,32,110,117,108,108,32,97,114,103,117,109,101,110,116,32,100,101,116,101,99,116,101,100,44,32,114,101,116,117,114,110,105,110,103,32,70,65,76,83,69};
1637 /* Implementation of subprogram :ieee:numeric_bit:">=" */
L4ieee_Q11numeric_bit_Y5op_ge_i221(const L4ieee_Q11numeric_bit_T8unsigned & L4ieee_Q11numeric_bit_Y5op_ge_i221_C1l,const L4ieee_Q11numeric_bit_T8unsigned & L4ieee_Q11numeric_bit_Y5op_ge_i221_C1r)1638 enumeration L4ieee_Q11numeric_bit_Y5op_ge_i221(const L4ieee_Q11numeric_bit_T8unsigned &L4ieee_Q11numeric_bit_Y5op_ge_i221_C1l,const L4ieee_Q11numeric_bit_T8unsigned &L4ieee_Q11numeric_bit_Y5op_ge_i221_C1r)
1639 {
1640 integer L4ieee_Q11numeric_bit_Y5op_ge_i221_V4size;
1641 L4ieee_Q11numeric_bit_Y5op_ge_i221_V4size=L4ieee_W11numeric_bit_Y3max_i9 (L4ieee_Q11numeric_bit_Y5op_ge_i221_C1l.info->length,L4ieee_Q11numeric_bit_Y5op_ge_i221_C1r.info->length);
1642 if(((L4ieee_Q11numeric_bit_Y5op_ge_i221_C1l.info->length<1)||(L4ieee_Q11numeric_bit_Y5op_ge_i221_C1r.info->length<1))) {
1643 if(!enumeration(0))
1644 report(array_alias<L3std_Q8standard_T6string >(new array_info((&L3std_Q8standard_I6string_INFO)->element_type,(&L3std_Q8standard_I6string_INFO)->index_type,1,to,1+58,0),L4ieee_W11numeric_bit_itn54_lit),enumeration(1));
1645 return enumeration(0);
1646 }
1647 return op_not(L4ieee_W11numeric_bit_Y13unsigned_less_i99 (L4ieee_Q11numeric_bit_Y6resize_i326 (L4ieee_Q11numeric_bit_Y5op_ge_i221_C1l,L4ieee_Q11numeric_bit_Y5op_ge_i221_V4size),L4ieee_Q11numeric_bit_Y6resize_i326 (L4ieee_Q11numeric_bit_Y5op_ge_i221_C1r,L4ieee_Q11numeric_bit_Y5op_ge_i221_V4size)));
1648 }
1649 enumeration L4ieee_W11numeric_bit_itn55_lit[]={78,85,77,69,82,73,67,95,66,73,84,46,34,34,62,61,34,34,58,32,110,117,108,108,32,97,114,103,117,109,101,110,116,32,100,101,116,101,99,116,101,100,44,32,114,101,116,117,114,110,105,110,103,32,70,65,76,83,69};
1650 /* Implementation of subprogram :ieee:numeric_bit:">=" */
L4ieee_Q11numeric_bit_Y5op_ge_i224(const L4ieee_Q11numeric_bit_T6signed & L4ieee_Q11numeric_bit_Y5op_ge_i224_C1l,const L4ieee_Q11numeric_bit_T6signed & L4ieee_Q11numeric_bit_Y5op_ge_i224_C1r)1651 enumeration L4ieee_Q11numeric_bit_Y5op_ge_i224(const L4ieee_Q11numeric_bit_T6signed &L4ieee_Q11numeric_bit_Y5op_ge_i224_C1l,const L4ieee_Q11numeric_bit_T6signed &L4ieee_Q11numeric_bit_Y5op_ge_i224_C1r)
1652 {
1653 integer L4ieee_Q11numeric_bit_Y5op_ge_i224_V4size;
1654 L4ieee_Q11numeric_bit_Y5op_ge_i224_V4size=L4ieee_W11numeric_bit_Y3max_i9 (L4ieee_Q11numeric_bit_Y5op_ge_i224_C1l.info->length,L4ieee_Q11numeric_bit_Y5op_ge_i224_C1r.info->length);
1655 if(((L4ieee_Q11numeric_bit_Y5op_ge_i224_C1l.info->length<1)||(L4ieee_Q11numeric_bit_Y5op_ge_i224_C1r.info->length<1))) {
1656 if(!enumeration(0))
1657 report(array_alias<L3std_Q8standard_T6string >(new array_info((&L3std_Q8standard_I6string_INFO)->element_type,(&L3std_Q8standard_I6string_INFO)->index_type,1,to,1+58,0),L4ieee_W11numeric_bit_itn55_lit),enumeration(1));
1658 return enumeration(0);
1659 }
1660 return op_not(L4ieee_W11numeric_bit_Y11signed_less_i102 (L4ieee_Q11numeric_bit_Y6resize_i323 (L4ieee_Q11numeric_bit_Y5op_ge_i224_C1l,L4ieee_Q11numeric_bit_Y5op_ge_i224_V4size),L4ieee_Q11numeric_bit_Y6resize_i323 (L4ieee_Q11numeric_bit_Y5op_ge_i224_C1r,L4ieee_Q11numeric_bit_Y5op_ge_i224_V4size)));
1661 }
1662 enumeration L4ieee_W11numeric_bit_itn56_lit[]={78,85,77,69,82,73,67,95,66,73,84,46,34,34,62,61,34,34,58,32,110,117,108,108,32,97,114,103,117,109,101,110,116,32,100,101,116,101,99,116,101,100,44,32,114,101,116,117,114,110,105,110,103,32,70,65,76,83,69};
1663 /* Implementation of subprogram :ieee:numeric_bit:">=" */
L4ieee_Q11numeric_bit_Y5op_ge_i227(const integer L4ieee_Q11numeric_bit_Y5op_ge_i227_C1l,const L4ieee_Q11numeric_bit_T8unsigned & L4ieee_Q11numeric_bit_Y5op_ge_i227_C1r)1664 enumeration L4ieee_Q11numeric_bit_Y5op_ge_i227(const integer L4ieee_Q11numeric_bit_Y5op_ge_i227_C1l,const L4ieee_Q11numeric_bit_T8unsigned &L4ieee_Q11numeric_bit_Y5op_ge_i227_C1r)
1665 {
1666 if((L4ieee_Q11numeric_bit_Y5op_ge_i227_C1r.info->length<1)) {
1667 if(!enumeration(0))
1668 report(array_alias<L3std_Q8standard_T6string >(new array_info((&L3std_Q8standard_I6string_INFO)->element_type,(&L3std_Q8standard_I6string_INFO)->index_type,1,to,1+58,0),L4ieee_W11numeric_bit_itn56_lit),enumeration(1));
1669 return enumeration(0);
1670 }
1671 if((L4ieee_W11numeric_bit_Y17unsigned_num_bits_i19 (L4ieee_Q11numeric_bit_Y5op_ge_i227_C1l)>L4ieee_Q11numeric_bit_Y5op_ge_i227_C1r.info->length)) {
1672 return (L4ieee_Q11numeric_bit_Y5op_ge_i227_C1l>0);
1673 }
1674 return op_not(L4ieee_W11numeric_bit_Y13unsigned_less_i99 (L4ieee_Q11numeric_bit_Y11to_unsigned_i333 (L4ieee_Q11numeric_bit_Y5op_ge_i227_C1l,L4ieee_Q11numeric_bit_Y5op_ge_i227_C1r.info->length),L4ieee_Q11numeric_bit_Y5op_ge_i227_C1r));
1675 }
1676 enumeration L4ieee_W11numeric_bit_itn57_lit[]={78,85,77,69,82,73,67,95,66,73,84,46,34,34,62,61,34,34,58,32,110,117,108,108,32,97,114,103,117,109,101,110,116,32,100,101,116,101,99,116,101,100,44,32,114,101,116,117,114,110,105,110,103,32,70,65,76,83,69};
1677 /* Implementation of subprogram :ieee:numeric_bit:">=" */
L4ieee_Q11numeric_bit_Y5op_ge_i230(const integer L4ieee_Q11numeric_bit_Y5op_ge_i230_C1l,const L4ieee_Q11numeric_bit_T6signed & L4ieee_Q11numeric_bit_Y5op_ge_i230_C1r)1678 enumeration L4ieee_Q11numeric_bit_Y5op_ge_i230(const integer L4ieee_Q11numeric_bit_Y5op_ge_i230_C1l,const L4ieee_Q11numeric_bit_T6signed &L4ieee_Q11numeric_bit_Y5op_ge_i230_C1r)
1679 {
1680 if((L4ieee_Q11numeric_bit_Y5op_ge_i230_C1r.info->length<1)) {
1681 if(!enumeration(0))
1682 report(array_alias<L3std_Q8standard_T6string >(new array_info((&L3std_Q8standard_I6string_INFO)->element_type,(&L3std_Q8standard_I6string_INFO)->index_type,1,to,1+58,0),L4ieee_W11numeric_bit_itn57_lit),enumeration(1));
1683 return enumeration(0);
1684 }
1685 if((L4ieee_W11numeric_bit_Y15signed_num_bits_i14 (L4ieee_Q11numeric_bit_Y5op_ge_i230_C1l)>L4ieee_Q11numeric_bit_Y5op_ge_i230_C1r.info->length)) {
1686 return (L4ieee_Q11numeric_bit_Y5op_ge_i230_C1l>0);
1687 }
1688 return op_not(L4ieee_W11numeric_bit_Y11signed_less_i102 (L4ieee_Q11numeric_bit_Y9to_signed_i336 (L4ieee_Q11numeric_bit_Y5op_ge_i230_C1l,L4ieee_Q11numeric_bit_Y5op_ge_i230_C1r.info->length),L4ieee_Q11numeric_bit_Y5op_ge_i230_C1r));
1689 }
1690 enumeration L4ieee_W11numeric_bit_itn58_lit[]={78,85,77,69,82,73,67,95,66,73,84,46,34,34,62,61,34,34,58,32,110,117,108,108,32,97,114,103,117,109,101,110,116,32,100,101,116,101,99,116,101,100,44,32,114,101,116,117,114,110,105,110,103,32,70,65,76,83,69};
1691 /* Implementation of subprogram :ieee:numeric_bit:">=" */
L4ieee_Q11numeric_bit_Y5op_ge_i233(const L4ieee_Q11numeric_bit_T8unsigned & L4ieee_Q11numeric_bit_Y5op_ge_i233_C1l,const integer L4ieee_Q11numeric_bit_Y5op_ge_i233_C1r)1692 enumeration L4ieee_Q11numeric_bit_Y5op_ge_i233(const L4ieee_Q11numeric_bit_T8unsigned &L4ieee_Q11numeric_bit_Y5op_ge_i233_C1l,const integer L4ieee_Q11numeric_bit_Y5op_ge_i233_C1r)
1693 {
1694 if((L4ieee_Q11numeric_bit_Y5op_ge_i233_C1l.info->length<1)) {
1695 if(!enumeration(0))
1696 report(array_alias<L3std_Q8standard_T6string >(new array_info((&L3std_Q8standard_I6string_INFO)->element_type,(&L3std_Q8standard_I6string_INFO)->index_type,1,to,1+58,0),L4ieee_W11numeric_bit_itn58_lit),enumeration(1));
1697 return enumeration(0);
1698 }
1699 if((L4ieee_W11numeric_bit_Y17unsigned_num_bits_i19 (L4ieee_Q11numeric_bit_Y5op_ge_i233_C1r)>L4ieee_Q11numeric_bit_Y5op_ge_i233_C1l.info->length)) {
1700 return (0>L4ieee_Q11numeric_bit_Y5op_ge_i233_C1r);
1701 }
1702 return op_not(L4ieee_W11numeric_bit_Y13unsigned_less_i99 (L4ieee_Q11numeric_bit_Y5op_ge_i233_C1l,L4ieee_Q11numeric_bit_Y11to_unsigned_i333 (L4ieee_Q11numeric_bit_Y5op_ge_i233_C1r,L4ieee_Q11numeric_bit_Y5op_ge_i233_C1l.info->length)));
1703 }
1704 enumeration L4ieee_W11numeric_bit_itn59_lit[]={78,85,77,69,82,73,67,95,66,73,84,46,34,34,62,61,34,34,58,32,110,117,108,108,32,97,114,103,117,109,101,110,116,32,100,101,116,101,99,116,101,100,44,32,114,101,116,117,114,110,105,110,103,32,70,65,76,83,69};
1705 /* Implementation of subprogram :ieee:numeric_bit:">=" */
L4ieee_Q11numeric_bit_Y5op_ge_i236(const L4ieee_Q11numeric_bit_T6signed & L4ieee_Q11numeric_bit_Y5op_ge_i236_C1l,const integer L4ieee_Q11numeric_bit_Y5op_ge_i236_C1r)1706 enumeration L4ieee_Q11numeric_bit_Y5op_ge_i236(const L4ieee_Q11numeric_bit_T6signed &L4ieee_Q11numeric_bit_Y5op_ge_i236_C1l,const integer L4ieee_Q11numeric_bit_Y5op_ge_i236_C1r)
1707 {
1708 if((L4ieee_Q11numeric_bit_Y5op_ge_i236_C1l.info->length<1)) {
1709 if(!enumeration(0))
1710 report(array_alias<L3std_Q8standard_T6string >(new array_info((&L3std_Q8standard_I6string_INFO)->element_type,(&L3std_Q8standard_I6string_INFO)->index_type,1,to,1+58,0),L4ieee_W11numeric_bit_itn59_lit),enumeration(1));
1711 return enumeration(0);
1712 }
1713 if((L4ieee_W11numeric_bit_Y15signed_num_bits_i14 (L4ieee_Q11numeric_bit_Y5op_ge_i236_C1r)>L4ieee_Q11numeric_bit_Y5op_ge_i236_C1l.info->length)) {
1714 return (0>L4ieee_Q11numeric_bit_Y5op_ge_i236_C1r);
1715 }
1716 return op_not(L4ieee_W11numeric_bit_Y11signed_less_i102 (L4ieee_Q11numeric_bit_Y5op_ge_i236_C1l,L4ieee_Q11numeric_bit_Y9to_signed_i336 (L4ieee_Q11numeric_bit_Y5op_ge_i236_C1r,L4ieee_Q11numeric_bit_Y5op_ge_i236_C1l.info->length)));
1717 }
1718 enumeration L4ieee_W11numeric_bit_itn60_lit[]={78,85,77,69,82,73,67,95,66,73,84,46,34,34,61,34,34,58,32,110,117,108,108,32,97,114,103,117,109,101,110,116,32,100,101,116,101,99,116,101,100,44,32,114,101,116,117,114,110,105,110,103,32,70,65,76,83,69};
1719 /* Implementation of subprogram :ieee:numeric_bit:"=" */
L4ieee_Q11numeric_bit_Y5op_eq_i239(const L4ieee_Q11numeric_bit_T8unsigned & L4ieee_Q11numeric_bit_Y5op_eq_i239_C1l,const L4ieee_Q11numeric_bit_T8unsigned & L4ieee_Q11numeric_bit_Y5op_eq_i239_C1r)1720 enumeration L4ieee_Q11numeric_bit_Y5op_eq_i239(const L4ieee_Q11numeric_bit_T8unsigned &L4ieee_Q11numeric_bit_Y5op_eq_i239_C1l,const L4ieee_Q11numeric_bit_T8unsigned &L4ieee_Q11numeric_bit_Y5op_eq_i239_C1r)
1721 {
1722 integer L4ieee_Q11numeric_bit_Y5op_eq_i239_V4size;
1723 L4ieee_Q11numeric_bit_Y5op_eq_i239_V4size=L4ieee_W11numeric_bit_Y3max_i9 (L4ieee_Q11numeric_bit_Y5op_eq_i239_C1l.info->length,L4ieee_Q11numeric_bit_Y5op_eq_i239_C1r.info->length);
1724 if(((L4ieee_Q11numeric_bit_Y5op_eq_i239_C1l.info->length<1)||(L4ieee_Q11numeric_bit_Y5op_eq_i239_C1r.info->length<1))) {
1725 if(!enumeration(0))
1726 report(array_alias<L3std_Q8standard_T6string >(new array_info((&L3std_Q8standard_I6string_INFO)->element_type,(&L3std_Q8standard_I6string_INFO)->index_type,1,to,1+57,0),L4ieee_W11numeric_bit_itn60_lit),enumeration(1));
1727 return enumeration(0);
1728 }
1729 return L4ieee_W11numeric_bit_Y14unsigned_equal_i93 (L4ieee_Q11numeric_bit_Y6resize_i326 (L4ieee_Q11numeric_bit_Y5op_eq_i239_C1l,L4ieee_Q11numeric_bit_Y5op_eq_i239_V4size),L4ieee_Q11numeric_bit_Y6resize_i326 (L4ieee_Q11numeric_bit_Y5op_eq_i239_C1r,L4ieee_Q11numeric_bit_Y5op_eq_i239_V4size));
1730 }
1731 enumeration L4ieee_W11numeric_bit_itn61_lit[]={78,85,77,69,82,73,67,95,66,73,84,46,34,34,61,34,34,58,32,110,117,108,108,32,97,114,103,117,109,101,110,116,32,100,101,116,101,99,116,101,100,44,32,114,101,116,117,114,110,105,110,103,32,70,65,76,83,69};
1732 /* Implementation of subprogram :ieee:numeric_bit:"=" */
L4ieee_Q11numeric_bit_Y5op_eq_i242(const L4ieee_Q11numeric_bit_T6signed & L4ieee_Q11numeric_bit_Y5op_eq_i242_C1l,const L4ieee_Q11numeric_bit_T6signed & L4ieee_Q11numeric_bit_Y5op_eq_i242_C1r)1733 enumeration L4ieee_Q11numeric_bit_Y5op_eq_i242(const L4ieee_Q11numeric_bit_T6signed &L4ieee_Q11numeric_bit_Y5op_eq_i242_C1l,const L4ieee_Q11numeric_bit_T6signed &L4ieee_Q11numeric_bit_Y5op_eq_i242_C1r)
1734 {
1735 integer L4ieee_Q11numeric_bit_Y5op_eq_i242_V4size;
1736 L4ieee_Q11numeric_bit_Y5op_eq_i242_V4size=L4ieee_W11numeric_bit_Y3max_i9 (L4ieee_Q11numeric_bit_Y5op_eq_i242_C1l.info->length,L4ieee_Q11numeric_bit_Y5op_eq_i242_C1r.info->length);
1737 if(((L4ieee_Q11numeric_bit_Y5op_eq_i242_C1l.info->length<1)||(L4ieee_Q11numeric_bit_Y5op_eq_i242_C1r.info->length<1))) {
1738 if(!enumeration(0))
1739 report(array_alias<L3std_Q8standard_T6string >(new array_info((&L3std_Q8standard_I6string_INFO)->element_type,(&L3std_Q8standard_I6string_INFO)->index_type,1,to,1+57,0),L4ieee_W11numeric_bit_itn61_lit),enumeration(1));
1740 return enumeration(0);
1741 }
1742 return L4ieee_W11numeric_bit_Y12signed_equal_i96 (L4ieee_Q11numeric_bit_Y6resize_i323 (L4ieee_Q11numeric_bit_Y5op_eq_i242_C1l,L4ieee_Q11numeric_bit_Y5op_eq_i242_V4size),L4ieee_Q11numeric_bit_Y6resize_i323 (L4ieee_Q11numeric_bit_Y5op_eq_i242_C1r,L4ieee_Q11numeric_bit_Y5op_eq_i242_V4size));
1743 }
1744 enumeration L4ieee_W11numeric_bit_itn62_lit[]={78,85,77,69,82,73,67,95,66,73,84,46,34,34,61,34,34,58,32,110,117,108,108,32,97,114,103,117,109,101,110,116,32,100,101,116,101,99,116,101,100,44,32,114,101,116,117,114,110,105,110,103,32,70,65,76,83,69};
1745 /* Implementation of subprogram :ieee:numeric_bit:"=" */
L4ieee_Q11numeric_bit_Y5op_eq_i245(const integer L4ieee_Q11numeric_bit_Y5op_eq_i245_C1l,const L4ieee_Q11numeric_bit_T8unsigned & L4ieee_Q11numeric_bit_Y5op_eq_i245_C1r)1746 enumeration L4ieee_Q11numeric_bit_Y5op_eq_i245(const integer L4ieee_Q11numeric_bit_Y5op_eq_i245_C1l,const L4ieee_Q11numeric_bit_T8unsigned &L4ieee_Q11numeric_bit_Y5op_eq_i245_C1r)
1747 {
1748 if((L4ieee_Q11numeric_bit_Y5op_eq_i245_C1r.info->length<1)) {
1749 if(!enumeration(0))
1750 report(array_alias<L3std_Q8standard_T6string >(new array_info((&L3std_Q8standard_I6string_INFO)->element_type,(&L3std_Q8standard_I6string_INFO)->index_type,1,to,1+57,0),L4ieee_W11numeric_bit_itn62_lit),enumeration(1));
1751 return enumeration(0);
1752 }
1753 if((L4ieee_W11numeric_bit_Y17unsigned_num_bits_i19 (L4ieee_Q11numeric_bit_Y5op_eq_i245_C1l)>L4ieee_Q11numeric_bit_Y5op_eq_i245_C1r.info->length)) {
1754 return enumeration(0);
1755 }
1756 return L4ieee_W11numeric_bit_Y14unsigned_equal_i93 (L4ieee_Q11numeric_bit_Y11to_unsigned_i333 (L4ieee_Q11numeric_bit_Y5op_eq_i245_C1l,L4ieee_Q11numeric_bit_Y5op_eq_i245_C1r.info->length),L4ieee_Q11numeric_bit_Y5op_eq_i245_C1r);
1757 }
1758 enumeration L4ieee_W11numeric_bit_itn63_lit[]={78,85,77,69,82,73,67,95,66,73,84,46,34,34,61,34,34,58,32,110,117,108,108,32,97,114,103,117,109,101,110,116,32,100,101,116,101,99,116,101,100,44,32,114,101,116,117,114,110,105,110,103,32,70,65,76,83,69};
1759 /* Implementation of subprogram :ieee:numeric_bit:"=" */
L4ieee_Q11numeric_bit_Y5op_eq_i248(const integer L4ieee_Q11numeric_bit_Y5op_eq_i248_C1l,const L4ieee_Q11numeric_bit_T6signed & L4ieee_Q11numeric_bit_Y5op_eq_i248_C1r)1760 enumeration L4ieee_Q11numeric_bit_Y5op_eq_i248(const integer L4ieee_Q11numeric_bit_Y5op_eq_i248_C1l,const L4ieee_Q11numeric_bit_T6signed &L4ieee_Q11numeric_bit_Y5op_eq_i248_C1r)
1761 {
1762 if((L4ieee_Q11numeric_bit_Y5op_eq_i248_C1r.info->length<1)) {
1763 if(!enumeration(0))
1764 report(array_alias<L3std_Q8standard_T6string >(new array_info((&L3std_Q8standard_I6string_INFO)->element_type,(&L3std_Q8standard_I6string_INFO)->index_type,1,to,1+57,0),L4ieee_W11numeric_bit_itn63_lit),enumeration(1));
1765 return enumeration(0);
1766 }
1767 if((L4ieee_W11numeric_bit_Y15signed_num_bits_i14 (L4ieee_Q11numeric_bit_Y5op_eq_i248_C1l)>L4ieee_Q11numeric_bit_Y5op_eq_i248_C1r.info->length)) {
1768 return enumeration(0);
1769 }
1770 return L4ieee_W11numeric_bit_Y12signed_equal_i96 (L4ieee_Q11numeric_bit_Y9to_signed_i336 (L4ieee_Q11numeric_bit_Y5op_eq_i248_C1l,L4ieee_Q11numeric_bit_Y5op_eq_i248_C1r.info->length),L4ieee_Q11numeric_bit_Y5op_eq_i248_C1r);
1771 }
1772 enumeration L4ieee_W11numeric_bit_itn64_lit[]={78,85,77,69,82,73,67,95,66,73,84,46,34,34,61,34,34,58,32,110,117,108,108,32,97,114,103,117,109,101,110,116,32,100,101,116,101,99,116,101,100,44,32,114,101,116,117,114,110,105,110,103,32,70,65,76,83,69};
1773 /* Implementation of subprogram :ieee:numeric_bit:"=" */
L4ieee_Q11numeric_bit_Y5op_eq_i251(const L4ieee_Q11numeric_bit_T8unsigned & L4ieee_Q11numeric_bit_Y5op_eq_i251_C1l,const integer L4ieee_Q11numeric_bit_Y5op_eq_i251_C1r)1774 enumeration L4ieee_Q11numeric_bit_Y5op_eq_i251(const L4ieee_Q11numeric_bit_T8unsigned &L4ieee_Q11numeric_bit_Y5op_eq_i251_C1l,const integer L4ieee_Q11numeric_bit_Y5op_eq_i251_C1r)
1775 {
1776 if((L4ieee_Q11numeric_bit_Y5op_eq_i251_C1l.info->length<1)) {
1777 if(!enumeration(0))
1778 report(array_alias<L3std_Q8standard_T6string >(new array_info((&L3std_Q8standard_I6string_INFO)->element_type,(&L3std_Q8standard_I6string_INFO)->index_type,1,to,1+57,0),L4ieee_W11numeric_bit_itn64_lit),enumeration(1));
1779 return enumeration(0);
1780 }
1781 if((L4ieee_W11numeric_bit_Y17unsigned_num_bits_i19 (L4ieee_Q11numeric_bit_Y5op_eq_i251_C1r)>L4ieee_Q11numeric_bit_Y5op_eq_i251_C1l.info->length)) {
1782 return enumeration(0);
1783 }
1784 return L4ieee_W11numeric_bit_Y14unsigned_equal_i93 (L4ieee_Q11numeric_bit_Y5op_eq_i251_C1l,L4ieee_Q11numeric_bit_Y11to_unsigned_i333 (L4ieee_Q11numeric_bit_Y5op_eq_i251_C1r,L4ieee_Q11numeric_bit_Y5op_eq_i251_C1l.info->length));
1785 }
1786 enumeration L4ieee_W11numeric_bit_itn65_lit[]={78,85,77,69,82,73,67,95,66,73,84,46,34,34,61,34,34,58,32,110,117,108,108,32,97,114,103,117,109,101,110,116,32,100,101,116,101,99,116,101,100,44,32,114,101,116,117,114,110,105,110,103,32,70,65,76,83,69};
1787 /* Implementation of subprogram :ieee:numeric_bit:"=" */
L4ieee_Q11numeric_bit_Y5op_eq_i254(const L4ieee_Q11numeric_bit_T6signed & L4ieee_Q11numeric_bit_Y5op_eq_i254_C1l,const integer L4ieee_Q11numeric_bit_Y5op_eq_i254_C1r)1788 enumeration L4ieee_Q11numeric_bit_Y5op_eq_i254(const L4ieee_Q11numeric_bit_T6signed &L4ieee_Q11numeric_bit_Y5op_eq_i254_C1l,const integer L4ieee_Q11numeric_bit_Y5op_eq_i254_C1r)
1789 {
1790 if((L4ieee_Q11numeric_bit_Y5op_eq_i254_C1l.info->length<1)) {
1791 if(!enumeration(0))
1792 report(array_alias<L3std_Q8standard_T6string >(new array_info((&L3std_Q8standard_I6string_INFO)->element_type,(&L3std_Q8standard_I6string_INFO)->index_type,1,to,1+57,0),L4ieee_W11numeric_bit_itn65_lit),enumeration(1));
1793 return enumeration(0);
1794 }
1795 if((L4ieee_W11numeric_bit_Y15signed_num_bits_i14 (L4ieee_Q11numeric_bit_Y5op_eq_i254_C1r)>L4ieee_Q11numeric_bit_Y5op_eq_i254_C1l.info->length)) {
1796 return enumeration(0);
1797 }
1798 return L4ieee_W11numeric_bit_Y12signed_equal_i96 (L4ieee_Q11numeric_bit_Y5op_eq_i254_C1l,L4ieee_Q11numeric_bit_Y9to_signed_i336 (L4ieee_Q11numeric_bit_Y5op_eq_i254_C1r,L4ieee_Q11numeric_bit_Y5op_eq_i254_C1l.info->length));
1799 }
1800 enumeration L4ieee_W11numeric_bit_itn66_lit[]={78,85,77,69,82,73,67,95,66,73,84,46,34,34,47,61,34,34,58,32,110,117,108,108,32,97,114,103,117,109,101,110,116,32,100,101,116,101,99,116,101,100,44,32,114,101,116,117,114,110,105,110,103,32,84,82,85,69};
1801 /* Implementation of subprogram :ieee:numeric_bit:"/=" */
L4ieee_Q11numeric_bit_Y5op_ne_i257(const L4ieee_Q11numeric_bit_T8unsigned & L4ieee_Q11numeric_bit_Y5op_ne_i257_C1l,const L4ieee_Q11numeric_bit_T8unsigned & L4ieee_Q11numeric_bit_Y5op_ne_i257_C1r)1802 enumeration L4ieee_Q11numeric_bit_Y5op_ne_i257(const L4ieee_Q11numeric_bit_T8unsigned &L4ieee_Q11numeric_bit_Y5op_ne_i257_C1l,const L4ieee_Q11numeric_bit_T8unsigned &L4ieee_Q11numeric_bit_Y5op_ne_i257_C1r)
1803 {
1804 integer L4ieee_Q11numeric_bit_Y5op_ne_i257_V4size;
1805 L4ieee_Q11numeric_bit_Y5op_ne_i257_V4size=L4ieee_W11numeric_bit_Y3max_i9 (L4ieee_Q11numeric_bit_Y5op_ne_i257_C1l.info->length,L4ieee_Q11numeric_bit_Y5op_ne_i257_C1r.info->length);
1806 if(((L4ieee_Q11numeric_bit_Y5op_ne_i257_C1l.info->length<1)||(L4ieee_Q11numeric_bit_Y5op_ne_i257_C1r.info->length<1))) {
1807 if(!enumeration(0))
1808 report(array_alias<L3std_Q8standard_T6string >(new array_info((&L3std_Q8standard_I6string_INFO)->element_type,(&L3std_Q8standard_I6string_INFO)->index_type,1,to,1+57,0),L4ieee_W11numeric_bit_itn66_lit),enumeration(1));
1809 return enumeration(1);
1810 }
1811 return op_not(L4ieee_W11numeric_bit_Y14unsigned_equal_i93 (L4ieee_Q11numeric_bit_Y6resize_i326 (L4ieee_Q11numeric_bit_Y5op_ne_i257_C1l,L4ieee_Q11numeric_bit_Y5op_ne_i257_V4size),L4ieee_Q11numeric_bit_Y6resize_i326 (L4ieee_Q11numeric_bit_Y5op_ne_i257_C1r,L4ieee_Q11numeric_bit_Y5op_ne_i257_V4size)));
1812 }
1813 enumeration L4ieee_W11numeric_bit_itn67_lit[]={78,85,77,69,82,73,67,95,66,73,84,46,34,34,47,61,34,34,58,32,110,117,108,108,32,97,114,103,117,109,101,110,116,32,100,101,116,101,99,116,101,100,44,32,114,101,116,117,114,110,105,110,103,32,84,82,85,69};
1814 /* Implementation of subprogram :ieee:numeric_bit:"/=" */
L4ieee_Q11numeric_bit_Y5op_ne_i260(const L4ieee_Q11numeric_bit_T6signed & L4ieee_Q11numeric_bit_Y5op_ne_i260_C1l,const L4ieee_Q11numeric_bit_T6signed & L4ieee_Q11numeric_bit_Y5op_ne_i260_C1r)1815 enumeration L4ieee_Q11numeric_bit_Y5op_ne_i260(const L4ieee_Q11numeric_bit_T6signed &L4ieee_Q11numeric_bit_Y5op_ne_i260_C1l,const L4ieee_Q11numeric_bit_T6signed &L4ieee_Q11numeric_bit_Y5op_ne_i260_C1r)
1816 {
1817 integer L4ieee_Q11numeric_bit_Y5op_ne_i260_V4size;
1818 L4ieee_Q11numeric_bit_Y5op_ne_i260_V4size=L4ieee_W11numeric_bit_Y3max_i9 (L4ieee_Q11numeric_bit_Y5op_ne_i260_C1l.info->length,L4ieee_Q11numeric_bit_Y5op_ne_i260_C1r.info->length);
1819 if(((L4ieee_Q11numeric_bit_Y5op_ne_i260_C1l.info->length<1)||(L4ieee_Q11numeric_bit_Y5op_ne_i260_C1r.info->length<1))) {
1820 if(!enumeration(0))
1821 report(array_alias<L3std_Q8standard_T6string >(new array_info((&L3std_Q8standard_I6string_INFO)->element_type,(&L3std_Q8standard_I6string_INFO)->index_type,1,to,1+57,0),L4ieee_W11numeric_bit_itn67_lit),enumeration(1));
1822 return enumeration(1);
1823 }
1824 return op_not(L4ieee_W11numeric_bit_Y12signed_equal_i96 (L4ieee_Q11numeric_bit_Y6resize_i323 (L4ieee_Q11numeric_bit_Y5op_ne_i260_C1l,L4ieee_Q11numeric_bit_Y5op_ne_i260_V4size),L4ieee_Q11numeric_bit_Y6resize_i323 (L4ieee_Q11numeric_bit_Y5op_ne_i260_C1r,L4ieee_Q11numeric_bit_Y5op_ne_i260_V4size)));
1825 }
1826 enumeration L4ieee_W11numeric_bit_itn68_lit[]={78,85,77,69,82,73,67,95,66,73,84,46,34,34,47,61,34,34,58,32,110,117,108,108,32,97,114,103,117,109,101,110,116,32,100,101,116,101,99,116,101,100,44,32,114,101,116,117,114,110,105,110,103,32,84,82,85,69};
1827 /* Implementation of subprogram :ieee:numeric_bit:"/=" */
L4ieee_Q11numeric_bit_Y5op_ne_i263(const integer L4ieee_Q11numeric_bit_Y5op_ne_i263_C1l,const L4ieee_Q11numeric_bit_T8unsigned & L4ieee_Q11numeric_bit_Y5op_ne_i263_C1r)1828 enumeration L4ieee_Q11numeric_bit_Y5op_ne_i263(const integer L4ieee_Q11numeric_bit_Y5op_ne_i263_C1l,const L4ieee_Q11numeric_bit_T8unsigned &L4ieee_Q11numeric_bit_Y5op_ne_i263_C1r)
1829 {
1830 if((L4ieee_Q11numeric_bit_Y5op_ne_i263_C1r.info->length<1)) {
1831 if(!enumeration(0))
1832 report(array_alias<L3std_Q8standard_T6string >(new array_info((&L3std_Q8standard_I6string_INFO)->element_type,(&L3std_Q8standard_I6string_INFO)->index_type,1,to,1+57,0),L4ieee_W11numeric_bit_itn68_lit),enumeration(1));
1833 return enumeration(1);
1834 }
1835 if((L4ieee_W11numeric_bit_Y17unsigned_num_bits_i19 (L4ieee_Q11numeric_bit_Y5op_ne_i263_C1l)>L4ieee_Q11numeric_bit_Y5op_ne_i263_C1r.info->length)) {
1836 return enumeration(1);
1837 }
1838 return op_not(L4ieee_W11numeric_bit_Y14unsigned_equal_i93 (L4ieee_Q11numeric_bit_Y11to_unsigned_i333 (L4ieee_Q11numeric_bit_Y5op_ne_i263_C1l,L4ieee_Q11numeric_bit_Y5op_ne_i263_C1r.info->length),L4ieee_Q11numeric_bit_Y5op_ne_i263_C1r));
1839 }
1840 enumeration L4ieee_W11numeric_bit_itn69_lit[]={78,85,77,69,82,73,67,95,66,73,84,46,34,34,47,61,34,34,58,32,110,117,108,108,32,97,114,103,117,109,101,110,116,32,100,101,116,101,99,116,101,100,44,32,114,101,116,117,114,110,105,110,103,32,84,82,85,69};
1841 /* Implementation of subprogram :ieee:numeric_bit:"/=" */
L4ieee_Q11numeric_bit_Y5op_ne_i266(const integer L4ieee_Q11numeric_bit_Y5op_ne_i266_C1l,const L4ieee_Q11numeric_bit_T6signed & L4ieee_Q11numeric_bit_Y5op_ne_i266_C1r)1842 enumeration L4ieee_Q11numeric_bit_Y5op_ne_i266(const integer L4ieee_Q11numeric_bit_Y5op_ne_i266_C1l,const L4ieee_Q11numeric_bit_T6signed &L4ieee_Q11numeric_bit_Y5op_ne_i266_C1r)
1843 {
1844 if((L4ieee_Q11numeric_bit_Y5op_ne_i266_C1r.info->length<1)) {
1845 if(!enumeration(0))
1846 report(array_alias<L3std_Q8standard_T6string >(new array_info((&L3std_Q8standard_I6string_INFO)->element_type,(&L3std_Q8standard_I6string_INFO)->index_type,1,to,1+57,0),L4ieee_W11numeric_bit_itn69_lit),enumeration(1));
1847 return enumeration(1);
1848 }
1849 if((L4ieee_W11numeric_bit_Y15signed_num_bits_i14 (L4ieee_Q11numeric_bit_Y5op_ne_i266_C1l)>L4ieee_Q11numeric_bit_Y5op_ne_i266_C1r.info->length)) {
1850 return enumeration(1);
1851 }
1852 return op_not(L4ieee_W11numeric_bit_Y12signed_equal_i96 (L4ieee_Q11numeric_bit_Y9to_signed_i336 (L4ieee_Q11numeric_bit_Y5op_ne_i266_C1l,L4ieee_Q11numeric_bit_Y5op_ne_i266_C1r.info->length),L4ieee_Q11numeric_bit_Y5op_ne_i266_C1r));
1853 }
1854 enumeration L4ieee_W11numeric_bit_itn70_lit[]={78,85,77,69,82,73,67,95,66,73,84,46,34,34,47,61,34,34,58,32,110,117,108,108,32,97,114,103,117,109,101,110,116,32,100,101,116,101,99,116,101,100,44,32,114,101,116,117,114,110,105,110,103,32,84,82,85,69};
1855 /* Implementation of subprogram :ieee:numeric_bit:"/=" */
L4ieee_Q11numeric_bit_Y5op_ne_i269(const L4ieee_Q11numeric_bit_T8unsigned & L4ieee_Q11numeric_bit_Y5op_ne_i269_C1l,const integer L4ieee_Q11numeric_bit_Y5op_ne_i269_C1r)1856 enumeration L4ieee_Q11numeric_bit_Y5op_ne_i269(const L4ieee_Q11numeric_bit_T8unsigned &L4ieee_Q11numeric_bit_Y5op_ne_i269_C1l,const integer L4ieee_Q11numeric_bit_Y5op_ne_i269_C1r)
1857 {
1858 if((L4ieee_Q11numeric_bit_Y5op_ne_i269_C1l.info->length<1)) {
1859 if(!enumeration(0))
1860 report(array_alias<L3std_Q8standard_T6string >(new array_info((&L3std_Q8standard_I6string_INFO)->element_type,(&L3std_Q8standard_I6string_INFO)->index_type,1,to,1+57,0),L4ieee_W11numeric_bit_itn70_lit),enumeration(1));
1861 return enumeration(1);
1862 }
1863 if((L4ieee_W11numeric_bit_Y17unsigned_num_bits_i19 (L4ieee_Q11numeric_bit_Y5op_ne_i269_C1r)>L4ieee_Q11numeric_bit_Y5op_ne_i269_C1l.info->length)) {
1864 return enumeration(1);
1865 }
1866 return op_not(L4ieee_W11numeric_bit_Y14unsigned_equal_i93 (L4ieee_Q11numeric_bit_Y5op_ne_i269_C1l,L4ieee_Q11numeric_bit_Y11to_unsigned_i333 (L4ieee_Q11numeric_bit_Y5op_ne_i269_C1r,L4ieee_Q11numeric_bit_Y5op_ne_i269_C1l.info->length)));
1867 }
1868 enumeration L4ieee_W11numeric_bit_itn71_lit[]={78,85,77,69,82,73,67,95,66,73,84,46,34,34,47,61,34,34,58,32,110,117,108,108,32,97,114,103,117,109,101,110,116,32,100,101,116,101,99,116,101,100,44,32,114,101,116,117,114,110,105,110,103,32,84,82,85,69};
1869 /* Implementation of subprogram :ieee:numeric_bit:"/=" */
L4ieee_Q11numeric_bit_Y5op_ne_i272(const L4ieee_Q11numeric_bit_T6signed & L4ieee_Q11numeric_bit_Y5op_ne_i272_C1l,const integer L4ieee_Q11numeric_bit_Y5op_ne_i272_C1r)1870 enumeration L4ieee_Q11numeric_bit_Y5op_ne_i272(const L4ieee_Q11numeric_bit_T6signed &L4ieee_Q11numeric_bit_Y5op_ne_i272_C1l,const integer L4ieee_Q11numeric_bit_Y5op_ne_i272_C1r)
1871 {
1872 if((L4ieee_Q11numeric_bit_Y5op_ne_i272_C1l.info->length<1)) {
1873 if(!enumeration(0))
1874 report(array_alias<L3std_Q8standard_T6string >(new array_info((&L3std_Q8standard_I6string_INFO)->element_type,(&L3std_Q8standard_I6string_INFO)->index_type,1,to,1+57,0),L4ieee_W11numeric_bit_itn71_lit),enumeration(1));
1875 return enumeration(1);
1876 }
1877 if((L4ieee_W11numeric_bit_Y15signed_num_bits_i14 (L4ieee_Q11numeric_bit_Y5op_ne_i272_C1r)>L4ieee_Q11numeric_bit_Y5op_ne_i272_C1l.info->length)) {
1878 return enumeration(1);
1879 }
1880 return op_not(L4ieee_W11numeric_bit_Y12signed_equal_i96 (L4ieee_Q11numeric_bit_Y5op_ne_i272_C1l,L4ieee_Q11numeric_bit_Y9to_signed_i336 (L4ieee_Q11numeric_bit_Y5op_ne_i272_C1r,L4ieee_Q11numeric_bit_Y5op_ne_i272_C1l.info->length)));
1881 }
1882 /* Implementation of subprogram :ieee:numeric_bit:shift_left */
L4ieee_Q11numeric_bit_Y10shift_left_i275(const L4ieee_Q11numeric_bit_T8unsigned & L4ieee_Q11numeric_bit_Y10shift_left_i275_C3arg,const integer L4ieee_Q11numeric_bit_Y10shift_left_i275_C5count)1883 L4ieee_Q11numeric_bit_T8unsigned L4ieee_Q11numeric_bit_Y10shift_left_i275(const L4ieee_Q11numeric_bit_T8unsigned &L4ieee_Q11numeric_bit_Y10shift_left_i275_C3arg,const integer L4ieee_Q11numeric_bit_Y10shift_left_i275_C5count)
1884 {
1885 if((L4ieee_Q11numeric_bit_Y10shift_left_i275_C3arg.info->length<1)) {
1886 return array_alias<L4ieee_Q11numeric_bit_T8unsigned >((&L4ieee_Q11numeric_bit_I8unsigned_INFO),L4ieee_W11numeric_bit_C3nau);
1887 }
1888 return array_alias<L4ieee_Q11numeric_bit_T8unsigned >((&L4ieee_Q11numeric_bit_I8unsigned_INFO),array_alias<L4ieee_Q11numeric_bit_T8unsigned >((&L4ieee_Q11numeric_bit_I8unsigned_INFO),L4ieee_W11numeric_bit_Y4xsll_i60 (array_alias<L3std_Q8standard_T10bit_vector >((&L3std_Q8standard_I10bit_vector_INFO),L4ieee_Q11numeric_bit_Y10shift_left_i275_C3arg),L4ieee_Q11numeric_bit_Y10shift_left_i275_C5count)));
1889 }
1890 /* Implementation of subprogram :ieee:numeric_bit:shift_right */
L4ieee_Q11numeric_bit_Y11shift_right_i278(const L4ieee_Q11numeric_bit_T8unsigned & L4ieee_Q11numeric_bit_Y11shift_right_i278_C3arg,const integer L4ieee_Q11numeric_bit_Y11shift_right_i278_C5count)1891 L4ieee_Q11numeric_bit_T8unsigned L4ieee_Q11numeric_bit_Y11shift_right_i278(const L4ieee_Q11numeric_bit_T8unsigned &L4ieee_Q11numeric_bit_Y11shift_right_i278_C3arg,const integer L4ieee_Q11numeric_bit_Y11shift_right_i278_C5count)
1892 {
1893 if((L4ieee_Q11numeric_bit_Y11shift_right_i278_C3arg.info->length<1)) {
1894 return array_alias<L4ieee_Q11numeric_bit_T8unsigned >((&L4ieee_Q11numeric_bit_I8unsigned_INFO),L4ieee_W11numeric_bit_C3nau);
1895 }
1896 return array_alias<L4ieee_Q11numeric_bit_T8unsigned >((&L4ieee_Q11numeric_bit_I8unsigned_INFO),array_alias<L4ieee_Q11numeric_bit_T8unsigned >((&L4ieee_Q11numeric_bit_I8unsigned_INFO),L4ieee_W11numeric_bit_Y4xsrl_i66 (array_alias<L3std_Q8standard_T10bit_vector >((&L3std_Q8standard_I10bit_vector_INFO),L4ieee_Q11numeric_bit_Y11shift_right_i278_C3arg),L4ieee_Q11numeric_bit_Y11shift_right_i278_C5count)));
1897 }
1898 /* Implementation of subprogram :ieee:numeric_bit:shift_left */
L4ieee_Q11numeric_bit_Y10shift_left_i281(const L4ieee_Q11numeric_bit_T6signed & L4ieee_Q11numeric_bit_Y10shift_left_i281_C3arg,const integer L4ieee_Q11numeric_bit_Y10shift_left_i281_C5count)1899 L4ieee_Q11numeric_bit_T6signed L4ieee_Q11numeric_bit_Y10shift_left_i281(const L4ieee_Q11numeric_bit_T6signed &L4ieee_Q11numeric_bit_Y10shift_left_i281_C3arg,const integer L4ieee_Q11numeric_bit_Y10shift_left_i281_C5count)
1900 {
1901 if((L4ieee_Q11numeric_bit_Y10shift_left_i281_C3arg.info->length<1)) {
1902 return array_alias<L4ieee_Q11numeric_bit_T6signed >((&L4ieee_Q11numeric_bit_I6signed_INFO),L4ieee_W11numeric_bit_C3nas);
1903 }
1904 return array_alias<L4ieee_Q11numeric_bit_T6signed >((&L4ieee_Q11numeric_bit_I6signed_INFO),array_alias<L4ieee_Q11numeric_bit_T6signed >((&L4ieee_Q11numeric_bit_I6signed_INFO),L4ieee_W11numeric_bit_Y4xsll_i60 (array_alias<L3std_Q8standard_T10bit_vector >((&L3std_Q8standard_I10bit_vector_INFO),L4ieee_Q11numeric_bit_Y10shift_left_i281_C3arg),L4ieee_Q11numeric_bit_Y10shift_left_i281_C5count)));
1905 }
1906 /* Implementation of subprogram :ieee:numeric_bit:shift_right */
L4ieee_Q11numeric_bit_Y11shift_right_i284(const L4ieee_Q11numeric_bit_T6signed & L4ieee_Q11numeric_bit_Y11shift_right_i284_C3arg,const integer L4ieee_Q11numeric_bit_Y11shift_right_i284_C5count)1907 L4ieee_Q11numeric_bit_T6signed L4ieee_Q11numeric_bit_Y11shift_right_i284(const L4ieee_Q11numeric_bit_T6signed &L4ieee_Q11numeric_bit_Y11shift_right_i284_C3arg,const integer L4ieee_Q11numeric_bit_Y11shift_right_i284_C5count)
1908 {
1909 if((L4ieee_Q11numeric_bit_Y11shift_right_i284_C3arg.info->length<1)) {
1910 return array_alias<L4ieee_Q11numeric_bit_T6signed >((&L4ieee_Q11numeric_bit_I6signed_INFO),L4ieee_W11numeric_bit_C3nas);
1911 }
1912 return array_alias<L4ieee_Q11numeric_bit_T6signed >((&L4ieee_Q11numeric_bit_I6signed_INFO),array_alias<L4ieee_Q11numeric_bit_T6signed >((&L4ieee_Q11numeric_bit_I6signed_INFO),L4ieee_W11numeric_bit_Y4xsra_i72 (array_alias<L3std_Q8standard_T10bit_vector >((&L3std_Q8standard_I10bit_vector_INFO),L4ieee_Q11numeric_bit_Y11shift_right_i284_C3arg),L4ieee_Q11numeric_bit_Y11shift_right_i284_C5count)));
1913 }
1914 /* Implementation of subprogram :ieee:numeric_bit:rotate_left */
L4ieee_Q11numeric_bit_Y11rotate_left_i287(const L4ieee_Q11numeric_bit_T8unsigned & L4ieee_Q11numeric_bit_Y11rotate_left_i287_C3arg,const integer L4ieee_Q11numeric_bit_Y11rotate_left_i287_C5count)1915 L4ieee_Q11numeric_bit_T8unsigned L4ieee_Q11numeric_bit_Y11rotate_left_i287(const L4ieee_Q11numeric_bit_T8unsigned &L4ieee_Q11numeric_bit_Y11rotate_left_i287_C3arg,const integer L4ieee_Q11numeric_bit_Y11rotate_left_i287_C5count)
1916 {
1917 if((L4ieee_Q11numeric_bit_Y11rotate_left_i287_C3arg.info->length<1)) {
1918 return array_alias<L4ieee_Q11numeric_bit_T8unsigned >((&L4ieee_Q11numeric_bit_I8unsigned_INFO),L4ieee_W11numeric_bit_C3nau);
1919 }
1920 return array_alias<L4ieee_Q11numeric_bit_T8unsigned >((&L4ieee_Q11numeric_bit_I8unsigned_INFO),array_alias<L4ieee_Q11numeric_bit_T8unsigned >((&L4ieee_Q11numeric_bit_I8unsigned_INFO),L4ieee_W11numeric_bit_Y4xrol_i79 (array_alias<L3std_Q8standard_T10bit_vector >((&L3std_Q8standard_I10bit_vector_INFO),L4ieee_Q11numeric_bit_Y11rotate_left_i287_C3arg),L4ieee_Q11numeric_bit_Y11rotate_left_i287_C5count)));
1921 }
1922 /* Implementation of subprogram :ieee:numeric_bit:rotate_right */
L4ieee_Q11numeric_bit_Y12rotate_right_i290(const L4ieee_Q11numeric_bit_T8unsigned & L4ieee_Q11numeric_bit_Y12rotate_right_i290_C3arg,const integer L4ieee_Q11numeric_bit_Y12rotate_right_i290_C5count)1923 L4ieee_Q11numeric_bit_T8unsigned L4ieee_Q11numeric_bit_Y12rotate_right_i290(const L4ieee_Q11numeric_bit_T8unsigned &L4ieee_Q11numeric_bit_Y12rotate_right_i290_C3arg,const integer L4ieee_Q11numeric_bit_Y12rotate_right_i290_C5count)
1924 {
1925 if((L4ieee_Q11numeric_bit_Y12rotate_right_i290_C3arg.info->length<1)) {
1926 return array_alias<L4ieee_Q11numeric_bit_T8unsigned >((&L4ieee_Q11numeric_bit_I8unsigned_INFO),L4ieee_W11numeric_bit_C3nau);
1927 }
1928 return array_alias<L4ieee_Q11numeric_bit_T8unsigned >((&L4ieee_Q11numeric_bit_I8unsigned_INFO),array_alias<L4ieee_Q11numeric_bit_T8unsigned >((&L4ieee_Q11numeric_bit_I8unsigned_INFO),L4ieee_W11numeric_bit_Y4xror_i86 (array_alias<L3std_Q8standard_T10bit_vector >((&L3std_Q8standard_I10bit_vector_INFO),L4ieee_Q11numeric_bit_Y12rotate_right_i290_C3arg),L4ieee_Q11numeric_bit_Y12rotate_right_i290_C5count)));
1929 }
1930 /* Implementation of subprogram :ieee:numeric_bit:rotate_left */
L4ieee_Q11numeric_bit_Y11rotate_left_i293(const L4ieee_Q11numeric_bit_T6signed & L4ieee_Q11numeric_bit_Y11rotate_left_i293_C3arg,const integer L4ieee_Q11numeric_bit_Y11rotate_left_i293_C5count)1931 L4ieee_Q11numeric_bit_T6signed L4ieee_Q11numeric_bit_Y11rotate_left_i293(const L4ieee_Q11numeric_bit_T6signed &L4ieee_Q11numeric_bit_Y11rotate_left_i293_C3arg,const integer L4ieee_Q11numeric_bit_Y11rotate_left_i293_C5count)
1932 {
1933 if((L4ieee_Q11numeric_bit_Y11rotate_left_i293_C3arg.info->length<1)) {
1934 return array_alias<L4ieee_Q11numeric_bit_T6signed >((&L4ieee_Q11numeric_bit_I6signed_INFO),L4ieee_W11numeric_bit_C3nas);
1935 }
1936 return array_alias<L4ieee_Q11numeric_bit_T6signed >((&L4ieee_Q11numeric_bit_I6signed_INFO),array_alias<L4ieee_Q11numeric_bit_T6signed >((&L4ieee_Q11numeric_bit_I6signed_INFO),L4ieee_W11numeric_bit_Y4xrol_i79 (array_alias<L3std_Q8standard_T10bit_vector >((&L3std_Q8standard_I10bit_vector_INFO),L4ieee_Q11numeric_bit_Y11rotate_left_i293_C3arg),L4ieee_Q11numeric_bit_Y11rotate_left_i293_C5count)));
1937 }
1938 /* Implementation of subprogram :ieee:numeric_bit:rotate_right */
L4ieee_Q11numeric_bit_Y12rotate_right_i296(const L4ieee_Q11numeric_bit_T6signed & L4ieee_Q11numeric_bit_Y12rotate_right_i296_C3arg,const integer L4ieee_Q11numeric_bit_Y12rotate_right_i296_C5count)1939 L4ieee_Q11numeric_bit_T6signed L4ieee_Q11numeric_bit_Y12rotate_right_i296(const L4ieee_Q11numeric_bit_T6signed &L4ieee_Q11numeric_bit_Y12rotate_right_i296_C3arg,const integer L4ieee_Q11numeric_bit_Y12rotate_right_i296_C5count)
1940 {
1941 if((L4ieee_Q11numeric_bit_Y12rotate_right_i296_C3arg.info->length<1)) {
1942 return array_alias<L4ieee_Q11numeric_bit_T6signed >((&L4ieee_Q11numeric_bit_I6signed_INFO),L4ieee_W11numeric_bit_C3nas);
1943 }
1944 return array_alias<L4ieee_Q11numeric_bit_T6signed >((&L4ieee_Q11numeric_bit_I6signed_INFO),array_alias<L4ieee_Q11numeric_bit_T6signed >((&L4ieee_Q11numeric_bit_I6signed_INFO),L4ieee_W11numeric_bit_Y4xror_i86 (array_alias<L3std_Q8standard_T10bit_vector >((&L3std_Q8standard_I10bit_vector_INFO),L4ieee_Q11numeric_bit_Y12rotate_right_i296_C3arg),L4ieee_Q11numeric_bit_Y12rotate_right_i296_C5count)));
1945 }
1946 /* Implementation of subprogram :ieee:numeric_bit:"sll" */
L4ieee_Q11numeric_bit_Y6op_sll_i299(const L4ieee_Q11numeric_bit_T8unsigned & L4ieee_Q11numeric_bit_Y6op_sll_i299_C3arg,const integer L4ieee_Q11numeric_bit_Y6op_sll_i299_C5count)1947 L4ieee_Q11numeric_bit_T8unsigned L4ieee_Q11numeric_bit_Y6op_sll_i299(const L4ieee_Q11numeric_bit_T8unsigned &L4ieee_Q11numeric_bit_Y6op_sll_i299_C3arg,const integer L4ieee_Q11numeric_bit_Y6op_sll_i299_C5count)
1948 {
1949 if((L4ieee_Q11numeric_bit_Y6op_sll_i299_C5count>=0)) {
1950 return array_alias<L4ieee_Q11numeric_bit_T8unsigned >((&L4ieee_Q11numeric_bit_I8unsigned_INFO),L4ieee_Q11numeric_bit_Y10shift_left_i275 (L4ieee_Q11numeric_bit_Y6op_sll_i299_C3arg,L4ieee_Q11numeric_bit_Y6op_sll_i299_C5count));
1951 } else {
1952 return array_alias<L4ieee_Q11numeric_bit_T8unsigned >((&L4ieee_Q11numeric_bit_I8unsigned_INFO),L4ieee_Q11numeric_bit_Y11shift_right_i278 (L4ieee_Q11numeric_bit_Y6op_sll_i299_C3arg,(-L4ieee_Q11numeric_bit_Y6op_sll_i299_C5count)));
1953 }
1954 }
1955 /* Implementation of subprogram :ieee:numeric_bit:"sll" */
L4ieee_Q11numeric_bit_Y6op_sll_i302(const L4ieee_Q11numeric_bit_T6signed & L4ieee_Q11numeric_bit_Y6op_sll_i302_C3arg,const integer L4ieee_Q11numeric_bit_Y6op_sll_i302_C5count)1956 L4ieee_Q11numeric_bit_T6signed L4ieee_Q11numeric_bit_Y6op_sll_i302(const L4ieee_Q11numeric_bit_T6signed &L4ieee_Q11numeric_bit_Y6op_sll_i302_C3arg,const integer L4ieee_Q11numeric_bit_Y6op_sll_i302_C5count)
1957 {
1958 if((L4ieee_Q11numeric_bit_Y6op_sll_i302_C5count>=0)) {
1959 return array_alias<L4ieee_Q11numeric_bit_T6signed >((&L4ieee_Q11numeric_bit_I6signed_INFO),L4ieee_Q11numeric_bit_Y10shift_left_i281 (L4ieee_Q11numeric_bit_Y6op_sll_i302_C3arg,L4ieee_Q11numeric_bit_Y6op_sll_i302_C5count));
1960 } else {
1961 return array_alias<L4ieee_Q11numeric_bit_T6signed >((&L4ieee_Q11numeric_bit_I6signed_INFO),array_alias<L4ieee_Q11numeric_bit_T6signed >((&L4ieee_Q11numeric_bit_I6signed_INFO),L4ieee_Q11numeric_bit_Y11shift_right_i278 (array_alias<L4ieee_Q11numeric_bit_T8unsigned >((&L4ieee_Q11numeric_bit_I8unsigned_INFO),L4ieee_Q11numeric_bit_Y6op_sll_i302_C3arg),(-L4ieee_Q11numeric_bit_Y6op_sll_i302_C5count))));
1962 }
1963 }
1964 /* Implementation of subprogram :ieee:numeric_bit:"srl" */
L4ieee_Q11numeric_bit_Y6op_srl_i305(const L4ieee_Q11numeric_bit_T8unsigned & L4ieee_Q11numeric_bit_Y6op_srl_i305_C3arg,const integer L4ieee_Q11numeric_bit_Y6op_srl_i305_C5count)1965 L4ieee_Q11numeric_bit_T8unsigned L4ieee_Q11numeric_bit_Y6op_srl_i305(const L4ieee_Q11numeric_bit_T8unsigned &L4ieee_Q11numeric_bit_Y6op_srl_i305_C3arg,const integer L4ieee_Q11numeric_bit_Y6op_srl_i305_C5count)
1966 {
1967 if((L4ieee_Q11numeric_bit_Y6op_srl_i305_C5count>=0)) {
1968 return array_alias<L4ieee_Q11numeric_bit_T8unsigned >((&L4ieee_Q11numeric_bit_I8unsigned_INFO),L4ieee_Q11numeric_bit_Y11shift_right_i278 (L4ieee_Q11numeric_bit_Y6op_srl_i305_C3arg,L4ieee_Q11numeric_bit_Y6op_srl_i305_C5count));
1969 } else {
1970 return array_alias<L4ieee_Q11numeric_bit_T8unsigned >((&L4ieee_Q11numeric_bit_I8unsigned_INFO),L4ieee_Q11numeric_bit_Y10shift_left_i275 (L4ieee_Q11numeric_bit_Y6op_srl_i305_C3arg,(-L4ieee_Q11numeric_bit_Y6op_srl_i305_C5count)));
1971 }
1972 }
1973 /* Implementation of subprogram :ieee:numeric_bit:"srl" */
L4ieee_Q11numeric_bit_Y6op_srl_i308(const L4ieee_Q11numeric_bit_T6signed & L4ieee_Q11numeric_bit_Y6op_srl_i308_C3arg,const integer L4ieee_Q11numeric_bit_Y6op_srl_i308_C5count)1974 L4ieee_Q11numeric_bit_T6signed L4ieee_Q11numeric_bit_Y6op_srl_i308(const L4ieee_Q11numeric_bit_T6signed &L4ieee_Q11numeric_bit_Y6op_srl_i308_C3arg,const integer L4ieee_Q11numeric_bit_Y6op_srl_i308_C5count)
1975 {
1976 if((L4ieee_Q11numeric_bit_Y6op_srl_i308_C5count>=0)) {
1977 return array_alias<L4ieee_Q11numeric_bit_T6signed >((&L4ieee_Q11numeric_bit_I6signed_INFO),array_alias<L4ieee_Q11numeric_bit_T6signed >((&L4ieee_Q11numeric_bit_I6signed_INFO),L4ieee_Q11numeric_bit_Y11shift_right_i278 (array_alias<L4ieee_Q11numeric_bit_T8unsigned >((&L4ieee_Q11numeric_bit_I8unsigned_INFO),L4ieee_Q11numeric_bit_Y6op_srl_i308_C3arg),L4ieee_Q11numeric_bit_Y6op_srl_i308_C5count)));
1978 } else {
1979 return array_alias<L4ieee_Q11numeric_bit_T6signed >((&L4ieee_Q11numeric_bit_I6signed_INFO),L4ieee_Q11numeric_bit_Y10shift_left_i281 (L4ieee_Q11numeric_bit_Y6op_srl_i308_C3arg,(-L4ieee_Q11numeric_bit_Y6op_srl_i308_C5count)));
1980 }
1981 }
1982 /* Implementation of subprogram :ieee:numeric_bit:"rol" */
L4ieee_Q11numeric_bit_Y6op_rol_i311(const L4ieee_Q11numeric_bit_T8unsigned & L4ieee_Q11numeric_bit_Y6op_rol_i311_C3arg,const integer L4ieee_Q11numeric_bit_Y6op_rol_i311_C5count)1983 L4ieee_Q11numeric_bit_T8unsigned L4ieee_Q11numeric_bit_Y6op_rol_i311(const L4ieee_Q11numeric_bit_T8unsigned &L4ieee_Q11numeric_bit_Y6op_rol_i311_C3arg,const integer L4ieee_Q11numeric_bit_Y6op_rol_i311_C5count)
1984 {
1985 if((L4ieee_Q11numeric_bit_Y6op_rol_i311_C5count>=0)) {
1986 return array_alias<L4ieee_Q11numeric_bit_T8unsigned >((&L4ieee_Q11numeric_bit_I8unsigned_INFO),L4ieee_Q11numeric_bit_Y11rotate_left_i287 (L4ieee_Q11numeric_bit_Y6op_rol_i311_C3arg,L4ieee_Q11numeric_bit_Y6op_rol_i311_C5count));
1987 } else {
1988 return array_alias<L4ieee_Q11numeric_bit_T8unsigned >((&L4ieee_Q11numeric_bit_I8unsigned_INFO),L4ieee_Q11numeric_bit_Y12rotate_right_i290 (L4ieee_Q11numeric_bit_Y6op_rol_i311_C3arg,(-L4ieee_Q11numeric_bit_Y6op_rol_i311_C5count)));
1989 }
1990 }
1991 /* Implementation of subprogram :ieee:numeric_bit:"rol" */
L4ieee_Q11numeric_bit_Y6op_rol_i314(const L4ieee_Q11numeric_bit_T6signed & L4ieee_Q11numeric_bit_Y6op_rol_i314_C3arg,const integer L4ieee_Q11numeric_bit_Y6op_rol_i314_C5count)1992 L4ieee_Q11numeric_bit_T6signed L4ieee_Q11numeric_bit_Y6op_rol_i314(const L4ieee_Q11numeric_bit_T6signed &L4ieee_Q11numeric_bit_Y6op_rol_i314_C3arg,const integer L4ieee_Q11numeric_bit_Y6op_rol_i314_C5count)
1993 {
1994 if((L4ieee_Q11numeric_bit_Y6op_rol_i314_C5count>=0)) {
1995 return array_alias<L4ieee_Q11numeric_bit_T6signed >((&L4ieee_Q11numeric_bit_I6signed_INFO),L4ieee_Q11numeric_bit_Y11rotate_left_i293 (L4ieee_Q11numeric_bit_Y6op_rol_i314_C3arg,L4ieee_Q11numeric_bit_Y6op_rol_i314_C5count));
1996 } else {
1997 return array_alias<L4ieee_Q11numeric_bit_T6signed >((&L4ieee_Q11numeric_bit_I6signed_INFO),L4ieee_Q11numeric_bit_Y12rotate_right_i296 (L4ieee_Q11numeric_bit_Y6op_rol_i314_C3arg,(-L4ieee_Q11numeric_bit_Y6op_rol_i314_C5count)));
1998 }
1999 }
2000 /* Implementation of subprogram :ieee:numeric_bit:"ror" */
L4ieee_Q11numeric_bit_Y6op_ror_i317(const L4ieee_Q11numeric_bit_T8unsigned & L4ieee_Q11numeric_bit_Y6op_ror_i317_C3arg,const integer L4ieee_Q11numeric_bit_Y6op_ror_i317_C5count)2001 L4ieee_Q11numeric_bit_T8unsigned L4ieee_Q11numeric_bit_Y6op_ror_i317(const L4ieee_Q11numeric_bit_T8unsigned &L4ieee_Q11numeric_bit_Y6op_ror_i317_C3arg,const integer L4ieee_Q11numeric_bit_Y6op_ror_i317_C5count)
2002 {
2003 if((L4ieee_Q11numeric_bit_Y6op_ror_i317_C5count>=0)) {
2004 return array_alias<L4ieee_Q11numeric_bit_T8unsigned >((&L4ieee_Q11numeric_bit_I8unsigned_INFO),L4ieee_Q11numeric_bit_Y12rotate_right_i290 (L4ieee_Q11numeric_bit_Y6op_ror_i317_C3arg,L4ieee_Q11numeric_bit_Y6op_ror_i317_C5count));
2005 } else {
2006 return array_alias<L4ieee_Q11numeric_bit_T8unsigned >((&L4ieee_Q11numeric_bit_I8unsigned_INFO),L4ieee_Q11numeric_bit_Y11rotate_left_i287 (L4ieee_Q11numeric_bit_Y6op_ror_i317_C3arg,(-L4ieee_Q11numeric_bit_Y6op_ror_i317_C5count)));
2007 }
2008 }
2009 /* Implementation of subprogram :ieee:numeric_bit:"ror" */
L4ieee_Q11numeric_bit_Y6op_ror_i320(const L4ieee_Q11numeric_bit_T6signed & L4ieee_Q11numeric_bit_Y6op_ror_i320_C3arg,const integer L4ieee_Q11numeric_bit_Y6op_ror_i320_C5count)2010 L4ieee_Q11numeric_bit_T6signed L4ieee_Q11numeric_bit_Y6op_ror_i320(const L4ieee_Q11numeric_bit_T6signed &L4ieee_Q11numeric_bit_Y6op_ror_i320_C3arg,const integer L4ieee_Q11numeric_bit_Y6op_ror_i320_C5count)
2011 {
2012 if((L4ieee_Q11numeric_bit_Y6op_ror_i320_C5count>=0)) {
2013 return array_alias<L4ieee_Q11numeric_bit_T6signed >((&L4ieee_Q11numeric_bit_I6signed_INFO),L4ieee_Q11numeric_bit_Y12rotate_right_i296 (L4ieee_Q11numeric_bit_Y6op_ror_i320_C3arg,L4ieee_Q11numeric_bit_Y6op_ror_i320_C5count));
2014 } else {
2015 return array_alias<L4ieee_Q11numeric_bit_T6signed >((&L4ieee_Q11numeric_bit_I6signed_INFO),L4ieee_Q11numeric_bit_Y11rotate_left_i293 (L4ieee_Q11numeric_bit_Y6op_ror_i320_C3arg,(-L4ieee_Q11numeric_bit_Y6op_ror_i320_C5count)));
2016 }
2017 }
2018 enumeration L4ieee_W11numeric_bit_itn72_lit[]={78,85,77,69,82,73,67,95,66,73,84,46,84,79,95,73,78,84,69,71,69,82,58,32,110,117,108,108,32,100,101,116,101,99,116,101,100,44,32,114,101,116,117,114,110,105,110,103,32,48};
2019 /* Implementation of subprogram :ieee:numeric_bit:to_integer */
L4ieee_Q11numeric_bit_Y10to_integer_i328(const L4ieee_Q11numeric_bit_T8unsigned & L4ieee_Q11numeric_bit_Y10to_integer_i328_C3arg)2020 integer L4ieee_Q11numeric_bit_Y10to_integer_i328(const L4ieee_Q11numeric_bit_T8unsigned &L4ieee_Q11numeric_bit_Y10to_integer_i328_C3arg)
2021 {
2022 integer L4ieee_Q11numeric_bit_Y10to_integer_i328_C8arg_left;
2023 array_alias<L4ieee_Q11numeric_bit_T8unsigned > L4ieee_Q11numeric_bit_Y10to_integer_i328_H4xarg;
2024 integer L4ieee_Q11numeric_bit_Y10to_integer_i328_V6result,L4ieee_Q11numeric_bit_Y10to_integer_i328_L5491ln_C1i,L4ieee_Q11numeric_bit_Y10to_integer_i328_L5491ln_C1i_lc;
2025 L4ieee_Q11numeric_bit_Y10to_integer_i328_C8arg_left=(L4ieee_Q11numeric_bit_Y10to_integer_i328_C3arg.info->length-1);
2026 L4ieee_Q11numeric_bit_Y10to_integer_i328_H4xarg.set((new array_info((&L4ieee_Q11numeric_bit_I8unsigned_INFO)->element_type,(&L4ieee_Q11numeric_bit_I8unsigned_INFO)->index_type,L4ieee_Q11numeric_bit_Y10to_integer_i328_C8arg_left,downto,0,0)), L4ieee_Q11numeric_bit_Y10to_integer_i328_C3arg.data);
2027 L4ieee_Q11numeric_bit_Y10to_integer_i328_V6result=0;
2028 if((L4ieee_Q11numeric_bit_Y10to_integer_i328_C3arg.info->length<1)) {
2029 if(!enumeration(0))
2030 report(array_alias<L3std_Q8standard_T6string >(new array_info((&L3std_Q8standard_I6string_INFO)->element_type,(&L3std_Q8standard_I6string_INFO)->index_type,1,to,1+49,0),L4ieee_W11numeric_bit_itn72_lit),enumeration(1));
2031 return 0;
2032 }
2033 for (L4ieee_Q11numeric_bit_Y10to_integer_i328_L5491ln_C1i=L4ieee_Q11numeric_bit_Y10to_integer_i328_C8arg_left,L4ieee_Q11numeric_bit_Y10to_integer_i328_L5491ln_C1i_lc=down_range_to_length<integer>(L4ieee_Q11numeric_bit_Y10to_integer_i328_C8arg_left,0); L4ieee_Q11numeric_bit_Y10to_integer_i328_L5491ln_C1i_lc!=0; L4ieee_Q11numeric_bit_Y10to_integer_i328_L5491ln_C1i--,L4ieee_Q11numeric_bit_Y10to_integer_i328_L5491ln_C1i_lc--) {
2034 L4ieee_Q11numeric_bit_Y10to_integer_i328_V6result=(L4ieee_Q11numeric_bit_Y10to_integer_i328_V6result+L4ieee_Q11numeric_bit_Y10to_integer_i328_V6result);
2035 if((L4ieee_Q11numeric_bit_Y10to_integer_i328_H4xarg[L4ieee_Q11numeric_bit_Y10to_integer_i328_L5491ln_C1i]==enumeration(1))) {
2036 L4ieee_Q11numeric_bit_Y10to_integer_i328_V6result=(L4ieee_Q11numeric_bit_Y10to_integer_i328_V6result+1);
2037 }
2038 }
2039 return L4ieee_Q11numeric_bit_Y10to_integer_i328_V6result;
2040 }
2041 enumeration L4ieee_W11numeric_bit_itn73_lit[]={78,85,77,69,82,73,67,95,66,73,84,46,84,79,95,73,78,84,69,71,69,82,58,32,110,117,108,108,32,100,101,116,101,99,116,101,100,44,32,114,101,116,117,114,110,105,110,103,32,48};
2042 /* Implementation of subprogram :ieee:numeric_bit:to_integer */
L4ieee_Q11numeric_bit_Y10to_integer_i330(const L4ieee_Q11numeric_bit_T6signed & L4ieee_Q11numeric_bit_Y10to_integer_i330_C3arg)2043 integer L4ieee_Q11numeric_bit_Y10to_integer_i330(const L4ieee_Q11numeric_bit_T6signed &L4ieee_Q11numeric_bit_Y10to_integer_i330_C3arg)
2044 {
2045 if((L4ieee_Q11numeric_bit_Y10to_integer_i330_C3arg.info->length<1)) {
2046 if(!enumeration(0))
2047 report(array_alias<L3std_Q8standard_T6string >(new array_info((&L3std_Q8standard_I6string_INFO)->element_type,(&L3std_Q8standard_I6string_INFO)->index_type,1,to,1+49,0),L4ieee_W11numeric_bit_itn73_lit),enumeration(1));
2048 return 0;
2049 }
2050 if((L4ieee_Q11numeric_bit_Y10to_integer_i330_C3arg[L4ieee_Q11numeric_bit_Y10to_integer_i330_C3arg.info->left_bound]==enumeration(0))) {
2051 return L4ieee_Q11numeric_bit_Y10to_integer_i328 (array_alias<L4ieee_Q11numeric_bit_T8unsigned >((&L4ieee_Q11numeric_bit_I8unsigned_INFO),L4ieee_Q11numeric_bit_Y10to_integer_i330_C3arg));
2052 } else {
2053 return ((-L4ieee_Q11numeric_bit_Y10to_integer_i328 (array_alias<L4ieee_Q11numeric_bit_T8unsigned >((&L4ieee_Q11numeric_bit_I8unsigned_INFO),L4ieee_Q11numeric_bit_Y8op_minus_i56 (L4ieee_Q11numeric_bit_Y7op_plus_i74 (L4ieee_Q11numeric_bit_Y10to_integer_i330_C3arg,1)))))-1);
2054 }
2055 }
2056 enumeration L4ieee_W11numeric_bit_itn74_lit[]={78,85,77,69,82,73,67,95,66,73,84,46,84,79,95,85,78,83,73,71,78,69,68,58,32,118,101,99,116,111,114,32,116,114,117,110,99,97,116,101,100};
2057 /* Implementation of subprogram :ieee:numeric_bit:to_unsigned */
L4ieee_Q11numeric_bit_Y11to_unsigned_i333(const integer L4ieee_Q11numeric_bit_Y11to_unsigned_i333_C3arg,const integer L4ieee_Q11numeric_bit_Y11to_unsigned_i333_C4size)2058 L4ieee_Q11numeric_bit_T8unsigned L4ieee_Q11numeric_bit_Y11to_unsigned_i333(const integer L4ieee_Q11numeric_bit_Y11to_unsigned_i333_C3arg,const integer L4ieee_Q11numeric_bit_Y11to_unsigned_i333_C4size)
2059 {
2060 L4ieee_Q11numeric_bit_T8unsigned L4ieee_Q11numeric_bit_Y11to_unsigned_i333_V6result;
2061 integer L4ieee_Q11numeric_bit_Y11to_unsigned_i333_V5i_val,L4ieee_Q11numeric_bit_Y11to_unsigned_i333_L5500ln_C1i,L4ieee_Q11numeric_bit_Y11to_unsigned_i333_L5500ln_C1i_lc;
2062 L4ieee_Q11numeric_bit_Y11to_unsigned_i333_V6result.init((new array_info((&L4ieee_Q11numeric_bit_I8unsigned_INFO)->element_type,(&L4ieee_Q11numeric_bit_I8unsigned_INFO)->index_type,(L4ieee_Q11numeric_bit_Y11to_unsigned_i333_C4size-1),downto,0,0)),enumeration(0));
2063 L4ieee_Q11numeric_bit_Y11to_unsigned_i333_V5i_val=L4ieee_Q11numeric_bit_Y11to_unsigned_i333_C3arg;
2064 if((L4ieee_Q11numeric_bit_Y11to_unsigned_i333_C4size<1)) {
2065 return array_alias<L4ieee_Q11numeric_bit_T8unsigned >((&L4ieee_Q11numeric_bit_I8unsigned_INFO),L4ieee_W11numeric_bit_C3nau);
2066 }
2067 for (L4ieee_Q11numeric_bit_Y11to_unsigned_i333_L5500ln_C1i=0,L4ieee_Q11numeric_bit_Y11to_unsigned_i333_L5500ln_C1i_lc=up_range_to_length<integer>(0,L4ieee_Q11numeric_bit_Y11to_unsigned_i333_V6result.info->left_bound); L4ieee_Q11numeric_bit_Y11to_unsigned_i333_L5500ln_C1i_lc!=0; L4ieee_Q11numeric_bit_Y11to_unsigned_i333_L5500ln_C1i++,L4ieee_Q11numeric_bit_Y11to_unsigned_i333_L5500ln_C1i_lc--) {
2068 if((op_mod(L4ieee_Q11numeric_bit_Y11to_unsigned_i333_V5i_val,2)==0)) {
2069 L4ieee_Q11numeric_bit_Y11to_unsigned_i333_V6result[L4ieee_Q11numeric_bit_Y11to_unsigned_i333_L5500ln_C1i]=enumeration(0);
2070 } else {
2071 L4ieee_Q11numeric_bit_Y11to_unsigned_i333_V6result[L4ieee_Q11numeric_bit_Y11to_unsigned_i333_L5500ln_C1i]=enumeration(1);
2072 }
2073 L4ieee_Q11numeric_bit_Y11to_unsigned_i333_V5i_val=(L4ieee_Q11numeric_bit_Y11to_unsigned_i333_V5i_val/2);
2074 }
2075 if(op_not((L4ieee_Q11numeric_bit_Y11to_unsigned_i333_V5i_val==0))) {
2076 if(!enumeration(0))
2077 report(array_alias<L3std_Q8standard_T6string >(new array_info((&L3std_Q8standard_I6string_INFO)->element_type,(&L3std_Q8standard_I6string_INFO)->index_type,1,to,1+40,0),L4ieee_W11numeric_bit_itn74_lit),enumeration(1));
2078 }
2079 return array_alias<L4ieee_Q11numeric_bit_T8unsigned >((&L4ieee_Q11numeric_bit_I8unsigned_INFO),L4ieee_Q11numeric_bit_Y11to_unsigned_i333_V6result);
2080 }
2081 enumeration L4ieee_W11numeric_bit_itn75_lit[]={78,85,77,69,82,73,67,95,66,73,84,46,84,79,95,83,73,71,78,69,68,58,32,118,101,99,116,111,114,32,116,114,117,110,99,97,116,101,100};
2082 /* Implementation of subprogram :ieee:numeric_bit:to_signed */
L4ieee_Q11numeric_bit_Y9to_signed_i336(const integer L4ieee_Q11numeric_bit_Y9to_signed_i336_C3arg,const integer L4ieee_Q11numeric_bit_Y9to_signed_i336_C4size)2083 L4ieee_Q11numeric_bit_T6signed L4ieee_Q11numeric_bit_Y9to_signed_i336(const integer L4ieee_Q11numeric_bit_Y9to_signed_i336_C3arg,const integer L4ieee_Q11numeric_bit_Y9to_signed_i336_C4size)
2084 {
2085 L4ieee_Q11numeric_bit_T6signed L4ieee_Q11numeric_bit_Y9to_signed_i336_V6result;
2086 enumeration L4ieee_Q11numeric_bit_Y9to_signed_i336_V5b_val;
2087 integer L4ieee_Q11numeric_bit_Y9to_signed_i336_V5i_val,L4ieee_Q11numeric_bit_Y9to_signed_i336_L5508ln_C1i,L4ieee_Q11numeric_bit_Y9to_signed_i336_L5508ln_C1i_lc;
2088 L4ieee_Q11numeric_bit_Y9to_signed_i336_V6result.init((new array_info((&L4ieee_Q11numeric_bit_I6signed_INFO)->element_type,(&L4ieee_Q11numeric_bit_I6signed_INFO)->index_type,(L4ieee_Q11numeric_bit_Y9to_signed_i336_C4size-1),downto,0,0)),enumeration(0));
2089 L4ieee_Q11numeric_bit_Y9to_signed_i336_V5b_val=enumeration(0);
2090 L4ieee_Q11numeric_bit_Y9to_signed_i336_V5i_val=L4ieee_Q11numeric_bit_Y9to_signed_i336_C3arg;
2091 if((L4ieee_Q11numeric_bit_Y9to_signed_i336_C4size<1)) {
2092 return array_alias<L4ieee_Q11numeric_bit_T6signed >((&L4ieee_Q11numeric_bit_I6signed_INFO),L4ieee_W11numeric_bit_C3nas);
2093 }
2094 if((L4ieee_Q11numeric_bit_Y9to_signed_i336_C3arg<0)) {
2095 L4ieee_Q11numeric_bit_Y9to_signed_i336_V5b_val=enumeration(1);
2096 L4ieee_Q11numeric_bit_Y9to_signed_i336_V5i_val=(-(L4ieee_Q11numeric_bit_Y9to_signed_i336_C3arg+1));
2097 }
2098 for (L4ieee_Q11numeric_bit_Y9to_signed_i336_L5508ln_C1i=0,L4ieee_Q11numeric_bit_Y9to_signed_i336_L5508ln_C1i_lc=up_range_to_length<integer>(0,L4ieee_Q11numeric_bit_Y9to_signed_i336_V6result.info->left_bound); L4ieee_Q11numeric_bit_Y9to_signed_i336_L5508ln_C1i_lc!=0; L4ieee_Q11numeric_bit_Y9to_signed_i336_L5508ln_C1i++,L4ieee_Q11numeric_bit_Y9to_signed_i336_L5508ln_C1i_lc--) {
2099 if((op_mod(L4ieee_Q11numeric_bit_Y9to_signed_i336_V5i_val,2)==0)) {
2100 L4ieee_Q11numeric_bit_Y9to_signed_i336_V6result[L4ieee_Q11numeric_bit_Y9to_signed_i336_L5508ln_C1i]=L4ieee_Q11numeric_bit_Y9to_signed_i336_V5b_val;
2101 } else {
2102 L4ieee_Q11numeric_bit_Y9to_signed_i336_V6result[L4ieee_Q11numeric_bit_Y9to_signed_i336_L5508ln_C1i]=op_not(L4ieee_Q11numeric_bit_Y9to_signed_i336_V5b_val);
2103 }
2104 L4ieee_Q11numeric_bit_Y9to_signed_i336_V5i_val=(L4ieee_Q11numeric_bit_Y9to_signed_i336_V5i_val/2);
2105 }
2106 if(((L4ieee_Q11numeric_bit_Y9to_signed_i336_V5i_val!=0)||(L4ieee_Q11numeric_bit_Y9to_signed_i336_V5b_val!=L4ieee_Q11numeric_bit_Y9to_signed_i336_V6result[L4ieee_Q11numeric_bit_Y9to_signed_i336_V6result.info->left_bound]))) {
2107 if(!enumeration(0))
2108 report(array_alias<L3std_Q8standard_T6string >(new array_info((&L3std_Q8standard_I6string_INFO)->element_type,(&L3std_Q8standard_I6string_INFO)->index_type,1,to,1+38,0),L4ieee_W11numeric_bit_itn75_lit),enumeration(1));
2109 }
2110 return array_alias<L4ieee_Q11numeric_bit_T6signed >((&L4ieee_Q11numeric_bit_I6signed_INFO),L4ieee_Q11numeric_bit_Y9to_signed_i336_V6result);
2111 }
2112 /* Implementation of subprogram :ieee:numeric_bit:resize */
L4ieee_Q11numeric_bit_Y6resize_i323(const L4ieee_Q11numeric_bit_T6signed & L4ieee_Q11numeric_bit_Y6resize_i323_C3arg,const integer L4ieee_Q11numeric_bit_Y6resize_i323_C8new_size)2113 L4ieee_Q11numeric_bit_T6signed L4ieee_Q11numeric_bit_Y6resize_i323(const L4ieee_Q11numeric_bit_T6signed &L4ieee_Q11numeric_bit_Y6resize_i323_C3arg,const integer L4ieee_Q11numeric_bit_Y6resize_i323_C8new_size)
2114 {
2115 array_alias<L4ieee_Q11numeric_bit_T6signed > L4ieee_Q11numeric_bit_Y6resize_i323_H5invec;
2116 L4ieee_Q11numeric_bit_T6signed L4ieee_Q11numeric_bit_Y6resize_i323_V6result;
2117 integer L4ieee_Q11numeric_bit_Y6resize_i323_C5bound;
2118 L4ieee_Q11numeric_bit_Y6resize_i323_H5invec.set((new array_info((&L4ieee_Q11numeric_bit_I6signed_INFO)->element_type,(&L4ieee_Q11numeric_bit_I6signed_INFO)->index_type,(L4ieee_Q11numeric_bit_Y6resize_i323_C3arg.info->length-1),downto,0,0)), L4ieee_Q11numeric_bit_Y6resize_i323_C3arg.data);
2119 L4ieee_Q11numeric_bit_Y6resize_i323_V6result.init((new array_info((&L4ieee_Q11numeric_bit_I6signed_INFO)->element_type,(&L4ieee_Q11numeric_bit_I6signed_INFO)->index_type,(L4ieee_Q11numeric_bit_Y6resize_i323_C8new_size-1),downto,0,0)),enumeration(0));
2120 L4ieee_Q11numeric_bit_Y6resize_i323_V6result=L4ieee_Q11numeric_bit_T6signed(new array_info((new array_info((&L4ieee_Q11numeric_bit_I6signed_INFO)->element_type,(&L4ieee_Q11numeric_bit_I6signed_INFO)->index_type,(L4ieee_Q11numeric_bit_Y6resize_i323_C8new_size-1),downto,0,0))->element_type,(new array_info((&L4ieee_Q11numeric_bit_I6signed_INFO)->element_type,(&L4ieee_Q11numeric_bit_I6signed_INFO)->index_type,(L4ieee_Q11numeric_bit_Y6resize_i323_C8new_size-1),downto,0,0))->index_type,(L4ieee_Q11numeric_bit_Y6resize_i323_C8new_size-1),downto,0,0),enumeration(0));
2121 L4ieee_Q11numeric_bit_Y6resize_i323_C5bound=(L4ieee_W11numeric_bit_Y3min_i12 (L4ieee_Q11numeric_bit_Y6resize_i323_C3arg.info->length,L4ieee_Q11numeric_bit_Y6resize_i323_V6result.info->length)-2);
2122 if((L4ieee_Q11numeric_bit_Y6resize_i323_C8new_size<1)) {
2123 return array_alias<L4ieee_Q11numeric_bit_T6signed >((&L4ieee_Q11numeric_bit_I6signed_INFO),L4ieee_W11numeric_bit_C3nas);
2124 }
2125 if((L4ieee_Q11numeric_bit_Y6resize_i323_C3arg.info->length==0)) {
2126 return array_alias<L4ieee_Q11numeric_bit_T6signed >((&L4ieee_Q11numeric_bit_I6signed_INFO),L4ieee_Q11numeric_bit_Y6resize_i323_V6result);
2127 }
2128 L4ieee_Q11numeric_bit_Y6resize_i323_V6result=L4ieee_Q11numeric_bit_T6signed(new array_info((new array_info((&L4ieee_Q11numeric_bit_I6signed_INFO)->element_type,(&L4ieee_Q11numeric_bit_I6signed_INFO)->index_type,(L4ieee_Q11numeric_bit_Y6resize_i323_C8new_size-1),downto,0,0))->element_type,(new array_info((&L4ieee_Q11numeric_bit_I6signed_INFO)->element_type,(&L4ieee_Q11numeric_bit_I6signed_INFO)->index_type,(L4ieee_Q11numeric_bit_Y6resize_i323_C8new_size-1),downto,0,0))->index_type,(L4ieee_Q11numeric_bit_Y6resize_i323_C8new_size-1),downto,0,0),L4ieee_Q11numeric_bit_Y6resize_i323_C3arg[L4ieee_Q11numeric_bit_Y6resize_i323_C3arg.info->left_bound]);
2129 if((L4ieee_Q11numeric_bit_Y6resize_i323_C5bound>=0)) {
2130 array_alias<L4ieee_Q11numeric_bit_T6signed >(new array_info((&L4ieee_Q11numeric_bit_I6signed_INFO)->element_type,(&L4ieee_Q11numeric_bit_I6signed_INFO)->index_type,L4ieee_Q11numeric_bit_Y6resize_i323_C5bound,downto,0,0),&L4ieee_Q11numeric_bit_Y6resize_i323_V6result[L4ieee_Q11numeric_bit_Y6resize_i323_C5bound])=array_alias<L4ieee_Q11numeric_bit_T6signed >(new array_info((&L4ieee_Q11numeric_bit_I6signed_INFO)->element_type,(&L4ieee_Q11numeric_bit_I6signed_INFO)->index_type,L4ieee_Q11numeric_bit_Y6resize_i323_C5bound,downto,0,0),&L4ieee_Q11numeric_bit_Y6resize_i323_H5invec[L4ieee_Q11numeric_bit_Y6resize_i323_C5bound]);
2131 }
2132 return array_alias<L4ieee_Q11numeric_bit_T6signed >((&L4ieee_Q11numeric_bit_I6signed_INFO),L4ieee_Q11numeric_bit_Y6resize_i323_V6result);
2133 }
2134 /* Implementation of subprogram :ieee:numeric_bit:resize */
L4ieee_Q11numeric_bit_Y6resize_i326(const L4ieee_Q11numeric_bit_T8unsigned & L4ieee_Q11numeric_bit_Y6resize_i326_C3arg,const integer L4ieee_Q11numeric_bit_Y6resize_i326_C8new_size)2135 L4ieee_Q11numeric_bit_T8unsigned L4ieee_Q11numeric_bit_Y6resize_i326(const L4ieee_Q11numeric_bit_T8unsigned &L4ieee_Q11numeric_bit_Y6resize_i326_C3arg,const integer L4ieee_Q11numeric_bit_Y6resize_i326_C8new_size)
2136 {
2137 integer L4ieee_Q11numeric_bit_Y6resize_i326_C8arg_left;
2138 array_alias<L4ieee_Q11numeric_bit_T8unsigned > L4ieee_Q11numeric_bit_Y6resize_i326_H4xarg;
2139 L4ieee_Q11numeric_bit_T8unsigned L4ieee_Q11numeric_bit_Y6resize_i326_V6result;
2140 L4ieee_Q11numeric_bit_Y6resize_i326_C8arg_left=(L4ieee_Q11numeric_bit_Y6resize_i326_C3arg.info->length-1);
2141 L4ieee_Q11numeric_bit_Y6resize_i326_H4xarg.set((new array_info((&L4ieee_Q11numeric_bit_I8unsigned_INFO)->element_type,(&L4ieee_Q11numeric_bit_I8unsigned_INFO)->index_type,L4ieee_Q11numeric_bit_Y6resize_i326_C8arg_left,downto,0,0)), L4ieee_Q11numeric_bit_Y6resize_i326_C3arg.data);
2142 L4ieee_Q11numeric_bit_Y6resize_i326_V6result.init((new array_info((&L4ieee_Q11numeric_bit_I8unsigned_INFO)->element_type,(&L4ieee_Q11numeric_bit_I8unsigned_INFO)->index_type,(L4ieee_Q11numeric_bit_Y6resize_i326_C8new_size-1),downto,0,0)),enumeration(0));
2143 L4ieee_Q11numeric_bit_Y6resize_i326_V6result=L4ieee_Q11numeric_bit_T8unsigned(new array_info((new array_info((&L4ieee_Q11numeric_bit_I8unsigned_INFO)->element_type,(&L4ieee_Q11numeric_bit_I8unsigned_INFO)->index_type,(L4ieee_Q11numeric_bit_Y6resize_i326_C8new_size-1),downto,0,0))->element_type,(new array_info((&L4ieee_Q11numeric_bit_I8unsigned_INFO)->element_type,(&L4ieee_Q11numeric_bit_I8unsigned_INFO)->index_type,(L4ieee_Q11numeric_bit_Y6resize_i326_C8new_size-1),downto,0,0))->index_type,(L4ieee_Q11numeric_bit_Y6resize_i326_C8new_size-1),downto,0,0),enumeration(0));
2144 if((L4ieee_Q11numeric_bit_Y6resize_i326_C8new_size<1)) {
2145 return array_alias<L4ieee_Q11numeric_bit_T8unsigned >((&L4ieee_Q11numeric_bit_I8unsigned_INFO),L4ieee_W11numeric_bit_C3nau);
2146 }
2147 if((L4ieee_Q11numeric_bit_Y6resize_i326_H4xarg.info->length==0)) {
2148 return array_alias<L4ieee_Q11numeric_bit_T8unsigned >((&L4ieee_Q11numeric_bit_I8unsigned_INFO),L4ieee_Q11numeric_bit_Y6resize_i326_V6result);
2149 }
2150 if((L4ieee_Q11numeric_bit_Y6resize_i326_V6result.info->length<L4ieee_Q11numeric_bit_Y6resize_i326_C3arg.info->length)) {
2151 array_alias<L4ieee_Q11numeric_bit_T8unsigned >(new array_info((&L4ieee_Q11numeric_bit_I8unsigned_INFO)->element_type,(&L4ieee_Q11numeric_bit_I8unsigned_INFO)->index_type,L4ieee_Q11numeric_bit_Y6resize_i326_V6result.info->left_bound,downto,0,0),&L4ieee_Q11numeric_bit_Y6resize_i326_V6result[L4ieee_Q11numeric_bit_Y6resize_i326_V6result.info->left_bound])=array_alias<L4ieee_Q11numeric_bit_T8unsigned >(new array_info((&L4ieee_Q11numeric_bit_I8unsigned_INFO)->element_type,(&L4ieee_Q11numeric_bit_I8unsigned_INFO)->index_type,L4ieee_Q11numeric_bit_Y6resize_i326_V6result.info->left_bound,downto,0,0),&L4ieee_Q11numeric_bit_Y6resize_i326_H4xarg[L4ieee_Q11numeric_bit_Y6resize_i326_V6result.info->left_bound]);
2152 } else {
2153 array_alias<L4ieee_Q11numeric_bit_T8unsigned >(new array_info((&L4ieee_Q11numeric_bit_I8unsigned_INFO)->element_type,(&L4ieee_Q11numeric_bit_I8unsigned_INFO)->index_type,L4ieee_Q11numeric_bit_Y6resize_i326_V6result.info->left_bound,downto,(L4ieee_Q11numeric_bit_Y6resize_i326_H4xarg.info->left_bound+1),0),&L4ieee_Q11numeric_bit_Y6resize_i326_V6result[L4ieee_Q11numeric_bit_Y6resize_i326_V6result.info->left_bound])=L4ieee_Q11numeric_bit_T8unsigned(new array_info((new array_info((&L4ieee_Q11numeric_bit_I8unsigned_INFO)->element_type,(&L4ieee_Q11numeric_bit_I8unsigned_INFO)->index_type,L4ieee_Q11numeric_bit_Y6resize_i326_V6result.info->left_bound,downto,(L4ieee_Q11numeric_bit_Y6resize_i326_H4xarg.info->left_bound+1),0))->element_type,(new array_info((&L4ieee_Q11numeric_bit_I8unsigned_INFO)->element_type,(&L4ieee_Q11numeric_bit_I8unsigned_INFO)->index_type,L4ieee_Q11numeric_bit_Y6resize_i326_V6result.info->left_bound,downto,(L4ieee_Q11numeric_bit_Y6resize_i326_H4xarg.info->left_bound+1),0))->index_type,L4ieee_Q11numeric_bit_Y6resize_i326_V6result.info->left_bound,downto,(L4ieee_Q11numeric_bit_Y6resize_i326_H4xarg.info->left_bound+1),0),enumeration(0));
2154 array_alias<L4ieee_Q11numeric_bit_T8unsigned >(new array_info((&L4ieee_Q11numeric_bit_I8unsigned_INFO)->element_type,(&L4ieee_Q11numeric_bit_I8unsigned_INFO)->index_type,L4ieee_Q11numeric_bit_Y6resize_i326_H4xarg.info->left_bound,downto,0,0),&L4ieee_Q11numeric_bit_Y6resize_i326_V6result[L4ieee_Q11numeric_bit_Y6resize_i326_H4xarg.info->left_bound])=L4ieee_Q11numeric_bit_Y6resize_i326_H4xarg;
2155 }
2156 return array_alias<L4ieee_Q11numeric_bit_T8unsigned >((&L4ieee_Q11numeric_bit_I8unsigned_INFO),L4ieee_Q11numeric_bit_Y6resize_i326_V6result);
2157 }
2158 /* Implementation of subprogram :ieee:numeric_bit:"not" */
L4ieee_Q11numeric_bit_Y6op_not_i338(const L4ieee_Q11numeric_bit_T8unsigned & L4ieee_Q11numeric_bit_Y6op_not_i338_C1l)2159 L4ieee_Q11numeric_bit_T8unsigned L4ieee_Q11numeric_bit_Y6op_not_i338(const L4ieee_Q11numeric_bit_T8unsigned &L4ieee_Q11numeric_bit_Y6op_not_i338_C1l)
2160 {
2161 L4ieee_Q11numeric_bit_T8unsigned L4ieee_Q11numeric_bit_Y6op_not_i338_V6result;
2162 L4ieee_Q11numeric_bit_Y6op_not_i338_V6result.init((new array_info((&L4ieee_Q11numeric_bit_I8unsigned_INFO)->element_type,(&L4ieee_Q11numeric_bit_I8unsigned_INFO)->index_type,(L4ieee_Q11numeric_bit_Y6op_not_i338_C1l.info->length-1),downto,0,0)),enumeration(0));
2163 L4ieee_Q11numeric_bit_Y6op_not_i338_V6result=array_alias<L4ieee_Q11numeric_bit_T8unsigned >((&L4ieee_Q11numeric_bit_I8unsigned_INFO),op_array_not(array_alias<L3std_Q8standard_T10bit_vector >((&L3std_Q8standard_I10bit_vector_INFO),L4ieee_Q11numeric_bit_Y6op_not_i338_C1l)));
2164 return array_alias<L4ieee_Q11numeric_bit_T8unsigned >((&L4ieee_Q11numeric_bit_I8unsigned_INFO),L4ieee_Q11numeric_bit_Y6op_not_i338_V6result);
2165 }
2166 /* Implementation of subprogram :ieee:numeric_bit:"and" */
L4ieee_Q11numeric_bit_Y6op_and_i341(const L4ieee_Q11numeric_bit_T8unsigned & L4ieee_Q11numeric_bit_Y6op_and_i341_C1l,const L4ieee_Q11numeric_bit_T8unsigned & L4ieee_Q11numeric_bit_Y6op_and_i341_C1r)2167 L4ieee_Q11numeric_bit_T8unsigned L4ieee_Q11numeric_bit_Y6op_and_i341(const L4ieee_Q11numeric_bit_T8unsigned &L4ieee_Q11numeric_bit_Y6op_and_i341_C1l,const L4ieee_Q11numeric_bit_T8unsigned &L4ieee_Q11numeric_bit_Y6op_and_i341_C1r)
2168 {
2169 L4ieee_Q11numeric_bit_T8unsigned L4ieee_Q11numeric_bit_Y6op_and_i341_V6result;
2170 L4ieee_Q11numeric_bit_Y6op_and_i341_V6result.init((new array_info((&L4ieee_Q11numeric_bit_I8unsigned_INFO)->element_type,(&L4ieee_Q11numeric_bit_I8unsigned_INFO)->index_type,(L4ieee_Q11numeric_bit_Y6op_and_i341_C1l.info->length-1),downto,0,0)),enumeration(0));
2171 L4ieee_Q11numeric_bit_Y6op_and_i341_V6result=array_alias<L4ieee_Q11numeric_bit_T8unsigned >((&L4ieee_Q11numeric_bit_I8unsigned_INFO),op_array_and(array_alias<L3std_Q8standard_T10bit_vector >((&L3std_Q8standard_I10bit_vector_INFO),L4ieee_Q11numeric_bit_Y6op_and_i341_C1l),array_alias<L3std_Q8standard_T10bit_vector >((&L3std_Q8standard_I10bit_vector_INFO),L4ieee_Q11numeric_bit_Y6op_and_i341_C1r)));
2172 return array_alias<L4ieee_Q11numeric_bit_T8unsigned >((&L4ieee_Q11numeric_bit_I8unsigned_INFO),L4ieee_Q11numeric_bit_Y6op_and_i341_V6result);
2173 }
2174 /* Implementation of subprogram :ieee:numeric_bit:"or" */
L4ieee_Q11numeric_bit_Y5op_or_i344(const L4ieee_Q11numeric_bit_T8unsigned & L4ieee_Q11numeric_bit_Y5op_or_i344_C1l,const L4ieee_Q11numeric_bit_T8unsigned & L4ieee_Q11numeric_bit_Y5op_or_i344_C1r)2175 L4ieee_Q11numeric_bit_T8unsigned L4ieee_Q11numeric_bit_Y5op_or_i344(const L4ieee_Q11numeric_bit_T8unsigned &L4ieee_Q11numeric_bit_Y5op_or_i344_C1l,const L4ieee_Q11numeric_bit_T8unsigned &L4ieee_Q11numeric_bit_Y5op_or_i344_C1r)
2176 {
2177 L4ieee_Q11numeric_bit_T8unsigned L4ieee_Q11numeric_bit_Y5op_or_i344_V6result;
2178 L4ieee_Q11numeric_bit_Y5op_or_i344_V6result.init((new array_info((&L4ieee_Q11numeric_bit_I8unsigned_INFO)->element_type,(&L4ieee_Q11numeric_bit_I8unsigned_INFO)->index_type,(L4ieee_Q11numeric_bit_Y5op_or_i344_C1l.info->length-1),downto,0,0)),enumeration(0));
2179 L4ieee_Q11numeric_bit_Y5op_or_i344_V6result=array_alias<L4ieee_Q11numeric_bit_T8unsigned >((&L4ieee_Q11numeric_bit_I8unsigned_INFO),op_array_or(array_alias<L3std_Q8standard_T10bit_vector >((&L3std_Q8standard_I10bit_vector_INFO),L4ieee_Q11numeric_bit_Y5op_or_i344_C1l),array_alias<L3std_Q8standard_T10bit_vector >((&L3std_Q8standard_I10bit_vector_INFO),L4ieee_Q11numeric_bit_Y5op_or_i344_C1r)));
2180 return array_alias<L4ieee_Q11numeric_bit_T8unsigned >((&L4ieee_Q11numeric_bit_I8unsigned_INFO),L4ieee_Q11numeric_bit_Y5op_or_i344_V6result);
2181 }
2182 /* Implementation of subprogram :ieee:numeric_bit:"nand" */
L4ieee_Q11numeric_bit_Y7op_nand_i347(const L4ieee_Q11numeric_bit_T8unsigned & L4ieee_Q11numeric_bit_Y7op_nand_i347_C1l,const L4ieee_Q11numeric_bit_T8unsigned & L4ieee_Q11numeric_bit_Y7op_nand_i347_C1r)2183 L4ieee_Q11numeric_bit_T8unsigned L4ieee_Q11numeric_bit_Y7op_nand_i347(const L4ieee_Q11numeric_bit_T8unsigned &L4ieee_Q11numeric_bit_Y7op_nand_i347_C1l,const L4ieee_Q11numeric_bit_T8unsigned &L4ieee_Q11numeric_bit_Y7op_nand_i347_C1r)
2184 {
2185 L4ieee_Q11numeric_bit_T8unsigned L4ieee_Q11numeric_bit_Y7op_nand_i347_V6result;
2186 L4ieee_Q11numeric_bit_Y7op_nand_i347_V6result.init((new array_info((&L4ieee_Q11numeric_bit_I8unsigned_INFO)->element_type,(&L4ieee_Q11numeric_bit_I8unsigned_INFO)->index_type,(L4ieee_Q11numeric_bit_Y7op_nand_i347_C1l.info->length-1),downto,0,0)),enumeration(0));
2187 L4ieee_Q11numeric_bit_Y7op_nand_i347_V6result=array_alias<L4ieee_Q11numeric_bit_T8unsigned >((&L4ieee_Q11numeric_bit_I8unsigned_INFO),op_array_nand(array_alias<L3std_Q8standard_T10bit_vector >((&L3std_Q8standard_I10bit_vector_INFO),L4ieee_Q11numeric_bit_Y7op_nand_i347_C1l),array_alias<L3std_Q8standard_T10bit_vector >((&L3std_Q8standard_I10bit_vector_INFO),L4ieee_Q11numeric_bit_Y7op_nand_i347_C1r)));
2188 return array_alias<L4ieee_Q11numeric_bit_T8unsigned >((&L4ieee_Q11numeric_bit_I8unsigned_INFO),L4ieee_Q11numeric_bit_Y7op_nand_i347_V6result);
2189 }
2190 /* Implementation of subprogram :ieee:numeric_bit:"nor" */
L4ieee_Q11numeric_bit_Y6op_nor_i350(const L4ieee_Q11numeric_bit_T8unsigned & L4ieee_Q11numeric_bit_Y6op_nor_i350_C1l,const L4ieee_Q11numeric_bit_T8unsigned & L4ieee_Q11numeric_bit_Y6op_nor_i350_C1r)2191 L4ieee_Q11numeric_bit_T8unsigned L4ieee_Q11numeric_bit_Y6op_nor_i350(const L4ieee_Q11numeric_bit_T8unsigned &L4ieee_Q11numeric_bit_Y6op_nor_i350_C1l,const L4ieee_Q11numeric_bit_T8unsigned &L4ieee_Q11numeric_bit_Y6op_nor_i350_C1r)
2192 {
2193 L4ieee_Q11numeric_bit_T8unsigned L4ieee_Q11numeric_bit_Y6op_nor_i350_V6result;
2194 L4ieee_Q11numeric_bit_Y6op_nor_i350_V6result.init((new array_info((&L4ieee_Q11numeric_bit_I8unsigned_INFO)->element_type,(&L4ieee_Q11numeric_bit_I8unsigned_INFO)->index_type,(L4ieee_Q11numeric_bit_Y6op_nor_i350_C1l.info->length-1),downto,0,0)),enumeration(0));
2195 L4ieee_Q11numeric_bit_Y6op_nor_i350_V6result=array_alias<L4ieee_Q11numeric_bit_T8unsigned >((&L4ieee_Q11numeric_bit_I8unsigned_INFO),op_array_nor(array_alias<L3std_Q8standard_T10bit_vector >((&L3std_Q8standard_I10bit_vector_INFO),L4ieee_Q11numeric_bit_Y6op_nor_i350_C1l),array_alias<L3std_Q8standard_T10bit_vector >((&L3std_Q8standard_I10bit_vector_INFO),L4ieee_Q11numeric_bit_Y6op_nor_i350_C1r)));
2196 return array_alias<L4ieee_Q11numeric_bit_T8unsigned >((&L4ieee_Q11numeric_bit_I8unsigned_INFO),L4ieee_Q11numeric_bit_Y6op_nor_i350_V6result);
2197 }
2198 /* Implementation of subprogram :ieee:numeric_bit:"xor" */
L4ieee_Q11numeric_bit_Y6op_xor_i353(const L4ieee_Q11numeric_bit_T8unsigned & L4ieee_Q11numeric_bit_Y6op_xor_i353_C1l,const L4ieee_Q11numeric_bit_T8unsigned & L4ieee_Q11numeric_bit_Y6op_xor_i353_C1r)2199 L4ieee_Q11numeric_bit_T8unsigned L4ieee_Q11numeric_bit_Y6op_xor_i353(const L4ieee_Q11numeric_bit_T8unsigned &L4ieee_Q11numeric_bit_Y6op_xor_i353_C1l,const L4ieee_Q11numeric_bit_T8unsigned &L4ieee_Q11numeric_bit_Y6op_xor_i353_C1r)
2200 {
2201 L4ieee_Q11numeric_bit_T8unsigned L4ieee_Q11numeric_bit_Y6op_xor_i353_V6result;
2202 L4ieee_Q11numeric_bit_Y6op_xor_i353_V6result.init((new array_info((&L4ieee_Q11numeric_bit_I8unsigned_INFO)->element_type,(&L4ieee_Q11numeric_bit_I8unsigned_INFO)->index_type,(L4ieee_Q11numeric_bit_Y6op_xor_i353_C1l.info->length-1),downto,0,0)),enumeration(0));
2203 L4ieee_Q11numeric_bit_Y6op_xor_i353_V6result=array_alias<L4ieee_Q11numeric_bit_T8unsigned >((&L4ieee_Q11numeric_bit_I8unsigned_INFO),op_array_xor(array_alias<L3std_Q8standard_T10bit_vector >((&L3std_Q8standard_I10bit_vector_INFO),L4ieee_Q11numeric_bit_Y6op_xor_i353_C1l),array_alias<L3std_Q8standard_T10bit_vector >((&L3std_Q8standard_I10bit_vector_INFO),L4ieee_Q11numeric_bit_Y6op_xor_i353_C1r)));
2204 return array_alias<L4ieee_Q11numeric_bit_T8unsigned >((&L4ieee_Q11numeric_bit_I8unsigned_INFO),L4ieee_Q11numeric_bit_Y6op_xor_i353_V6result);
2205 }
2206 /* Implementation of subprogram :ieee:numeric_bit:"xnor" */
L4ieee_Q11numeric_bit_Y7op_xnor_i356(const L4ieee_Q11numeric_bit_T8unsigned & L4ieee_Q11numeric_bit_Y7op_xnor_i356_C1l,const L4ieee_Q11numeric_bit_T8unsigned & L4ieee_Q11numeric_bit_Y7op_xnor_i356_C1r)2207 L4ieee_Q11numeric_bit_T8unsigned L4ieee_Q11numeric_bit_Y7op_xnor_i356(const L4ieee_Q11numeric_bit_T8unsigned &L4ieee_Q11numeric_bit_Y7op_xnor_i356_C1l,const L4ieee_Q11numeric_bit_T8unsigned &L4ieee_Q11numeric_bit_Y7op_xnor_i356_C1r)
2208 {
2209 L4ieee_Q11numeric_bit_T8unsigned L4ieee_Q11numeric_bit_Y7op_xnor_i356_V6result;
2210 L4ieee_Q11numeric_bit_Y7op_xnor_i356_V6result.init((new array_info((&L4ieee_Q11numeric_bit_I8unsigned_INFO)->element_type,(&L4ieee_Q11numeric_bit_I8unsigned_INFO)->index_type,(L4ieee_Q11numeric_bit_Y7op_xnor_i356_C1l.info->length-1),downto,0,0)),enumeration(0));
2211 L4ieee_Q11numeric_bit_Y7op_xnor_i356_V6result=array_alias<L4ieee_Q11numeric_bit_T8unsigned >((&L4ieee_Q11numeric_bit_I8unsigned_INFO),op_array_xnor(array_alias<L3std_Q8standard_T10bit_vector >((&L3std_Q8standard_I10bit_vector_INFO),L4ieee_Q11numeric_bit_Y7op_xnor_i356_C1l),array_alias<L3std_Q8standard_T10bit_vector >((&L3std_Q8standard_I10bit_vector_INFO),L4ieee_Q11numeric_bit_Y7op_xnor_i356_C1r)));
2212 return array_alias<L4ieee_Q11numeric_bit_T8unsigned >((&L4ieee_Q11numeric_bit_I8unsigned_INFO),L4ieee_Q11numeric_bit_Y7op_xnor_i356_V6result);
2213 }
2214 /* Implementation of subprogram :ieee:numeric_bit:"not" */
L4ieee_Q11numeric_bit_Y6op_not_i358(const L4ieee_Q11numeric_bit_T6signed & L4ieee_Q11numeric_bit_Y6op_not_i358_C1l)2215 L4ieee_Q11numeric_bit_T6signed L4ieee_Q11numeric_bit_Y6op_not_i358(const L4ieee_Q11numeric_bit_T6signed &L4ieee_Q11numeric_bit_Y6op_not_i358_C1l)
2216 {
2217 L4ieee_Q11numeric_bit_T6signed L4ieee_Q11numeric_bit_Y6op_not_i358_V6result;
2218 L4ieee_Q11numeric_bit_Y6op_not_i358_V6result.init((new array_info((&L4ieee_Q11numeric_bit_I6signed_INFO)->element_type,(&L4ieee_Q11numeric_bit_I6signed_INFO)->index_type,(L4ieee_Q11numeric_bit_Y6op_not_i358_C1l.info->length-1),downto,0,0)),enumeration(0));
2219 L4ieee_Q11numeric_bit_Y6op_not_i358_V6result=array_alias<L4ieee_Q11numeric_bit_T6signed >((&L4ieee_Q11numeric_bit_I6signed_INFO),op_array_not(array_alias<L3std_Q8standard_T10bit_vector >((&L3std_Q8standard_I10bit_vector_INFO),L4ieee_Q11numeric_bit_Y6op_not_i358_C1l)));
2220 return array_alias<L4ieee_Q11numeric_bit_T6signed >((&L4ieee_Q11numeric_bit_I6signed_INFO),L4ieee_Q11numeric_bit_Y6op_not_i358_V6result);
2221 }
2222 /* Implementation of subprogram :ieee:numeric_bit:"and" */
L4ieee_Q11numeric_bit_Y6op_and_i361(const L4ieee_Q11numeric_bit_T6signed & L4ieee_Q11numeric_bit_Y6op_and_i361_C1l,const L4ieee_Q11numeric_bit_T6signed & L4ieee_Q11numeric_bit_Y6op_and_i361_C1r)2223 L4ieee_Q11numeric_bit_T6signed L4ieee_Q11numeric_bit_Y6op_and_i361(const L4ieee_Q11numeric_bit_T6signed &L4ieee_Q11numeric_bit_Y6op_and_i361_C1l,const L4ieee_Q11numeric_bit_T6signed &L4ieee_Q11numeric_bit_Y6op_and_i361_C1r)
2224 {
2225 L4ieee_Q11numeric_bit_T6signed L4ieee_Q11numeric_bit_Y6op_and_i361_V6result;
2226 L4ieee_Q11numeric_bit_Y6op_and_i361_V6result.init((new array_info((&L4ieee_Q11numeric_bit_I6signed_INFO)->element_type,(&L4ieee_Q11numeric_bit_I6signed_INFO)->index_type,(L4ieee_Q11numeric_bit_Y6op_and_i361_C1l.info->length-1),downto,0,0)),enumeration(0));
2227 L4ieee_Q11numeric_bit_Y6op_and_i361_V6result=array_alias<L4ieee_Q11numeric_bit_T6signed >((&L4ieee_Q11numeric_bit_I6signed_INFO),op_array_and(array_alias<L3std_Q8standard_T10bit_vector >((&L3std_Q8standard_I10bit_vector_INFO),L4ieee_Q11numeric_bit_Y6op_and_i361_C1l),array_alias<L3std_Q8standard_T10bit_vector >((&L3std_Q8standard_I10bit_vector_INFO),L4ieee_Q11numeric_bit_Y6op_and_i361_C1r)));
2228 return array_alias<L4ieee_Q11numeric_bit_T6signed >((&L4ieee_Q11numeric_bit_I6signed_INFO),L4ieee_Q11numeric_bit_Y6op_and_i361_V6result);
2229 }
2230 /* Implementation of subprogram :ieee:numeric_bit:"or" */
L4ieee_Q11numeric_bit_Y5op_or_i364(const L4ieee_Q11numeric_bit_T6signed & L4ieee_Q11numeric_bit_Y5op_or_i364_C1l,const L4ieee_Q11numeric_bit_T6signed & L4ieee_Q11numeric_bit_Y5op_or_i364_C1r)2231 L4ieee_Q11numeric_bit_T6signed L4ieee_Q11numeric_bit_Y5op_or_i364(const L4ieee_Q11numeric_bit_T6signed &L4ieee_Q11numeric_bit_Y5op_or_i364_C1l,const L4ieee_Q11numeric_bit_T6signed &L4ieee_Q11numeric_bit_Y5op_or_i364_C1r)
2232 {
2233 L4ieee_Q11numeric_bit_T6signed L4ieee_Q11numeric_bit_Y5op_or_i364_V6result;
2234 L4ieee_Q11numeric_bit_Y5op_or_i364_V6result.init((new array_info((&L4ieee_Q11numeric_bit_I6signed_INFO)->element_type,(&L4ieee_Q11numeric_bit_I6signed_INFO)->index_type,(L4ieee_Q11numeric_bit_Y5op_or_i364_C1l.info->length-1),downto,0,0)),enumeration(0));
2235 L4ieee_Q11numeric_bit_Y5op_or_i364_V6result=array_alias<L4ieee_Q11numeric_bit_T6signed >((&L4ieee_Q11numeric_bit_I6signed_INFO),op_array_or(array_alias<L3std_Q8standard_T10bit_vector >((&L3std_Q8standard_I10bit_vector_INFO),L4ieee_Q11numeric_bit_Y5op_or_i364_C1l),array_alias<L3std_Q8standard_T10bit_vector >((&L3std_Q8standard_I10bit_vector_INFO),L4ieee_Q11numeric_bit_Y5op_or_i364_C1r)));
2236 return array_alias<L4ieee_Q11numeric_bit_T6signed >((&L4ieee_Q11numeric_bit_I6signed_INFO),L4ieee_Q11numeric_bit_Y5op_or_i364_V6result);
2237 }
2238 /* Implementation of subprogram :ieee:numeric_bit:"nand" */
L4ieee_Q11numeric_bit_Y7op_nand_i367(const L4ieee_Q11numeric_bit_T6signed & L4ieee_Q11numeric_bit_Y7op_nand_i367_C1l,const L4ieee_Q11numeric_bit_T6signed & L4ieee_Q11numeric_bit_Y7op_nand_i367_C1r)2239 L4ieee_Q11numeric_bit_T6signed L4ieee_Q11numeric_bit_Y7op_nand_i367(const L4ieee_Q11numeric_bit_T6signed &L4ieee_Q11numeric_bit_Y7op_nand_i367_C1l,const L4ieee_Q11numeric_bit_T6signed &L4ieee_Q11numeric_bit_Y7op_nand_i367_C1r)
2240 {
2241 L4ieee_Q11numeric_bit_T6signed L4ieee_Q11numeric_bit_Y7op_nand_i367_V6result;
2242 L4ieee_Q11numeric_bit_Y7op_nand_i367_V6result.init((new array_info((&L4ieee_Q11numeric_bit_I6signed_INFO)->element_type,(&L4ieee_Q11numeric_bit_I6signed_INFO)->index_type,(L4ieee_Q11numeric_bit_Y7op_nand_i367_C1l.info->length-1),downto,0,0)),enumeration(0));
2243 L4ieee_Q11numeric_bit_Y7op_nand_i367_V6result=array_alias<L4ieee_Q11numeric_bit_T6signed >((&L4ieee_Q11numeric_bit_I6signed_INFO),op_array_nand(array_alias<L3std_Q8standard_T10bit_vector >((&L3std_Q8standard_I10bit_vector_INFO),L4ieee_Q11numeric_bit_Y7op_nand_i367_C1l),array_alias<L3std_Q8standard_T10bit_vector >((&L3std_Q8standard_I10bit_vector_INFO),L4ieee_Q11numeric_bit_Y7op_nand_i367_C1r)));
2244 return array_alias<L4ieee_Q11numeric_bit_T6signed >((&L4ieee_Q11numeric_bit_I6signed_INFO),L4ieee_Q11numeric_bit_Y7op_nand_i367_V6result);
2245 }
2246 /* Implementation of subprogram :ieee:numeric_bit:"nor" */
L4ieee_Q11numeric_bit_Y6op_nor_i370(const L4ieee_Q11numeric_bit_T6signed & L4ieee_Q11numeric_bit_Y6op_nor_i370_C1l,const L4ieee_Q11numeric_bit_T6signed & L4ieee_Q11numeric_bit_Y6op_nor_i370_C1r)2247 L4ieee_Q11numeric_bit_T6signed L4ieee_Q11numeric_bit_Y6op_nor_i370(const L4ieee_Q11numeric_bit_T6signed &L4ieee_Q11numeric_bit_Y6op_nor_i370_C1l,const L4ieee_Q11numeric_bit_T6signed &L4ieee_Q11numeric_bit_Y6op_nor_i370_C1r)
2248 {
2249 L4ieee_Q11numeric_bit_T6signed L4ieee_Q11numeric_bit_Y6op_nor_i370_V6result;
2250 L4ieee_Q11numeric_bit_Y6op_nor_i370_V6result.init((new array_info((&L4ieee_Q11numeric_bit_I6signed_INFO)->element_type,(&L4ieee_Q11numeric_bit_I6signed_INFO)->index_type,(L4ieee_Q11numeric_bit_Y6op_nor_i370_C1l.info->length-1),downto,0,0)),enumeration(0));
2251 L4ieee_Q11numeric_bit_Y6op_nor_i370_V6result=array_alias<L4ieee_Q11numeric_bit_T6signed >((&L4ieee_Q11numeric_bit_I6signed_INFO),op_array_nor(array_alias<L3std_Q8standard_T10bit_vector >((&L3std_Q8standard_I10bit_vector_INFO),L4ieee_Q11numeric_bit_Y6op_nor_i370_C1l),array_alias<L3std_Q8standard_T10bit_vector >((&L3std_Q8standard_I10bit_vector_INFO),L4ieee_Q11numeric_bit_Y6op_nor_i370_C1r)));
2252 return array_alias<L4ieee_Q11numeric_bit_T6signed >((&L4ieee_Q11numeric_bit_I6signed_INFO),L4ieee_Q11numeric_bit_Y6op_nor_i370_V6result);
2253 }
2254 /* Implementation of subprogram :ieee:numeric_bit:"xor" */
L4ieee_Q11numeric_bit_Y6op_xor_i373(const L4ieee_Q11numeric_bit_T6signed & L4ieee_Q11numeric_bit_Y6op_xor_i373_C1l,const L4ieee_Q11numeric_bit_T6signed & L4ieee_Q11numeric_bit_Y6op_xor_i373_C1r)2255 L4ieee_Q11numeric_bit_T6signed L4ieee_Q11numeric_bit_Y6op_xor_i373(const L4ieee_Q11numeric_bit_T6signed &L4ieee_Q11numeric_bit_Y6op_xor_i373_C1l,const L4ieee_Q11numeric_bit_T6signed &L4ieee_Q11numeric_bit_Y6op_xor_i373_C1r)
2256 {
2257 L4ieee_Q11numeric_bit_T6signed L4ieee_Q11numeric_bit_Y6op_xor_i373_V6result;
2258 L4ieee_Q11numeric_bit_Y6op_xor_i373_V6result.init((new array_info((&L4ieee_Q11numeric_bit_I6signed_INFO)->element_type,(&L4ieee_Q11numeric_bit_I6signed_INFO)->index_type,(L4ieee_Q11numeric_bit_Y6op_xor_i373_C1l.info->length-1),downto,0,0)),enumeration(0));
2259 L4ieee_Q11numeric_bit_Y6op_xor_i373_V6result=array_alias<L4ieee_Q11numeric_bit_T6signed >((&L4ieee_Q11numeric_bit_I6signed_INFO),op_array_xor(array_alias<L3std_Q8standard_T10bit_vector >((&L3std_Q8standard_I10bit_vector_INFO),L4ieee_Q11numeric_bit_Y6op_xor_i373_C1l),array_alias<L3std_Q8standard_T10bit_vector >((&L3std_Q8standard_I10bit_vector_INFO),L4ieee_Q11numeric_bit_Y6op_xor_i373_C1r)));
2260 return array_alias<L4ieee_Q11numeric_bit_T6signed >((&L4ieee_Q11numeric_bit_I6signed_INFO),L4ieee_Q11numeric_bit_Y6op_xor_i373_V6result);
2261 }
2262 /* Implementation of subprogram :ieee:numeric_bit:"xnor" */
L4ieee_Q11numeric_bit_Y7op_xnor_i376(const L4ieee_Q11numeric_bit_T6signed & L4ieee_Q11numeric_bit_Y7op_xnor_i376_C1l,const L4ieee_Q11numeric_bit_T6signed & L4ieee_Q11numeric_bit_Y7op_xnor_i376_C1r)2263 L4ieee_Q11numeric_bit_T6signed L4ieee_Q11numeric_bit_Y7op_xnor_i376(const L4ieee_Q11numeric_bit_T6signed &L4ieee_Q11numeric_bit_Y7op_xnor_i376_C1l,const L4ieee_Q11numeric_bit_T6signed &L4ieee_Q11numeric_bit_Y7op_xnor_i376_C1r)
2264 {
2265 L4ieee_Q11numeric_bit_T6signed L4ieee_Q11numeric_bit_Y7op_xnor_i376_V6result;
2266 L4ieee_Q11numeric_bit_Y7op_xnor_i376_V6result.init((new array_info((&L4ieee_Q11numeric_bit_I6signed_INFO)->element_type,(&L4ieee_Q11numeric_bit_I6signed_INFO)->index_type,(L4ieee_Q11numeric_bit_Y7op_xnor_i376_C1l.info->length-1),downto,0,0)),enumeration(0));
2267 L4ieee_Q11numeric_bit_Y7op_xnor_i376_V6result=array_alias<L4ieee_Q11numeric_bit_T6signed >((&L4ieee_Q11numeric_bit_I6signed_INFO),op_array_xnor(array_alias<L3std_Q8standard_T10bit_vector >((&L3std_Q8standard_I10bit_vector_INFO),L4ieee_Q11numeric_bit_Y7op_xnor_i376_C1l),array_alias<L3std_Q8standard_T10bit_vector >((&L3std_Q8standard_I10bit_vector_INFO),L4ieee_Q11numeric_bit_Y7op_xnor_i376_C1r)));
2268 return array_alias<L4ieee_Q11numeric_bit_T6signed >((&L4ieee_Q11numeric_bit_I6signed_INFO),L4ieee_Q11numeric_bit_Y7op_xnor_i376_V6result);
2269 }
2270 /* Implementation of subprogram :ieee:numeric_bit:rising_edge */
L4ieee_Q11numeric_bit_Y11rising_edge_i378(sig_info<enumeration> * L4ieee_Q11numeric_bit_Y11rising_edge_i378_S1s,enumeration * L4ieee_Q11numeric_bit_Y11rising_edge_i378_R1s)2271 enumeration L4ieee_Q11numeric_bit_Y11rising_edge_i378(sig_info<enumeration> *L4ieee_Q11numeric_bit_Y11rising_edge_i378_S1s,enumeration *L4ieee_Q11numeric_bit_Y11rising_edge_i378_R1s)
2272 {
2273 return (attr_scalar_EVENT(L4ieee_Q11numeric_bit_Y11rising_edge_i378_S1s)&&((*L4ieee_Q11numeric_bit_Y11rising_edge_i378_R1s)==enumeration(1)));
2274 }
2275 /* Implementation of subprogram :ieee:numeric_bit:falling_edge */
L4ieee_Q11numeric_bit_Y12falling_edge_i380(sig_info<enumeration> * L4ieee_Q11numeric_bit_Y12falling_edge_i380_S1s,enumeration * L4ieee_Q11numeric_bit_Y12falling_edge_i380_R1s)2276 enumeration L4ieee_Q11numeric_bit_Y12falling_edge_i380(sig_info<enumeration> *L4ieee_Q11numeric_bit_Y12falling_edge_i380_S1s,enumeration *L4ieee_Q11numeric_bit_Y12falling_edge_i380_R1s)
2277 {
2278 return (attr_scalar_EVENT(L4ieee_Q11numeric_bit_Y12falling_edge_i380_S1s)&&((*L4ieee_Q11numeric_bit_Y12falling_edge_i380_R1s)==enumeration(0)));
2279 }
2280 /* Initialization function for package body :ieee:numeric_bit */
2281 int L4ieee_Q11numeric_bit_init ();
2282 int L3std_Q8standard_init ();
2283 bool L4ieee_W11numeric_bit_init_done = false;
L4ieee_W11numeric_bit_init()2284 int L4ieee_W11numeric_bit_init(){
2285 if (L4ieee_W11numeric_bit_init_done) return 1;
2286 L4ieee_W11numeric_bit_init_done=true;
2287 L4ieee_Q11numeric_bit_init ();
2288 L3std_Q8standard_init ();
2289 register_source_file("/home/stefan/cvs-local/freehdl-teaser/ieee/numeric_bit.vhdl","numeric_bit.vhdl");
2290 name_stack iname;
2291 iname.push("");
2292 void *sref=register_package_body(":ieee",":numeric_bit");
2293 L4ieee_W11numeric_bit_I3_t2_INFO.set((&L4ieee_Q11numeric_bit_I8unsigned_INFO)->element_type,parray_info((&L4ieee_Q11numeric_bit_I8unsigned_INFO))->index_type,0,downto,1,-1).register_type(":ieee:numeric_bit",":ieee:numeric_bit:_t2",":_t2",NULL);
2294 L4ieee_W11numeric_bit_I3_t3_INFO.set((&L4ieee_Q11numeric_bit_I6signed_INFO)->element_type,parray_info((&L4ieee_Q11numeric_bit_I6signed_INFO))->index_type,0,downto,1,-1).register_type(":ieee:numeric_bit",":ieee:numeric_bit:_t3",":_t3",NULL);
2295 L4ieee_W11numeric_bit_C3nau.init((&L4ieee_W11numeric_bit_I3_t2_INFO),enumeration(0));
2296 L4ieee_W11numeric_bit_C3nau=L4ieee_W11numeric_bit_T3_t2(new array_info((&L4ieee_W11numeric_bit_I3_t2_INFO)->element_type,(&L4ieee_W11numeric_bit_I3_t2_INFO)->index_type,0,downto,1,0),enumeration(0));
2297 L4ieee_W11numeric_bit_C3nas.init((&L4ieee_W11numeric_bit_I3_t3_INFO),enumeration(0));
2298 L4ieee_W11numeric_bit_C3nas=L4ieee_W11numeric_bit_T3_t3(new array_info((&L4ieee_W11numeric_bit_I3_t3_INFO)->element_type,(&L4ieee_W11numeric_bit_I3_t3_INFO)->index_type,0,downto,1,0),enumeration(0));
2299 L4ieee_W11numeric_bit_C10no_warning=enumeration(0);
2300 iname.pop();
2301 return 1;
2302 }
2303 /* handle for simulator to find package body initialization function */
2304 handle_info *L4ieee_W11numeric_bit_hinfo =
2305 add_handle("ieee","numeric_bit",NULL,NULL,&L4ieee_W11numeric_bit_init);
2306
2307 /* end of package body :ieee:numeric_bit */
2308