| Quellcodebibliothek Statistik Leitseite products/Sources/formale Sprachen/GAP/pkg/anupq/src/ (GAP Algebra Version 4.15.1©) Datei vom 28.7.2025 mit Größe 908 B |
|
Quelle assemble_matrix.cSprache: C |
|||||||||||||||
|
/**************************************************************************** ** *A assemble_matrix.c ANUPQ source Eamonn O'Brien ** *Y Copyright 1995-2001, Lehrstuhl D fuer Mathematik, RWTH Aachen, Germany *Y Copyright 1995-2001, School of Mathematical Sciences, ANU, Australia ** */ #include "pq_defs.h" #include "pcp_vars.h" /* assemble a t x t matrix, A, which represents the action of the automorphism described by a 2-dimensional array, auts, on an initial-segment rank t subgroup of the p-multiplicator; note that the indices of auts start at 1, not 0 */ void assemble_matrix(int **A, int t, int **auts, struct pcp_vars *pcp) { register int *y = y_address; register int i, j; register int offset = y[pcp->clend + pcp->cc - 1] + 1; for (i = 0; i < t; ++i) for (j = 0; j < t; ++j) A[i][j] = auts[offset + i][offset + j]; }
¤ Dauer der Verarbeitung: 0.10 Sekunden (vorverarbeitet am 2026-06-18) ¤*© Formatika GbR, Deutschland |
|
||||||||||||||
2026-07-09