← Back to branch summary

~ubuntu-branches/ubuntu/vivid/texlive-bin/vivid

« back to all changes in this revision

Viewing changes to utils/pmx/pmx-2.6.18/libf2c/c_cos.c

  • Committer: Package Import Robot
  • Author(s): Norbert Preining
  • Date: 2012-05-30 11:02:05 UTC
  • mfrom: (1.2.7)
  • Revision ID: package-import@ubuntu.com-20120530110205-7aju0nayh43ecl5j
Tags: 2012.20120530-1
http://bugs.debian.org/675109
* new upstream snapshot (svn 26726)
  exporting kpse_cnf_get (Closes: #675109)
* cnf.h is again installed, don't install it via libkpathsea-dev.install
* patch handling:
  . removed: 41_maketexmf, 12_fix_epstopdf_invocation
    both included upstream or not needed anymore
  . new: set-e-fmtutil part of set-e-in-various-scripts that still 
    applies
  . disabled: 57_texconfig_papersizes_for_upstream,
    58_texconfig_papersizes_use_ucf, superseeded by 55_texconfig_stuff
  . disabled: set-e-in-various-scripts: split into set-e-fmtutil
    and a disabled part for texconfig

Show diffs side-by-side

added added

removed removed

Lines of Context:
utils/pmx/pmx-2.6.18/libf2c/c_cos.c
 
1
#include "f2c.h"
 
2
 
 
3
#ifdef KR_headers
 
4
extern double sin(), cos(), sinh(), cosh();
 
5
 
 
6
VOID c_cos(r, z) complex *r, *z;
 
7
#else
 
8
#undef abs
 
9
#include "math.h"
 
10
#ifdef __cplusplus
 
11
extern "C" {
 
12
#endif
 
13
 
 
14
void c_cos(complex *r, complex *z)
 
15
#endif
 
16
{
 
17
        double zi = z->i, zr = z->r;
 
18
        r->r =   cos(zr) * cosh(zi);
 
19
        r->i = - sin(zr) * sinh(zi);
 
20
        }
 
21
#ifdef __cplusplus
 
22
}
 
23
#endif