GNU Octave
4.4.1
A high-level interpreted language, primarily intended for numerical computations, mostly compatible with Matlab
xzexp.f
Go to the documentation of this file.
1
SUBROUTINE
xzexp(AR, AI, BR, BI)
2
C***BEGIN PROLOGUE XZEXP
3
C***REFER TO ZBESH,ZBESI,ZBESJ,ZBESK,ZBESY,ZAIRY,ZBIRY
4
C
5
C DOUBLE PRECISION COMPLEX EXPONENTIAL FUNCTION B=EXP(A)
6
C
7
C***ROUTINES CALLED (NONE)
8
C***END PROLOGUE XZEXP
9
DOUBLE PRECISION
AR, AI, BR, BI, ZM, CA, CB
10
zm = dexp(ar)
11
ca = zm*dcos(ai)
12
cb = zm*dsin(ai)
13
br = ca
14
bi = cb
15
RETURN
16
END
liboctave
external
amos
xzexp.f
Generated on Sat Sep 1 2018 14:01:45 for GNU Octave by
1.8.14