~ubuntu-branches/ubuntu/trusty/libf2c2/trusty

« back to all changes in this revision

Viewing changes to r_atan.c

  • Committer: Bazaar Package Importer
  • Author(s): Alan Bain
  • Date: 2008-05-19 22:50:54 UTC
  • mfrom: (2.1.4 intrepid)
  • Revision ID: james.westby@ubuntu.com-20080519225054-jlymia0wdvvfq7dg
Tags: 20061008-4
Remove CVS directory left in source package

Show diffs side-by-side

added added

removed removed

Lines of Context:
 
1
#include "f2c.h"
 
2
 
 
3
#ifdef KR_headers
 
4
double atan();
 
5
double r_atan(x) real *x;
 
6
#else
 
7
#undef abs
 
8
#include "math.h"
 
9
#ifdef __cplusplus
 
10
extern "C" {
 
11
#endif
 
12
double r_atan(real *x)
 
13
#endif
 
14
{
 
15
return( atan(*x) );
 
16
}
 
17
#ifdef __cplusplus
 
18
}
 
19
#endif