/usr/include/ITK-4.5/v3p_f2c.h is in libinsighttoolkit4-dev 4.5.0-3.
This file is owned by root:root, with mode 0o644.
The actual contents of the file can be viewed below.
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 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 | #ifndef v3p_f2c_h
#define v3p_f2c_h
/* Disable some warnings inside v3p_netlib sources. */
#ifdef V3P_NETLIB_SRC
# if defined(_MSC_VER)
# pragma warning (disable: 4244) /* conversion with possible loss of data */
# if !defined(_COMPLEX_DEFINED)
struct _complex { double x,y; };
# define _COMPLEX_DEFINED /* block math.h from defining complex macro */
# endif
# endif
#endif
/* Mangle the f2c symbols and types to have a v3p_netlib prefix. */
#include "v3p_f2c_mangle.h"
/* Avoid f2c namespace violations. */
#ifndef V3P_NETLIB_SRC
# define V3P_F2C_SKIP_UNDEFS
#endif
/* Include the renamed original f2c.h file with a C interface. */
#ifdef __cplusplus
extern "C" {
#endif
#include "v3p_f2c_original.h"
char *F77_aloc(integer Len, char *whence);
void sig_die(register char *s, int kill);
integer i_dnnt(doublereal *x);
double f__cabs(double real_value, double imag_value);
void exit_(integer *rc);
double c_abs(complex *z);
void c_div(complex *c, complex *a, complex *b);
void c_sqrt(complex *r, complex *z);
VOID d_cnjg(doublecomplex *r, doublecomplex *z);
double d_imag(doublecomplex *z);
double d_lg10(doublereal *x);
double d_sign(doublereal *a, doublereal *b);
double pow_dd(doublereal *ap, doublereal *bp);
double pow_di(doublereal *ap, integer *bp);
double pow_ri(real *ap, integer *bp);
integer pow_ii(integer *ap, integer *bp);
VOID r_cnjg(complex *r, complex *z);
double r_imag(complex *z);
double r_sign(real *a, real *b);
int s_copy(char *a, char *b, ftnlen la, ftnlen lb);
integer s_cmp(char *a0, char *b0, ftnlen la, ftnlen lb);
int s_cat(char *lp, char **rpp, integer *rnp, integer* np, ftnlen ll);
double z_abs(doublecomplex *z);
void z_div(doublecomplex *c, doublecomplex *a, doublecomplex *b);
void z_sqrt(doublecomplex *r, doublecomplex *z);
#ifdef __cplusplus
}
#endif
/* Cleanup the namespace if not inside a v3p_netlib source. */
#ifndef V3P_NETLIB_SRC
# undef qbit_clear
# undef qbit_set
# undef TRUE_
# undef FALSE_
# undef Extern
# undef VOID
# undef abs
# undef dabs
# undef min
# undef max
# undef dmin
# undef dmax
# undef bit_test
# undef bit_clear
# undef bit_set
# undef F2C_proc_par_types
# include "v3p_f2c_unmangle.h"
#endif
#endif
|