sladiv()

subroutine sladiv	(	real	A,
		real	B,
		real	C,
		real	D,
		real	P,
		real	Q
	)

SLADIV performs complex division in real arithmetic, avoiding unnecessary overflow.

Download SLADIV + dependencies [TGZ] [ZIP] [TXT]

Purpose:

 SLADIV performs complex division in  real arithmetic

                       a + i*b
            p + i*q = ---------
                       c + i*d

 The algorithm is due to Michael Baudin and Robert L. Smith
 and can be found in the paper
 "A Robust Complex Division in Scilab"

Parameters

[in]	A	A is REAL
[in]	B	B is REAL
[in]	C	C is REAL
[in]	D	D is REAL The scalars a, b, c, and d in the above expression.
[out]	P	P is REAL
[out]	Q	Q is REAL The scalars p and q in the above expression.

Author

Univ. of Tennessee

Univ. of California Berkeley

Univ. of Colorado Denver

NAG Ltd.