INLA_DIST
Loading...
Searching...
No Matches
BTA
Types.H
1
#ifndef __TYPES
2
#define __TYPES
3
4
using namespace
std;
5
6
#include <math.h>
7
#include <complex>
8
9
#ifndef PI
10
#define PI 3.14159265358979
11
#endif
12
13
#ifndef ROWBLOCK
14
#define ROWBLOCK 100
15
#endif
16
17
#ifndef COLBLOCK
18
#define COLBLOCK 100
19
#endif
20
21
#ifndef MAX_COMM
22
#define MAX_COMM 20
23
#endif
24
25
#ifndef INF
26
#define INF 1E8
27
#endif
28
29
#ifndef SEP_TASK
30
#define SEP_TASK 50
31
#endif
32
33
#ifndef tollim
34
#define tollim 1E-10
35
#endif
36
37
#ifndef scale_norm
38
#define scale_norm 1.0
39
#endif
40
41
// COMMENTED OUT, colliding with system implementation ...
42
/*
43
#ifndef __MINMAX
44
#define __MINMAX
45
#define min(a,b) (((a)<(b))?(a):(b))
46
#define max(a,b) (((a)>(b))?(a):(b))
47
#endif
48
*/
49
50
//#ifdef Add_
51
#define fortran_name(x,y) (x ## _)
52
//#endif
53
54
#ifdef NoChange
55
#define fortran_name(x,y) (x)
56
#endif
57
58
#ifdef UpCase
59
#define fortran_name(x,y) (y)
60
#endif
61
62
typedef
complex<double> CPLXType;
63
typedef
CPLXType CPX;
64
typedef
CPX *CPXp;
65
typedef
CPX (*CPXpfn)(CPX);
66
67
#endif
68
69
70
71
72
Generated by
1.10.0
1.10.0