72 ,
"(local-to be hidden)" 73 ,
"(local-hidden-dropped)" 74 ,
"(local-to be unhidden)" 76 ,
"(global-to be hidden)" 77 ,
"(global-hidden-dropped)" 78 ,
"(global-to be unhidden)" 85 ,
" Commuting Functions"}
113 ,{ 10,255,255,255,255,255,255,255,255, 6, 6,255,255, 6,255,255,
114 255,255,255,255,255,255,255,255,255,255, 10,255,255,255,255,255,
115 6, 8, 9, 2, 2, 5, 8, 2, 4, 4, 5, 5, 4, 5, 2, 5,
116 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 5, 4, 8, 4, 8, 2,
117 255, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
118 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 3,255, 3, 5, 2,
119 255, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
120 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 7, 7, 7,255,255,
121 255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,
122 255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,
123 255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,
124 255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,
125 255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,
126 255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,
127 255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,
128 255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255 }
136 static struct fixedfun {
138 int commu ,tensor ,complx ,symmetric;
139 } fixedfunctions[] = {
141 ,{
"denom_" ,1 ,0 ,0 ,0}
142 ,{
"setfun_" ,1 ,0 ,0 ,0}
143 ,{
"g_" ,1 ,GAMMAFUNCTION ,VARTYPEIMAGINARY,0}
144 ,{
"gi_" ,1 ,GAMMAFUNCTION ,VARTYPEIMAGINARY,0}
145 ,{
"g5_" ,1 ,GAMMAFUNCTION ,VARTYPEIMAGINARY,0}
146 ,{
"g6_" ,1 ,GAMMAFUNCTION ,VARTYPEIMAGINARY,0}
147 ,{
"g7_" ,1 ,GAMMAFUNCTION ,VARTYPEIMAGINARY,0}
148 ,{
"sum_" ,1 ,0 ,0 ,0}
149 ,{
"sump_" ,1 ,0 ,0 ,0}
150 ,{
"dum_" ,1 ,0 ,0 ,0}
151 ,{
"replace_" ,0 ,0 ,0 ,0}
152 ,{
"reverse_" ,1 ,0 ,0 ,0}
153 ,{
"distrib_" ,1 ,0 ,0 ,0}
154 ,{
"dd_" ,0 ,TENSORFUNCTION ,0 ,0}
155 ,{
"dummy_" ,0 ,0 ,0 ,0}
156 ,{
"dummyten_",0 ,TENSORFUNCTION ,0 ,0}
157 ,{
"e_" ,0 ,TENSORFUNCTION|1 ,VARTYPEIMAGINARY,ANTISYMMETRIC}
159 ,{
"fac_" ,0 ,0 ,0 ,0}
160 ,{
"invfac_" ,0 ,0 ,0 ,0}
161 ,{
"binom_" ,0 ,0 ,0 ,0}
162 ,{
"nargs_" ,0 ,0 ,0 ,0}
163 ,{
"sign_" ,0 ,0 ,0 ,0}
164 ,{
"mod_" ,0 ,0 ,0 ,0}
165 ,{
"mod2_" ,0 ,0 ,0 ,0}
166 ,{
"min_" ,0 ,0 ,0 ,0}
167 ,{
"max_" ,0 ,0 ,0 ,0}
168 ,{
"abs_" ,0 ,0 ,0 ,0}
169 ,{
"sig_" ,0 ,0 ,0 ,0}
170 ,{
"integer_" ,0 ,0 ,0 ,0}
171 ,{
"theta_" ,0 ,0 ,0 ,0}
172 ,{
"thetap_" ,0 ,0 ,0 ,0}
173 ,{
"delta_" ,0 ,0 ,0 ,0}
174 ,{
"deltap_" ,0 ,0 ,0 ,0}
175 ,{
"bernoulli_",0,0 ,0 ,0}
176 ,{
"count_" ,0 ,0 ,0 ,0}
177 ,{
"match_" ,0 ,0 ,0 ,0}
178 ,{
"pattern_" ,0 ,0 ,VARTYPECOMPLEX ,0}
179 ,{
"term_" ,1 ,0 ,0 ,0}
180 ,{
"conjg_" ,1 ,0 ,VARTYPECOMPLEX ,0}
181 ,{
"root_" ,0 ,0 ,0 ,0}
182 ,{
"table_" ,1 ,0 ,0 ,0}
183 ,{
"firstbracket_",0 ,0 ,0 ,0}
184 ,{
"termsin_" ,0 ,0 ,0 ,0}
185 ,{
"nterms_" ,0 ,0 ,0 ,0}
186 ,{
"gcd_" ,0 ,0 ,0 ,0}
187 ,{
"div_" ,0 ,0 ,0 ,0}
188 ,{
"rem_" ,0 ,0 ,0 ,0}
189 ,{
"maxpowerof_",0 ,0 ,0 ,0}
190 ,{
"minpowerof_",0 ,0 ,0 ,0}
191 ,{
"tbl_" ,0 ,0 ,0 ,0}
192 ,{
"factorin_",0 ,0 ,0 ,0}
193 ,{
"termsinbracket_",0 ,0 ,0 ,0}
194 ,{
"farg_" ,0 ,0 ,0 ,0}
199 ,{
"sqrt_" ,0 ,0 ,0 ,0}
201 ,{
"sin_" ,0 ,0 ,0 ,0}
202 ,{
"cos_" ,0 ,0 ,0 ,0}
203 ,{
"tan_" ,0 ,0 ,0 ,0}
204 ,{
"asin_" ,0 ,0 ,0 ,0}
205 ,{
"acos_" ,0 ,0 ,0 ,0}
206 ,{
"atan_" ,0 ,0 ,0 ,0}
207 ,{
"atan2_" ,0 ,0 ,0 ,0}
208 ,{
"sinh_" ,0 ,0 ,0 ,0}
209 ,{
"cosh_" ,0 ,0 ,0 ,0}
210 ,{
"tanh_" ,0 ,0 ,0 ,0}
211 ,{
"asinh_" ,0 ,0 ,0 ,0}
212 ,{
"acosh_" ,0 ,0 ,0 ,0}
213 ,{
"atanh_" ,0 ,0 ,0 ,0}
214 ,{
"li2_" ,0 ,0 ,0 ,0}
215 ,{
"lin_" ,0 ,0 ,0 ,0}
219 ,{
"extrasymbol_",0 ,0 ,0 ,0}
220 ,{
"random_" ,0 ,0 ,0 ,0}
221 ,{
"ranperm_" ,1 ,0 ,0 ,0}
222 ,{
"numfactors_" ,0 ,0 ,0 ,0}
223 ,{
"firstterm_" ,0 ,0 ,0 ,0}
224 ,{
"content_" ,0 ,0 ,0 ,0}
225 ,{
"prime_" ,0 ,0 ,0 ,0}
226 ,{
"exteuclidean_",0 ,0 ,0 ,0}
227 ,{
"makerational_",0 ,0 ,0 ,0}
228 ,{
"inverse_" ,0 ,0 ,0 ,0}
230 ,{
"putfirst_" ,1 ,0 ,0 ,0}
231 ,{
"perm_" ,1 ,0 ,0 ,0}
232 ,{
"partitions_" ,1 ,0 ,0 ,0}
233 ,{
"mul_" ,0 ,0 ,0 ,0}
234 ,{
"moebius_" ,0 ,0 ,0 ,0}
235 ,{
"topologies_" ,0 ,0 ,0 ,0}
236 ,{
"diagrams_" ,0 ,0 ,0 ,0}
237 ,{
"node_" ,0 ,0 ,0 ,0}
238 ,{
"edge_" ,0 ,0 ,0 ,0}
239 ,{
"sizeof_" ,0 ,0 ,0 ,0}
243 {
"pos_",
"integers > 0", CSYMBOL, 0}
244 ,{
"pos0_",
"integers >= 0", CSYMBOL, 0}
245 ,{
"neg_",
"integers < 0", CSYMBOL, 0}
246 ,{
"neg0_",
"integers <= 0", CSYMBOL, 0}
247 ,{
"even_",
"even integers", CSYMBOL, 0}
248 ,{
"odd_",
"odd integers", CSYMBOL, 0}
249 ,{
"int_",
"all integers", CSYMBOL, 0}
250 ,{
"symbol_",
"only symbols", CSYMBOL, MAXPOSITIVE}
251 ,{
"fixed_",
"fixed indices", CINDEX, 0}
252 ,{
"index_",
"all indices", CINDEX, 0}
253 ,{
"number_",
"all rationals", CSYMBOL, 0}
254 ,{
"dummyindices_",
"dummy indices", CINDEX, 0}
255 ,{
"vector_",
"only vectors", CVECTOR, 0}
258 UBYTE BufferForOutput[MAXLINELENGTH+14];
260 char *setupfilename =
"form.set";
263 INILOCK(ErrorMessageLock)
264 INILOCK(FileReadLock)