long double _Q_mul(const long double a, const long double b) { FP_DECL_EX; FP_DECL_Q(A); FP_DECL_Q(B); FP_DECL_Q(C); long double c; FP_INIT_ROUNDMODE; FP_UNPACK_Q(A, a); FP_UNPACK_Q(B, b); FP_MUL_Q(C, A, B); FP_PACK_Q(c, C); FP_HANDLE_EXCEPTIONS; return c; }
TFtype __multf3(TFtype a, TFtype b) { FP_DECL_EX; FP_DECL_Q(A); FP_DECL_Q(B); FP_DECL_Q(R); TFtype r; FP_INIT_ROUNDMODE; FP_UNPACK_Q(A, a); FP_UNPACK_Q(B, b); FP_MUL_Q(R, A, B); FP_PACK_Q(r, R); FP_HANDLE_EXCEPTIONS; return r; }
long double __multf3(long double a, long double b) { FP_DECL_EX; FP_DECL_Q(A); FP_DECL_Q(B); FP_DECL_Q(R); long double r; FP_INIT_ROUNDMODE; FP_UNPACK_Q(A, a); FP_UNPACK_Q(B, b); FP_MUL_Q(R, A, B); FP_PACK_Q(r, R); FP_HANDLE_EXCEPTIONS; return r; }
void _OtsMulX(long al, long ah, long bl, long bh, long _round) { FP_DECL_EX; FP_DECL_Q(A); FP_DECL_Q(B); FP_DECL_Q(C); FP_DECL_RETURN(c); FP_INIT_ROUNDMODE; FP_UNPACK_Q(A, a); FP_UNPACK_Q(B, b); FP_MUL_Q(C, A, B); FP_PACK_Q(c, C); FP_HANDLE_EXCEPTIONS; FP_RETURN(c); }