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
Tweet
Share
Share
1
/****************************************************************************

2
**

3
*A  storage_runtime.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
/* largest number of defining generators = 2^GSC1 - 1 */ 

11
extern unsigned long GSC1; 

12
extern unsigned long MAXGENS; 

13


14
/* largest number of pc generators = 2^GSC2 - 1 */ 

15
extern unsigned long GSC2;

16
extern unsigned long MAXPC;

17


18
/* largest class */

19
extern unsigned long MAXCLASS;

20


21
#define INSWT(i) ((i) << SC3)

22
#define WT(i) ((i) >> SC3)

23


24
#define PACK2(i, j) (((i)<<SC2) + (j))

25
#define FIELD1(i) ((i) >> SC2)

26
#define FIELD2(i) ((i) & MASK2)

27


28
#define PACK3(i, j, k) (((((i) << SC2) + (j)) << SC1) + (k))

29
#define PART2(i) (((i) >> SC1) & MASK2)

30
#define PART3(i) ((i) & MASK1)

31


32


33