ASAP Logo

Antenna Scatterers Analysis Program

Source Code Description: Subroutine CBES



CBES

PURPOSE: to calculate the quantity B01 where

B01 = J0(z) / J1(z)

METHOD: If the absolute value of the argument for the Bessel function is less than 12, B01 is calculated via the power series expansion for the Bessel function in the DO LOOP ending at statement 3. If greater than 12, the asymptotic expression is utilized at statement 4. If the magnitude of the complex part of the argument for the Bessel function is greater than 20, B01 is set to (0.0,-1.0). if the complex part of the argument is negative, the sign of B01 is changed prior to returning to the calling program.

CALLED BY: SGANT

CALLS TO: NONE


Return to System Manual

Goto User's Manual

See also the quick reference for the user's guide.

Goto Examples page

Goto Download Page

Return to ASAP Homepage

Last modified on: 3 Nov 2007