Changeset 6c51de in git
- Timestamp:
- Feb 16, 2022, 3:57:44 PM (2 years ago)
- Branches:
- (u'spielwiese', 'fe61d9c35bf7c61f2b6cbf1b56e25e2f08d536cc')
- Children:
- 797a467b755669efb0ddb85d09db294cebaae15a
- Parents:
- d91ffbf79d85aa5b9ec9b84db8661467a03ad549
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
Singular/LIB/finvar.lib
rd91ffb r6c51de 1 1 ////////////////////////////////////////////////////////////////////////////// 2 version="version finvar.lib 4. 2.1.0 Nov=2021"; // $Id$2 version="version finvar.lib 4.3.0.1 Feb_2022 "; // $Id$ 3 3 category="Invariant theory"; 4 4 info=" … … 1807 1807 { if (i<p^j) // finding an upper bound on i 1808 1808 { for (k=0;k<j-1;k++) 1809 { out=out+((i /p^k)%p)*a^k;// finding how often p^k is contained in1809 { out=out+((i div p^k)%p)*a^k; // finding how often p^k is contained in 1810 1810 } // i 1811 out=out+(i /p^(j-1))*a^(j-1);1811 out=out+(i div p^(j-1))*a^(j-1); 1812 1812 if (defined(bool)==voice) 1813 1813 { return((-1)*out);
Note: See TracChangeset
for help on using the changeset viewer.