public static int mpfr_fms(
	mpfr_t rop,
	mpfr_t op1,
	mpfr_t op2,
	mpfr_t op3,
	mpfr_rnd_t rnd
)

Public Shared Function mpfr_fms ( 
	rop As mpfr_t,
	op1 As mpfr_t,
	op2 As mpfr_t,
	op3 As mpfr_t,
	rnd As mpfr_rnd_t
) As Integer

public:
static int mpfr_fms(
	mpfr_t^ rop, 
	mpfr_t^ op1, 
	mpfr_t^ op2, 
	mpfr_t^ op3, 
	mpfr_rnd_t rnd
)

static member mpfr_fms : 
        rop : mpfr_t * 
        op1 : mpfr_t * 
        op2 : mpfr_t * 
        op3 : mpfr_t * 
        rnd : mpfr_rnd_t -> int 

// Create, initialize, and set a new floating-point number op1 to -210.
mpfr_t op1 = new mpfr_t();
mpfr_lib.mpfr_init2(op1, 64U);
Assert.IsTrue(mpfr_lib.mpfr_set_si(op1, -210, mpfr_rnd_t.MPFR_RNDN) == 0);

// Create, initialize, and set a new floating-point number op2 to 10.
mpfr_t op2 = new mpfr_t();
mpfr_lib.mpfr_init2(op2, 64U);
Assert.IsTrue(mpfr_lib.mpfr_set_si(op2, 10, mpfr_rnd_t.MPFR_RNDN) == 0);

// Create, initialize, and set a new floating-point number op3 to 10.
mpfr_t op3 = new mpfr_t();
mpfr_lib.mpfr_init2(op3, 64U);
Assert.IsTrue(mpfr_lib.mpfr_set_si(op3, 10, mpfr_rnd_t.MPFR_RNDN) == 0);

// Create and initialize a new floating-point number rop.
mpfr_t rop = new mpfr_t();
mpfr_lib.mpfr_init2(rop, 64U);

// Set rop = (op1 * op2) - op3.
Assert.IsTrue(mpfr_lib.mpfr_fms(rop, op1, op2, op3, mpfr_rnd_t.MPFR_RNDN) == 0);

// Assert that the value of rop is -2110.
Assert.IsTrue(mpfr_lib.mpfr_get_d(rop, mpfr_rnd_t.MPFR_RNDN) == -2110.0);

// Release unmanaged memory allocated for rop, op1, op2, and op3.
mpfr_lib.mpfr_clears(rop, op1, op2, op3, null);

' Create, initialize, and set a new floating-point number op1 to -210.
Dim op1 As mpfr_t = New mpfr_t()
mpfr_lib.mpfr_init2(op1, 64U)
Assert.IsTrue(mpfr_lib.mpfr_set_si(op1, -210, mpfr_rnd_t.MPFR_RNDN) = 0)

' Create, initialize, and set a new floating-point number op2 to 10.
Dim op2 As mpfr_t = New mpfr_t()
mpfr_lib.mpfr_init2(op2, 64U)
Assert.IsTrue(mpfr_lib.mpfr_set_si(op2, 10, mpfr_rnd_t.MPFR_RNDN) = 0)

' Create, initialize, and set a new floating-point number op3 to 10.
Dim op3 As mpfr_t = New mpfr_t()
mpfr_lib.mpfr_init2(op3, 64U)
Assert.IsTrue(mpfr_lib.mpfr_set_si(op3, 10, mpfr_rnd_t.MPFR_RNDN) = 0)

' Create and initialize a new floating-point number rop.
Dim rop As mpfr_t = New mpfr_t()
mpfr_lib.mpfr_init2(rop, 64U)

' Set rop = (op1 * op2) - op3.
Assert.IsTrue(mpfr_lib.mpfr_fms(rop, op1, op2, op3, mpfr_rnd_t.MPFR_RNDN) = 0)

' Assert that the value of rop is -2110.
Assert.IsTrue(mpfr_lib.mpfr_get_d(rop, mpfr_rnd_t.MPFR_RNDN) = -2110.0)

' Release unmanaged memory allocated for rop, op1, op2, and op3.
mpfr_lib.mpfr_clears(rop, op1, op2, op3, Nothing)

No code example is currently available or this language may not be supported.

No code example is currently available or this language may not be supported.