Instructions:

# ASSET OVERVIEW

UNIT NAME

### CODYWAITE

VERSION
1.0
REVIEW CODE
AR; C1 1.0 A
AUTHOR
Col. William A. Whitaker, Lt. Tim Eicholz, USAF
RIGHTS
PUBLIC DOMAIN
DATE CREATED
JULY 1982
DATE RELEASED
JULY 1986
DATE LAST UPDATED
WHITAKER JULY 1986
LOCATION
ASR
C2MUG
PC-BLUE
ENVIRONMENT
Rational R1000, VAX (DEC), others
LIMITATIONS
CERTIFICATION
```Ada System Certifier_1 1.0
Date/Time of Processing: Wednesday 25 May       1994 02:28:12Am
Overall Assessment of System: OK
Classification of System: A
Basis of Classification --
Syntax Errors                               PASS
Completeness                                PASS
Independence from External Libraries        PASS
Independence from a Specific Ada Compiler   PASS

Number of ...
Files               1
Library Units       2
Lines            1856
Statements       1156
```

# CLASSIFICATION

KEYWORD
Math Functions
INDEX
Functions, Math
Whitaker, William A.
Eicholz, Tim
WIS JPMO
DEPENDENCIES
SHORT DESCRIPTION
Cody-Waite polynomials: trig, exp, hyperbolic, random, etc
TAXONOMY

# FILE LISTING

FILE SPECS
DIRECTORY DISPLAY

# ABSTRACT

## Cody-Waite Math Library

A set of elementary math functions (generic on digits <>) corresponding to the FORTRAN intrinsic functions. The implementation of the body uses the truncated polynominals method of Cody and Waite. This is a set of easily understood code ment to be machine independent. They are not particularly fast. They could be optimized for particular machines. A fairly extensive set of test procedures are also provided.

The available functions and constants are:

• Pi
• E
• Log_Of_2
• Log_Of_10
• function Sign (X, Y : Floating) return Floating; -- Returns the value of X with the sign of Y
• function Max (X, Y : Floating) return Floating; -- Returns the algebraicly larger of X and Y
• function Min (X, Y : Floating) return Floating; -- Returns the algebraicly smaller of X and Y
• function Round (X : Floating) return Floating; -- Returns the floating value of the integer nearest X
• procedure Set_Ran_Key (K : in Floating := Floating (0.0)); -- Can reset the random number generator
• function Ran return Floating; -- A random number between zero and one
• function Sqrt (X : Floating) return Floating;
• function Cbrt (X : Floating) return Floating;
• function Log (X : Floating) return Floating;
• function Log10 (X : Floating) return Floating;
• function Exp (X : Floating) return Floating;
• function "**" (X, Y : Floating) return Floating;
• function Sin (X : Floating) return Floating;
• function Cos (X : Floating) return Floating;
• function Tan (X : Floating) return Floating;
• function Cot (X : Floating) return Floating;
• function Asin (X : Floating) return Floating;
• function Acos (X : Floating) return Floating;
• function Atan (X : Floating) return Floating;
• function Atan2 (V, U : Floating) return Floating;
• function Sinh (X : Floating) return Floating;
• function Cosh (X : Floating) return Floating;
• function Tanh (X : Floating) return Floating;

# REVISION HISTORY

```DATE         VERSION	AUTHOR                  HISTORY
18JUL86       1.0	Whitaker                Initial Release
```

# RELEASE NOTICE

```This software is not subject to copyright.
This software is released to the Ada community.
This software is released to the Public Domain (note:
software released to the Public Domain is not subject
Restrictions on use or distribution:  NONE
```

# DISCLAIMER

```	This software and its documentation are provided "AS IS" and
without any expressed or implied warranties whatsoever.  No warranties
as to performance, merchantability, or fitness for a particular
purpose exist.
The user is advised to test the software thoroughly before
relying on it.  The user must assume the entire risk and liability of
using this software.  In no event shall any person or organization of
people be held responsible for any direct, indirect, consequential or
inconsequential damages or lost profits.
```