/*	$OpenBSD: exp.c,v 1.3 2017/08/06 20:31:58 robert Exp $	*/

/*	Written by Otto Moerbeek, 2006,  Public domain.	*/

#include <math.h>
#include <err.h>

int
main(void)
{
	double rd, bigd = HUGE_VAL;
	float rf, bigf = HUGE_VALF;
	long double rl, bigl = HUGE_VALL;

	rd = exp(bigd);
	if (!isinf(rd))
		errx(1, "exp(bigd) = %f", rd);
	rd = exp(-bigd);
	if (rd != 0.0)
		errx(1, "exp(-bigd) = %f", rd);

	rf = expf(bigf);
	if (!isinf(rf))
		errx(1, "exp(bigf) = %f", rf);
	rf = expf(-bigf);
	if (rf != 0.0F)
		errx(1, "exp(-bigf) = %f", rf);

	rl = expl(bigl);
	if (!isinf(rl))
		errx(1, "exp(bigl) = %Lf", rl);
	rl = expl(-bigl);
	if (rl != 0.0L)
		errx(1, "exp(-bigl) = %Lf", rl);

	return (0);
}