diff options
Diffstat (limited to 'src/array_mpfr.h')
| -rw-r--r-- | src/array_mpfr.h | 54 |
1 files changed, 54 insertions, 0 deletions
diff --git a/src/array_mpfr.h b/src/array_mpfr.h new file mode 100644 index 0000000..46bc54b --- /dev/null +++ b/src/array_mpfr.h @@ -0,0 +1,54 @@ +/* +Copyright 2016 Ian Jauslin + +Licensed under the Apache License, Version 2.0 (the "License"); +you may not use this file except in compliance with the License. +You may obtain a copy of the License at + + http://www.apache.org/licenses/LICENSE-2.0 + +Unless required by applicable law or agreed to in writing, software +distributed under the License is distributed on an "AS IS" BASIS, +WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. +See the License for the specific language governing permissions and +limitations under the License. +*/ + +/* + Preprocessor macros for MPFR float arrays +*/ + + +// reset CPP macros +#undef ARRAY_TYPENAME +#undef ARRAY_FUNC +#undef ARRAY_VAL_TYPE +#undef ARRAY_VAL_FREE +#undef ARRAY_VAL_SET +#undef ARRAY_VAL_CPY +#undef ARRAY_VAL_IFEQ +#undef ARRAY_VAL_IFLT +#undef ARRAY_VAL_IFGT +#undef ARRAY_VAL_PRINT + + +// name of the polynomial type +#define ARRAY_TYPENAME array_mpfr +// prefix of function names +#define ARRAY_FUNC(NAME) array_mpfr_ ## NAME + +// type of values +#define ARRAY_VAL_TYPE mpfr_t +// free +#define ARRAY_VAL_FREE(VAL) mpfr_clear(VAL) +// set values +#define ARRAY_VAL_SET(VAL, NEWVAL) VAL[0]=NEWVAL[0] +// copy values +#define ARRAY_VAL_CPY(FROMVAL, TOVAL) mpfr_init(TOVAL); mpfr_set(TOVAL, FROMVAL, MPFR_RNDN) +// compare values +#define ARRAY_VAL_IFEQ(VAL1, VAL2) mpfr_cmp(VAL1, VAL2)==0 +#define ARRAY_VAL_IFLT(VAL1, VAL2) mpfr_cmp(VAL1, VAL2)<0 +#define ARRAY_VAL_IFGT(VAL1, VAL2) mpfr_cmp(VAL1, VAL2)>0 +// print values +#define ARRAY_VAL_PRINT(VAL) fprint_mpfr(stdout, VAL) + |