blob: f23a94504e818ac6e6e4e30fcd46d3ae23942725 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
|
/*
* 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"
/*
* These will be specialized in a later version.
*/
Real
atan_QInt(int a, int b)
{
Real r;
r = vector_Int(a, b);
return atan_R(r);
}
Real
atan_QZ(mpz_t a, mpz_t b)
{
Real r;
r = vector_Z(a, b);
return atan_R(r);
}
|