aboutsummaryrefslogtreecommitdiff
path: root/ic-reals-6.3/math-lib/pow_R_R.c
blob: 9da744639b960b599191bf557b39691a4c491296 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
/*
 * Copyright (C) 2000, Imperial College
 *
 * This file is part of the Imperial College Exact Real Arithmetic Library.
 * See the copyright notice included in the distribution for conditions
 * of use.
 */

#include <stdio.h>
#include "real.h"

Real
pow_R_R(Real x, Real y)
{
	Real r;

	r = log_R(x);
	r = mul_R_R(y, r);
	return exp_R(r);
}