CoCalc Logo Icon
StoreFeaturesDocsShareSupportNewsAboutSign UpSign In

Real-time collaboration for Jupyter Notebooks, Linux Terminals, LaTeX, VS Code, R IDE, and more,
all in one place.

| Download

GAP 4.8.9 installation with standard packages -- copy to your CoCalc project to get it

Views: 418346
1
/****************************************************************************
2
**
3
*A pq_defs.h ANUPQ source Eamonn O'Brien
4
**
5
*Y Copyright 1995-2001, Lehrstuhl D fuer Mathematik, RWTH Aachen, Germany
6
*Y Copyright 1995-2001, School of Mathematical Sciences, ANU, Australia
7
**
8
*/
9
10
/* definition file for p-quotient program */
11
12
#ifndef ANUPQ_DEFINES_H
13
#define ANUPQ_DEFINES_H
14
15
#include "config.h"
16
17
enum {
18
FALSE = 0,
19
TRUE = 1
20
};
21
typedef int Logical;
22
23
#define PRINT printf
24
25
#include <stdio.h>
26
#include <stdlib.h>
27
#include <math.h>
28
#include <ctype.h>
29
#include <string.h>
30
#include <limits.h>
31
#include <time.h>
32
33
#ifdef HAVE_UNISTD_H
34
#include <unistd.h>
35
#endif
36
37
/* under Solaris, CLK_TCK is defined in <limits.h> */
38
39
#if !defined (CLK_TCK)
40
#define CLK_TCK 60
41
#endif
42
43
#define CLK_SCALE 1.0 / CLK_TCK
44
45
#ifdef HAVE_GMP
46
#include "gmp.h"
47
#endif
48
49
#define COMMENT '#'
50
51
#define RESET(File) (rewind((File)))
52
53
#define MOD(a, b) ((a) % (b))
54
55
#define WORD_LENGTH (8 * sizeof (int) - 1)
56
57
/* fixed storage or decision made at run-time? */
58
59
#if (RUN_TIME)
60
#include "storage_runtime.h"
61
#else
62
#include "storage_fixed.h"
63
#endif
64
65
#ifdef MIN
66
#undef MIN
67
#endif
68
69
#ifdef MAX
70
#undef MAX
71
#endif
72
73
#define MIN(A, B) ((A) < (B) ? (A) : (B))
74
#define MAX(A, B) ((A) > (B) ? (A) : (B))
75
#define SWAP(A, B) {int t; t = A; A = B; B = t;}
76
77
#include "pq_functions.h"
78
79
#endif
80
81