00001
00002
00003
00004
00005
00006
00007
00008
00009
00010
00011
00012
00013
00014
00015
00016
00017
00018
00019
00020
00021 #include <stdio.h>
00022 #include <stdlib.h>
00023 #include <string.h>
00024 #include "flgrCoreIO.h"
00025 #include "flgrCoreDispatch.h"
00026 #include "flgrCoreArithDef.h"
00027 #include "flgrCoreArithVector.h"
00028
00035 #define FLGR_MACRO_VECTOR_DIADIC_OP(dtype,arithop) \
00036 int k; \
00037 int spp = vctdest->spp; \
00038 dtype *p1 = (dtype*) vct1->array; \
00039 dtype *p2 = (dtype*) vct2->array; \
00040 dtype *pdest = (dtype*) vctdest->array; \
00041 dtype a1,a2; \
00042 \
00043 \
00044 \
00045 for(k=0 ; k<spp ; k++) { \
00046 a1 = flgr_get_array_##dtype(p1,k); \
00047 a2 = flgr_get_array_##dtype(p2,k); \
00048 flgr_set_array_##dtype(pdest,k,arithop(a1,a2)); \
00049 } \
00050 return
00051
00052
00053 #define FLGR_MACRO_VECTOR_FUNC_OP(dtype,arithop) \
00054 int k; \
00055 int spp = vctdest->spp; \
00056 dtype *p1 = (dtype*) vct1->array; \
00057 fgFLOAT64 *p2 = (fgFLOAT64*) vct2->array; \
00058 dtype *pdest = (dtype*) vctdest->array; \
00059 dtype a1; \
00060 fgFLOAT64 a2; \
00061 \
00062 \
00063 \
00064 for(k=0 ; k<spp ; k++) { \
00065 a1 = flgr_get_array_##dtype(p1,k); \
00066 a2 = flgr_get_array_fgFLOAT64(p2,k); \
00067 flgr_set_array_##dtype(pdest,k,arithop(a1,a2)); \
00068 } \
00069 return
00070
00071
00072 #define FLGR_MACRO_VECTOR_MONOADIC_OP(dtype,arithop) \
00073 int k; \
00074 int spp = vctdest->spp; \
00075 dtype *p1 = (dtype*) vct1->array; \
00076 dtype *pdest = (dtype*) vctdest->array; \
00077 dtype a1; \
00078 \
00079 \
00080 \
00081 for(k=0 ; k<spp ; k++) { \
00082 a1 = flgr_get_array_##dtype(p1,k); \
00083 flgr_set_array_##dtype(pdest,k,arithop(a1)); \
00084 } \
00085 return
00086
00087
00088
00089 void flgr_vector_inf_fgBIT(FLGR_Vector *vctdest, FLGR_Vector *vct1, FLGR_Vector *vct2) {
00090 FLGR_MACRO_VECTOR_DIADIC_OP(fgBIT,flgr_defop_inf_fgBIT);
00091 }
00092 void flgr_vector_inf_fgUINT8(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00093 FLGR_MACRO_VECTOR_DIADIC_OP(fgUINT8,flgr_defop_inf_fgUINT8);
00094 }
00095 void flgr_vector_inf_fgUINT16(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00096 FLGR_MACRO_VECTOR_DIADIC_OP(fgUINT16,flgr_defop_inf_fgUINT16);
00097 }
00098 void flgr_vector_inf_fgUINT32(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00099 FLGR_MACRO_VECTOR_DIADIC_OP(fgUINT32,flgr_defop_inf_fgUINT32);
00100 }
00101 void flgr_vector_inf_fgUINT64(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00102 FLGR_MACRO_VECTOR_DIADIC_OP(fgUINT64,flgr_defop_inf_fgUINT64);
00103 }
00104 void flgr_vector_inf_fgINT8(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00105 FLGR_MACRO_VECTOR_DIADIC_OP(fgINT8,flgr_defop_inf_fgINT8);
00106 }
00107 void flgr_vector_inf_fgINT16(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00108 FLGR_MACRO_VECTOR_DIADIC_OP(fgINT16,flgr_defop_inf_fgINT16);
00109 }
00110 void flgr_vector_inf_fgINT32(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00111 FLGR_MACRO_VECTOR_DIADIC_OP(fgINT32,flgr_defop_inf_fgINT32);
00112 }
00113 void flgr_vector_inf_fgINT64(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00114 FLGR_MACRO_VECTOR_DIADIC_OP(fgINT64,flgr_defop_inf_fgINT64);
00115 }
00116 void flgr_vector_inf_fgFLOAT32(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00117 FLGR_MACRO_VECTOR_DIADIC_OP(fgFLOAT32,flgr_defop_inf_fgFLOAT32);
00118 }
00119 void flgr_vector_inf_fgFLOAT64(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00120 FLGR_MACRO_VECTOR_DIADIC_OP(fgFLOAT64,flgr_defop_inf_fgFLOAT64);
00121 }
00122
00124
00130
00131 FLGR_Ret flgr_vector_inf(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00132 FLGR_Ret ret;
00133
00134 ret = flgr_vector_is_same_type(vct1,vct2);
00135 if(ret != FLGR_RET_OK) {
00136 POST_ERROR("Vector type different !\n");
00137 return FLGR_RET_TYPE_DIFFERENT;
00138 }
00139
00140 ret = flgr_vector_is_same_type(vctdest,vct2);
00141 if(ret != FLGR_RET_OK) {
00142 POST_ERROR("Vector type different !\n");
00143 return FLGR_RET_TYPE_DIFFERENT;
00144 }
00145
00146 ret = flgr_vector_is_same_spp(vct1,vct2);
00147 if(ret != FLGR_RET_OK) {
00148 POST_ERROR("Vector SPP different !\n");
00149 return FLGR_RET_UNDEFINED_ERROR;
00150 }
00151
00152 ret = flgr_vector_is_same_spp(vctdest,vct2);
00153 if(ret != FLGR_RET_OK) {
00154 POST_ERROR("Vector SPP different !\n");
00155 return FLGR_RET_UNDEFINED_ERROR;
00156 }
00157
00158
00159 FLGR_FULL_PROCEDURE_DISPATCH(vctdest->type,flgr_vector_inf,vctdest,vct1,vct2);
00160 }
00161
00162
00163
00164
00165
00166
00167
00168
00169
00170 void flgr_vector_sup_fgBIT(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00171 FLGR_MACRO_VECTOR_DIADIC_OP(fgBIT,flgr_defop_sup_fgBIT);
00172 }
00173 void flgr_vector_sup_fgUINT8(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00174 FLGR_MACRO_VECTOR_DIADIC_OP(fgUINT8,flgr_defop_sup_fgUINT8);
00175 }
00176 void flgr_vector_sup_fgUINT16(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00177 FLGR_MACRO_VECTOR_DIADIC_OP(fgUINT16,flgr_defop_sup_fgUINT16);
00178 }
00179 void flgr_vector_sup_fgUINT32(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00180 FLGR_MACRO_VECTOR_DIADIC_OP(fgUINT32,flgr_defop_sup_fgUINT32);
00181 }
00182 void flgr_vector_sup_fgUINT64(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00183 FLGR_MACRO_VECTOR_DIADIC_OP(fgUINT64,flgr_defop_sup_fgUINT64);
00184 }
00185 void flgr_vector_sup_fgINT8(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00186 FLGR_MACRO_VECTOR_DIADIC_OP(fgINT8,flgr_defop_sup_fgINT8);
00187 }
00188 void flgr_vector_sup_fgINT16(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00189 FLGR_MACRO_VECTOR_DIADIC_OP(fgINT16,flgr_defop_sup_fgINT16);
00190 }
00191 void flgr_vector_sup_fgINT32(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00192 FLGR_MACRO_VECTOR_DIADIC_OP(fgINT32,flgr_defop_sup_fgINT32);
00193 }
00194 void flgr_vector_sup_fgINT64(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00195 FLGR_MACRO_VECTOR_DIADIC_OP(fgINT64,flgr_defop_sup_fgINT64);
00196 }
00197 void flgr_vector_sup_fgFLOAT32(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00198 FLGR_MACRO_VECTOR_DIADIC_OP(fgFLOAT32,flgr_defop_sup_fgFLOAT32);
00199 }
00200 void flgr_vector_sup_fgFLOAT64(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00201 FLGR_MACRO_VECTOR_DIADIC_OP(fgFLOAT64,flgr_defop_sup_fgFLOAT64);
00202 }
00204
00210
00211 FLGR_Ret flgr_vector_sup(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00212 FLGR_Ret ret;
00213
00214
00215
00216 ret = flgr_vector_is_same_type(vct1,vct2);
00217 if(ret != FLGR_RET_OK) {
00218 POST_ERROR("Vector type different !\n");
00219 return FLGR_RET_TYPE_DIFFERENT;
00220 }
00221
00222 ret = flgr_vector_is_same_type(vctdest,vct2);
00223 if(ret != FLGR_RET_OK) {
00224 POST_ERROR("Vector type different !\n");
00225 return FLGR_RET_TYPE_DIFFERENT;
00226 }
00227
00228 ret = flgr_vector_is_same_spp(vct1,vct2);
00229 if(ret != FLGR_RET_OK) {
00230 POST_ERROR("Vector SPP different !\n");
00231 return FLGR_RET_UNDEFINED_ERROR;
00232 }
00233
00234 ret = flgr_vector_is_same_spp(vctdest,vct2);
00235 if(ret != FLGR_RET_OK) {
00236 POST_ERROR("Vector SPP different !\n");
00237 return FLGR_RET_UNDEFINED_ERROR;
00238 }
00239
00240
00241 FLGR_FULL_PROCEDURE_DISPATCH(vctdest->type,flgr_vector_sup,vctdest,vct1,vct2);
00242 }
00243
00244
00245
00246
00247
00248 void flgr_vector_nand_fgBIT(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00249 FLGR_MACRO_VECTOR_DIADIC_OP(fgBIT,flgr_defop_nand_fgBIT);
00250 }
00251 void flgr_vector_nand_fgUINT8(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00252 FLGR_MACRO_VECTOR_DIADIC_OP(fgUINT8,flgr_defop_nand_fgUINT8);
00253 }
00254 void flgr_vector_nand_fgUINT16(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00255 FLGR_MACRO_VECTOR_DIADIC_OP(fgUINT16,flgr_defop_nand_fgUINT16);
00256 }
00257 void flgr_vector_nand_fgUINT32(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00258 FLGR_MACRO_VECTOR_DIADIC_OP(fgUINT32,flgr_defop_nand_fgUINT32);
00259 }
00260 void flgr_vector_nand_fgUINT64(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00261 FLGR_MACRO_VECTOR_DIADIC_OP(fgUINT64,flgr_defop_nand_fgUINT64);
00262 }
00263 void flgr_vector_nand_fgINT8(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00264 FLGR_MACRO_VECTOR_DIADIC_OP(fgINT8,flgr_defop_nand_fgINT8);
00265 }
00266 void flgr_vector_nand_fgINT16(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00267 FLGR_MACRO_VECTOR_DIADIC_OP(fgINT16,flgr_defop_nand_fgINT16);
00268 }
00269 void flgr_vector_nand_fgINT32(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00270 FLGR_MACRO_VECTOR_DIADIC_OP(fgINT32,flgr_defop_nand_fgINT32);
00271 }
00272 void flgr_vector_nand_fgINT64(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00273 FLGR_MACRO_VECTOR_DIADIC_OP(fgINT64,flgr_defop_nand_fgINT64);
00274 }
00275 void flgr_vector_nand_fgFLOAT32(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00276 flgr_no_define_type_function(FLGR_FLOAT32);
00277 }
00278 void flgr_vector_nand_fgFLOAT64(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00279 flgr_no_define_type_function(FLGR_FLOAT64);
00280 }
00282
00288
00289 FLGR_Ret flgr_vector_nand(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00290 FLGR_Ret ret;
00291
00292
00293
00294 ret = flgr_vector_is_same_type(vct1,vct2);
00295 if(ret != FLGR_RET_OK) {
00296 POST_ERROR("Vector type different !\n");
00297 return FLGR_RET_TYPE_DIFFERENT;
00298 }
00299
00300 ret = flgr_vector_is_same_type(vctdest,vct2);
00301 if(ret != FLGR_RET_OK) {
00302 POST_ERROR("Vector type different !\n");
00303 return FLGR_RET_TYPE_DIFFERENT;
00304 }
00305
00306 ret = flgr_vector_is_same_spp(vct1,vct2);
00307 if(ret != FLGR_RET_OK) {
00308 POST_ERROR("Vector SPP different !\n");
00309 return FLGR_RET_UNDEFINED_ERROR;
00310 }
00311
00312 ret = flgr_vector_is_same_spp(vctdest,vct2);
00313 if(ret != FLGR_RET_OK) {
00314 POST_ERROR("Vector SPP different !\n");
00315 return FLGR_RET_UNDEFINED_ERROR;
00316 }
00317
00318
00319 FLGR_FULL_PROCEDURE_DISPATCH(vctdest->type,flgr_vector_nand,vctdest,vct1,vct2);
00320 }
00321
00322
00323
00324
00325 void flgr_vector_and_fgBIT(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00326 FLGR_MACRO_VECTOR_DIADIC_OP(fgBIT,flgr_defop_and_fgBIT);
00327 }
00328 void flgr_vector_and_fgUINT8(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00329 FLGR_MACRO_VECTOR_DIADIC_OP(fgUINT8,flgr_defop_and_fgUINT8);
00330 }
00331 void flgr_vector_and_fgUINT16(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00332 FLGR_MACRO_VECTOR_DIADIC_OP(fgUINT16,flgr_defop_and_fgUINT16);
00333 }
00334 void flgr_vector_and_fgUINT32(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00335 FLGR_MACRO_VECTOR_DIADIC_OP(fgUINT32,flgr_defop_and_fgUINT32);
00336 }
00337 void flgr_vector_and_fgUINT64(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00338 FLGR_MACRO_VECTOR_DIADIC_OP(fgUINT64,flgr_defop_and_fgUINT64);
00339 }
00340 void flgr_vector_and_fgINT8(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00341 FLGR_MACRO_VECTOR_DIADIC_OP(fgINT8,flgr_defop_and_fgINT8);
00342 }
00343 void flgr_vector_and_fgINT16(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00344 FLGR_MACRO_VECTOR_DIADIC_OP(fgINT16,flgr_defop_and_fgINT16);
00345 }
00346 void flgr_vector_and_fgINT32(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00347 FLGR_MACRO_VECTOR_DIADIC_OP(fgINT32,flgr_defop_and_fgINT32);
00348 }
00349 void flgr_vector_and_fgINT64(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00350 FLGR_MACRO_VECTOR_DIADIC_OP(fgINT64,flgr_defop_and_fgINT64);
00351 }
00352 void flgr_vector_and_fgFLOAT32(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00353 flgr_no_define_type_function(FLGR_FLOAT32);
00354 }
00355 void flgr_vector_and_fgFLOAT64(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00356 flgr_no_define_type_function(FLGR_FLOAT64);
00357 }
00359
00365
00366 FLGR_Ret flgr_vector_and(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00367 FLGR_Ret ret;
00368
00369
00370
00371 ret = flgr_vector_is_same_type(vct1,vct2);
00372 if(ret != FLGR_RET_OK) {
00373 POST_ERROR("Vector type different !\n");
00374 return FLGR_RET_TYPE_DIFFERENT;
00375 }
00376
00377 ret = flgr_vector_is_same_type(vctdest,vct2);
00378 if(ret != FLGR_RET_OK) {
00379 POST_ERROR("Vector type different !\n");
00380 return FLGR_RET_TYPE_DIFFERENT;
00381 }
00382
00383 ret = flgr_vector_is_same_spp(vct1,vct2);
00384 if(ret != FLGR_RET_OK) {
00385 POST_ERROR("Vector SPP different !\n");
00386 return FLGR_RET_UNDEFINED_ERROR;
00387 }
00388
00389 ret = flgr_vector_is_same_spp(vctdest,vct2);
00390 if(ret != FLGR_RET_OK) {
00391 POST_ERROR("Vector SPP different !\n");
00392 return FLGR_RET_UNDEFINED_ERROR;
00393 }
00394
00395
00396 FLGR_FULL_PROCEDURE_DISPATCH(vctdest->type,flgr_vector_and,vctdest,vct1,vct2);
00397 }
00398
00399
00400
00401
00402
00403 void flgr_vector_or_fgBIT(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00404 FLGR_MACRO_VECTOR_DIADIC_OP(fgBIT,flgr_defop_or_fgBIT);
00405 }
00406 void flgr_vector_or_fgUINT8(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00407 FLGR_MACRO_VECTOR_DIADIC_OP(fgUINT8,flgr_defop_or_fgUINT8);
00408 }
00409 void flgr_vector_or_fgUINT16(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00410 FLGR_MACRO_VECTOR_DIADIC_OP(fgUINT16,flgr_defop_or_fgUINT16);
00411 }
00412 void flgr_vector_or_fgUINT32(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00413 FLGR_MACRO_VECTOR_DIADIC_OP(fgUINT32,flgr_defop_or_fgUINT32);
00414 }
00415 void flgr_vector_or_fgUINT64(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00416 FLGR_MACRO_VECTOR_DIADIC_OP(fgUINT64,flgr_defop_or_fgUINT64);
00417 }
00418 void flgr_vector_or_fgINT8(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00419 FLGR_MACRO_VECTOR_DIADIC_OP(fgINT8,flgr_defop_or_fgINT8);
00420 }
00421 void flgr_vector_or_fgINT16(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00422 FLGR_MACRO_VECTOR_DIADIC_OP(fgINT16,flgr_defop_or_fgINT16);
00423 }
00424 void flgr_vector_or_fgINT32(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00425 FLGR_MACRO_VECTOR_DIADIC_OP(fgINT32,flgr_defop_or_fgINT32);
00426 }
00427 void flgr_vector_or_fgINT64(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00428 FLGR_MACRO_VECTOR_DIADIC_OP(fgINT64,flgr_defop_or_fgINT64);
00429 }
00430 void flgr_vector_or_fgFLOAT32(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00431 flgr_no_define_type_function(FLGR_FLOAT32);
00432 }
00433 void flgr_vector_or_fgFLOAT64(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00434 flgr_no_define_type_function(FLGR_FLOAT64);
00435 }
00437
00443
00444 FLGR_Ret flgr_vector_or(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00445 FLGR_Ret ret;
00446
00447
00448
00449 ret = flgr_vector_is_same_type(vct1,vct2);
00450 if(ret != FLGR_RET_OK) {
00451 POST_ERROR("Vector type different !\n");
00452 return FLGR_RET_TYPE_DIFFERENT;
00453 }
00454
00455 ret = flgr_vector_is_same_type(vctdest,vct2);
00456 if(ret != FLGR_RET_OK) {
00457 POST_ERROR("Vector type different !\n");
00458 return FLGR_RET_TYPE_DIFFERENT;
00459 }
00460
00461 ret = flgr_vector_is_same_spp(vct1,vct2);
00462 if(ret != FLGR_RET_OK) {
00463 POST_ERROR("Vector SPP different !\n");
00464 return FLGR_RET_UNDEFINED_ERROR;
00465 }
00466
00467 ret = flgr_vector_is_same_spp(vctdest,vct2);
00468 if(ret != FLGR_RET_OK) {
00469 POST_ERROR("Vector SPP different !\n");
00470 return FLGR_RET_UNDEFINED_ERROR;
00471 }
00472
00473
00474 FLGR_FULL_PROCEDURE_DISPATCH(vctdest->type,flgr_vector_or,vctdest,vct1,vct2);
00475 }
00476
00477
00478 void flgr_vector_nor_fgBIT(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00479 FLGR_MACRO_VECTOR_DIADIC_OP(fgBIT,flgr_defop_nor_fgBIT);
00480 }
00481 void flgr_vector_nor_fgUINT8(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00482 FLGR_MACRO_VECTOR_DIADIC_OP(fgUINT8,flgr_defop_nor_fgUINT8);
00483 }
00484 void flgr_vector_nor_fgUINT16(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00485 FLGR_MACRO_VECTOR_DIADIC_OP(fgUINT16,flgr_defop_nor_fgUINT16);
00486 }
00487 void flgr_vector_nor_fgUINT32(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00488 FLGR_MACRO_VECTOR_DIADIC_OP(fgUINT32,flgr_defop_nor_fgUINT32);
00489 }
00490 void flgr_vector_nor_fgUINT64(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00491 FLGR_MACRO_VECTOR_DIADIC_OP(fgUINT64,flgr_defop_nor_fgUINT64);
00492 }
00493 void flgr_vector_nor_fgINT8(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00494 FLGR_MACRO_VECTOR_DIADIC_OP(fgINT8,flgr_defop_nor_fgINT8);
00495 }
00496 void flgr_vector_nor_fgINT16(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00497 FLGR_MACRO_VECTOR_DIADIC_OP(fgINT16,flgr_defop_nor_fgINT16);
00498 }
00499 void flgr_vector_nor_fgINT32(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00500 FLGR_MACRO_VECTOR_DIADIC_OP(fgINT32,flgr_defop_nor_fgINT32);
00501 }
00502 void flgr_vector_nor_fgINT64(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00503 FLGR_MACRO_VECTOR_DIADIC_OP(fgINT64,flgr_defop_nor_fgINT64);
00504 }
00505 void flgr_vector_nor_fgFLOAT32(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00506 flgr_no_define_type_function(FLGR_FLOAT32);
00507 }
00508 void flgr_vector_nor_fgFLOAT64(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00509 flgr_no_define_type_function(FLGR_FLOAT64);
00510 }
00512
00518
00519 FLGR_Ret flgr_vector_nor(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00520 FLGR_Ret ret;
00521
00522
00523
00524 ret = flgr_vector_is_same_type(vct1,vct2);
00525 if(ret != FLGR_RET_OK) {
00526 POST_ERROR("Vector type different !\n");
00527 return FLGR_RET_TYPE_DIFFERENT;
00528 }
00529
00530 ret = flgr_vector_is_same_type(vctdest,vct2);
00531 if(ret != FLGR_RET_OK) {
00532 POST_ERROR("Vector type different !\n");
00533 return FLGR_RET_TYPE_DIFFERENT;
00534 }
00535
00536 ret = flgr_vector_is_same_spp(vct1,vct2);
00537 if(ret != FLGR_RET_OK) {
00538 POST_ERROR("Vector SPP different !\n");
00539 return FLGR_RET_UNDEFINED_ERROR;
00540 }
00541
00542 ret = flgr_vector_is_same_spp(vctdest,vct2);
00543 if(ret != FLGR_RET_OK) {
00544 POST_ERROR("Vector SPP different !\n");
00545 return FLGR_RET_UNDEFINED_ERROR;
00546 }
00547
00548
00549 FLGR_FULL_PROCEDURE_DISPATCH(vctdest->type,flgr_vector_nor,vctdest,vct1,vct2);
00550 }
00551
00552
00553
00554
00555 void flgr_vector_xor_fgBIT(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00556 FLGR_MACRO_VECTOR_DIADIC_OP(fgBIT,flgr_defop_xor_fgBIT);
00557 }
00558 void flgr_vector_xor_fgUINT8(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00559 FLGR_MACRO_VECTOR_DIADIC_OP(fgUINT8,flgr_defop_xor_fgUINT8);
00560 }
00561 void flgr_vector_xor_fgUINT16(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00562 FLGR_MACRO_VECTOR_DIADIC_OP(fgUINT16,flgr_defop_xor_fgUINT16);
00563 }
00564 void flgr_vector_xor_fgUINT32(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00565 FLGR_MACRO_VECTOR_DIADIC_OP(fgUINT32,flgr_defop_xor_fgUINT32);
00566 }
00567 void flgr_vector_xor_fgUINT64(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00568 FLGR_MACRO_VECTOR_DIADIC_OP(fgUINT64,flgr_defop_xor_fgUINT64);
00569 }
00570 void flgr_vector_xor_fgINT8(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00571 FLGR_MACRO_VECTOR_DIADIC_OP(fgINT8,flgr_defop_xor_fgINT8);
00572 }
00573 void flgr_vector_xor_fgINT16(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00574 FLGR_MACRO_VECTOR_DIADIC_OP(fgINT16,flgr_defop_xor_fgINT16);
00575 }
00576 void flgr_vector_xor_fgINT32(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00577 FLGR_MACRO_VECTOR_DIADIC_OP(fgINT32,flgr_defop_xor_fgINT32);
00578 }
00579 void flgr_vector_xor_fgINT64(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00580 FLGR_MACRO_VECTOR_DIADIC_OP(fgINT64,flgr_defop_xor_fgINT64);
00581 }
00582 void flgr_vector_xor_fgFLOAT32(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00583 flgr_no_define_type_function(FLGR_FLOAT32);
00584 }
00585 void flgr_vector_xor_fgFLOAT64(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00586 flgr_no_define_type_function(FLGR_FLOAT64);
00587 }
00589
00595
00596 FLGR_Ret flgr_vector_xor(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00597 FLGR_Ret ret;
00598
00599
00600
00601 ret = flgr_vector_is_same_type(vct1,vct2);
00602 if(ret != FLGR_RET_OK) {
00603 POST_ERROR("Vector type different !\n");
00604 return FLGR_RET_TYPE_DIFFERENT;
00605 }
00606
00607 ret = flgr_vector_is_same_type(vctdest,vct2);
00608 if(ret != FLGR_RET_OK) {
00609 POST_ERROR("Vector type different !\n");
00610 return FLGR_RET_TYPE_DIFFERENT;
00611 }
00612
00613 ret = flgr_vector_is_same_spp(vct1,vct2);
00614 if(ret != FLGR_RET_OK) {
00615 POST_ERROR("Vector SPP different !\n");
00616 return FLGR_RET_UNDEFINED_ERROR;
00617 }
00618
00619 ret = flgr_vector_is_same_spp(vctdest,vct2);
00620 if(ret != FLGR_RET_OK) {
00621 POST_ERROR("Vector SPP different !\n");
00622 return FLGR_RET_UNDEFINED_ERROR;
00623 }
00624
00625
00626 FLGR_FULL_PROCEDURE_DISPATCH(vctdest->type,flgr_vector_xor,vctdest,vct1,vct2);
00627 }
00628
00629
00630
00631
00632 void flgr_vector_nxor_fgBIT(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00633 FLGR_MACRO_VECTOR_DIADIC_OP(fgBIT,flgr_defop_nxor_fgBIT);
00634 }
00635 void flgr_vector_nxor_fgUINT8(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00636 FLGR_MACRO_VECTOR_DIADIC_OP(fgUINT8,flgr_defop_nxor_fgUINT8);
00637 }
00638 void flgr_vector_nxor_fgUINT16(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00639 FLGR_MACRO_VECTOR_DIADIC_OP(fgUINT16,flgr_defop_nxor_fgUINT16);
00640 }
00641 void flgr_vector_nxor_fgUINT32(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00642 FLGR_MACRO_VECTOR_DIADIC_OP(fgUINT32,flgr_defop_nxor_fgUINT32);
00643 }
00644 void flgr_vector_nxor_fgUINT64(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00645 FLGR_MACRO_VECTOR_DIADIC_OP(fgUINT64,flgr_defop_nxor_fgUINT64);
00646 }
00647 void flgr_vector_nxor_fgINT8(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00648 FLGR_MACRO_VECTOR_DIADIC_OP(fgINT8,flgr_defop_nxor_fgINT8);
00649 }
00650 void flgr_vector_nxor_fgINT16(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00651 FLGR_MACRO_VECTOR_DIADIC_OP(fgINT16,flgr_defop_nxor_fgINT16);
00652 }
00653 void flgr_vector_nxor_fgINT32(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00654 FLGR_MACRO_VECTOR_DIADIC_OP(fgINT32,flgr_defop_nxor_fgINT32);
00655 }
00656 void flgr_vector_nxor_fgINT64(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00657 FLGR_MACRO_VECTOR_DIADIC_OP(fgINT64,flgr_defop_nxor_fgINT64);
00658 }
00659 void flgr_vector_nxor_fgFLOAT32(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00660 flgr_no_define_type_function(FLGR_FLOAT32);
00661 }
00662 void flgr_vector_nxor_fgFLOAT64(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00663 flgr_no_define_type_function(FLGR_FLOAT64);
00664 }
00666
00672
00673 FLGR_Ret flgr_vector_nxor(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00674 FLGR_Ret ret;
00675
00676
00677
00678 ret = flgr_vector_is_same_type(vct1,vct2);
00679 if(ret != FLGR_RET_OK) {
00680 POST_ERROR("Vector type different !\n");
00681 return FLGR_RET_TYPE_DIFFERENT;
00682 }
00683
00684 ret = flgr_vector_is_same_type(vctdest,vct2);
00685 if(ret != FLGR_RET_OK) {
00686 POST_ERROR("Vector type different !\n");
00687 return FLGR_RET_TYPE_DIFFERENT;
00688 }
00689
00690 ret = flgr_vector_is_same_spp(vct1,vct2);
00691 if(ret != FLGR_RET_OK) {
00692 POST_ERROR("Vector SPP different !\n");
00693 return FLGR_RET_UNDEFINED_ERROR;
00694 }
00695
00696 ret = flgr_vector_is_same_spp(vctdest,vct2);
00697 if(ret != FLGR_RET_OK) {
00698 POST_ERROR("Vector SPP different !\n");
00699 return FLGR_RET_UNDEFINED_ERROR;
00700 }
00701
00702
00703 FLGR_FULL_PROCEDURE_DISPATCH(vctdest->type,flgr_vector_nxor,vctdest,vct1,vct2);
00704 }
00705
00706
00707
00708
00709 void flgr_vector_add_fgBIT(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00710 FLGR_MACRO_VECTOR_DIADIC_OP(fgBIT,flgr_defop_or_fgBIT);
00711 }
00712 void flgr_vector_add_fgUINT8(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00713 FLGR_MACRO_VECTOR_DIADIC_OP(fgUINT8,flgr_defop_add_fgUINT8);
00714 }
00715 void flgr_vector_add_fgUINT16(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00716 FLGR_MACRO_VECTOR_DIADIC_OP(fgUINT16,flgr_defop_add_fgUINT16);
00717 }
00718 void flgr_vector_add_fgUINT32(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00719 FLGR_MACRO_VECTOR_DIADIC_OP(fgUINT32,flgr_defop_add_fgUINT32);
00720 }
00721 void flgr_vector_add_fgUINT64(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00722 FLGR_MACRO_VECTOR_DIADIC_OP(fgUINT64,flgr_defop_add_fgUINT64);
00723 }
00724 void flgr_vector_add_fgINT8(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00725 FLGR_MACRO_VECTOR_DIADIC_OP(fgINT8,flgr_defop_add_fgINT8);
00726 }
00727 void flgr_vector_add_fgINT16(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00728 FLGR_MACRO_VECTOR_DIADIC_OP(fgINT16,flgr_defop_add_fgINT16);
00729 }
00730 void flgr_vector_add_fgINT32(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00731 FLGR_MACRO_VECTOR_DIADIC_OP(fgINT32,flgr_defop_add_fgINT32);
00732 }
00733 void flgr_vector_add_fgINT64(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00734 FLGR_MACRO_VECTOR_DIADIC_OP(fgINT64,flgr_defop_add_fgINT64);
00735 }
00736 void flgr_vector_add_fgFLOAT32(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00737 FLGR_MACRO_VECTOR_DIADIC_OP(fgFLOAT32,flgr_defop_add_fgFLOAT32);
00738 }
00739 void flgr_vector_add_fgFLOAT64(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00740 FLGR_MACRO_VECTOR_DIADIC_OP(fgFLOAT64,flgr_defop_add_fgFLOAT64);
00741 }
00743
00749
00750 FLGR_Ret flgr_vector_add(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00751 FLGR_Ret ret;
00752
00753
00754
00755 ret = flgr_vector_is_same_type(vct1,vct2);
00756 if(ret != FLGR_RET_OK) {
00757 POST_ERROR("Vector type different !\n");
00758 return FLGR_RET_TYPE_DIFFERENT;
00759 }
00760
00761 ret = flgr_vector_is_same_type(vctdest,vct2);
00762 if(ret != FLGR_RET_OK) {
00763 POST_ERROR("Vector type different !\n");
00764 return FLGR_RET_TYPE_DIFFERENT;
00765 }
00766
00767 ret = flgr_vector_is_same_spp(vct1,vct2);
00768 if(ret != FLGR_RET_OK) {
00769 POST_ERROR("Vector SPP different !\n");
00770 return FLGR_RET_UNDEFINED_ERROR;
00771 }
00772
00773 ret = flgr_vector_is_same_spp(vctdest,vct2);
00774 if(ret != FLGR_RET_OK) {
00775 POST_ERROR("Vector SPP different !\n");
00776 return FLGR_RET_UNDEFINED_ERROR;
00777 }
00778
00779
00780 FLGR_FULL_PROCEDURE_DISPATCH(vctdest->type,flgr_vector_add,vctdest,vct1,vct2);
00781 }
00782
00783
00784
00785
00786
00787
00788 void flgr_vector_sub_fgBIT(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00789 flgr_no_define_type_function(FLGR_BIT);
00790 }
00791 void flgr_vector_sub_fgUINT8(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00792 FLGR_MACRO_VECTOR_DIADIC_OP(fgUINT8,flgr_defop_sub_a_b_fgUINT8);
00793 }
00794 void flgr_vector_sub_fgUINT16(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00795 FLGR_MACRO_VECTOR_DIADIC_OP(fgUINT16,flgr_defop_sub_a_b_fgUINT16);
00796 }
00797 void flgr_vector_sub_fgUINT32(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00798 FLGR_MACRO_VECTOR_DIADIC_OP(fgUINT32,flgr_defop_sub_a_b_fgUINT32);
00799 }
00800 void flgr_vector_sub_fgUINT64(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00801 FLGR_MACRO_VECTOR_DIADIC_OP(fgUINT64,flgr_defop_sub_a_b_fgUINT64);
00802 }
00803 void flgr_vector_sub_fgINT8(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00804 FLGR_MACRO_VECTOR_DIADIC_OP(fgINT8,flgr_defop_sub_a_b_fgINT8);
00805 }
00806 void flgr_vector_sub_fgINT16(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00807 FLGR_MACRO_VECTOR_DIADIC_OP(fgINT16,flgr_defop_sub_a_b_fgINT16);
00808 }
00809 void flgr_vector_sub_fgINT32(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00810 FLGR_MACRO_VECTOR_DIADIC_OP(fgINT32,flgr_defop_sub_a_b_fgINT32);
00811 }
00812 void flgr_vector_sub_fgINT64(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00813 FLGR_MACRO_VECTOR_DIADIC_OP(fgINT64,flgr_defop_sub_a_b_fgINT64);
00814 }
00815 void flgr_vector_sub_fgFLOAT32(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00816 FLGR_MACRO_VECTOR_DIADIC_OP(fgFLOAT32,flgr_defop_sub_a_b_fgFLOAT32);
00817 }
00818 void flgr_vector_sub_fgFLOAT64(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00819 FLGR_MACRO_VECTOR_DIADIC_OP(fgFLOAT64,flgr_defop_sub_a_b_fgFLOAT64);
00820 }
00822
00828
00829 FLGR_Ret flgr_vector_sub(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00830 FLGR_Ret ret;
00831
00832
00833
00834 ret = flgr_vector_is_same_type(vct1,vct2);
00835 if(ret != FLGR_RET_OK) {
00836 POST_ERROR("Vector type different !\n");
00837 return FLGR_RET_TYPE_DIFFERENT;
00838 }
00839
00840 ret = flgr_vector_is_same_type(vctdest,vct2);
00841 if(ret != FLGR_RET_OK) {
00842 POST_ERROR("Vector type different !\n");
00843 return FLGR_RET_TYPE_DIFFERENT;
00844 }
00845
00846 ret = flgr_vector_is_same_spp(vct1,vct2);
00847 if(ret != FLGR_RET_OK) {
00848 POST_ERROR("Vector SPP different !\n");
00849 return FLGR_RET_UNDEFINED_ERROR;
00850 }
00851
00852 ret = flgr_vector_is_same_spp(vctdest,vct2);
00853 if(ret != FLGR_RET_OK) {
00854 POST_ERROR("Vector SPP different !\n");
00855 return FLGR_RET_UNDEFINED_ERROR;
00856 }
00857
00858
00859 FLGR_FULL_PROCEDURE_DISPATCH(vctdest->type,flgr_vector_sub,vctdest,vct1,vct2);
00860 }
00861
00862
00863
00864
00865
00866 void flgr_vector_mult_fgBIT(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00867 FLGR_MACRO_VECTOR_DIADIC_OP(fgBIT,flgr_defop_and_fgBIT);
00868 }
00869 void flgr_vector_mult_fgUINT8(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00870 FLGR_MACRO_VECTOR_DIADIC_OP(fgUINT8,flgr_defop_mult_fgUINT8);
00871 }
00872 void flgr_vector_mult_fgUINT16(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00873 FLGR_MACRO_VECTOR_DIADIC_OP(fgUINT16,flgr_defop_mult_fgUINT16);
00874 }
00875 void flgr_vector_mult_fgUINT32(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00876 FLGR_MACRO_VECTOR_DIADIC_OP(fgUINT32,flgr_defop_mult_fgUINT32);
00877 }
00878 void flgr_vector_mult_fgUINT64(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00879 FLGR_MACRO_VECTOR_DIADIC_OP(fgUINT64,flgr_defop_mult_fgUINT64);
00880 }
00881 void flgr_vector_mult_fgINT8(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00882 FLGR_MACRO_VECTOR_DIADIC_OP(fgINT8,flgr_defop_mult_fgINT8);
00883 }
00884 void flgr_vector_mult_fgINT16(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00885 FLGR_MACRO_VECTOR_DIADIC_OP(fgINT16,flgr_defop_mult_fgINT16);
00886 }
00887 void flgr_vector_mult_fgINT32(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00888 FLGR_MACRO_VECTOR_DIADIC_OP(fgINT32,flgr_defop_mult_fgINT32);
00889 }
00890 void flgr_vector_mult_fgINT64(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00891 FLGR_MACRO_VECTOR_DIADIC_OP(fgINT64,flgr_defop_mult_fgINT64);
00892 }
00893 void flgr_vector_mult_fgFLOAT32(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00894 FLGR_MACRO_VECTOR_DIADIC_OP(fgFLOAT32,flgr_defop_mult_fgFLOAT32);
00895 }
00896 void flgr_vector_mult_fgFLOAT64(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00897 FLGR_MACRO_VECTOR_DIADIC_OP(fgFLOAT64,flgr_defop_mult_fgFLOAT64);
00898 }
00900
00906
00907 FLGR_Ret flgr_vector_mult(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00908 FLGR_Ret ret;
00909
00910
00911
00912 ret = flgr_vector_is_same_type(vct1,vct2);
00913 if(ret != FLGR_RET_OK) {
00914 POST_ERROR("Vector type different !\n");
00915 return FLGR_RET_TYPE_DIFFERENT;
00916 }
00917
00918 ret = flgr_vector_is_same_type(vctdest,vct2);
00919 if(ret != FLGR_RET_OK) {
00920 POST_ERROR("Vector type different !\n");
00921 return FLGR_RET_TYPE_DIFFERENT;
00922 }
00923
00924 ret = flgr_vector_is_same_spp(vct1,vct2);
00925 if(ret != FLGR_RET_OK) {
00926 POST_ERROR("Vector SPP different !\n");
00927 return FLGR_RET_UNDEFINED_ERROR;
00928 }
00929
00930 ret = flgr_vector_is_same_spp(vctdest,vct2);
00931 if(ret != FLGR_RET_OK) {
00932 POST_ERROR("Vector SPP different !\n");
00933 return FLGR_RET_UNDEFINED_ERROR;
00934 }
00935
00936
00937 FLGR_FULL_PROCEDURE_DISPATCH(vctdest->type,flgr_vector_mult,vctdest,vct1,vct2);
00938 }
00939
00940
00941
00942
00943
00944
00945 void flgr_vector_div_fgBIT(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00946 flgr_no_define_type_function(FLGR_BIT);
00947 }
00948 void flgr_vector_div_fgUINT8(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00949 FLGR_MACRO_VECTOR_DIADIC_OP(fgUINT8,flgr_defop_div_fgUINT8);
00950 }
00951 void flgr_vector_div_fgUINT16(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00952 FLGR_MACRO_VECTOR_DIADIC_OP(fgUINT16,flgr_defop_div_fgUINT16);
00953 }
00954 void flgr_vector_div_fgUINT32(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00955 FLGR_MACRO_VECTOR_DIADIC_OP(fgUINT32,flgr_defop_div_fgUINT32);
00956 }
00957 void flgr_vector_div_fgUINT64(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00958 FLGR_MACRO_VECTOR_DIADIC_OP(fgUINT64,flgr_defop_div_fgUINT64);
00959 }
00960 void flgr_vector_div_fgINT8(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00961 FLGR_MACRO_VECTOR_DIADIC_OP(fgINT8,flgr_defop_div_fgINT8);
00962 }
00963 void flgr_vector_div_fgINT16(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00964 FLGR_MACRO_VECTOR_DIADIC_OP(fgINT16,flgr_defop_div_fgINT16);
00965 }
00966 void flgr_vector_div_fgINT32(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00967 FLGR_MACRO_VECTOR_DIADIC_OP(fgINT32,flgr_defop_div_fgINT32);
00968 }
00969 void flgr_vector_div_fgINT64(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00970 FLGR_MACRO_VECTOR_DIADIC_OP(fgINT64,flgr_defop_div_fgINT64);
00971 }
00972 void flgr_vector_div_fgFLOAT32(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00973 FLGR_MACRO_VECTOR_DIADIC_OP(fgFLOAT32,flgr_defop_div_fgFLOAT32);
00974 }
00975 void flgr_vector_div_fgFLOAT64(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00976 FLGR_MACRO_VECTOR_DIADIC_OP(fgFLOAT64,flgr_defop_div_fgFLOAT64);
00977 }
00979
00985
00986 FLGR_Ret flgr_vector_div(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
00987 FLGR_Ret ret;
00988
00989
00990
00991 ret = flgr_vector_is_same_type(vct1,vct2);
00992 if(ret != FLGR_RET_OK) {
00993 POST_ERROR("Vector type different !\n");
00994 return FLGR_RET_TYPE_DIFFERENT;
00995 }
00996
00997 ret = flgr_vector_is_same_type(vctdest,vct2);
00998 if(ret != FLGR_RET_OK) {
00999 POST_ERROR("Vector type different !\n");
01000 return FLGR_RET_TYPE_DIFFERENT;
01001 }
01002
01003 ret = flgr_vector_is_same_spp(vct1,vct2);
01004 if(ret != FLGR_RET_OK) {
01005 POST_ERROR("Vector SPP different !\n");
01006 return FLGR_RET_UNDEFINED_ERROR;
01007 }
01008
01009 ret = flgr_vector_is_same_spp(vctdest,vct2);
01010 if(ret != FLGR_RET_OK) {
01011 POST_ERROR("Vector SPP different !\n");
01012 return FLGR_RET_UNDEFINED_ERROR;
01013 }
01014
01015
01016 FLGR_FULL_PROCEDURE_DISPATCH(vctdest->type,flgr_vector_div,vctdest,vct1,vct2);
01017 }
01018
01019
01020
01021
01022 void flgr_vector_addsat_fgBIT(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
01023 flgr_no_define_type_function(FLGR_BIT);
01024 }
01025 void flgr_vector_addsat_fgUINT8(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
01026 FLGR_MACRO_VECTOR_DIADIC_OP(fgUINT8,flgr_defop_addsat_fgUINT8);
01027 }
01028 void flgr_vector_addsat_fgUINT16(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
01029 FLGR_MACRO_VECTOR_DIADIC_OP(fgUINT16,flgr_defop_addsat_fgUINT16);
01030 }
01031 void flgr_vector_addsat_fgUINT32(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
01032 FLGR_MACRO_VECTOR_DIADIC_OP(fgUINT32,flgr_defop_addsat_fgUINT32);
01033 }
01034 void flgr_vector_addsat_fgUINT64(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
01035 flgr_no_define_type_function(FLGR_UINT64);
01036 }
01037 void flgr_vector_addsat_fgINT8(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
01038 FLGR_MACRO_VECTOR_DIADIC_OP(fgINT8,flgr_defop_addsat_fgINT8);
01039 }
01040 void flgr_vector_addsat_fgINT16(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
01041 FLGR_MACRO_VECTOR_DIADIC_OP(fgINT16,flgr_defop_addsat_fgINT16);
01042 }
01043 void flgr_vector_addsat_fgINT32(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
01044 FLGR_MACRO_VECTOR_DIADIC_OP(fgINT32,flgr_defop_addsat_fgINT32);
01045 }
01046 void flgr_vector_addsat_fgINT64(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
01047 flgr_no_define_type_function(FLGR_INT64);
01048 }
01049 void flgr_vector_addsat_fgFLOAT32(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
01050 flgr_no_define_type_function(FLGR_FLOAT32);
01051 }
01052 void flgr_vector_addsat_fgFLOAT64(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
01053 flgr_no_define_type_function(FLGR_FLOAT64);
01054 }
01056
01062
01063 FLGR_Ret flgr_vector_addsat(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
01064 FLGR_Ret ret;
01065
01066
01067
01068 ret = flgr_vector_is_same_type(vct1,vct2);
01069 if(ret != FLGR_RET_OK) {
01070 POST_ERROR("Vector type different !\n");
01071 return FLGR_RET_TYPE_DIFFERENT;
01072 }
01073
01074 ret = flgr_vector_is_same_type(vctdest,vct2);
01075 if(ret != FLGR_RET_OK) {
01076 POST_ERROR("Vector type different !\n");
01077 return FLGR_RET_TYPE_DIFFERENT;
01078 }
01079
01080 ret = flgr_vector_is_same_spp(vct1,vct2);
01081 if(ret != FLGR_RET_OK) {
01082 POST_ERROR("Vector SPP different !\n");
01083 return FLGR_RET_UNDEFINED_ERROR;
01084 }
01085
01086 ret = flgr_vector_is_same_spp(vctdest,vct2);
01087 if(ret != FLGR_RET_OK) {
01088 POST_ERROR("Vector SPP different !\n");
01089 return FLGR_RET_UNDEFINED_ERROR;
01090 }
01091
01092
01093 FLGR_FULL_PROCEDURE_DISPATCH(vctdest->type,flgr_vector_addsat,vctdest,vct1,vct2);
01094 }
01095
01096
01097
01098
01099
01100
01101
01102 void flgr_vector_subsat_fgBIT(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
01103 flgr_no_define_type_function(FLGR_BIT);
01104 }
01105 void flgr_vector_subsat_fgUINT8(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
01106 FLGR_MACRO_VECTOR_DIADIC_OP(fgUINT8,flgr_defop_subsat_fgUINT8);
01107 }
01108 void flgr_vector_subsat_fgUINT16(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
01109 FLGR_MACRO_VECTOR_DIADIC_OP(fgUINT16,flgr_defop_subsat_fgUINT16);
01110 }
01111 void flgr_vector_subsat_fgUINT32(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
01112 FLGR_MACRO_VECTOR_DIADIC_OP(fgUINT32,flgr_defop_subsat_fgUINT32);
01113 }
01114 void flgr_vector_subsat_fgUINT64(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
01115 flgr_no_define_type_function(FLGR_UINT64);
01116 }
01117 void flgr_vector_subsat_fgINT8(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
01118 FLGR_MACRO_VECTOR_DIADIC_OP(fgINT8,flgr_defop_subsat_fgINT8);
01119 }
01120 void flgr_vector_subsat_fgINT16(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
01121 FLGR_MACRO_VECTOR_DIADIC_OP(fgINT16,flgr_defop_subsat_fgINT16);
01122 }
01123 void flgr_vector_subsat_fgINT32(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
01124 FLGR_MACRO_VECTOR_DIADIC_OP(fgINT32,flgr_defop_subsat_fgINT32);
01125 }
01126 void flgr_vector_subsat_fgINT64(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
01127 flgr_no_define_type_function(FLGR_INT64);
01128 }
01129 void flgr_vector_subsat_fgFLOAT32(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
01130 flgr_no_define_type_function(FLGR_FLOAT32);
01131 }
01132 void flgr_vector_subsat_fgFLOAT64(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
01133 flgr_no_define_type_function(FLGR_FLOAT64);
01134 }
01136
01142
01143 FLGR_Ret flgr_vector_subsat(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
01144 FLGR_Ret ret;
01145
01146
01147
01148 ret = flgr_vector_is_same_type(vct1,vct2);
01149 if(ret != FLGR_RET_OK) {
01150 POST_ERROR("Vector type different !\n");
01151 return FLGR_RET_TYPE_DIFFERENT;
01152 }
01153
01154 ret = flgr_vector_is_same_type(vctdest,vct2);
01155 if(ret != FLGR_RET_OK) {
01156 POST_ERROR("Vector type different !\n");
01157 return FLGR_RET_TYPE_DIFFERENT;
01158 }
01159
01160 ret = flgr_vector_is_same_spp(vct1,vct2);
01161 if(ret != FLGR_RET_OK) {
01162 POST_ERROR("Vector SPP different !\n");
01163 return FLGR_RET_UNDEFINED_ERROR;
01164 }
01165
01166 ret = flgr_vector_is_same_spp(vctdest,vct2);
01167 if(ret != FLGR_RET_OK) {
01168 POST_ERROR("Vector SPP different !\n");
01169 return FLGR_RET_UNDEFINED_ERROR;
01170 }
01171
01172
01173 FLGR_FULL_PROCEDURE_DISPATCH(vctdest->type,flgr_vector_subsat,vctdest,vct1,vct2);
01174 }
01175
01176
01177
01178
01179
01180 void flgr_vector_multsat_fgBIT(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
01181 flgr_no_define_type_function(FLGR_BIT);
01182 }
01183 void flgr_vector_multsat_fgUINT8(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
01184 FLGR_MACRO_VECTOR_DIADIC_OP(fgUINT8,flgr_defop_multsat_fgUINT8);
01185 }
01186 void flgr_vector_multsat_fgUINT16(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
01187 FLGR_MACRO_VECTOR_DIADIC_OP(fgUINT16,flgr_defop_multsat_fgUINT16);
01188 }
01189 void flgr_vector_multsat_fgUINT32(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
01190 FLGR_MACRO_VECTOR_DIADIC_OP(fgUINT32,flgr_defop_multsat_fgUINT32);
01191 }
01192 void flgr_vector_multsat_fgUINT64(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
01193 flgr_no_define_type_function(FLGR_UINT64);
01194 }
01195 void flgr_vector_multsat_fgINT8(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
01196 FLGR_MACRO_VECTOR_DIADIC_OP(fgINT8,flgr_defop_multsat_fgINT8);
01197 }
01198 void flgr_vector_multsat_fgINT16(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
01199 FLGR_MACRO_VECTOR_DIADIC_OP(fgINT16,flgr_defop_multsat_fgINT16);
01200 }
01201 void flgr_vector_multsat_fgINT32(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
01202 FLGR_MACRO_VECTOR_DIADIC_OP(fgINT32,flgr_defop_multsat_fgINT32);
01203 }
01204 void flgr_vector_multsat_fgINT64(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
01205 flgr_no_define_type_function(FLGR_INT64);
01206 }
01207 void flgr_vector_multsat_fgFLOAT32(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
01208 flgr_no_define_type_function(FLGR_FLOAT32);
01209 }
01210 void flgr_vector_multsat_fgFLOAT64(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
01211 flgr_no_define_type_function(FLGR_FLOAT64);
01212 }
01214
01220
01221 FLGR_Ret flgr_vector_multsat(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
01222 FLGR_Ret ret;
01223
01224
01225
01226 ret = flgr_vector_is_same_type(vct1,vct2);
01227 if(ret != FLGR_RET_OK) {
01228 POST_ERROR("Vector type different !\n");
01229 return FLGR_RET_TYPE_DIFFERENT;
01230 }
01231
01232 ret = flgr_vector_is_same_type(vctdest,vct2);
01233 if(ret != FLGR_RET_OK) {
01234 POST_ERROR("Vector type different !\n");
01235 return FLGR_RET_TYPE_DIFFERENT;
01236 }
01237
01238 ret = flgr_vector_is_same_spp(vct1,vct2);
01239 if(ret != FLGR_RET_OK) {
01240 POST_ERROR("Vector SPP different !\n");
01241 return FLGR_RET_UNDEFINED_ERROR;
01242 }
01243
01244 ret = flgr_vector_is_same_spp(vctdest,vct2);
01245 if(ret != FLGR_RET_OK) {
01246 POST_ERROR("Vector SPP different !\n");
01247 return FLGR_RET_UNDEFINED_ERROR;
01248 }
01249
01250
01251 FLGR_FULL_PROCEDURE_DISPATCH(vctdest->type,flgr_vector_multsat,vctdest,vct1,vct2);
01252 }
01253
01254
01255
01256
01257
01258
01259 void flgr_vector_atan2_fgBIT(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
01260 flgr_no_define_type_function(FLGR_BIT);
01261 }
01262 void flgr_vector_atan2_fgUINT8(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
01263 flgr_no_define_type_function(FLGR_UINT8);
01264 }
01265 void flgr_vector_atan2_fgUINT16(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
01266 flgr_no_define_type_function(FLGR_UINT16);
01267 }
01268 void flgr_vector_atan2_fgUINT32(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
01269 flgr_no_define_type_function(FLGR_UINT32);
01270 }
01271 void flgr_vector_atan2_fgUINT64(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
01272 flgr_no_define_type_function(FLGR_UINT64);
01273 }
01274 void flgr_vector_atan2_fgINT8(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
01275 flgr_no_define_type_function(FLGR_INT8);
01276 }
01277 void flgr_vector_atan2_fgINT16(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
01278 flgr_no_define_type_function(FLGR_INT16);
01279 }
01280 void flgr_vector_atan2_fgINT32(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
01281 flgr_no_define_type_function(FLGR_INT32);
01282 }
01283 void flgr_vector_atan2_fgINT64(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
01284 flgr_no_define_type_function(FLGR_INT64);
01285 }
01286 void flgr_vector_atan2_fgFLOAT32(FLGR_Vector *vctdest,FLGR_Vector *vct1,FLGR_Vector *vct2) {
01287 FLGR_MACRO_VECTOR_DIADIC_OP(fgFLOAT32,flgr_defop_atan2_fgFLOAT32);
01288 }
01289 void flgr_vector_atan2_fgFLOAT64(FLGR_Vector *vctdest,FLGR_Vector *vct1,FLGR_Vector *vct2) {
01290 FLGR_MACRO_VECTOR_DIADIC_OP(fgFLOAT64,flgr_defop_atan2_fgFLOAT64);
01291 }
01293
01299
01300 FLGR_Ret flgr_vector_atan2(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
01301 FLGR_Ret ret;
01302
01303
01304
01305 ret = flgr_vector_is_same_type(vct1,vct2);
01306 if(ret != FLGR_RET_OK) {
01307 POST_ERROR("Vector type different !\n");
01308 return FLGR_RET_TYPE_DIFFERENT;
01309 }
01310
01311 ret = flgr_vector_is_same_type(vctdest,vct2);
01312 if(ret != FLGR_RET_OK) {
01313 POST_ERROR("Vector type different !\n");
01314 return FLGR_RET_TYPE_DIFFERENT;
01315 }
01316
01317 ret = flgr_vector_is_same_spp(vct1,vct2);
01318 if(ret != FLGR_RET_OK) {
01319 POST_ERROR("Vector SPP different !\n");
01320 return FLGR_RET_UNDEFINED_ERROR;
01321 }
01322
01323 ret = flgr_vector_is_same_spp(vctdest,vct2);
01324 if(ret != FLGR_RET_OK) {
01325 POST_ERROR("Vector SPP different !\n");
01326 return FLGR_RET_UNDEFINED_ERROR;
01327 }
01328
01329
01330 FLGR_FULL_PROCEDURE_DISPATCH(vctdest->type,flgr_vector_atan2,vctdest,vct1,vct2);
01331 }
01332
01333
01334
01335
01336
01337
01338
01339 void flgr_vector_logb_fgBIT(FLGR_Vector *vctdest,FLGR_Vector *vct1,FLGR_Vector *vct2) {
01340 flgr_no_define_type_function(FLGR_BIT);
01341 }
01342 void flgr_vector_logb_fgUINT8(FLGR_Vector *vctdest, FLGR_Vector *vct1, FLGR_Vector *vct2) {
01343 FLGR_MACRO_VECTOR_FUNC_OP(fgUINT8,flgr_defop_logb_fgUINT8);
01344 }
01345 void flgr_vector_logb_fgUINT16(FLGR_Vector *vctdest, FLGR_Vector *vct1, FLGR_Vector *vct2) {
01346 FLGR_MACRO_VECTOR_FUNC_OP(fgUINT16,flgr_defop_logb_fgUINT16);
01347 }
01348 void flgr_vector_logb_fgUINT32(FLGR_Vector *vctdest, FLGR_Vector *vct1, FLGR_Vector *vct2) {
01349 FLGR_MACRO_VECTOR_FUNC_OP(fgUINT32,flgr_defop_logb_fgUINT32);
01350 }
01351 void flgr_vector_logb_fgUINT64(FLGR_Vector *vctdest, FLGR_Vector *vct1, FLGR_Vector *vct2) {
01352 FLGR_MACRO_VECTOR_FUNC_OP(fgUINT64,flgr_defop_logb_fgUINT64);
01353 }
01354 void flgr_vector_logb_fgINT8(FLGR_Vector *vctdest, FLGR_Vector *vct1, FLGR_Vector *vct2) {
01355 FLGR_MACRO_VECTOR_FUNC_OP(fgINT8,flgr_defop_logb_fgINT8);
01356 }
01357 void flgr_vector_logb_fgINT16(FLGR_Vector *vctdest, FLGR_Vector *vct1, FLGR_Vector *vct2) {
01358 FLGR_MACRO_VECTOR_FUNC_OP(fgINT16,flgr_defop_logb_fgINT16);
01359 }
01360 void flgr_vector_logb_fgINT32(FLGR_Vector *vctdest, FLGR_Vector *vct1, FLGR_Vector *vct2) {
01361 FLGR_MACRO_VECTOR_FUNC_OP(fgINT32,flgr_defop_logb_fgINT32);
01362 }
01363 void flgr_vector_logb_fgINT64(FLGR_Vector *vctdest, FLGR_Vector *vct1, FLGR_Vector *vct2) {
01364 FLGR_MACRO_VECTOR_FUNC_OP(fgINT64,flgr_defop_logb_fgINT64);
01365 }
01366 void flgr_vector_logb_fgFLOAT32(FLGR_Vector *vctdest, FLGR_Vector *vct1, FLGR_Vector *vct2) {
01367 FLGR_MACRO_VECTOR_FUNC_OP(fgFLOAT32,flgr_defop_logb_fgFLOAT32);
01368 }
01369 void flgr_vector_logb_fgFLOAT64(FLGR_Vector *vctdest, FLGR_Vector *vct1, FLGR_Vector *vct2) {
01370 FLGR_MACRO_VECTOR_FUNC_OP(fgFLOAT64,flgr_defop_logb_fgFLOAT64);
01371 }
01373
01385
01386 FLGR_Ret flgr_vector_logb(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
01387 FLGR_Ret ret;
01388
01389
01390
01391 ret = flgr_vector_is_same_type(vct1,vct2);
01392 if(ret != FLGR_RET_OK) {
01393 POST_ERROR("Vector type different !\n");
01394 return FLGR_RET_TYPE_DIFFERENT;
01395 }
01396
01397 ret = flgr_vector_is_same_type(vctdest,vct2);
01398 if(ret != FLGR_RET_OK) {
01399 POST_ERROR("Vector type different !\n");
01400 return FLGR_RET_TYPE_DIFFERENT;
01401 }
01402
01403 ret = flgr_vector_is_same_spp(vct1,vct2);
01404 if(ret != FLGR_RET_OK) {
01405 POST_ERROR("Vector SPP different !\n");
01406 return FLGR_RET_UNDEFINED_ERROR;
01407 }
01408
01409 ret = flgr_vector_is_same_spp(vctdest,vct2);
01410 if(ret != FLGR_RET_OK) {
01411 POST_ERROR("Vector SPP different !\n");
01412 return FLGR_RET_UNDEFINED_ERROR;
01413 }
01414
01415
01416 FLGR_FULL_PROCEDURE_DISPATCH(vctdest->type,flgr_vector_logb,vctdest,vct1,vct2);
01417 }
01418
01419
01420
01421
01422
01423 void flgr_vector_powb_fgBIT(FLGR_Vector *vctdest,FLGR_Vector *vct1,FLGR_Vector *vct2) {
01424 flgr_no_define_type_function(FLGR_BIT);
01425 }
01426 void flgr_vector_powb_fgUINT8(FLGR_Vector *vctdest, FLGR_Vector *vct1, FLGR_Vector *vct2) {
01427 FLGR_MACRO_VECTOR_FUNC_OP(fgUINT8,flgr_defop_powb_fgUINT8);
01428 }
01429 void flgr_vector_powb_fgUINT16(FLGR_Vector *vctdest, FLGR_Vector *vct1, FLGR_Vector *vct2) {
01430 FLGR_MACRO_VECTOR_FUNC_OP(fgUINT16,flgr_defop_powb_fgUINT16);
01431 }
01432 void flgr_vector_powb_fgUINT32(FLGR_Vector *vctdest, FLGR_Vector *vct1, FLGR_Vector *vct2) {
01433 FLGR_MACRO_VECTOR_FUNC_OP(fgUINT32,flgr_defop_powb_fgUINT32);
01434 }
01435 void flgr_vector_powb_fgUINT64(FLGR_Vector *vctdest, FLGR_Vector *vct1, FLGR_Vector *vct2) {
01436 FLGR_MACRO_VECTOR_FUNC_OP(fgUINT64,flgr_defop_powb_fgUINT64);
01437 }
01438 void flgr_vector_powb_fgINT8(FLGR_Vector *vctdest, FLGR_Vector *vct1, FLGR_Vector *vct2) {
01439 FLGR_MACRO_VECTOR_FUNC_OP(fgINT8,flgr_defop_powb_fgINT8);
01440 }
01441 void flgr_vector_powb_fgINT16(FLGR_Vector *vctdest, FLGR_Vector *vct1, FLGR_Vector *vct2) {
01442 FLGR_MACRO_VECTOR_FUNC_OP(fgINT16,flgr_defop_powb_fgINT16);
01443 }
01444 void flgr_vector_powb_fgINT32(FLGR_Vector *vctdest, FLGR_Vector *vct1, FLGR_Vector *vct2) {
01445 FLGR_MACRO_VECTOR_FUNC_OP(fgINT32,flgr_defop_powb_fgINT32);
01446 }
01447 void flgr_vector_powb_fgINT64(FLGR_Vector *vctdest, FLGR_Vector *vct1, FLGR_Vector *vct2) {
01448 FLGR_MACRO_VECTOR_FUNC_OP(fgINT64,flgr_defop_powb_fgINT64);
01449 }
01450 void flgr_vector_powb_fgFLOAT32(FLGR_Vector *vctdest, FLGR_Vector *vct1, FLGR_Vector *vct2) {
01451 FLGR_MACRO_VECTOR_FUNC_OP(fgFLOAT32,flgr_defop_powb_fgFLOAT32);
01452 }
01453 void flgr_vector_powb_fgFLOAT64(FLGR_Vector *vctdest, FLGR_Vector *vct1, FLGR_Vector *vct2) {
01454 FLGR_MACRO_VECTOR_FUNC_OP(fgFLOAT64,flgr_defop_powb_fgFLOAT64);
01455 }
01457
01469
01470 FLGR_Ret flgr_vector_powb(FLGR_Vector *vctdest, FLGR_Vector *vct1,FLGR_Vector *vct2) {
01471 FLGR_Ret ret;
01472
01473
01474
01475 ret = flgr_vector_is_same_type(vct1,vct2);
01476 if(ret != FLGR_RET_OK) {
01477 POST_ERROR("Vector type different !\n");
01478 return FLGR_RET_TYPE_DIFFERENT;
01479 }
01480
01481 ret = flgr_vector_is_same_type(vctdest,vct2);
01482 if(ret != FLGR_RET_OK) {
01483 POST_ERROR("Vector type different !\n");
01484 return FLGR_RET_TYPE_DIFFERENT;
01485 }
01486
01487 ret = flgr_vector_is_same_spp(vct1,vct2);
01488 if(ret != FLGR_RET_OK) {
01489 POST_ERROR("Vector SPP different !\n");
01490 return FLGR_RET_UNDEFINED_ERROR;
01491 }
01492
01493 ret = flgr_vector_is_same_spp(vctdest,vct2);
01494 if(ret != FLGR_RET_OK) {
01495 POST_ERROR("Vector SPP different !\n");
01496 return FLGR_RET_UNDEFINED_ERROR;
01497 }
01498
01499
01500 FLGR_FULL_PROCEDURE_DISPATCH(vctdest->type,flgr_vector_powb,vctdest,vct1,vct2);
01501 }
01502
01503
01504
01505
01506
01507
01508
01509
01510 void flgr_vector_not_fgBIT(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
01511 FLGR_MACRO_VECTOR_MONOADIC_OP(fgBIT,flgr_defop_not_fgBIT);
01512 }
01513 void flgr_vector_not_fgUINT8(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
01514 FLGR_MACRO_VECTOR_MONOADIC_OP(fgUINT8,flgr_defop_not_fgUINT8);
01515 }
01516 void flgr_vector_not_fgUINT16(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
01517 FLGR_MACRO_VECTOR_MONOADIC_OP(fgUINT16,flgr_defop_not_fgUINT16);
01518 }
01519 void flgr_vector_not_fgUINT32(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
01520 FLGR_MACRO_VECTOR_MONOADIC_OP(fgUINT32,flgr_defop_not_fgUINT32);
01521 }
01522 void flgr_vector_not_fgUINT64(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
01523 FLGR_MACRO_VECTOR_MONOADIC_OP(fgUINT64,flgr_defop_not_fgUINT64);
01524 }
01525 void flgr_vector_not_fgINT8(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
01526 FLGR_MACRO_VECTOR_MONOADIC_OP(fgINT8,flgr_defop_not_fgINT8);
01527 }
01528 void flgr_vector_not_fgINT16(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
01529 FLGR_MACRO_VECTOR_MONOADIC_OP(fgINT16,flgr_defop_not_fgINT16);
01530 }
01531 void flgr_vector_not_fgINT32(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
01532 FLGR_MACRO_VECTOR_MONOADIC_OP(fgINT32,flgr_defop_not_fgINT32);
01533 }
01534 void flgr_vector_not_fgINT64(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
01535 FLGR_MACRO_VECTOR_MONOADIC_OP(fgINT64,flgr_defop_not_fgINT64);
01536 }
01537 void flgr_vector_not_fgFLOAT32(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
01538 flgr_no_define_type_function(FLGR_FLOAT32);
01539 }
01540 void flgr_vector_not_fgFLOAT64(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
01541 flgr_no_define_type_function(FLGR_FLOAT64);
01542 }
01544
01549
01550 FLGR_Ret flgr_vector_not(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
01551 FLGR_Ret ret;
01552
01553
01554
01555 ret = flgr_vector_is_same_type(vctdest,vct1);
01556 if(ret != FLGR_RET_OK) {
01557 POST_ERROR("Vector type different !\n");
01558 return FLGR_RET_TYPE_DIFFERENT;
01559 }
01560
01561 ret = flgr_vector_is_same_spp(vctdest,vct1);
01562 if(ret != FLGR_RET_OK) {
01563 POST_ERROR("Vector SPP different !\n");
01564 return FLGR_RET_UNDEFINED_ERROR;
01565 }
01566
01567
01568 FLGR_FULL_PROCEDURE_DISPATCH(vctdest->type,flgr_vector_not,vctdest,vct1);
01569 }
01570
01571
01572
01573
01574
01575 void flgr_vector_invert_fgBIT(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
01576 FLGR_MACRO_VECTOR_MONOADIC_OP(fgBIT,flgr_defop_invert_fgBIT);
01577 }
01578 void flgr_vector_invert_fgUINT8(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
01579 FLGR_MACRO_VECTOR_MONOADIC_OP(fgUINT8,flgr_defop_invert_fgUINT8);
01580 }
01581 void flgr_vector_invert_fgUINT16(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
01582 FLGR_MACRO_VECTOR_MONOADIC_OP(fgUINT16,flgr_defop_invert_fgUINT16);
01583 }
01584 void flgr_vector_invert_fgUINT32(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
01585 FLGR_MACRO_VECTOR_MONOADIC_OP(fgUINT32,flgr_defop_invert_fgUINT32);
01586 }
01587 void flgr_vector_invert_fgUINT64(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
01588 FLGR_MACRO_VECTOR_MONOADIC_OP(fgUINT64,flgr_defop_invert_fgUINT64);
01589 }
01590 void flgr_vector_invert_fgINT8(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
01591 FLGR_MACRO_VECTOR_MONOADIC_OP(fgINT8,flgr_defop_invert_fgINT8);
01592 }
01593 void flgr_vector_invert_fgINT16(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
01594 FLGR_MACRO_VECTOR_MONOADIC_OP(fgINT16,flgr_defop_invert_fgINT16);
01595 }
01596 void flgr_vector_invert_fgINT32(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
01597 FLGR_MACRO_VECTOR_MONOADIC_OP(fgINT32,flgr_defop_invert_fgINT32);
01598 }
01599 void flgr_vector_invert_fgINT64(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
01600 FLGR_MACRO_VECTOR_MONOADIC_OP(fgINT64,flgr_defop_invert_fgINT64);
01601 }
01602 void flgr_vector_invert_fgFLOAT32(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
01603 FLGR_MACRO_VECTOR_MONOADIC_OP(fgFLOAT32,flgr_defop_invert_fgFLOAT32);
01604 }
01605 void flgr_vector_invert_fgFLOAT64(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
01606 FLGR_MACRO_VECTOR_MONOADIC_OP(fgFLOAT64,flgr_defop_invert_fgFLOAT64);
01607 }
01609
01614
01615 FLGR_Ret flgr_vector_invert(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
01616 FLGR_Ret ret;
01617
01618
01619
01620 ret = flgr_vector_is_same_type(vctdest,vct1);
01621 if(ret != FLGR_RET_OK) {
01622 POST_ERROR("Vector type different !\n");
01623 return FLGR_RET_TYPE_DIFFERENT;
01624 }
01625
01626 ret = flgr_vector_is_same_spp(vctdest,vct1);
01627 if(ret != FLGR_RET_OK) {
01628 POST_ERROR("Vector SPP different !\n");
01629 return FLGR_RET_UNDEFINED_ERROR;
01630 }
01631
01632
01633 FLGR_FULL_PROCEDURE_DISPATCH(vctdest->type,flgr_vector_invert,vctdest,vct1);
01634 }
01635
01636
01637
01638
01639
01640 void flgr_vector_abs_fgBIT(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
01641 flgr_no_define_type_function(FLGR_BIT);
01642 }
01643 void flgr_vector_abs_fgUINT8(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
01644 flgr_no_define_type_function(FLGR_UINT8);
01645 }
01646 void flgr_vector_abs_fgUINT16(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
01647 flgr_no_define_type_function(FLGR_UINT16);
01648 }
01649 void flgr_vector_abs_fgUINT32(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
01650 flgr_no_define_type_function(FLGR_UINT32);
01651 }
01652 void flgr_vector_abs_fgUINT64(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
01653 flgr_no_define_type_function(FLGR_UINT64);
01654 }
01655 void flgr_vector_abs_fgINT8(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
01656 FLGR_MACRO_VECTOR_MONOADIC_OP(fgINT8,flgr_defop_abs_fgINT8);
01657 }
01658 void flgr_vector_abs_fgINT16(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
01659 FLGR_MACRO_VECTOR_MONOADIC_OP(fgINT16,flgr_defop_abs_fgINT16);
01660 }
01661 void flgr_vector_abs_fgINT32(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
01662 FLGR_MACRO_VECTOR_MONOADIC_OP(fgINT32,flgr_defop_abs_fgINT32);
01663 }
01664 void flgr_vector_abs_fgINT64(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
01665 FLGR_MACRO_VECTOR_MONOADIC_OP(fgINT64,flgr_defop_abs_fgINT64);
01666 }
01667 void flgr_vector_abs_fgFLOAT32(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
01668 FLGR_MACRO_VECTOR_MONOADIC_OP(fgFLOAT32,flgr_defop_abs_fgFLOAT32);
01669 }
01670 void flgr_vector_abs_fgFLOAT64(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
01671 FLGR_MACRO_VECTOR_MONOADIC_OP(fgFLOAT64,flgr_defop_abs_fgFLOAT64);
01672 }
01674
01679
01680 FLGR_Ret flgr_vector_abs(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
01681 FLGR_Ret ret;
01682
01683
01684
01685 ret = flgr_vector_is_same_type(vctdest,vct1);
01686 if(ret != FLGR_RET_OK) {
01687 POST_ERROR("Vector type different !\n");
01688 return FLGR_RET_TYPE_DIFFERENT;
01689 }
01690
01691 ret = flgr_vector_is_same_spp(vctdest,vct1);
01692 if(ret != FLGR_RET_OK) {
01693 POST_ERROR("Vector SPP different !\n");
01694 return FLGR_RET_UNDEFINED_ERROR;
01695 }
01696
01697
01698 FLGR_FULL_PROCEDURE_DISPATCH(vctdest->type,flgr_vector_abs,vctdest,vct1);
01699 }
01700
01701
01702
01703
01704 void flgr_vector_cos_fgBIT(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
01705 flgr_no_define_type_function(FLGR_BIT);
01706 }
01707 void flgr_vector_cos_fgUINT8(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
01708 flgr_no_define_type_function(FLGR_UINT8);
01709 }
01710 void flgr_vector_cos_fgUINT16(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
01711 flgr_no_define_type_function(FLGR_UINT16);
01712 }
01713 void flgr_vector_cos_fgUINT32(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
01714 flgr_no_define_type_function(FLGR_UINT32);
01715 }
01716 void flgr_vector_cos_fgUINT64(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
01717 flgr_no_define_type_function(FLGR_UINT64);
01718 }
01719 void flgr_vector_cos_fgINT8(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
01720 flgr_no_define_type_function(FLGR_INT8);
01721 }
01722 void flgr_vector_cos_fgINT16(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
01723 flgr_no_define_type_function(FLGR_INT16);
01724 }
01725 void flgr_vector_cos_fgINT32(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
01726 flgr_no_define_type_function(FLGR_INT32);
01727 }
01728 void flgr_vector_cos_fgINT64(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
01729 flgr_no_define_type_function(FLGR_INT64);
01730 }
01731 void flgr_vector_cos_fgFLOAT32(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
01732 FLGR_MACRO_VECTOR_MONOADIC_OP(fgFLOAT32,flgr_defop_cos_fgFLOAT32);
01733 }
01734 void flgr_vector_cos_fgFLOAT64(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
01735 FLGR_MACRO_VECTOR_MONOADIC_OP(fgFLOAT64,flgr_defop_cos_fgFLOAT64);
01736 }
01738
01743
01744 FLGR_Ret flgr_vector_cos(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
01745 FLGR_Ret ret;
01746
01747
01748
01749 ret = flgr_vector_is_same_type(vctdest,vct1);
01750 if(ret != FLGR_RET_OK) {
01751 POST_ERROR("Vector type different !\n");
01752 return FLGR_RET_TYPE_DIFFERENT;
01753 }
01754
01755 ret = flgr_vector_is_same_spp(vctdest,vct1);
01756 if(ret != FLGR_RET_OK) {
01757 POST_ERROR("Vector SPP different !\n");
01758 return FLGR_RET_UNDEFINED_ERROR;
01759 }
01760
01761
01762 FLGR_FULL_PROCEDURE_DISPATCH(vctdest->type,flgr_vector_cos,vctdest,vct1);
01763 }
01764
01765
01766
01767
01768 void flgr_vector_sin_fgBIT(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
01769 flgr_no_define_type_function(FLGR_BIT);
01770 }
01771 void flgr_vector_sin_fgUINT8(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
01772 flgr_no_define_type_function(FLGR_UINT8);
01773 }
01774 void flgr_vector_sin_fgUINT16(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
01775 flgr_no_define_type_function(FLGR_UINT16);
01776 }
01777 void flgr_vector_sin_fgUINT32(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
01778 flgr_no_define_type_function(FLGR_UINT32);
01779 }
01780 void flgr_vector_sin_fgUINT64(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
01781 flgr_no_define_type_function(FLGR_UINT64);
01782 }
01783 void flgr_vector_sin_fgINT8(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
01784 flgr_no_define_type_function(FLGR_INT8);
01785 }
01786 void flgr_vector_sin_fgINT16(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
01787 flgr_no_define_type_function(FLGR_INT16);
01788 }
01789 void flgr_vector_sin_fgINT32(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
01790 flgr_no_define_type_function(FLGR_INT32);
01791 }
01792 void flgr_vector_sin_fgINT64(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
01793 flgr_no_define_type_function(FLGR_INT64);
01794 }
01795 void flgr_vector_sin_fgFLOAT32(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
01796 FLGR_MACRO_VECTOR_MONOADIC_OP(fgFLOAT32,flgr_defop_sin_fgFLOAT32);
01797 }
01798 void flgr_vector_sin_fgFLOAT64(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
01799 FLGR_MACRO_VECTOR_MONOADIC_OP(fgFLOAT64,flgr_defop_sin_fgFLOAT64);
01800 }
01802
01807
01808 FLGR_Ret flgr_vector_sin(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
01809 FLGR_Ret ret;
01810
01811
01812
01813 ret = flgr_vector_is_same_type(vctdest,vct1);
01814 if(ret != FLGR_RET_OK) {
01815 POST_ERROR("Vector type different !\n");
01816 return FLGR_RET_TYPE_DIFFERENT;
01817 }
01818
01819 ret = flgr_vector_is_same_spp(vctdest,vct1);
01820 if(ret != FLGR_RET_OK) {
01821 POST_ERROR("Vector SPP different !\n");
01822 return FLGR_RET_UNDEFINED_ERROR;
01823 }
01824
01825
01826 FLGR_FULL_PROCEDURE_DISPATCH(vctdest->type,flgr_vector_sin,vctdest,vct1);
01827 }
01828
01829
01830
01831
01832 void flgr_vector_tan_fgBIT(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
01833 flgr_no_define_type_function(FLGR_BIT);
01834 }
01835 void flgr_vector_tan_fgUINT8(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
01836 flgr_no_define_type_function(FLGR_UINT8);
01837 }
01838 void flgr_vector_tan_fgUINT16(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
01839 flgr_no_define_type_function(FLGR_UINT16);
01840 }
01841 void flgr_vector_tan_fgUINT32(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
01842 flgr_no_define_type_function(FLGR_UINT32);
01843 }
01844 void flgr_vector_tan_fgUINT64(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
01845 flgr_no_define_type_function(FLGR_UINT64);
01846 }
01847 void flgr_vector_tan_fgINT8(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
01848 flgr_no_define_type_function(FLGR_INT8);
01849 }
01850 void flgr_vector_tan_fgINT16(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
01851 flgr_no_define_type_function(FLGR_INT16);
01852 }
01853 void flgr_vector_tan_fgINT32(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
01854 flgr_no_define_type_function(FLGR_INT32);
01855 }
01856 void flgr_vector_tan_fgINT64(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
01857 flgr_no_define_type_function(FLGR_INT64);
01858 }
01859 void flgr_vector_tan_fgFLOAT32(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
01860 FLGR_MACRO_VECTOR_MONOADIC_OP(fgFLOAT32,flgr_defop_tan_fgFLOAT32);
01861 }
01862 void flgr_vector_tan_fgFLOAT64(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
01863 FLGR_MACRO_VECTOR_MONOADIC_OP(fgFLOAT64,flgr_defop_tan_fgFLOAT64);
01864 }
01866
01871
01872 FLGR_Ret flgr_vector_tan(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
01873 FLGR_Ret ret;
01874
01875
01876
01877 ret = flgr_vector_is_same_type(vctdest,vct1);
01878 if(ret != FLGR_RET_OK) {
01879 POST_ERROR("Vector type different !\n");
01880 return FLGR_RET_TYPE_DIFFERENT;
01881 }
01882
01883 ret = flgr_vector_is_same_spp(vctdest,vct1);
01884 if(ret != FLGR_RET_OK) {
01885 POST_ERROR("Vector SPP different !\n");
01886 return FLGR_RET_UNDEFINED_ERROR;
01887 }
01888
01889
01890 FLGR_FULL_PROCEDURE_DISPATCH(vctdest->type,flgr_vector_tan,vctdest,vct1);
01891 }
01892
01893
01894
01895 void flgr_vector_acos_fgBIT(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
01896 flgr_no_define_type_function(FLGR_BIT);
01897 }
01898 void flgr_vector_acos_fgUINT8(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
01899 flgr_no_define_type_function(FLGR_UINT8);
01900 }
01901 void flgr_vector_acos_fgUINT16(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
01902 flgr_no_define_type_function(FLGR_UINT16);
01903 }
01904 void flgr_vector_acos_fgUINT32(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
01905 flgr_no_define_type_function(FLGR_UINT32);
01906 }
01907 void flgr_vector_acos_fgUINT64(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
01908 flgr_no_define_type_function(FLGR_UINT64);
01909 }
01910 void flgr_vector_acos_fgINT8(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
01911 flgr_no_define_type_function(FLGR_INT8);
01912 }
01913 void flgr_vector_acos_fgINT16(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
01914 flgr_no_define_type_function(FLGR_INT16);
01915 }
01916 void flgr_vector_acos_fgINT32(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
01917 flgr_no_define_type_function(FLGR_INT32);
01918 }
01919 void flgr_vector_acos_fgINT64(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
01920 flgr_no_define_type_function(FLGR_INT64);
01921 }
01922 void flgr_vector_acos_fgFLOAT32(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
01923 FLGR_MACRO_VECTOR_MONOADIC_OP(fgFLOAT32,flgr_defop_acos_fgFLOAT32);
01924 }
01925 void flgr_vector_acos_fgFLOAT64(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
01926 FLGR_MACRO_VECTOR_MONOADIC_OP(fgFLOAT64,flgr_defop_acos_fgFLOAT64);
01927 }
01929
01934
01935 FLGR_Ret flgr_vector_acos(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
01936 FLGR_Ret ret;
01937
01938
01939
01940 ret = flgr_vector_is_same_type(vctdest,vct1);
01941 if(ret != FLGR_RET_OK) {
01942 POST_ERROR("Vector type different !\n");
01943 return FLGR_RET_TYPE_DIFFERENT;
01944 }
01945
01946 ret = flgr_vector_is_same_spp(vctdest,vct1);
01947 if(ret != FLGR_RET_OK) {
01948 POST_ERROR("Vector SPP different !\n");
01949 return FLGR_RET_UNDEFINED_ERROR;
01950 }
01951
01952
01953 FLGR_FULL_PROCEDURE_DISPATCH(vctdest->type,flgr_vector_acos,vctdest,vct1);
01954 }
01955
01956
01957
01958
01959
01960
01961 void flgr_vector_asin_fgBIT(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
01962 flgr_no_define_type_function(FLGR_BIT);
01963 }
01964 void flgr_vector_asin_fgUINT8(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
01965 flgr_no_define_type_function(FLGR_UINT8);
01966 }
01967 void flgr_vector_asin_fgUINT16(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
01968 flgr_no_define_type_function(FLGR_UINT16);
01969 }
01970 void flgr_vector_asin_fgUINT32(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
01971 flgr_no_define_type_function(FLGR_UINT32);
01972 }
01973 void flgr_vector_asin_fgUINT64(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
01974 flgr_no_define_type_function(FLGR_UINT64);
01975 }
01976 void flgr_vector_asin_fgINT8(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
01977 flgr_no_define_type_function(FLGR_INT8);
01978 }
01979 void flgr_vector_asin_fgINT16(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
01980 flgr_no_define_type_function(FLGR_INT16);
01981 }
01982 void flgr_vector_asin_fgINT32(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
01983 flgr_no_define_type_function(FLGR_INT32);
01984 }
01985 void flgr_vector_asin_fgINT64(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
01986 flgr_no_define_type_function(FLGR_INT64);
01987 }
01988 void flgr_vector_asin_fgFLOAT32(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
01989 FLGR_MACRO_VECTOR_MONOADIC_OP(fgFLOAT32,flgr_defop_asin_fgFLOAT32);
01990 }
01991 void flgr_vector_asin_fgFLOAT64(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
01992 FLGR_MACRO_VECTOR_MONOADIC_OP(fgFLOAT64,flgr_defop_asin_fgFLOAT64);
01993 }
01995
02000
02001 FLGR_Ret flgr_vector_asin(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
02002 FLGR_Ret ret;
02003
02004
02005
02006 ret = flgr_vector_is_same_type(vctdest,vct1);
02007 if(ret != FLGR_RET_OK) {
02008 POST_ERROR("Vector type different !\n");
02009 return FLGR_RET_TYPE_DIFFERENT;
02010 }
02011
02012 ret = flgr_vector_is_same_spp(vctdest,vct1);
02013 if(ret != FLGR_RET_OK) {
02014 POST_ERROR("Vector SPP different !\n");
02015 return FLGR_RET_UNDEFINED_ERROR;
02016 }
02017
02018
02019 FLGR_FULL_PROCEDURE_DISPATCH(vctdest->type,flgr_vector_asin,vctdest,vct1);
02020 }
02021
02022
02023
02024
02025
02026 void flgr_vector_atan_fgBIT(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
02027 flgr_no_define_type_function(FLGR_BIT);
02028 }
02029 void flgr_vector_atan_fgUINT8(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
02030 flgr_no_define_type_function(FLGR_UINT8);
02031 }
02032 void flgr_vector_atan_fgUINT16(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
02033 flgr_no_define_type_function(FLGR_UINT16);
02034 }
02035 void flgr_vector_atan_fgUINT32(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
02036 flgr_no_define_type_function(FLGR_UINT32);
02037 }
02038 void flgr_vector_atan_fgUINT64(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
02039 flgr_no_define_type_function(FLGR_UINT64);
02040 }
02041 void flgr_vector_atan_fgINT8(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
02042 flgr_no_define_type_function(FLGR_INT8);
02043 }
02044 void flgr_vector_atan_fgINT16(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
02045 flgr_no_define_type_function(FLGR_INT16);
02046 }
02047 void flgr_vector_atan_fgINT32(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
02048 flgr_no_define_type_function(FLGR_INT32);
02049 }
02050 void flgr_vector_atan_fgINT64(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
02051 flgr_no_define_type_function(FLGR_INT64);
02052 }
02053 void flgr_vector_atan_fgFLOAT32(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
02054 FLGR_MACRO_VECTOR_MONOADIC_OP(fgFLOAT32,flgr_defop_atan_fgFLOAT32);
02055 }
02056 void flgr_vector_atan_fgFLOAT64(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
02057 FLGR_MACRO_VECTOR_MONOADIC_OP(fgFLOAT64,flgr_defop_atan_fgFLOAT64);
02058 }
02060
02065
02066 FLGR_Ret flgr_vector_atan(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
02067 FLGR_Ret ret;
02068
02069
02070
02071 ret = flgr_vector_is_same_type(vctdest,vct1);
02072 if(ret != FLGR_RET_OK) {
02073 POST_ERROR("Vector type different !\n");
02074 return FLGR_RET_TYPE_DIFFERENT;
02075 }
02076
02077 ret = flgr_vector_is_same_spp(vctdest,vct1);
02078 if(ret != FLGR_RET_OK) {
02079 POST_ERROR("Vector SPP different !\n");
02080 return FLGR_RET_UNDEFINED_ERROR;
02081 }
02082
02083
02084 FLGR_FULL_PROCEDURE_DISPATCH(vctdest->type,flgr_vector_atan,vctdest,vct1);
02085 }
02086
02087
02088
02089
02090 void flgr_vector_floor_fgBIT(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
02091 flgr_no_define_type_function(FLGR_BIT);
02092 }
02093 void flgr_vector_floor_fgUINT8(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
02094 flgr_no_define_type_function(FLGR_UINT8);
02095 }
02096 void flgr_vector_floor_fgUINT16(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
02097 flgr_no_define_type_function(FLGR_UINT16);
02098 }
02099 void flgr_vector_floor_fgUINT32(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
02100 flgr_no_define_type_function(FLGR_UINT32);
02101 }
02102 void flgr_vector_floor_fgUINT64(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
02103 flgr_no_define_type_function(FLGR_UINT64);
02104 }
02105 void flgr_vector_floor_fgINT8(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
02106 flgr_no_define_type_function(FLGR_INT8);
02107 }
02108 void flgr_vector_floor_fgINT16(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
02109 flgr_no_define_type_function(FLGR_INT16);
02110 }
02111 void flgr_vector_floor_fgINT32(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
02112 flgr_no_define_type_function(FLGR_INT32);
02113 }
02114 void flgr_vector_floor_fgINT64(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
02115 flgr_no_define_type_function(FLGR_INT64);
02116 }
02117 void flgr_vector_floor_fgFLOAT32(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
02118 FLGR_MACRO_VECTOR_MONOADIC_OP(fgFLOAT32,flgr_defop_floor_fgFLOAT32);
02119 }
02120 void flgr_vector_floor_fgFLOAT64(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
02121 FLGR_MACRO_VECTOR_MONOADIC_OP(fgFLOAT64,flgr_defop_floor_fgFLOAT64);
02122 }
02124
02129
02130 FLGR_Ret flgr_vector_floor(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
02131 FLGR_Ret ret;
02132
02133
02134
02135 ret = flgr_vector_is_same_type(vctdest,vct1);
02136 if(ret != FLGR_RET_OK) {
02137 POST_ERROR("Vector type different !\n");
02138 return FLGR_RET_TYPE_DIFFERENT;
02139 }
02140
02141 ret = flgr_vector_is_same_spp(vctdest,vct1);
02142 if(ret != FLGR_RET_OK) {
02143 POST_ERROR("Vector SPP different !\n");
02144 return FLGR_RET_UNDEFINED_ERROR;
02145 }
02146
02147
02148 FLGR_FULL_PROCEDURE_DISPATCH(vctdest->type,flgr_vector_floor,vctdest,vct1);
02149 }
02150
02151
02152
02153
02154
02155
02156 void flgr_vector_ceil_fgBIT(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
02157 flgr_no_define_type_function(FLGR_BIT);
02158 }
02159 void flgr_vector_ceil_fgUINT8(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
02160 flgr_no_define_type_function(FLGR_UINT8);
02161 }
02162 void flgr_vector_ceil_fgUINT16(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
02163 flgr_no_define_type_function(FLGR_UINT16);
02164 }
02165 void flgr_vector_ceil_fgUINT32(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
02166 flgr_no_define_type_function(FLGR_UINT32);
02167 }
02168 void flgr_vector_ceil_fgUINT64(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
02169 flgr_no_define_type_function(FLGR_UINT64);
02170 }
02171 void flgr_vector_ceil_fgINT8(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
02172 flgr_no_define_type_function(FLGR_INT8);
02173 }
02174 void flgr_vector_ceil_fgINT16(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
02175 flgr_no_define_type_function(FLGR_INT16);
02176 }
02177 void flgr_vector_ceil_fgINT32(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
02178 flgr_no_define_type_function(FLGR_INT32);
02179 }
02180 void flgr_vector_ceil_fgINT64(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
02181 flgr_no_define_type_function(FLGR_INT64);
02182 }
02183 void flgr_vector_ceil_fgFLOAT32(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
02184 FLGR_MACRO_VECTOR_MONOADIC_OP(fgFLOAT32,flgr_defop_ceil_fgFLOAT32);
02185 }
02186 void flgr_vector_ceil_fgFLOAT64(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
02187 FLGR_MACRO_VECTOR_MONOADIC_OP(fgFLOAT64,flgr_defop_ceil_fgFLOAT64);
02188 }
02190
02195
02196 FLGR_Ret flgr_vector_ceil(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
02197 FLGR_Ret ret;
02198
02199
02200
02201 ret = flgr_vector_is_same_type(vctdest,vct1);
02202 if(ret != FLGR_RET_OK) {
02203 POST_ERROR("Vector type different !\n");
02204 return FLGR_RET_TYPE_DIFFERENT;
02205 }
02206
02207 ret = flgr_vector_is_same_spp(vctdest,vct1);
02208 if(ret != FLGR_RET_OK) {
02209 POST_ERROR("Vector SPP different !\n");
02210 return FLGR_RET_UNDEFINED_ERROR;
02211 }
02212
02213
02214 FLGR_FULL_PROCEDURE_DISPATCH(vctdest->type,flgr_vector_ceil,vctdest,vct1);
02215 }
02216
02217
02218
02219 void flgr_vector_square_fgBIT(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
02220 flgr_no_define_type_function(FLGR_BIT);
02221 }
02222 void flgr_vector_square_fgUINT8(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
02223 FLGR_MACRO_VECTOR_MONOADIC_OP(fgFLOAT32,flgr_defop_square_fgUINT8);
02224 }
02225 void flgr_vector_square_fgUINT16(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
02226 FLGR_MACRO_VECTOR_MONOADIC_OP(fgFLOAT32,flgr_defop_square_fgUINT16);
02227 }
02228 void flgr_vector_square_fgUINT32(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
02229 FLGR_MACRO_VECTOR_MONOADIC_OP(fgFLOAT32,flgr_defop_square_fgUINT32);
02230 }
02231 void flgr_vector_square_fgUINT64(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
02232 FLGR_MACRO_VECTOR_MONOADIC_OP(fgFLOAT32,flgr_defop_square_fgUINT64);
02233 }
02234 void flgr_vector_square_fgINT8(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
02235 FLGR_MACRO_VECTOR_MONOADIC_OP(fgFLOAT32,flgr_defop_square_fgINT8);
02236 }
02237 void flgr_vector_square_fgINT16(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
02238 FLGR_MACRO_VECTOR_MONOADIC_OP(fgFLOAT32,flgr_defop_square_fgINT16);
02239 }
02240 void flgr_vector_square_fgINT32(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
02241 FLGR_MACRO_VECTOR_MONOADIC_OP(fgFLOAT32,flgr_defop_square_fgINT32);
02242 }
02243 void flgr_vector_square_fgINT64(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
02244 FLGR_MACRO_VECTOR_MONOADIC_OP(fgFLOAT32,flgr_defop_square_fgINT64);
02245 }
02246 void flgr_vector_square_fgFLOAT32(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
02247 FLGR_MACRO_VECTOR_MONOADIC_OP(fgFLOAT32,flgr_defop_square_fgFLOAT32);
02248 }
02249 void flgr_vector_square_fgFLOAT64(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
02250 FLGR_MACRO_VECTOR_MONOADIC_OP(fgFLOAT64,flgr_defop_square_fgFLOAT64);
02251 }
02253
02258
02259 FLGR_Ret flgr_vector_square(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
02260 FLGR_Ret ret;
02261
02262
02263
02264 ret = flgr_vector_is_same_type(vctdest,vct1);
02265 if(ret != FLGR_RET_OK) {
02266 POST_ERROR("Vector type different !\n");
02267 return FLGR_RET_TYPE_DIFFERENT;
02268 }
02269
02270 ret = flgr_vector_is_same_spp(vctdest,vct1);
02271 if(ret != FLGR_RET_OK) {
02272 POST_ERROR("Vector SPP different !\n");
02273 return FLGR_RET_UNDEFINED_ERROR;
02274 }
02275
02276
02277 FLGR_FULL_PROCEDURE_DISPATCH(vctdest->type,flgr_vector_square,vctdest,vct1);
02278 }
02279
02280
02281
02282
02283 void flgr_vector_sqrt_fgBIT(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
02284 flgr_no_define_type_function(FLGR_BIT);
02285 }
02286 void flgr_vector_sqrt_fgUINT8(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
02287 FLGR_MACRO_VECTOR_MONOADIC_OP(fgFLOAT32,flgr_defop_sqrt_fgUINT8);
02288 }
02289 void flgr_vector_sqrt_fgUINT16(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
02290 FLGR_MACRO_VECTOR_MONOADIC_OP(fgFLOAT32,flgr_defop_sqrt_fgUINT16);
02291 }
02292 void flgr_vector_sqrt_fgUINT32(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
02293 FLGR_MACRO_VECTOR_MONOADIC_OP(fgFLOAT32,flgr_defop_sqrt_fgUINT32);
02294 }
02295 void flgr_vector_sqrt_fgUINT64(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
02296 FLGR_MACRO_VECTOR_MONOADIC_OP(fgFLOAT32,flgr_defop_sqrt_fgUINT64);
02297 }
02298 void flgr_vector_sqrt_fgINT8(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
02299 FLGR_MACRO_VECTOR_MONOADIC_OP(fgFLOAT32,flgr_defop_sqrt_fgINT8);
02300 }
02301 void flgr_vector_sqrt_fgINT16(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
02302 FLGR_MACRO_VECTOR_MONOADIC_OP(fgFLOAT32,flgr_defop_sqrt_fgINT16);
02303 }
02304 void flgr_vector_sqrt_fgINT32(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
02305 FLGR_MACRO_VECTOR_MONOADIC_OP(fgFLOAT32,flgr_defop_sqrt_fgINT32);
02306 }
02307 void flgr_vector_sqrt_fgINT64(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
02308 FLGR_MACRO_VECTOR_MONOADIC_OP(fgFLOAT32,flgr_defop_sqrt_fgINT64);
02309 }
02310 void flgr_vector_sqrt_fgFLOAT32(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
02311 FLGR_MACRO_VECTOR_MONOADIC_OP(fgFLOAT32,flgr_defop_sqrt_fgFLOAT32);
02312 }
02313 void flgr_vector_sqrt_fgFLOAT64(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
02314 FLGR_MACRO_VECTOR_MONOADIC_OP(fgFLOAT64,flgr_defop_sqrt_fgFLOAT64);
02315 }
02317
02322
02323 FLGR_Ret flgr_vector_sqrt(FLGR_Vector *vctdest, FLGR_Vector *vct1) {
02324 FLGR_Ret ret;
02325
02326
02327
02328 ret = flgr_vector_is_same_type(vctdest,vct1);
02329 if(ret != FLGR_RET_OK) {
02330 POST_ERROR("Vector type different !\n");
02331 return FLGR_RET_TYPE_DIFFERENT;
02332 }
02333
02334 ret = flgr_vector_is_same_spp(vctdest,vct1);
02335 if(ret != FLGR_RET_OK) {
02336 POST_ERROR("Vector SPP different !\n");
02337 return FLGR_RET_UNDEFINED_ERROR;
02338 }
02339
02340
02341 FLGR_FULL_PROCEDURE_DISPATCH(vctdest->type,flgr_vector_sqrt,vctdest,vct1);
02342 }
02343
02344
02345
02346
02347
02348
02349
02350
02351 void flgr_vector_cmp_ne_fgBIT(FLGR_Vector *vctdest, FLGR_Vector *vct1, FLGR_Vector *vct2) {
02352 FLGR_MACRO_VECTOR_DIADIC_OP(fgBIT,flgr_defop_ne_fgBIT);
02353 }
02354 void flgr_vector_cmp_ne_fgUINT8(FLGR_Vector *vctdest, FLGR_Vector *vct1, FLGR_Vector *vct2) {
02355 FLGR_MACRO_VECTOR_DIADIC_OP(fgUINT8,flgr_defop_ne_fgUINT8);
02356 }
02357 void flgr_vector_cmp_ne_fgUINT16(FLGR_Vector *vctdest, FLGR_Vector *vct1, FLGR_Vector *vct2) {
02358 FLGR_MACRO_VECTOR_DIADIC_OP(fgUINT16,flgr_defop_ne_fgUINT16);
02359 }
02360 void flgr_vector_cmp_ne_fgUINT32(FLGR_Vector *vctdest, FLGR_Vector *vct1, FLGR_Vector *vct2) {
02361 FLGR_MACRO_VECTOR_DIADIC_OP(fgUINT32,flgr_defop_ne_fgUINT32);
02362 }
02363 void flgr_vector_cmp_ne_fgUINT64(FLGR_Vector *vctdest, FLGR_Vector *vct1, FLGR_Vector *vct2) {
02364 FLGR_MACRO_VECTOR_DIADIC_OP(fgUINT64,flgr_defop_ne_fgUINT64);
02365 }
02366 void flgr_vector_cmp_ne_fgINT8(FLGR_Vector *vctdest, FLGR_Vector *vct1, FLGR_Vector *vct2) {
02367 FLGR_MACRO_VECTOR_DIADIC_OP(fgINT8,flgr_defop_ne_fgINT8);
02368 }
02369 void flgr_vector_cmp_ne_fgINT16(FLGR_Vector *vctdest, FLGR_Vector *vct1, FLGR_Vector *vct2) {
02370 FLGR_MACRO_VECTOR_DIADIC_OP(fgINT16,flgr_defop_ne_fgINT16);
02371 }
02372 void flgr_vector_cmp_ne_fgINT32(FLGR_Vector *vctdest, FLGR_Vector *vct1, FLGR_Vector *vct2) {
02373 FLGR_MACRO_VECTOR_DIADIC_OP(fgINT32,flgr_defop_ne_fgINT32);
02374 }
02375 void flgr_vector_cmp_ne_fgINT64(FLGR_Vector *vctdest, FLGR_Vector *vct1, FLGR_Vector *vct2) {
02376 FLGR_MACRO_VECTOR_DIADIC_OP(fgINT64,flgr_defop_ne_fgINT64);
02377 }
02378 void flgr_vector_cmp_ne_fgFLOAT32(FLGR_Vector *vctdest, FLGR_Vector *vct1, FLGR_Vector *vct2) {
02379 FLGR_MACRO_VECTOR_DIADIC_OP(fgFLOAT32,flgr_defop_ne_fgFLOAT32);
02380 }
02381 void flgr_vector_cmp_ne_fgFLOAT64(FLGR_Vector *vctdest, FLGR_Vector *vct1, FLGR_Vector *vct2) {
02382 FLGR_MACRO_VECTOR_DIADIC_OP(fgFLOAT64,flgr_defop_ne_fgFLOAT64);
02383 }
02385
02394
02395 FLGR_Ret flgr_vector_cmp_ne(FLGR_Vector *vctdest, FLGR_Vector *vct1, FLGR_Vector *vct2) {
02396
02397 FLGR_Ret ret;
02398
02399
02400
02401 ret = flgr_vector_is_same_type(vct1,vct2);
02402 if(ret != FLGR_RET_OK) {
02403 POST_ERROR("Vector type different !\n");
02404 return FLGR_RET_TYPE_DIFFERENT;
02405 }
02406
02407 ret = flgr_vector_is_same_type(vctdest,vct2);
02408 if(ret != FLGR_RET_OK) {
02409 POST_ERROR("Vector type different !\n");
02410 return FLGR_RET_TYPE_DIFFERENT;
02411 }
02412
02413 ret = flgr_vector_is_same_spp(vct1,vct2);
02414 if(ret != FLGR_RET_OK) {
02415 POST_ERROR("Vector SPP different !\n");
02416 return FLGR_RET_UNDEFINED_ERROR;
02417 }
02418
02419 ret = flgr_vector_is_same_spp(vctdest,vct2);
02420 if(ret != FLGR_RET_OK) {
02421 POST_ERROR("Vector SPP different !\n");
02422 return FLGR_RET_UNDEFINED_ERROR;
02423 }
02424
02425
02426 FLGR_FULL_PROCEDURE_DISPATCH(vctdest->type, flgr_vector_cmp_ne, vctdest, vct1, vct2);
02427 }
02428
02429
02430
02431
02432
02433
02434 void flgr_vector_cmp_eq_fgBIT(FLGR_Vector *vctdest, FLGR_Vector *vct1, FLGR_Vector *vct2) {
02435 FLGR_MACRO_VECTOR_DIADIC_OP(fgBIT,flgr_defop_eq_fgBIT);
02436 }
02437 void flgr_vector_cmp_eq_fgUINT8(FLGR_Vector *vctdest, FLGR_Vector *vct1, FLGR_Vector *vct2) {
02438 FLGR_MACRO_VECTOR_DIADIC_OP(fgUINT8,flgr_defop_eq_fgUINT8);
02439 }
02440 void flgr_vector_cmp_eq_fgUINT16(FLGR_Vector *vctdest, FLGR_Vector *vct1, FLGR_Vector *vct2) {
02441 FLGR_MACRO_VECTOR_DIADIC_OP(fgUINT16,flgr_defop_eq_fgUINT16);
02442 }
02443 void flgr_vector_cmp_eq_fgUINT32(FLGR_Vector *vctdest, FLGR_Vector *vct1, FLGR_Vector *vct2) {
02444 FLGR_MACRO_VECTOR_DIADIC_OP(fgUINT32,flgr_defop_eq_fgUINT32);
02445 }
02446 void flgr_vector_cmp_eq_fgUINT64(FLGR_Vector *vctdest, FLGR_Vector *vct1, FLGR_Vector *vct2) {
02447 FLGR_MACRO_VECTOR_DIADIC_OP(fgUINT64,flgr_defop_eq_fgUINT64);
02448 }
02449 void flgr_vector_cmp_eq_fgINT8(FLGR_Vector *vctdest, FLGR_Vector *vct1, FLGR_Vector *vct2) {
02450 FLGR_MACRO_VECTOR_DIADIC_OP(fgINT8,flgr_defop_eq_fgINT8);
02451 }
02452 void flgr_vector_cmp_eq_fgINT16(FLGR_Vector *vctdest, FLGR_Vector *vct1, FLGR_Vector *vct2) {
02453 FLGR_MACRO_VECTOR_DIADIC_OP(fgINT16,flgr_defop_eq_fgINT16);
02454 }
02455 void flgr_vector_cmp_eq_fgINT32(FLGR_Vector *vctdest, FLGR_Vector *vct1, FLGR_Vector *vct2) {
02456 FLGR_MACRO_VECTOR_DIADIC_OP(fgINT32,flgr_defop_eq_fgINT32);
02457 }
02458 void flgr_vector_cmp_eq_fgINT64(FLGR_Vector *vctdest, FLGR_Vector *vct1, FLGR_Vector *vct2) {
02459 FLGR_MACRO_VECTOR_DIADIC_OP(fgINT64,flgr_defop_eq_fgINT64);
02460 }
02461 void flgr_vector_cmp_eq_fgFLOAT32(FLGR_Vector *vctdest, FLGR_Vector *vct1, FLGR_Vector *vct2) {
02462 FLGR_MACRO_VECTOR_DIADIC_OP(fgFLOAT32,flgr_defop_eq_fgFLOAT32);
02463 }
02464 void flgr_vector_cmp_eq_fgFLOAT64(FLGR_Vector *vctdest, FLGR_Vector *vct1, FLGR_Vector *vct2) {
02465 FLGR_MACRO_VECTOR_DIADIC_OP(fgFLOAT64,flgr_defop_eq_fgFLOAT64);
02466 }
02468
02477
02478 FLGR_Ret flgr_vector_cmp_eq(FLGR_Vector *vctdest, FLGR_Vector *vct1, FLGR_Vector *vct2) {
02479
02480 FLGR_Ret ret;
02481
02482
02483
02484 ret = flgr_vector_is_same_type(vct1,vct2);
02485 if(ret != FLGR_RET_OK) {
02486 POST_ERROR("Vector type different !\n");
02487 return FLGR_RET_TYPE_DIFFERENT;
02488 }
02489
02490 ret = flgr_vector_is_same_type(vctdest,vct2);
02491 if(ret != FLGR_RET_OK) {
02492 POST_ERROR("Vector type different !\n");
02493 return FLGR_RET_TYPE_DIFFERENT;
02494 }
02495
02496 ret = flgr_vector_is_same_spp(vct1,vct2);
02497 if(ret != FLGR_RET_OK) {
02498 POST_ERROR("Vector SPP different !\n");
02499 return FLGR_RET_UNDEFINED_ERROR;
02500 }
02501
02502 ret = flgr_vector_is_same_spp(vctdest,vct2);
02503 if(ret != FLGR_RET_OK) {
02504 POST_ERROR("Vector SPP different !\n");
02505 return FLGR_RET_UNDEFINED_ERROR;
02506 }
02507
02508
02509 FLGR_FULL_PROCEDURE_DISPATCH(vctdest->type, flgr_vector_cmp_eq, vctdest, vct1, vct2);
02510 }
02511
02512
02513
02514
02515
02516
02517 void flgr_vector_cmp_gt_fgBIT(FLGR_Vector *vctdest, FLGR_Vector *vct1, FLGR_Vector *vct2) {
02518 FLGR_MACRO_VECTOR_DIADIC_OP(fgBIT,flgr_defop_gt_fgBIT);
02519 }
02520 void flgr_vector_cmp_gt_fgUINT8(FLGR_Vector *vctdest, FLGR_Vector *vct1, FLGR_Vector *vct2) {
02521 FLGR_MACRO_VECTOR_DIADIC_OP(fgUINT8,flgr_defop_gt_fgUINT8);
02522 }
02523 void flgr_vector_cmp_gt_fgUINT16(FLGR_Vector *vctdest, FLGR_Vector *vct1, FLGR_Vector *vct2) {
02524 FLGR_MACRO_VECTOR_DIADIC_OP(fgUINT16,flgr_defop_gt_fgUINT16);
02525 }
02526 void flgr_vector_cmp_gt_fgUINT32(FLGR_Vector *vctdest, FLGR_Vector *vct1, FLGR_Vector *vct2) {
02527 FLGR_MACRO_VECTOR_DIADIC_OP(fgUINT32,flgr_defop_gt_fgUINT32);
02528 }
02529 void flgr_vector_cmp_gt_fgUINT64(FLGR_Vector *vctdest, FLGR_Vector *vct1, FLGR_Vector *vct2) {
02530 FLGR_MACRO_VECTOR_DIADIC_OP(fgUINT64,flgr_defop_gt_fgUINT64);
02531 }
02532 void flgr_vector_cmp_gt_fgINT8(FLGR_Vector *vctdest, FLGR_Vector *vct1, FLGR_Vector *vct2) {
02533 FLGR_MACRO_VECTOR_DIADIC_OP(fgINT8,flgr_defop_gt_fgINT8);
02534 }
02535 void flgr_vector_cmp_gt_fgINT16(FLGR_Vector *vctdest, FLGR_Vector *vct1, FLGR_Vector *vct2) {
02536 FLGR_MACRO_VECTOR_DIADIC_OP(fgINT16,flgr_defop_gt_fgINT16);
02537 }
02538 void flgr_vector_cmp_gt_fgINT32(FLGR_Vector *vctdest, FLGR_Vector *vct1, FLGR_Vector *vct2) {
02539 FLGR_MACRO_VECTOR_DIADIC_OP(fgINT32,flgr_defop_gt_fgINT32);
02540 }
02541 void flgr_vector_cmp_gt_fgINT64(FLGR_Vector *vctdest, FLGR_Vector *vct1, FLGR_Vector *vct2) {
02542 FLGR_MACRO_VECTOR_DIADIC_OP(fgINT64,flgr_defop_gt_fgINT64);
02543 }
02544 void flgr_vector_cmp_gt_fgFLOAT32(FLGR_Vector *vctdest, FLGR_Vector *vct1, FLGR_Vector *vct2) {
02545 FLGR_MACRO_VECTOR_DIADIC_OP(fgFLOAT32,flgr_defop_gt_fgFLOAT32);
02546 }
02547 void flgr_vector_cmp_gt_fgFLOAT64(FLGR_Vector *vctdest, FLGR_Vector *vct1, FLGR_Vector *vct2) {
02548 FLGR_MACRO_VECTOR_DIADIC_OP(fgFLOAT64,flgr_defop_gt_fgFLOAT64);
02549 }
02551
02560
02561 FLGR_Ret flgr_vector_cmp_gt(FLGR_Vector *vctdest, FLGR_Vector *vct1, FLGR_Vector *vct2) {
02562
02563 FLGR_Ret ret;
02564
02565
02566
02567 ret = flgr_vector_is_same_type(vct1,vct2);
02568 if(ret != FLGR_RET_OK) {
02569 POST_ERROR("Vector type different !\n");
02570 return FLGR_RET_TYPE_DIFFERENT;
02571 }
02572
02573 ret = flgr_vector_is_same_type(vctdest,vct2);
02574 if(ret != FLGR_RET_OK) {
02575 POST_ERROR("Vector type different !\n");
02576 return FLGR_RET_TYPE_DIFFERENT;
02577 }
02578
02579 ret = flgr_vector_is_same_spp(vct1,vct2);
02580 if(ret != FLGR_RET_OK) {
02581 POST_ERROR("Vector SPP different !\n");
02582 return FLGR_RET_UNDEFINED_ERROR;
02583 }
02584
02585 ret = flgr_vector_is_same_spp(vctdest,vct2);
02586 if(ret != FLGR_RET_OK) {
02587 POST_ERROR("Vector SPP different !\n");
02588 return FLGR_RET_UNDEFINED_ERROR;
02589 }
02590
02591
02592 FLGR_FULL_PROCEDURE_DISPATCH(vctdest->type, flgr_vector_cmp_gt, vctdest, vct1, vct2);
02593 }
02594
02595
02596
02597
02598
02599
02600
02601 void flgr_vector_cmp_lt_fgBIT(FLGR_Vector *vctdest, FLGR_Vector *vct1, FLGR_Vector *vct2) {
02602 FLGR_MACRO_VECTOR_DIADIC_OP(fgBIT,flgr_defop_lt_fgBIT);
02603 }
02604 void flgr_vector_cmp_lt_fgUINT8(FLGR_Vector *vctdest, FLGR_Vector *vct1, FLGR_Vector *vct2) {
02605 FLGR_MACRO_VECTOR_DIADIC_OP(fgUINT8,flgr_defop_lt_fgUINT8);
02606 }
02607 void flgr_vector_cmp_lt_fgUINT16(FLGR_Vector *vctdest, FLGR_Vector *vct1, FLGR_Vector *vct2) {
02608 FLGR_MACRO_VECTOR_DIADIC_OP(fgUINT16,flgr_defop_lt_fgUINT16);
02609 }
02610 void flgr_vector_cmp_lt_fgUINT32(FLGR_Vector *vctdest, FLGR_Vector *vct1, FLGR_Vector *vct2) {
02611 FLGR_MACRO_VECTOR_DIADIC_OP(fgUINT32,flgr_defop_lt_fgUINT32);
02612 }
02613 void flgr_vector_cmp_lt_fgUINT64(FLGR_Vector *vctdest, FLGR_Vector *vct1, FLGR_Vector *vct2) {
02614 FLGR_MACRO_VECTOR_DIADIC_OP(fgUINT64,flgr_defop_lt_fgUINT64);
02615 }
02616 void flgr_vector_cmp_lt_fgINT8(FLGR_Vector *vctdest, FLGR_Vector *vct1, FLGR_Vector *vct2) {
02617 FLGR_MACRO_VECTOR_DIADIC_OP(fgINT8,flgr_defop_lt_fgINT8);
02618 }
02619 void flgr_vector_cmp_lt_fgINT16(FLGR_Vector *vctdest, FLGR_Vector *vct1, FLGR_Vector *vct2) {
02620 FLGR_MACRO_VECTOR_DIADIC_OP(fgINT16,flgr_defop_lt_fgINT16);
02621 }
02622 void flgr_vector_cmp_lt_fgINT32(FLGR_Vector *vctdest, FLGR_Vector *vct1, FLGR_Vector *vct2) {
02623 FLGR_MACRO_VECTOR_DIADIC_OP(fgINT32,flgr_defop_lt_fgINT32);
02624 }
02625 void flgr_vector_cmp_lt_fgINT64(FLGR_Vector *vctdest, FLGR_Vector *vct1, FLGR_Vector *vct2) {
02626 FLGR_MACRO_VECTOR_DIADIC_OP(fgINT64,flgr_defop_lt_fgINT64);
02627 }
02628 void flgr_vector_cmp_lt_fgFLOAT32(FLGR_Vector *vctdest, FLGR_Vector *vct1, FLGR_Vector *vct2) {
02629 FLGR_MACRO_VECTOR_DIADIC_OP(fgFLOAT32,flgr_defop_lt_fgFLOAT32);
02630 }
02631 void flgr_vector_cmp_lt_fgFLOAT64(FLGR_Vector *vctdest, FLGR_Vector *vct1, FLGR_Vector *vct2) {
02632 FLGR_MACRO_VECTOR_DIADIC_OP(fgFLOAT64,flgr_defop_lt_fgFLOAT64);
02633 }
02635
02644
02645 FLGR_Ret flgr_vector_cmp_lt(FLGR_Vector *vctdest, FLGR_Vector *vct1, FLGR_Vector *vct2) {
02646
02647 FLGR_Ret ret;
02648
02649
02650
02651 ret = flgr_vector_is_same_type(vct1,vct2);
02652 if(ret != FLGR_RET_OK) {
02653 POST_ERROR("Vector type different !\n");
02654 return FLGR_RET_TYPE_DIFFERENT;
02655 }
02656
02657 ret = flgr_vector_is_same_type(vctdest,vct2);
02658 if(ret != FLGR_RET_OK) {
02659 POST_ERROR("Vector type different !\n");
02660 return FLGR_RET_TYPE_DIFFERENT;
02661 }
02662
02663 ret = flgr_vector_is_same_spp(vct1,vct2);
02664 if(ret != FLGR_RET_OK) {
02665 POST_ERROR("Vector SPP different !\n");
02666 return FLGR_RET_UNDEFINED_ERROR;
02667 }
02668
02669 ret = flgr_vector_is_same_spp(vctdest,vct2);
02670 if(ret != FLGR_RET_OK) {
02671 POST_ERROR("Vector SPP different !\n");
02672 return FLGR_RET_UNDEFINED_ERROR;
02673 }
02674
02675
02676 FLGR_FULL_PROCEDURE_DISPATCH(vctdest->type, flgr_vector_cmp_lt, vctdest, vct1, vct2);
02677 }
02678
02679
02680
02681
02682
02683
02684
02685 void flgr_vector_cmp_le_fgBIT(FLGR_Vector *vctdest, FLGR_Vector *vct1, FLGR_Vector *vct2) {
02686 FLGR_MACRO_VECTOR_DIADIC_OP(fgBIT,flgr_defop_le_fgBIT);
02687 }
02688 void flgr_vector_cmp_le_fgUINT8(FLGR_Vector *vctdest, FLGR_Vector *vct1, FLGR_Vector *vct2) {
02689 FLGR_MACRO_VECTOR_DIADIC_OP(fgUINT8,flgr_defop_le_fgUINT8);
02690 }
02691 void flgr_vector_cmp_le_fgUINT16(FLGR_Vector *vctdest, FLGR_Vector *vct1, FLGR_Vector *vct2) {
02692 FLGR_MACRO_VECTOR_DIADIC_OP(fgUINT16,flgr_defop_le_fgUINT16);
02693 }
02694 void flgr_vector_cmp_le_fgUINT32(FLGR_Vector *vctdest, FLGR_Vector *vct1, FLGR_Vector *vct2) {
02695 FLGR_MACRO_VECTOR_DIADIC_OP(fgUINT32,flgr_defop_le_fgUINT32);
02696 }
02697 void flgr_vector_cmp_le_fgUINT64(FLGR_Vector *vctdest, FLGR_Vector *vct1, FLGR_Vector *vct2) {
02698 FLGR_MACRO_VECTOR_DIADIC_OP(fgUINT64,flgr_defop_le_fgUINT64);
02699 }
02700 void flgr_vector_cmp_le_fgINT8(FLGR_Vector *vctdest, FLGR_Vector *vct1, FLGR_Vector *vct2) {
02701 FLGR_MACRO_VECTOR_DIADIC_OP(fgINT8,flgr_defop_le_fgINT8);
02702 }
02703 void flgr_vector_cmp_le_fgINT16(FLGR_Vector *vctdest, FLGR_Vector *vct1, FLGR_Vector *vct2) {
02704 FLGR_MACRO_VECTOR_DIADIC_OP(fgINT16,flgr_defop_le_fgINT16);
02705 }
02706 void flgr_vector_cmp_le_fgINT32(FLGR_Vector *vctdest, FLGR_Vector *vct1, FLGR_Vector *vct2) {
02707 FLGR_MACRO_VECTOR_DIADIC_OP(fgINT32,flgr_defop_le_fgINT32);
02708 }
02709 void flgr_vector_cmp_le_fgINT64(FLGR_Vector *vctdest, FLGR_Vector *vct1, FLGR_Vector *vct2) {
02710 FLGR_MACRO_VECTOR_DIADIC_OP(fgINT64,flgr_defop_le_fgINT64);
02711 }
02712 void flgr_vector_cmp_le_fgFLOAT32(FLGR_Vector *vctdest, FLGR_Vector *vct1, FLGR_Vector *vct2) {
02713 FLGR_MACRO_VECTOR_DIADIC_OP(fgFLOAT32,flgr_defop_le_fgFLOAT32);
02714 }
02715 void flgr_vector_cmp_le_fgFLOAT64(FLGR_Vector *vctdest, FLGR_Vector *vct1, FLGR_Vector *vct2) {
02716 FLGR_MACRO_VECTOR_DIADIC_OP(fgFLOAT64,flgr_defop_le_fgFLOAT64);
02717 }
02719
02728
02729 FLGR_Ret flgr_vector_cmp_le(FLGR_Vector *vctdest, FLGR_Vector *vct1, FLGR_Vector *vct2) {
02730
02731 FLGR_Ret ret;
02732
02733
02734
02735 ret = flgr_vector_is_same_type(vct1,vct2);
02736 if(ret != FLGR_RET_OK) {
02737 POST_ERROR("Vector type different !\n");
02738 return FLGR_RET_TYPE_DIFFERENT;
02739 }
02740
02741 ret = flgr_vector_is_same_type(vctdest,vct2);
02742 if(ret != FLGR_RET_OK) {
02743 POST_ERROR("Vector type different !\n");
02744 return FLGR_RET_TYPE_DIFFERENT;
02745 }
02746
02747 ret = flgr_vector_is_same_spp(vct1,vct2);
02748 if(ret != FLGR_RET_OK) {
02749 POST_ERROR("Vector SPP different !\n");
02750 return FLGR_RET_UNDEFINED_ERROR;
02751 }
02752
02753 ret = flgr_vector_is_same_spp(vctdest,vct2);
02754 if(ret != FLGR_RET_OK) {
02755 POST_ERROR("Vector SPP different !\n");
02756 return FLGR_RET_UNDEFINED_ERROR;
02757 }
02758
02759
02760 FLGR_FULL_PROCEDURE_DISPATCH(vctdest->type, flgr_vector_cmp_le, vctdest, vct1, vct2);
02761 }
02762
02763
02764
02765
02766
02767
02768 void flgr_vector_cmp_ge_fgBIT(FLGR_Vector *vctdest, FLGR_Vector *vct1, FLGR_Vector *vct2) {
02769 FLGR_MACRO_VECTOR_DIADIC_OP(fgBIT,flgr_defop_ge_fgBIT);
02770 }
02771 void flgr_vector_cmp_ge_fgUINT8(FLGR_Vector *vctdest, FLGR_Vector *vct1, FLGR_Vector *vct2) {
02772 FLGR_MACRO_VECTOR_DIADIC_OP(fgUINT8,flgr_defop_ge_fgUINT8);
02773 }
02774 void flgr_vector_cmp_ge_fgUINT16(FLGR_Vector *vctdest, FLGR_Vector *vct1, FLGR_Vector *vct2) {
02775 FLGR_MACRO_VECTOR_DIADIC_OP(fgUINT16,flgr_defop_ge_fgUINT16);
02776 }
02777 void flgr_vector_cmp_ge_fgUINT32(FLGR_Vector *vctdest, FLGR_Vector *vct1, FLGR_Vector *vct2) {
02778 FLGR_MACRO_VECTOR_DIADIC_OP(fgUINT32,flgr_defop_ge_fgUINT32);
02779 }
02780 void flgr_vector_cmp_ge_fgUINT64(FLGR_Vector *vctdest, FLGR_Vector *vct1, FLGR_Vector *vct2) {
02781 FLGR_MACRO_VECTOR_DIADIC_OP(fgUINT64,flgr_defop_ge_fgUINT64);
02782 }
02783 void flgr_vector_cmp_ge_fgINT8(FLGR_Vector *vctdest, FLGR_Vector *vct1, FLGR_Vector *vct2) {
02784 FLGR_MACRO_VECTOR_DIADIC_OP(fgINT8,flgr_defop_ge_fgINT8);
02785 }
02786 void flgr_vector_cmp_ge_fgINT16(FLGR_Vector *vctdest, FLGR_Vector *vct1, FLGR_Vector *vct2) {
02787 FLGR_MACRO_VECTOR_DIADIC_OP(fgINT16,flgr_defop_ge_fgINT16);
02788 }
02789 void flgr_vector_cmp_ge_fgINT32(FLGR_Vector *vctdest, FLGR_Vector *vct1, FLGR_Vector *vct2) {
02790 FLGR_MACRO_VECTOR_DIADIC_OP(fgINT32,flgr_defop_ge_fgINT32);
02791 }
02792 void flgr_vector_cmp_ge_fgINT64(FLGR_Vector *vctdest, FLGR_Vector *vct1, FLGR_Vector *vct2) {
02793 FLGR_MACRO_VECTOR_DIADIC_OP(fgINT64,flgr_defop_ge_fgINT64);
02794 }
02795 void flgr_vector_cmp_ge_fgFLOAT32(FLGR_Vector *vctdest, FLGR_Vector *vct1, FLGR_Vector *vct2) {
02796 FLGR_MACRO_VECTOR_DIADIC_OP(fgFLOAT32,flgr_defop_ge_fgFLOAT32);
02797 }
02798 void flgr_vector_cmp_ge_fgFLOAT64(FLGR_Vector *vctdest, FLGR_Vector *vct1, FLGR_Vector *vct2) {
02799 FLGR_MACRO_VECTOR_DIADIC_OP(fgFLOAT64,flgr_defop_ge_fgFLOAT64);
02800 }
02802
02811
02812 FLGR_Ret flgr_vector_cmp_ge(FLGR_Vector *vctdest, FLGR_Vector *vct1, FLGR_Vector *vct2) {
02813
02814 FLGR_Ret ret;
02815
02816
02817
02818 ret = flgr_vector_is_same_type(vct1,vct2);
02819 if(ret != FLGR_RET_OK) {
02820 POST_ERROR("Vector type different !\n");
02821 return FLGR_RET_TYPE_DIFFERENT;
02822 }
02823
02824 ret = flgr_vector_is_same_type(vctdest,vct2);
02825 if(ret != FLGR_RET_OK) {
02826 POST_ERROR("Vector type different !\n");
02827 return FLGR_RET_TYPE_DIFFERENT;
02828 }
02829
02830 ret = flgr_vector_is_same_spp(vct1,vct2);
02831 if(ret != FLGR_RET_OK) {
02832 POST_ERROR("Vector SPP different !\n");
02833 return FLGR_RET_UNDEFINED_ERROR;
02834 }
02835
02836 ret = flgr_vector_is_same_spp(vctdest,vct2);
02837 if(ret != FLGR_RET_OK) {
02838 POST_ERROR("Vector SPP different !\n");
02839 return FLGR_RET_UNDEFINED_ERROR;
02840 }
02841
02842
02843 FLGR_FULL_PROCEDURE_DISPATCH(vctdest->type, flgr_vector_cmp_ge, vctdest, vct1, vct2);
02844 }
02845
02846
02847
02848
02849
02850
02852
02854 #define FLGR_MACRO_VECTOR_CMOVE(dtype) \
02855 int k; \
02856 int spp = vctdest->spp; \
02857 dtype *pcmp = (dtype*) vctcmp->array; \
02858 dtype *p1 = (dtype*) vct1->array; \
02859 dtype *pdest = (dtype*) vctdest->array; \
02860 \
02861 for(k=0 ; k<spp ; k++) { \
02862 pdest[k] = flgr_defop_cmove_##dtype(pcmp[k], p1[k], pdest[k]); \
02863 } \
02864 return
02865
02866
02867 void flgr_vector_cmove_fgBIT(FLGR_Vector *vctdest, FLGR_Vector *vctcmp, FLGR_Vector *vct1) {
02868 FLGR_MACRO_VECTOR_CMOVE(fgBIT);
02869 }
02870 void flgr_vector_cmove_fgUINT8(FLGR_Vector *vctdest, FLGR_Vector *vctcmp, FLGR_Vector *vct1) {
02871 FLGR_MACRO_VECTOR_CMOVE(fgUINT8);
02872 }
02873 void flgr_vector_cmove_fgUINT16(FLGR_Vector *vctdest, FLGR_Vector *vctcmp, FLGR_Vector *vct1) {
02874 FLGR_MACRO_VECTOR_CMOVE(fgUINT16);
02875 }
02876 void flgr_vector_cmove_fgUINT32(FLGR_Vector *vctdest, FLGR_Vector *vctcmp, FLGR_Vector *vct1) {
02877 FLGR_MACRO_VECTOR_CMOVE(fgUINT32);
02878 }
02879 void flgr_vector_cmove_fgUINT64(FLGR_Vector *vctdest, FLGR_Vector *vctcmp, FLGR_Vector *vct1) {
02880 FLGR_MACRO_VECTOR_CMOVE(fgUINT64);
02881 }
02882 void flgr_vector_cmove_fgINT8(FLGR_Vector *vctdest, FLGR_Vector *vctcmp, FLGR_Vector *vct1) {
02883 FLGR_MACRO_VECTOR_CMOVE(fgINT8);
02884 }
02885 void flgr_vector_cmove_fgINT16(FLGR_Vector *vctdest, FLGR_Vector *vctcmp, FLGR_Vector *vct1) {
02886 FLGR_MACRO_VECTOR_CMOVE(fgINT16);
02887 }
02888 void flgr_vector_cmove_fgINT32(FLGR_Vector *vctdest, FLGR_Vector *vctcmp, FLGR_Vector *vct1) {
02889 FLGR_MACRO_VECTOR_CMOVE(fgINT32);
02890 }
02891 void flgr_vector_cmove_fgINT64(FLGR_Vector *vctdest, FLGR_Vector *vctcmp, FLGR_Vector *vct1) {
02892 FLGR_MACRO_VECTOR_CMOVE(fgINT64);
02893 }
02894 void flgr_vector_cmove_fgFLOAT32(FLGR_Vector *vctdest, FLGR_Vector *vctcmp, FLGR_Vector *vct1) {
02895 FLGR_MACRO_VECTOR_CMOVE(fgFLOAT32);
02896 }
02897 void flgr_vector_cmove_fgFLOAT64(FLGR_Vector *vctdest, FLGR_Vector *vctcmp, FLGR_Vector *vct1) {
02898 FLGR_MACRO_VECTOR_CMOVE(fgFLOAT64);
02899 }
02901
02910
02911 FLGR_Ret flgr_vector_cmove(FLGR_Vector *vctdest, FLGR_Vector *vctcmp, FLGR_Vector *vct1) {
02912
02913 FLGR_Ret ret;
02914
02915
02916
02917 ret = flgr_vector_is_same_type(vct1,vctcmp);
02918 if(ret != FLGR_RET_OK) {
02919 POST_ERROR("Vector type different !\n");
02920 return FLGR_RET_TYPE_DIFFERENT;
02921 }
02922
02923 ret = flgr_vector_is_same_type(vctdest,vctcmp);
02924 if(ret != FLGR_RET_OK) {
02925 POST_ERROR("Vector type different !\n");
02926 return FLGR_RET_TYPE_DIFFERENT;
02927 }
02928
02929 ret = flgr_vector_is_same_spp(vct1,vctcmp);
02930 if(ret != FLGR_RET_OK) {
02931 POST_ERROR("Vector SPP different !\n");
02932 return FLGR_RET_UNDEFINED_ERROR;
02933 }
02934
02935 ret = flgr_vector_is_same_spp(vctdest,vctcmp);
02936 if(ret != FLGR_RET_OK) {
02937 POST_ERROR("Vector SPP different !\n");
02938 return FLGR_RET_UNDEFINED_ERROR;
02939 }
02940
02941
02942 FLGR_FULL_PROCEDURE_DISPATCH(vctdest->type, flgr_vector_cmove, vctdest, vctcmp, vct1);
02943 }
02944
02945
02946