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
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
|
/* $Id$Revision: */
/* vim:set shiftwidth=4 ts=8: */
/*************************************************************************
* Copyright (c) 2011 AT&T Intellectual Property
* All rights reserved. This program and the accompanying materials
* are made available under the terms of the Eclipse Public License v1.0
* which accompanies this distribution, and is available at
* http://www.eclipse.org/legal/epl-v10.html
*
* Contributors: See CVS logs. Details at http://www.graphviz.org/
*************************************************************************/
#ifndef GENERAL_H
#define GENERAL_H
#include <stdlib.h>
#include <stdio.h>
#include <math.h>
#include <string.h>
#include <assert.h>
/* Applications that do not use the common library can define STANDALONE
* to get definitions/definitions that are normally provided there.
* In particular, note that Verbose is declared but undefined.
*/
#ifndef STANDALONE
#include <cgraph.h>
#include <globals.h>
#include <logic.h>
#include <arith.h>
#include <memory.h>
#endif /* STANDALONE */
#define real double
#define set_flag(a, flag) ((a)=((a)|(flag)))
#define test_flag(a, flag) ((a)&(flag))
#define clear_flag(a, flag) ((a) &=(~(flag)))
#ifdef STANDALONE
#define MALLOC malloc
#define REALLOC realloc
#define N_NEW(n,t) (t*)malloc((n)*sizeof(t))
#define NEW(t) (t*)malloc(sizeof(t))
#define MAX(a,b) ((a)>(b)?(a):b)
#define MIN(a,b) ((a)<(b)?(a):b)
#define ABS(a) (((a)>0)?(a):(-(a)))
#ifdef TRUE
#undef TRUE
#endif
#define TRUE 1
#ifdef FALSE
#undef FALSE
#endif
#define FALSE 0
#define MAXINT 1<<30
#define PI 3.14159
#define POINTS(inch) 72*(inch)
typedef unsigned int boolean;
extern unsigned char Verbose;
#else /* STANDALONE */
#define MALLOC gmalloc
#define REALLOC grealloc
#endif /* STANDALONE */
#define FREE free
#define MEMCPY memcpy
#ifndef DEBUG
#ifndef NDEBUG
#define NDEBUG /* switch off assert*/
#endif
#endif
#ifdef DEBUG
extern double _statistics[10];
#endif
extern int irand(int n);
extern real drand(void);
extern int *random_permutation(int n);/* random permutation of 0 to n-1 */
real* vector_subtract_to(int n, real *x, real *y);/* y = x-y */
real* vector_subtract_from(int n, real *x, real *y);/* y = y-x */
real* vector_add_to(int n, real *x, real *y);
real vector_product(int n, real *x, real *y);
real* vector_saxpy(int n, real *x, real *y, real beta); /* y = x+beta*y */
real* vector_saxpy2(int n, real *x, real *y, real beta);/* x = x+beta*y */
/* take m elements v[p[i]]],i=1,...,m and oput in u. u will be assigned if *u = NULL */
void vector_take(int n, real *v, int m, int *p, real **u);
void vector_float_take(int n, float *v, int m, int *p, float **u);
/* give the position of the lagest, second largest etc in vector v if ascending = TRUE
or
give the position of the smallest, second smallest etc in vector v if ascending = TRUE.
results in p. If *p == NULL, p is assigned.
*/
void vector_ordering(int n, real *v, int **p, int ascending);
void vector_sort_real(int n, real *v, int ascending);
void vector_sort_int(int n, int *v, int ascending);
real vector_median(int n, real *x);
real vector_percentile(int n, real *x, real y);/* find the value such that y% of element of vector x is <= that value.*/
void vector_print(char *s, int n, real *x);
#define MACHINEACC 1.0e-16
#define SQRT_MACHINEACC 1.0e-8
int excute_system_command3(char *s1, char *s2, char *s3);
int excute_system_command(char *s1, char *s2);
#define MINDIST 1.e-15
enum {UNMATCHED = -1};
real distance(real *x, int dim, int i, int j);
real distance_cropped(real *x, int dim, int i, int j);
real point_distance(real *p1, real *p2, int dim);
char *strip_dir(char *s);
void scale_to_box(real xmin, real ymin, real xmax, real ymax, int n, int dim, real *x);
/* check to see if this is a string is integer (that can be casted into an integer variable hence very long list of digits are not valid, like 123456789012345. Return 1 if true, 0 if false. */
int validQ_int_string(char *to_convert, int *v);
/* check to see if this is a string of digits consists of 0-9 */
int digitsQ(char *to_convert);
#endif
|
