ESMF_DLADIV Subroutine

subroutine ESMF_DLADIV(A, B, C, D, P, Q)

\brief \b ESMF_DLADIV performs complex division in real arithmetic, avoiding unnecessary overflow. \htmlonly Download ESMF_DLADIV + dependencies [TGZ] [ZIP] [TXT] \endhtmlonly \par Purpose:

\verbatim

ESMF_DLADIV 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” \endverbatim \param[in] A \verbatim A is DOUBLE PRECISION \endverbatim

\param[in] B \verbatim B is DOUBLE PRECISION \endverbatim

\param[in] C \verbatim C is DOUBLE PRECISION \endverbatim

\param[in] D \verbatim D is DOUBLE PRECISION The scalars a, b, c, and d in the above expression. \endverbatim

\param[out] P \verbatim P is DOUBLE PRECISION \endverbatim

\param[out] Q \verbatim Q is DOUBLE PRECISION The scalars p and q in the above expression. \endverbatim \author Univ. of Tennessee \author Univ. of California Berkeley \author Univ. of Colorado Denver \author NAG Ltd. \date January 2013 \ingroup doubleOTHERauxiliary

Arguments

Type IntentOptional Attributes Name
double precision :: A
double precision :: B
double precision :: C
double precision :: D
double precision :: P
double precision :: Q