/* Copyright (C) 1994 by Thomas Glen Smith.  All Rights Reserved. */
/* expp APL2 V1.0.0 ****************************************************
* Returns the next higher integer, e.g. for 3.14, returns 4.00, and    *
* for -3.14, returns -3.00.                                            *
***********************************************************************/
#define INCLUDES 0
#include "includes.h"
void expp(num,ret)
double *num,*ret;
{
	Exp;

	*ret = exp(*num);
}