Book a Demo!
CoCalc Logo Icon
StoreFeaturesDocsShareSupportNewsAboutPoliciesSign UpSign In
Download

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

563516 views
Tweet
Share
Share
1
#ifdef __cplusplus

2
extern "C" {

3
#endif

4


5


6
#ifndef _IDEM_H_

7
#define _IDEM_H_

8


9
#ifndef _CARAT_TYPEDEF_H

10
#include "typedef.h"

11
#endif

12


13


14
#ifdef __STDC__

15


16
/*************************************************************************

17
*  FILE : almost_decomposable_lattice.c

18
**************************************************************************/

19


20
matrix_TYP *almost_decomposable_lattice(bravais_TYP *G);

21


22
/*************************************************************************

23
*  FILE : centr.c

24
**************************************************************************/

25


26
matrix_TYP **idempotente(matrix_TYP **gen,int gen_no,matrix_TYP *form,

27
             int *anz,int *dimc,int *dimcc,int *options);

28


29
matrix_TYP **solve_endo(matrix_TYP **A,matrix_TYP **B,int anz,int *dim);

30


31


32
matrix_TYP *zeros(matrix_TYP *A);

33


34
/*************************************************************************

35
* FILE: min_pol.c

36
**************************************************************************/

37


38
matrix_TYP *min_pol(matrix_TYP *A);

39


40
/*************************************************************************

41
*  FILE: symbol.c

42
**************************************************************************/

43


44
typedef struct { bravais_TYP *group;

45
                 matrix_TYP **centralizer;

46
                 int dimc;

47
                 matrix_TYP **ccentralizer;

48
                 int dimcc;

49
                 matrix_TYP *lattice;

50
               } constituent;

51


52
char *symbol(bravais_TYP *G,matrix_TYP *F);

53


54
/*************************************************************************

55
*  FILE: bravais_catalog.c

56
**************************************************************************/

57


58
symbol_out *read_symbol_from_string(char *symb);

59


60
bravais_TYP *catalog_number(bravais_TYP *G,char *symb,matrix_TYP **TR,

61
                            int *almost,int *zclass);

62


63
/*************************************************************************

64
*  FILE: v4_catalog.c

65
**************************************************************************/

66


67
bravais_TYP *catalog_number_v4(bravais_TYP *G,char *symb,matrix_TYP **TR,

68
                               int *almost,int *zclass);

69


70
/*************************************************************************

71
*  FILE: z_equivalent.c

72
**************************************************************************/

73


74
matrix_TYP *z_equivalent(bravais_TYP *G,

75
                         bravais_TYP **G_tr,

76
                         bravais_TYP *H);

77


78
#else

79


80
/*************************************************************************

81
*  FILE : almost_decomposable_lattice.c

82
**************************************************************************/

83


84
matrix_TYP *almost_decomposable_lattice();

85


86
/*************************************************************************

87
*  FILE : centr.c

88
**************************************************************************/

89


90
matrix_TYP **idempotente();

91


92
matrix_TYP **solve_endo();

93


94
matrix_TYP *zeros();

95


96
/*************************************************************************

97
* FILE: min_pol.c

98
**************************************************************************/

99


100
matrix_TYP *min_pol();

101


102
/*************************************************************************

103
*  FILE: symbol.c

104
**************************************************************************/

105


106
typedef struct { bravais_TYP *group;

107
                 matrix_TYP **centralizer;

108
                 int dimc;

109
                 matrix_TYP **ccentralizer;

110
                 int dimcc;

111
                 matrix_TYP *lattice;

112
               } constituent;

113


114
char *symbol();

115


116
/*************************************************************************

117
*  FILE: bravais_catalog.c

118
**************************************************************************/

119


120
symbol_out *read_symbol_from_string(char *symb);

121


122
bravais_TYP *catalog_number();

123


124
/*************************************************************************

125
*  FILE: v4_catalog.c

126
**************************************************************************/

127


128
bravais_TYP *catalog_number_v4();

129


130
/*************************************************************************

131
*  FILE: z_equivalent.c

132
**************************************************************************/

133


134
matrix_TYP *z_equivalent(bravais_TYP *G,

135
                         bravais_TYP **G_tr,

136
                         bravais_TYP *H);

137


138
#endif

139


140
#endif

141


142


143
#ifdef __cplusplus

144
}

145
#endif

146


147


148


149