%% Created by Maple 9.00, Mac OS X
%% Source Worksheet: gf-constituents.latte.sa.mw - /Users/zaslav/Tarticles/SLS/Maple/
%% Generated: Wed Mar 10 22:17:12 EST 2010
\documentclass{article}
\usepackage{maple2e}
\def\emptyline{\vspace{12pt}}
\DefineParaStyle{maplegroup}
\DefineParaStyle{Author}
\DefineParaStyle{subtitle}
\DefineParaStyle{Bullet Item}
\DefineParaStyle{Dash Item}
\DefineParaStyle{Diagnostic}
\DefineParaStyle{Error}
\DefineParaStyle{Heading 1}
\DefineParaStyle{Heading 2}
\DefineParaStyle{Heading 3}
\DefineParaStyle{Heading 4}
\DefineParaStyle{Normal}
\DefineParaStyle{Text Output}
\DefineParaStyle{Title}
\DefineParaStyle{Warning}
\DefineCharStyle{2D Math}
\DefineCharStyle{Help Heading}
\DefineCharStyle{Maple Input}
\DefineCharStyle{FixedWidth}
\DefineCharStyle{endFixedWidth}
\begin{document}
\pagestyle{empty}
Notation:S:  semimagic squares (all positive values).s:   normalized squares (symmetry types).R:   reduced squares (least element is 0).r:   reduced normalized squares (reduced symmetry types).gf:  generating function in some form.gfsum:  generating function as a sum of simple terms.c:   Cubic (fixed strict upper bound; weak upper bound for reduced).a:   Affine (fixed magic sum).p  =  period,pno7  =  truncated period (in affine),
p7 = period of the H term in the g.f.'s, with the denominator factor (1-x\symbol{94}d7).d = degree (and dimension, in the general and no-H cases),  
d7 = degree in the H term.RtoSfactor = the rational function that multiplies Rgf to Sgf and rgf to sgf.This is for : set up main constants.\begin{mapleinput}
\mapleinline{active}{1d}{d:=4; d7:=1; 
p:=840; pno7:=120; p7:=21;
RtoSfactor:=x\symbol{94}3/(1-x\symbol{94}3);}{}
\end{mapleinput}
\mapleresult
\begin{maplelatex}
\mapleinline{inert}{2d}{d := 4}{%
\[
d\, := \,4
\]
}
\mapleinline{inert}{2d}{d7 := 1}{%
\[
{\it d7}\, := \,1
\]
}
\mapleinline{inert}{2d}{p := 840}{%
\[
p\, := \,840
\]
}
\mapleinline{inert}{2d}{pno7 := 120}{%
\[
{\it pno7}\, := \,120
\]
}
\mapleinline{inert}{2d}{p7 := 21}{%
\[
{\it p7}\, := \,21
\]
}
\mapleinline{inert}{2d}{RtoSfactor := x^3/(1-x^3)}{%
\[
{\it RtoSfactor}\, := \,{\frac {{x}^{3}}{1-{x}^{3}}}
\]
}

\end{maplelatex}
From the Latte results we get the closed Ehrhart g.f. of each flat, which depends on whether we're doing cubic or affine.This is for : set up simplex data.\begin{mapleinput}
\mapleinline{active}{1d}{simplexname[1]:="OABC": ehrgf[1]:= 1/((1-x)*(1-x\symbol{94}2)\symbol{94}3) : dimen[1]:=3:
simplexname[2]:="OEE2": ehrgf[2]:= 1/((1-x)*(1-x\symbol{94}4)\symbol{94}2) : dimen[2]:=2:
simplexname[3]:="OAE2": ehrgf[3]:= 1/((1-x)*(1-x\symbol{94}2)*(1-x\symbol{94}4)) : dimen[3]:=2:
simplexname[4]:="ADE2": ehrgf[4]:= 1/((1-x\symbol{94}2)*(1-x\symbol{94}3)*(1-x\symbol{94}4)) : dimen[4]:=2:
simplexname[5]:="DE1E2": ehrgf[5]:= 1/((1-x\symbol{94}3)*(1-x\symbol{94}4)\symbol{94}2) : dimen[5]:=2:
simplexname[6]:="OCE": ehrgf[6]:= 1/((1-x)*(1-x\symbol{94}2)*(1-x\symbol{94}4)) : dimen[6]:=2:
simplexname[7]:="BDE1": ehrgf[7]:= 1/((1-x\symbol{94}2)*(1-x\symbol{94}3)*(1-x\symbol{94}4)) : dimen[7]:=2:
simplexname[8]:="ABD": ehrgf[8]:= 1/((1-x\symbol{94}2)\symbol{94}2*(1-x\symbol{94}3)) : dimen[8]:=2:
simplexname[9]:="FG1": ehrgf[9]:= 1/((1-x\symbol{94}5)*(1-x\symbol{94}8)) : dimen[9]:=1:
simplexname[10]:="EF": ehrgf[10]:= 1/((1-x\symbol{94}4)*(1-x\symbol{94}5)) : dimen[10]:=1:
simplexname[11]:="OG": ehrgf[11]:= 1/((1-x)*(1-x\symbol{94}6)) : dimen[11]:=1:
simplexname[12]:="FG": ehrgf[12]:= 1/((1-x\symbol{94}5)*(1-x\symbol{94}6)) : dimen[12]:=1:
simplexname[13]:="AF": ehrgf[13]:= 1/((1-x\symbol{94}2)*(1-x\symbol{94}5)) : dimen[13]:=1:
simplexname[14]:="DG": ehrgf[14]:= 1/((1-x\symbol{94}3)*(1-x\symbol{94}6)) : dimen[14]:=1:
simplexname[15]:="DG2": ehrgf[15]:= 1/((1-x\symbol{94}3)*(1-x\symbol{94}8)) : dimen[15]:=1:
simplexname[16]:="DE": ehrgf[16]:= 1/((1-x\symbol{94}3)*(1-x\symbol{94}4)) : dimen[16]:=1:
simplexname[17]:="H": ehrgf[17] := 1/(1-x\symbol{94}7) : dimen[17]:=0:
for n from 1 to 17 do print(simplexname[n], dimen[n], ehrgf[n]); od;}{}
\end{mapleinput}
\mapleresult
\begin{maplelatex}
\mapleinline{inert}{2d}{"OABC", 3, 1/((1-x)*(1-x^2)^3)}{%
\[
{\it ``OABC''},\,3,\,{\frac {1}{ \left( 1-x \right)  \left( 1-{x}^{2} \right) ^{3}}}
\]
}
\mapleinline{inert}{2d}{"OEE2", 2, 1/((1-x)*(1-x^4)^2)}{%
\[
{\it ``OEE2''},\,2,\,{\frac {1}{ \left( 1-x \right)  \left( 1-{x}^{4} \right) ^{2}}}
\]
}
\mapleinline{inert}{2d}{"OAE2", 2, 1/((1-x)*(1-x^2)*(1-x^4))}{%
\[
{\it ``OAE2''},\,2,\,{\frac {1}{ \left( 1-x \right)  \left( 1-{x}^{2} \right)  \left( 1-{x}^{4} \right) }}
\]
}
\mapleinline{inert}{2d}{"ADE2", 2, 1/((1-x^2)*(1-x^3)*(1-x^4))}{%
\[
{\it ``ADE2''},\,2,\,{\frac {1}{ \left( 1-{x}^{2} \right)  \left( 1-{x}^{3} \right)  \left( 1-{x}^{4} \right) }}
\]
}
\mapleinline{inert}{2d}{"DE1E2", 2, 1/((1-x^3)*(1-x^4)^2)}{%
\[
{\it ``DE1E2''},\,2,\,{\frac {1}{ \left( 1-{x}^{3} \right)  \left( 1-{x}^{4} \right) ^{2}}}
\]
}
\mapleinline{inert}{2d}{"OCE", 2, 1/((1-x)*(1-x^2)*(1-x^4))}{%
\[
{\it ``OCE''},\,2,\,{\frac {1}{ \left( 1-x \right)  \left( 1-{x}^{2} \right)  \left( 1-{x}^{4} \right) }}
\]
}
\mapleinline{inert}{2d}{"BDE1", 2, 1/((1-x^2)*(1-x^3)*(1-x^4))}{%
\[
{\it ``BDE1''},\,2,\,{\frac {1}{ \left( 1-{x}^{2} \right)  \left( 1-{x}^{3} \right)  \left( 1-{x}^{4} \right) }}
\]
}
\mapleinline{inert}{2d}{"ABD", 2, 1/((1-x^2)^2*(1-x^3))}{%
\[
{\it ``ABD''},\,2,\,{\frac {1}{ \left( 1-{x}^{2} \right) ^{2} \left( 1-{x}^{3} \right) }}
\]
}
\mapleinline{inert}{2d}{"FG1", 1, 1/((1-x^5)*(1-x^8))}{%
\[
{\it ``FG1''},\,1,\,{\frac {1}{ \left( 1-{x}^{5} \right)  \left( 1-{x}^{8} \right) }}
\]
}
\mapleinline{inert}{2d}{"EF", 1, 1/((1-x^4)*(1-x^5))}{%
\[
{\it ``EF''},\,1,\,{\frac {1}{ \left( 1-{x}^{4} \right)  \left( 1-{x}^{5} \right) }}
\]
}
\mapleinline{inert}{2d}{"OG", 1, 1/((1-x)*(1-x^6))}{%
\[
{\it ``OG''},\,1,\,{\frac {1}{ \left( 1-x \right)  \left( 1-{x}^{6} \right) }}
\]
}
\mapleinline{inert}{2d}{"FG", 1, 1/((1-x^5)*(1-x^6))}{%
\[
{\it ``FG''},\,1,\,{\frac {1}{ \left( 1-{x}^{5} \right)  \left( 1-{x}^{6} \right) }}
\]
}
\mapleinline{inert}{2d}{"AF", 1, 1/((1-x^2)*(1-x^5))}{%
\[
{\it ``AF''},\,1,\,{\frac {1}{ \left( 1-{x}^{2} \right)  \left( 1-{x}^{5} \right) }}
\]
}
\mapleinline{inert}{2d}{"DG", 1, 1/((1-x^3)*(1-x^6))}{%
\[
{\it ``DG''},\,1,\,{\frac {1}{ \left( 1-{x}^{3} \right)  \left( 1-{x}^{6} \right) }}
\]
}
\mapleinline{inert}{2d}{"DG2", 1, 1/((1-x^3)*(1-x^8))}{%
\[
{\it ``DG2''},\,1,\,{\frac {1}{ \left( 1-{x}^{3} \right)  \left( 1-{x}^{8} \right) }}
\]
}
\mapleinline{inert}{2d}{"DE", 1, 1/((1-x^3)*(1-x^4))}{%
\[
{\it ``DE''},\,1,\,{\frac {1}{ \left( 1-{x}^{3} \right)  \left( 1-{x}^{4} \right) }}
\]
}
\mapleinline{inert}{2d}{"H", 0, 1/(1-x^7)}{%
\[
``H'',\,0,\, \left( 1-{x}^{7} \right) ^{-1}
\]
}

\end{maplelatex}
The closed E.g.f. is converted to the open E.g.f.\begin{mapleinput}
\mapleinline{active}{1d}{for n from 1 to 17 do 
  mu[n]:=(-1)\symbol{94}(dimen[1]-dimen[n]):
od:
mu[14]:=2*mu[14]:
for n from 1 to 17 do  
  openehrgf[n]:=simplify(-(-1)\symbol{94}dimen[n]*subs(x=1/x,ehrgf[n])):
od:}{}
\end{mapleinput}Set up basic g.f.'s. for reduced symmetry types.\begin{mapleinput}
\mapleinline{active}{1d}{for n from 1 to 17 do 
  rgfterm[n]:=openehrgf[n]: 
od:
rgfsum:=sum(mu[nn]*rgfterm[nn],nn=1..17);
rgf:=simplify(rgfsum):
rno7gfsum:=sum(mu[nn]*rgfterm[nn],nn=1..16);
rno7gf:=simplify(rno7gfsum):
r7gf:=rgfterm[17];}{}
\end{mapleinput}
\mapleresult
\begin{maplelatex}
\mapleinline{inert}{2d}{rgfsum := x^7/((x-1)*(x^2-1)^3)+x^9/((x-1)*(x^4-1)^2)+2*x^7/((x-1)*(x^2-1)*(x^4-1))+2*x^9/((x^2-1)*(x^3-1)*(x^4-1))+x^11/((x^3-1)*(x^4-1)^2)+x^7/((x^2-1)^2*(x^3-1))+x^13/((x^5-1)*(x^8-1))+x^9/((x^4-1)*(x^5-1))+x^7/((x-1)*(x^6-1))+x^11/((x^5-1)*(x^6-1))+x^7/((x^2-1)*(x^5-1))+2*x^9/((x^3-1)*(x^6-1))+x^11/((x^3-1)*(x^8-1))+x^7/((x^3-1)*(x^4-1))+x^7/(x^7-1)}{%
${\it rgfsum}\, := \,{\frac {{x}^{7}}{ \left( x-1 \right)  \left( {x}^{2}-1 \right) ^{3}}}+{\frac {{x}^{9}}{ \left( x-1 \right)  \left( {x}^{4}-1 \right) ^{2}}}+2\,{\frac {{x}^{7}}{ \left( x-1 \right)  \left( {x}^{2}-1 \right)  \left( {x}^{4}-1 \right) }}\\
\mbox{}+2\,{\frac {{x}^{9}}{ \left( {x}^{2}-1 \right)  \left( {x}^{3}-1 \right)  \left( {x}^{4}-1 \right) }}+{\frac {{x}^{11}}{ \left( {x}^{3}-1 \right)  \left( {x}^{4}-1 \right) ^{2}}}+{\frac {{x}^{7}}{ \left( {x}^{2}-1 \right) ^{2} \left( {x}^{3}-1 \right) }}\\
\mbox{}+{\frac {{x}^{13}}{ \left( {x}^{5}-1 \right)  \left( {x}^{8}-1 \right) }}+{\frac {{x}^{9}}{ \left( {x}^{4}-1 \right)  \left( {x}^{5}-1 \right) }}+{\frac {{x}^{7}}{ \left( x-1 \right)  \left( {x}^{6}-1 \right) }}+{\frac {{x}^{11}}{ \left( {x}^{5}-1 \right)  \left( {x}^{6}-1 \right) }}\\
\mbox{}+{\frac {{x}^{7}}{ \left( {x}^{2}-1 \right)  \left( {x}^{5}-1 \right) }}+2\,{\frac {{x}^{9}}{ \left( {x}^{3}-1 \right)  \left( {x}^{6}-1 \right) }}+{\frac {{x}^{11}}{ \left( {x}^{3}-1 \right)  \left( {x}^{8}-1 \right) }}+{\frac {{x}^{7}}{ \left( {x}^{3}-1 \right)  \left( {x}^{4}-1 \right) }}\\
\mbox{}+{\frac {{x}^{7}}{{x}^{7}-1}}$}
\mapleinline{inert}{2d}{rno7gfsum := x^7/((x-1)*(x^2-1)^3)+x^9/((x-1)*(x^4-1)^2)+2*x^7/((x-1)*(x^2-1)*(x^4-1))+2*x^9/((x^2-1)*(x^3-1)*(x^4-1))+x^11/((x^3-1)*(x^4-1)^2)+x^7/((x^2-1)^2*(x^3-1))+x^13/((x^5-1)*(x^8-1))+x^9/((x^4-1)*(x^5-1))+x^7/((x-1)*(x^6-1))+x^11/((x^5-1)*(x^6-1))+x^7/((x^2-1)*(x^5-1))+2*x^9/((x^3-1)*(x^6-1))+x^11/((x^3-1)*(x^8-1))+x^7/((x^3-1)*(x^4-1))}{%
${\it rno7gfsum}\, := \,{\frac {{x}^{7}}{ \left( x-1 \right)  \left( {x}^{2}-1 \right) ^{3}}}+{\frac {{x}^{9}}{ \left( x-1 \right)  \left( {x}^{4}-1 \right) ^{2}}}+2\,{\frac {{x}^{7}}{ \left( x-1 \right)  \left( {x}^{2}-1 \right)  \left( {x}^{4}-1 \right) }}\\
\mbox{}+2\,{\frac {{x}^{9}}{ \left( {x}^{2}-1 \right)  \left( {x}^{3}-1 \right)  \left( {x}^{4}-1 \right) }}+{\frac {{x}^{11}}{ \left( {x}^{3}-1 \right)  \left( {x}^{4}-1 \right) ^{2}}}+{\frac {{x}^{7}}{ \left( {x}^{2}-1 \right) ^{2} \left( {x}^{3}-1 \right) }}\\
\mbox{}+{\frac {{x}^{13}}{ \left( {x}^{5}-1 \right)  \left( {x}^{8}-1 \right) }}+{\frac {{x}^{9}}{ \left( {x}^{4}-1 \right)  \left( {x}^{5}-1 \right) }}+{\frac {{x}^{7}}{ \left( x-1 \right)  \left( {x}^{6}-1 \right) }}+{\frac {{x}^{11}}{ \left( {x}^{5}-1 \right)  \left( {x}^{6}-1 \right) }}\\
\mbox{}+{\frac {{x}^{7}}{ \left( {x}^{2}-1 \right)  \left( {x}^{5}-1 \right) }}+2\,{\frac {{x}^{9}}{ \left( {x}^{3}-1 \right)  \left( {x}^{6}-1 \right) }}+{\frac {{x}^{11}}{ \left( {x}^{3}-1 \right)  \left( {x}^{8}-1 \right) }}+{\frac {{x}^{7}}{ \left( {x}^{3}-1 \right)  \left( {x}^{4}-1 \right) }}$}
\mapleinline{inert}{2d}{r7gf := -x^7/(x^7-1)}{%
\[
{\it r7gf}\, := \,-{\frac {{x}^{7}}{{x}^{7}-1}}
\]
}

\end{maplelatex}
To compute Rgf, we need rgf:\begin{mapleinput}
\mapleinline{active}{1d}{Rgfsum:=72*rgfsum;
Rgf:=simplify(Rgfsum):
Rno7gfsum:=72*rno7gfsum;
Rno7gf:=simplify(Rno7gfsum):
R7gf:=72*r7gf;}{}
\end{mapleinput}
\mapleresult
\begin{maplelatex}
\mapleinline{inert}{2d}{Rgfsum := 72*x^7/((x-1)*(x^2-1)^3)+72*x^9/((x-1)*(x^4-1)^2)+144*x^7/((x-1)*(x^2-1)*(x^4-1))+144*x^9/((x^2-1)*(x^3-1)*(x^4-1))+72*x^11/((x^3-1)*(x^4-1)^2)+72*x^7/((x^2-1)^2*(x^3-1))+72*x^13/((x^5-1)*(x^8-1))+72*x^9/((x^4-1)*(x^5-1))+72*x^7/((x-1)*(x^6-1))+72*x^11/((x^5-1)*(x^6-1))+72*x^7/((x^2-1)*(x^5-1))+144*x^9/((x^3-1)*(x^6-1))+72*x^11/((x^3-1)*(x^8-1))+72*x^7/((x^3-1)*(x^4-1))+72*x^7/(x^7-1)}{%
${\it Rgfsum}\, := \,72\,{\frac {{x}^{7}}{ \left( x-1 \right)  \left( {x}^{2}-1 \right) ^{3}}}+72\,{\frac {{x}^{9}}{ \left( x-1 \right)  \left( {x}^{4}-1 \right) ^{2}}}+144\,{\frac {{x}^{7}}{ \left( x-1 \right)  \left( {x}^{2}-1 \right)  \left( {x}^{4}-1 \right) }}\\
\mbox{}+144\,{\frac {{x}^{9}}{ \left( {x}^{2}-1 \right)  \left( {x}^{3}-1 \right)  \left( {x}^{4}-1 \right) }}+72\,{\frac {{x}^{11}}{ \left( {x}^{3}-1 \right)  \left( {x}^{4}-1 \right) ^{2}}}+72\,{\frac {{x}^{7}}{ \left( {x}^{2}-1 \right) ^{2} \left( {x}^{3}-1 \right) }}\\
\mbox{}+72\,{\frac {{x}^{13}}{ \left( {x}^{5}-1 \right)  \left( {x}^{8}-1 \right) }}+72\,{\frac {{x}^{9}}{ \left( {x}^{4}-1 \right)  \left( {x}^{5}-1 \right) }}+72\,{\frac {{x}^{7}}{ \left( x-1 \right)  \left( {x}^{6}-1 \right) }}\\
\mbox{}+72\,{\frac {{x}^{11}}{ \left( {x}^{5}-1 \right)  \left( {x}^{6}-1 \right) }}+72\,{\frac {{x}^{7}}{ \left( {x}^{2}-1 \right)  \left( {x}^{5}-1 \right) }}+144\,{\frac {{x}^{9}}{ \left( {x}^{3}-1 \right)  \left( {x}^{6}-1 \right) }}\\
\mbox{}+72\,{\frac {{x}^{11}}{ \left( {x}^{3}-1 \right)  \left( {x}^{8}-1 \right) }}+72\,{\frac {{x}^{7}}{ \left( {x}^{3}-1 \right)  \left( {x}^{4}-1 \right) }}+72\,{\frac {{x}^{7}}{{x}^{7}-1}}$}
\mapleinline{inert}{2d}{Rno7gfsum := 72*x^7/((x-1)*(x^2-1)^3)+72*x^9/((x-1)*(x^4-1)^2)+144*x^7/((x-1)*(x^2-1)*(x^4-1))+144*x^9/((x^2-1)*(x^3-1)*(x^4-1))+72*x^11/((x^3-1)*(x^4-1)^2)+72*x^7/((x^2-1)^2*(x^3-1))+72*x^13/((x^5-1)*(x^8-1))+72*x^9/((x^4-1)*(x^5-1))+72*x^7/((x-1)*(x^6-1))+72*x^11/((x^5-1)*(x^6-1))+72*x^7/((x^2-1)*(x^5-1))+144*x^9/((x^3-1)*(x^6-1))+72*x^11/((x^3-1)*(x^8-1))+72*x^7/((x^3-1)*(x^4-1))}{%
${\it Rno7gfsum}\, := \,72\,{\frac {{x}^{7}}{ \left( x-1 \right)  \left( {x}^{2}-1 \right) ^{3}}}+72\,{\frac {{x}^{9}}{ \left( x-1 \right)  \left( {x}^{4}-1 \right) ^{2}}}+144\,{\frac {{x}^{7}}{ \left( x-1 \right)  \left( {x}^{2}-1 \right)  \left( {x}^{4}-1 \right) }}\\
\mbox{}+144\,{\frac {{x}^{9}}{ \left( {x}^{2}-1 \right)  \left( {x}^{3}-1 \right)  \left( {x}^{4}-1 \right) }}+72\,{\frac {{x}^{11}}{ \left( {x}^{3}-1 \right)  \left( {x}^{4}-1 \right) ^{2}}}+72\,{\frac {{x}^{7}}{ \left( {x}^{2}-1 \right) ^{2} \left( {x}^{3}-1 \right) }}\\
\mbox{}+72\,{\frac {{x}^{13}}{ \left( {x}^{5}-1 \right)  \left( {x}^{8}-1 \right) }}+72\,{\frac {{x}^{9}}{ \left( {x}^{4}-1 \right)  \left( {x}^{5}-1 \right) }}+72\,{\frac {{x}^{7}}{ \left( x-1 \right)  \left( {x}^{6}-1 \right) }}\\
\mbox{}+72\,{\frac {{x}^{11}}{ \left( {x}^{5}-1 \right)  \left( {x}^{6}-1 \right) }}+72\,{\frac {{x}^{7}}{ \left( {x}^{2}-1 \right)  \left( {x}^{5}-1 \right) }}+144\,{\frac {{x}^{9}}{ \left( {x}^{3}-1 \right)  \left( {x}^{6}-1 \right) }}\\
\mbox{}+72\,{\frac {{x}^{11}}{ \left( {x}^{3}-1 \right)  \left( {x}^{8}-1 \right) }}+72\,{\frac {{x}^{7}}{ \left( {x}^{3}-1 \right)  \left( {x}^{4}-1 \right) }}$}
\mapleinline{inert}{2d}{R7gf := -72*x^7/(x^7-1)}{%
\[
{\it R7gf}\, := \,-72\,{\frac {{x}^{7}}{{x}^{7}-1}}
\]
}

\end{maplelatex}
Hence Sgf, the g.f. of the number of semimagic squares, equals\begin{mapleinput}
\mapleinline{active}{1d}{Sgfsum:=RtoSfactor*Rgfsum;
Sgf:=simplify(Sgfsum):
Sno7gfsum:=RtoSfactor*Rno7gfsum;
Sno7gf:=simplify(Sno7gfsum):
S7gf:=72*s7gf;}{}
\end{mapleinput}
\mapleresult
\begin{maplelatex}
\mapleinline{inert}{2d}{Sgfsum := x^3*(72*x^7/((x-1)*(x^2-1)^3)+72*x^9/((x-1)*(x^4-1)^2)+144*x^7/((x-1)*(x^2-1)*(x^4-1))+144*x^9/((x^2-1)*(x^3-1)*(x^4-1))+72*x^11/((x^3-1)*(x^4-1)^2)+72*x^7/((x^2-1)^2*(x^3-1))+72*x^13/((x^5-1)*(x^8-1))+72*x^9/((x^4-1)*(x^5-1))+72*x^7/((x-1)*(x^6-1))+72*x^11/((x^5-1)*(x^6-1))+72*x^7/((x^2-1)*(x^5-1))+144*x^9/((x^3-1)*(x^6-1))+72*x^11/((x^3-1)*(x^8-1))+72*x^7/((x^3-1)*(x^4-1))+72*x^7/(x^7-1))/(1-x^3)}{%
${\it Sgfsum}\, := \,{x}^{3} \left( 72\,{\frac {{x}^{7}}{ \left( x-1 \right)  \left( {x}^{2}-1 \right) ^{3}}}+72\,{\frac {{x}^{9}}{ \left( x-1 \right)  \left( {x}^{4}-1 \right) ^{2}}}+144\,{\frac {{x}^{7}}{ \left( x-1 \right)  \left( {x}^{2}-1 \right)  \left( {x}^{4}-1 \right) }}\\
\mbox{}+144\,{\frac {{x}^{9}}{ \left( {x}^{2}-1 \right)  \left( {x}^{3}-1 \right)  \left( {x}^{4}-1 \right) }}+72\,{\frac {{x}^{11}}{ \left( {x}^{3}-1 \right)  \left( {x}^{4}-1 \right) ^{2}}}+72\,{\frac {{x}^{7}}{ \left( {x}^{2}-1 \right) ^{2} \left( {x}^{3}-1 \right) }}\\
\mbox{}+72\,{\frac {{x}^{13}}{ \left( {x}^{5}-1 \right)  \left( {x}^{8}-1 \right) }}+72\,{\frac {{x}^{9}}{ \left( {x}^{4}-1 \right)  \left( {x}^{5}-1 \right) }}+72\,{\frac {{x}^{7}}{ \left( x-1 \right)  \left( {x}^{6}-1 \right) }}\\
\mbox{}+72\,{\frac {{x}^{11}}{ \left( {x}^{5}-1 \right)  \left( {x}^{6}-1 \right) }}+72\,{\frac {{x}^{7}}{ \left( {x}^{2}-1 \right)  \left( {x}^{5}-1 \right) }}+144\,{\frac {{x}^{9}}{ \left( {x}^{3}-1 \right)  \left( {x}^{6}-1 \right) }}\\
\mbox{}+72\,{\frac {{x}^{11}}{ \left( {x}^{3}-1 \right)  \left( {x}^{8}-1 \right) }}+72\,{\frac {{x}^{7}}{ \left( {x}^{3}-1 \right)  \left( {x}^{4}-1 \right) }}+72\,{\frac {{x}^{7}}{{x}^{7}-1}} \right)  \left( 1-{x}^{3}\\
\mbox{} \right) ^{-1}$}
\mapleinline{inert}{2d}{Sno7gfsum := x^3*(72*x^7/((x-1)*(x^2-1)^3)+72*x^9/((x-1)*(x^4-1)^2)+144*x^7/((x-1)*(x^2-1)*(x^4-1))+144*x^9/((x^2-1)*(x^3-1)*(x^4-1))+72*x^11/((x^3-1)*(x^4-1)^2)+72*x^7/((x^2-1)^2*(x^3-1))+72*x^13/((x^5-1)*(x^8-1))+72*x^9/((x^4-1)*(x^5-1))+72*x^7/((x-1)*(x^6-1))+72*x^11/((x^5-1)*(x^6-1))+72*x^7/((x^2-1)*(x^5-1))+144*x^9/((x^3-1)*(x^6-1))+72*x^11/((x^3-1)*(x^8-1))+72*x^7/((x^3-1)*(x^4-1)))/(1-x^3)}{%
${\it Sno7gfsum}\, := \,{x}^{3} \left( 72\,{\frac {{x}^{7}}{ \left( x-1 \right)  \left( {x}^{2}-1 \right) ^{3}}}+72\,{\frac {{x}^{9}}{ \left( x-1 \right)  \left( {x}^{4}-1 \right) ^{2}}}+144\,{\frac {{x}^{7}}{ \left( x-1 \right)  \left( {x}^{2}-1 \right)  \left( {x}^{4}-1 \right) }}\\
\mbox{}+144\,{\frac {{x}^{9}}{ \left( {x}^{2}-1 \right)  \left( {x}^{3}-1 \right)  \left( {x}^{4}-1 \right) }}+72\,{\frac {{x}^{11}}{ \left( {x}^{3}-1 \right)  \left( {x}^{4}-1 \right) ^{2}}}+72\,{\frac {{x}^{7}}{ \left( {x}^{2}-1 \right) ^{2} \left( {x}^{3}-1 \right) }}\\
\mbox{}+72\,{\frac {{x}^{13}}{ \left( {x}^{5}-1 \right)  \left( {x}^{8}-1 \right) }}+72\,{\frac {{x}^{9}}{ \left( {x}^{4}-1 \right)  \left( {x}^{5}-1 \right) }}+72\,{\frac {{x}^{7}}{ \left( x-1 \right)  \left( {x}^{6}-1 \right) }}\\
\mbox{}+72\,{\frac {{x}^{11}}{ \left( {x}^{5}-1 \right)  \left( {x}^{6}-1 \right) }}+72\,{\frac {{x}^{7}}{ \left( {x}^{2}-1 \right)  \left( {x}^{5}-1 \right) }}+144\,{\frac {{x}^{9}}{ \left( {x}^{3}-1 \right)  \left( {x}^{6}-1 \right) }}\\
\mbox{}+72\,{\frac {{x}^{11}}{ \left( {x}^{3}-1 \right)  \left( {x}^{8}-1 \right) }}+72\,{\frac {{x}^{7}}{ \left( {x}^{3}-1 \right)  \left( {x}^{4}-1 \right) }} \right)  \left( 1-{x}^{3} \right) ^{-1}$}
\mapleinline{inert}{2d}{S7gf := 72*x^10*(x^20+x^19+x^18+x^17+x^16+x^15+x^14+x^13+x^12+x^11+x^10+x^9+x^8+x^7+x^6+x^5+x^4+x^3+x^2+x+1)*(x^12-x^11+x^9-x^8+x^6-x^4+x^3-x+1)/(1-x^21)^2}{%
${\it S7gf}\, := \,72\,{\frac {{x}^{10} \left( {x}^{20}+{x}^{19}+{x}^{18}+{x}^{17}+{x}^{16}+{x}^{15}+{x}^{14}+{x}^{13}+{x}^{12}+{x}^{11}+{x}^{10}+{x}^{9}+{x}^{8}+{x}^{7}+{x}^{6}+{x}^{5}+{x}^{4}+{x}^{3}+{x}^{2}\\
\mbox{}+x+1 \right)  \left( {x}^{12}-{x}^{11}+{x}^{9}-{x}^{8}+{x}^{6}-{x}^{4}+{x}^{3}-x+1 \right) }{ \left( 1-{x}^{21} \right) ^{2}}}$}

\end{maplelatex}
The g.f. of the total number of symmetry types, l_ml ("sgf"):\begin{mapleinput}
\mapleinline{active}{1d}{sgfsum:=RtoSfactor*rgfsum;
sgf:=simplify(sgfsum): 
sno7gfsum:=RtoSfactor*rno7gfsum;
sno7gf:=simplify(sno7gfsum):
s7gf:=RtoSfactor*r7gf; }{}
\end{mapleinput}
\mapleresult
\begin{maplelatex}
\mapleinline{inert}{2d}{sgfsum := x^3*(x^7/((x-1)*(x^2-1)^3)+x^9/((x-1)*(x^4-1)^2)+2*x^7/((x-1)*(x^2-1)*(x^4-1))+2*x^9/((x^2-1)*(x^3-1)*(x^4-1))+x^11/((x^3-1)*(x^4-1)^2)+x^7/((x^2-1)^2*(x^3-1))+x^13/((x^5-1)*(x^8-1))+x^9/((x^4-1)*(x^5-1))+x^7/((x-1)*(x^6-1))+x^11/((x^5-1)*(x^6-1))+x^7/((x^2-1)*(x^5-1))+2*x^9/((x^3-1)*(x^6-1))+x^11/((x^3-1)*(x^8-1))+x^7/((x^3-1)*(x^4-1))+x^7/(x^7-1))/(1-x^3)}{%
${\it sgfsum}\, := \,{x}^{3} \left( {\frac {{x}^{7}}{ \left( x-1 \right)  \left( {x}^{2}-1 \right) ^{3}}}+{\frac {{x}^{9}}{ \left( x-1 \right)  \left( {x}^{4}-1 \right) ^{2}}}+2\,{\frac {{x}^{7}}{ \left( x-1 \right)  \left( {x}^{2}-1 \right)  \left( {x}^{4}-1 \right) }}\\
\mbox{}+2\,{\frac {{x}^{9}}{ \left( {x}^{2}-1 \right)  \left( {x}^{3}-1 \right)  \left( {x}^{4}-1 \right) }}+{\frac {{x}^{11}}{ \left( {x}^{3}-1 \right)  \left( {x}^{4}-1 \right) ^{2}}}+{\frac {{x}^{7}}{ \left( {x}^{2}-1 \right) ^{2} \left( {x}^{3}-1 \right) }}\\
\mbox{}+{\frac {{x}^{13}}{ \left( {x}^{5}-1 \right)  \left( {x}^{8}-1 \right) }}+{\frac {{x}^{9}}{ \left( {x}^{4}-1 \right)  \left( {x}^{5}-1 \right) }}+{\frac {{x}^{7}}{ \left( x-1 \right)  \left( {x}^{6}-1 \right) }}+{\frac {{x}^{11}}{ \left( {x}^{5}-1 \right)  \left( {x}^{6}-1 \right) }}\\
\mbox{}+{\frac {{x}^{7}}{ \left( {x}^{2}-1 \right)  \left( {x}^{5}-1 \right) }}+2\,{\frac {{x}^{9}}{ \left( {x}^{3}-1 \right)  \left( {x}^{6}-1 \right) }}+{\frac {{x}^{11}}{ \left( {x}^{3}-1 \right)  \left( {x}^{8}-1 \right) }}+{\frac {{x}^{7}}{ \left( {x}^{3}-1 \right)  \left( {x}^{4}-1 \right) }}\\
\mbox{}+{\frac {{x}^{7}}{{x}^{7}-1}} \right)  \left( 1-{x}^{3} \right) ^{-1}$}
\mapleinline{inert}{2d}{sno7gfsum := x^3*(x^7/((x-1)*(x^2-1)^3)+x^9/((x-1)*(x^4-1)^2)+2*x^7/((x-1)*(x^2-1)*(x^4-1))+2*x^9/((x^2-1)*(x^3-1)*(x^4-1))+x^11/((x^3-1)*(x^4-1)^2)+x^7/((x^2-1)^2*(x^3-1))+x^13/((x^5-1)*(x^8-1))+x^9/((x^4-1)*(x^5-1))+x^7/((x-1)*(x^6-1))+x^11/((x^5-1)*(x^6-1))+x^7/((x^2-1)*(x^5-1))+2*x^9/((x^3-1)*(x^6-1))+x^11/((x^3-1)*(x^8-1))+x^7/((x^3-1)*(x^4-1)))/(1-x^3)}{%
${\it sno7gfsum}\, := \,{x}^{3} \left( {\frac {{x}^{7}}{ \left( x-1 \right)  \left( {x}^{2}-1 \right) ^{3}}}+{\frac {{x}^{9}}{ \left( x-1 \right)  \left( {x}^{4}-1 \right) ^{2}}}+2\,{\frac {{x}^{7}}{ \left( x-1 \right)  \left( {x}^{2}-1 \right)  \left( {x}^{4}-1 \right) }}\\
\mbox{}+2\,{\frac {{x}^{9}}{ \left( {x}^{2}-1 \right)  \left( {x}^{3}-1 \right)  \left( {x}^{4}-1 \right) }}+{\frac {{x}^{11}}{ \left( {x}^{3}-1 \right)  \left( {x}^{4}-1 \right) ^{2}}}+{\frac {{x}^{7}}{ \left( {x}^{2}-1 \right) ^{2} \left( {x}^{3}-1 \right) }}\\
\mbox{}+{\frac {{x}^{13}}{ \left( {x}^{5}-1 \right)  \left( {x}^{8}-1 \right) }}+{\frac {{x}^{9}}{ \left( {x}^{4}-1 \right)  \left( {x}^{5}-1 \right) }}+{\frac {{x}^{7}}{ \left( x-1 \right)  \left( {x}^{6}-1 \right) }}+{\frac {{x}^{11}}{ \left( {x}^{5}-1 \right)  \left( {x}^{6}-1 \right) }}\\
\mbox{}+{\frac {{x}^{7}}{ \left( {x}^{2}-1 \right)  \left( {x}^{5}-1 \right) }}+2\,{\frac {{x}^{9}}{ \left( {x}^{3}-1 \right)  \left( {x}^{6}-1 \right) }}+{\frac {{x}^{11}}{ \left( {x}^{3}-1 \right)  \left( {x}^{8}-1 \right) }}+{\frac {{x}^{7}}{ \left( {x}^{3}-1 \right)  \left( {x}^{4}-1 \right) }}\\
\mbox{} \right)  \left( 1-{x}^{3} \right) ^{-1}$}
\mapleinline{inert}{2d}{s7gf := -x^10/((1-x^3)*(x^7-1))}{%
\[
{\it s7gf}\, := \,-{\frac {{x}^{10}}{ \left( 1-{x}^{3} \right)  \left( {x}^{7}-1 \right) }}
\]
}

\end{maplelatex}
Expressing the rational function with standard denominator gives an orders-of-magnitude speedup in the series expansion.  enddegree:  The number of terms of the sequences to show.  \begin{mapleinput}
\mapleinline{active}{1d}{enddegree:=30;}{}
\end{mapleinput}
\mapleresult
\begin{maplelatex}
\mapleinline{inert}{2d}{enddegree := 30}{%
\[
{\it enddegree}\, := \,30
\]
}

\end{maplelatex}
Standard denominator (1-x\symbol{94}p)\symbol{94}{d+1}.  \begin{mapleinput}
\mapleinline{active}{1d}{pdenom:=(1-x\symbol{94}p):
standenom:=pdenom\symbol{94}(d+1);
pno7denom:=(1-x\symbol{94}pno7):
stanno7denom:=pno7denom\symbol{94}(d+1);
p7denom:=(1-x\symbol{94}p7):
stan7denom:=p7denom\symbol{94}(d7+1);}{}
\end{mapleinput}
\mapleresult
\begin{maplelatex}
\mapleinline{inert}{2d}{standenom := (1-x^840)^5}{%
\[
{\it standenom}\, := \, \left( 1-{x}^{840} \right) ^{5}
\]
}
\mapleinline{inert}{2d}{stanno7denom := (1-x^120)^5}{%
\[
{\it stanno7denom}\, := \, \left( 1-{x}^{120} \right) ^{5}
\]
}
\mapleinline{inert}{2d}{stan7denom := (1-x^21)^2}{%
\[
{\it stan7denom}\, := \, \left( 1-{x}^{21} \right) ^{2}
\]
}

\end{maplelatex}
G.f. as rational function with standard denominator.\begin{mapleinput}
\mapleinline{active}{1d}{Sgfstandnum:=simplify(numer(Sgf)*simplify(standenom/denom(Sgf))):
Sgf:=Sgfstandnum/standenom:}{}
\end{mapleinput}\begin{mapleinput}
\mapleinline{active}{1d}{Sno7gfstandnum:=simplify(numer(Sno7gf)*simplify(stanno7denom/denom(Sno7gf))):
Sno7gf:=Sno7gfstandnum/stanno7denom;}{}
\end{mapleinput}
\mapleresult
\begin{maplelatex}
\mapleinline{inert}{2d}{Sno7gf := 72*x^10*(17*x^18+22*x^17+37*x^16+38*x^15+50*x^14+43*x^13+45*x^12+38*x^11+30*x^10+21*x^9+12*x^8+6*x^7-x^5-x^4+x^2+x+1)*(1-x+x^4+x^8-x^6-x^11+x^12+x^24-x^21+x^20-x^26-x^31+x^28+x^32+x^112-x^91+x^84+x^72+x^64-x^66+x^108+x^48-x^71-x^106+x^92+x^60-x^111+x^104-x^101+x^100+x^88-x^86-x^81+x^80+x^68-x^61+x^52-x^51-x^46+x^44-x^41+x^40)*(1+x^2+x^4+x^8+x^6+x^16+x^12+x^24+x^20+x^30+x^22+x^14+x^26+x^10+x^18+x^28+x^32+x^34+x^36+x^112+x^98+x^84+x^70+x^56+x^42+x^72+x^64+x^90+x^96+x^66+x^54+x^50+x^102+x^108+x^48+x^106+x^114+x^92+x^60+x^118+x^116+x^110+x^104+x^100+x^94+x^88+x^86+x^82+x^80+x^78+x^76+x^74+x^68+x^62+x^58+x^52+x^46+x^44+x^40+x^38)*(1+x^3+x^6+x^9+x^12+x^24+x^21+x^15+x^30+x^27+x^18+x^33+x^36+x^105+x^84+x^63+x^42+x^72+x^90+x^57+x^96+x^66+x^54+x^99+x^102+x^108+x^48+x^114+x^60+x^117+x^111+x^93+x^87+x^81+x^78+x^75+x^69+x^51+x^45+x^39)^2*(1-x^2+x^6+x^12+x^24+x^30-x^26-x^10-x^34+x^36-x^98+x^84+x^72+x^96+x^54-x^50+x^102+x^108+x^48-x^106+x^60-x^82+x^78-x^74-x^58)/(1-x^120)^5}{%
${\it Sno7gf}\, := \,72\,{\frac {{x}^{10} \left( 17\,{x}^{18}+22\,{x}^{17}+37\,{x}^{16}+38\,{x}^{15}+50\,{x}^{14}+43\,{x}^{13}+45\,{x}^{12}+38\,{x}^{11}+30\,{x}^{10}+21\,{x}^{9}\\
\mbox{}+12\,{x}^{8}+6\,{x}^{7}-{x}^{5}-{x}^{4}+{x}^{2}+x+1 \right)  \left( 1-x+{x}^{4}-{x}^{21}+{x}^{8}-{x}^{6}-{x}^{11}-{x}^{81}+{x}^{80}+{x}^{68}-{x}^{61}+{x}^{12}+{x}^{24}+{x}^{20}-{x}^{26}-{x}^{31}+{x}^{28}+{x}^{32}\\
\mbox{}+{x}^{112}-{x}^{91}+{x}^{84}+{x}^{72}+{x}^{64}-{x}^{66}+{x}^{108}+{x}^{48}-{x}^{71}-{x}^{106}+{x}^{92}+{x}^{60}-{x}^{111}+{x}^{104}+{x}^{88}\\
\mbox{}-{x}^{86}-{x}^{101}+{x}^{100}+{x}^{52}-{x}^{46}+{x}^{44}-{x}^{41}-{x}^{51}+{x}^{40} \right)  \left( 1+{x}^{4}+{x}^{8}+{x}^{6}+{x}^{80}+{x}^{68}+{x}^{18}+{x}^{16}+{x}^{14}+{x}^{12}+{x}^{24}+{x}^{20}+{x}^{26}+{x}^{28}+{x}^{32}+{x}^{112}+{x}^{84}\\
\mbox{}+{x}^{72}+{x}^{64}+{x}^{66}+{x}^{108}+{x}^{48}+{x}^{106}+{x}^{92}+{x}^{60}+{x}^{104}+{x}^{88}+{x}^{86}+{x}^{100}+{x}^{52}+{x}^{46}+{x}^{44}\\
\mbox{}+{x}^{40}+{x}^{96}+{x}^{54}+{x}^{90}+{x}^{30}+{x}^{34}+{x}^{36}+{x}^{98}+{x}^{70}+{x}^{22}+{x}^{50}+{x}^{114}+{x}^{102}+{x}^{116}+{x}^{110}\\
\mbox{}+{x}^{94}+{x}^{82}+{x}^{118}+{x}^{56}+{x}^{42}+{x}^{76}+{x}^{74}+{x}^{62}+{x}^{58}+{x}^{38}+{x}^{78}+{x}^{2}+{x}^{10} \right) \\
\mbox{} \left( 1+{x}^{9}+{x}^{3}+{x}^{21}+{x}^{6}+{x}^{81}+{x}^{18}+{x}^{15}+{x}^{12}+{x}^{24}+{x}^{84}+{x}^{72}+{x}^{66}+{x}^{108}+{x}^{48}+{x}^{60}+{x}^{111}\\
\mbox{}+{x}^{51}+{x}^{96}+{x}^{54}+{x}^{90}+{x}^{30}+{x}^{36}+{x}^{114}+{x}^{102}+{x}^{42}+{x}^{78}+{x}^{27}+{x}^{33}+{x}^{105}+{x}^{63}+{x}^{57}+{x}^{99}\\
\mbox{}+{x}^{117}+{x}^{93}+{x}^{75}+{x}^{45}+{x}^{39}+{x}^{69}+{x}^{87} \right) ^{2} \left( 1+{x}^{6}+{x}^{12}+{x}^{24}-{x}^{26}+{x}^{84}+{x}^{72}+{x}^{108}+{x}^{48}-{x}^{106}+{x}^{60}+{x}^{96}+{x}^{54}+{x}^{30}-{x}^{34}+{x}^{36}\\
\mbox{}-{x}^{98}-{x}^{50}+{x}^{102}-{x}^{82}-{x}^{74}-{x}^{58}+{x}^{78}-{x}^{2}-{x}^{10} \right) \\
\mbox{}}{ \left( 1-{x}^{120} \right) ^{5}}}$}

\end{maplelatex}
\begin{mapleinput}
\mapleinline{active}{1d}{S7gfstandnum:=simplify(numer(S7gf)*simplify(stan7denom/denom(S7gf)));
S7gf:=S7gfstandnum/stan7denom:}{}
\end{mapleinput}
\mapleresult
\begin{maplelatex}
\mapleinline{inert}{2d}{S7gfstandnum := 72*x^10*(x^20+x^19+x^18+x^17+x^16+x^15+x^14+x^13+x^12+x^11+x^10+x^9+x^8+x^7+x^6+x^5+x^4+x^3+x^2+x+1)*(x^12-x^11+x^9-x^8+x^6-x^4+x^3-x+1)}{%
${\it S7gfstandnum}\, := \,72\,{x}^{10} \left( {x}^{20}+{x}^{19}+{x}^{18}+{x}^{17}+{x}^{16}+{x}^{15}+{x}^{14}+{x}^{13}+{x}^{12}+{x}^{11}+{x}^{10}+{x}^{9}+{x}^{8}+{x}^{7}+{x}^{6}+{x}^{5}+{x}^{4}+{x}^{3}+{x}^{2}\\
\mbox{}+x+1 \right)  \left( {x}^{12}-{x}^{11}+{x}^{9}-{x}^{8}+{x}^{6}-{x}^{4}+{x}^{3}-x+1 \right) $}

\end{maplelatex}
G.f. as rational function with standard denominator.\begin{mapleinput}
\mapleinline{active}{1d}{Rgfstandnum:=simplify(numer(Rgf)*standenom/denom(Rgf)):
Rgf:=Rgfstandnum/standenom:}{}
\end{mapleinput}G.f. as rational function with standard denominator.\begin{mapleinput}
\mapleinline{active}{1d}{sgfstandnum:=simplify(numer(sgf)*simplify(standenom/denom(sgf))): 
sgf:=sgfstandnum/standenom:}{}
\end{mapleinput}\begin{mapleinput}
\mapleinline{active}{1d}{sno7gfstandnum:=simplify(numer(sno7gf)*simplify(stanno7denom/denom(sno7gf))): 
sno7gf:=sno7gfstandnum/stanno7denom;}{}
\end{mapleinput}
\mapleresult
\begin{maplelatex}
\mapleinline{inert}{2d}{sno7gf := x^10*(17*x^18+22*x^17+37*x^16+38*x^15+50*x^14+43*x^13+45*x^12+38*x^11+30*x^10+21*x^9+12*x^8+6*x^7-x^5-x^4+x^2+x+1)*(1-x+x^4+x^8-x^6-x^11+x^12+x^24-x^21+x^20-x^26-x^31+x^28+x^32+x^112-x^91+x^84+x^72+x^64-x^66+x^108+x^48-x^71-x^106+x^92+x^60-x^111+x^104-x^101+x^100+x^88-x^86-x^81+x^80+x^68-x^61+x^52-x^51-x^46+x^44-x^41+x^40)*(1+x^2+x^4+x^8+x^6+x^16+x^12+x^24+x^20+x^30+x^22+x^14+x^26+x^10+x^18+x^28+x^32+x^34+x^36+x^112+x^98+x^84+x^70+x^56+x^42+x^72+x^64+x^90+x^96+x^66+x^54+x^50+x^102+x^108+x^48+x^106+x^114+x^92+x^60+x^118+x^116+x^110+x^104+x^100+x^94+x^88+x^86+x^82+x^80+x^78+x^76+x^74+x^68+x^62+x^58+x^52+x^46+x^44+x^40+x^38)*(1+x^3+x^6+x^9+x^12+x^24+x^21+x^15+x^30+x^27+x^18+x^33+x^36+x^105+x^84+x^63+x^42+x^72+x^90+x^57+x^96+x^66+x^54+x^99+x^102+x^108+x^48+x^114+x^60+x^117+x^111+x^93+x^87+x^81+x^78+x^75+x^69+x^51+x^45+x^39)^2*(1-x^2+x^6+x^12+x^24+x^30-x^26-x^10-x^34+x^36-x^98+x^84+x^72+x^96+x^54-x^50+x^102+x^108+x^48-x^106+x^60-x^82+x^78-x^74-x^58)/(1-x^120)^5}{%
${\it sno7gf}\, := \,{\frac {{x}^{10} \left( 17\,{x}^{18}+22\,{x}^{17}+37\,{x}^{16}+38\,{x}^{15}+50\,{x}^{14}+43\,{x}^{13}+45\,{x}^{12}+38\,{x}^{11}+30\,{x}^{10}+21\,{x}^{9}\\
\mbox{}+12\,{x}^{8}+6\,{x}^{7}-{x}^{5}-{x}^{4}+{x}^{2}+x+1 \right)  \left( 1-x+{x}^{4}-{x}^{21}+{x}^{8}-{x}^{6}-{x}^{11}-{x}^{81}+{x}^{80}+{x}^{68}-{x}^{61}+{x}^{12}+{x}^{24}+{x}^{20}-{x}^{26}-{x}^{31}+{x}^{28}+{x}^{32}\\
\mbox{}+{x}^{112}-{x}^{91}+{x}^{84}+{x}^{72}+{x}^{64}-{x}^{66}+{x}^{108}+{x}^{48}-{x}^{71}-{x}^{106}+{x}^{92}+{x}^{60}-{x}^{111}+{x}^{104}+{x}^{88}\\
\mbox{}-{x}^{86}-{x}^{101}+{x}^{100}+{x}^{52}-{x}^{46}+{x}^{44}-{x}^{41}-{x}^{51}+{x}^{40} \right)  \left( 1+{x}^{4}+{x}^{8}+{x}^{6}+{x}^{80}+{x}^{68}+{x}^{18}+{x}^{16}+{x}^{14}+{x}^{12}+{x}^{24}+{x}^{20}+{x}^{26}+{x}^{28}+{x}^{32}+{x}^{112}+{x}^{84}\\
\mbox{}+{x}^{72}+{x}^{64}+{x}^{66}+{x}^{108}+{x}^{48}+{x}^{106}+{x}^{92}+{x}^{60}+{x}^{104}+{x}^{88}+{x}^{86}+{x}^{100}+{x}^{52}+{x}^{46}+{x}^{44}\\
\mbox{}+{x}^{40}+{x}^{96}+{x}^{54}+{x}^{90}+{x}^{30}+{x}^{34}+{x}^{36}+{x}^{98}+{x}^{70}+{x}^{22}+{x}^{50}+{x}^{114}+{x}^{102}+{x}^{116}+{x}^{110}\\
\mbox{}+{x}^{94}+{x}^{82}+{x}^{118}+{x}^{56}+{x}^{42}+{x}^{76}+{x}^{74}+{x}^{62}+{x}^{58}+{x}^{38}+{x}^{78}+{x}^{2}+{x}^{10} \right) \\
\mbox{} \left( 1+{x}^{9}+{x}^{3}+{x}^{21}+{x}^{6}+{x}^{81}+{x}^{18}+{x}^{15}+{x}^{12}+{x}^{24}+{x}^{84}+{x}^{72}+{x}^{66}+{x}^{108}+{x}^{48}+{x}^{60}+{x}^{111}\\
\mbox{}+{x}^{51}+{x}^{96}+{x}^{54}+{x}^{90}+{x}^{30}+{x}^{36}+{x}^{114}+{x}^{102}+{x}^{42}+{x}^{78}+{x}^{27}+{x}^{33}+{x}^{105}+{x}^{63}+{x}^{57}+{x}^{99}\\
\mbox{}+{x}^{117}+{x}^{93}+{x}^{75}+{x}^{45}+{x}^{39}+{x}^{69}+{x}^{87} \right) ^{2} \left( 1+{x}^{6}+{x}^{12}+{x}^{24}-{x}^{26}+{x}^{84}+{x}^{72}+{x}^{108}+{x}^{48}-{x}^{106}+{x}^{60}+{x}^{96}+{x}^{54}+{x}^{30}-{x}^{34}+{x}^{36}\\
\mbox{}-{x}^{98}-{x}^{50}+{x}^{102}-{x}^{82}-{x}^{74}-{x}^{58}+{x}^{78}-{x}^{2}-{x}^{10} \right) \\
\mbox{}}{ \left( 1-{x}^{120} \right) ^{5}}}$}

\end{maplelatex}
\begin{mapleinput}
\mapleinline{active}{1d}{s7gfstandnum:=simplify(numer(s7gf)*simplify(stan7denom/denom(s7gf))): 
s7gf:=s7gfstandnum/stan7denom;}{}
\end{mapleinput}
\mapleresult
\begin{maplelatex}
\mapleinline{inert}{2d}{s7gf := x^10*(x^20+x^19+x^18+x^17+x^16+x^15+x^14+x^13+x^12+x^11+x^10+x^9+x^8+x^7+x^6+x^5+x^4+x^3+x^2+x+1)*(x^12-x^11+x^9-x^8+x^6-x^4+x^3-x+1)/(1-x^21)^2}{%
${\it s7gf}\, := \,{\frac {{x}^{10} \left( {x}^{20}+{x}^{19}+{x}^{18}+{x}^{17}+{x}^{16}+{x}^{15}+{x}^{14}+{x}^{13}+{x}^{12}+{x}^{11}+{x}^{10}+{x}^{9}+{x}^{8}+{x}^{7}+{x}^{6}+{x}^{5}+{x}^{4}+{x}^{3}+{x}^{2}\\
\mbox{}+x+1 \right)  \left( {x}^{12}-{x}^{11}+{x}^{9}-{x}^{8}+{x}^{6}-{x}^{4}+{x}^{3}-x+1 \right) }{ \left( 1-{x}^{21} \right) ^{2}}}$}

\end{maplelatex}
G.f. as rational function with standard denominator.\begin{mapleinput}
\mapleinline{active}{1d}{rgfstandnum:=simplify(numer(rgf)*standenom/denom(rgf)):
rgf:=rgfstandnum/standenom:}{}
\end{mapleinput}Expand the series to find the first few values of the number of squares.\begin{mapleinput}
\mapleinline{active}{1d}{Sseries:=series(Sgf,x=0,enddegree+1);}{}
\end{mapleinput}
\mapleresult
\begin{maplelatex}
\mapleinline{inert}{2d}{Sseries := series(72*x^15+144*x^16+288*x^17+576*x^18+864*x^19+1440*x^20+2088*x^21+3024*x^22+3888*x^23+5904*x^24+6984*x^25+9432*x^26+12168*x^27+14904*x^28+17928*x^29+23832*x^30+O(x^31),x,31)}{%
${\it Sseries}\, := \,{\it series} \left( 72\,{x}^{15}+144\,{x}^{16}+288\,{x}^{17}+576\,{x}^{18}+864\,{x}^{19}+1440\,{x}^{20}\\
\mbox{}+2088\,{x}^{21}+3024\,{x}^{22}+3888\,{x}^{23}+5904\,{x}^{24}+6984\,{x}^{25}+9432\,{x}^{26}+12168\,{x}^{27}\\
\mbox{}+14904\,{x}^{28}+17928\,{x}^{29}+23832\,{x}^{30}+O \left( {x}^{31} \right) ,x,31 \right) $}

\end{maplelatex}
Expand the series to find the first few values of the number of reduced squares.\begin{mapleinput}
\mapleinline{active}{1d}{Rseries:=series(Rgf,x=0,enddegree+1);}{}
\end{mapleinput}
\mapleresult
\begin{maplelatex}
\mapleinline{inert}{2d}{Rseries := series(72*x^12+144*x^13+288*x^14+504*x^15+720*x^16+1152*x^17+1512*x^18+2160*x^19+2448*x^20+3816*x^21+3960*x^22+5544*x^23+6264*x^24+7920*x^25+8496*x^26+11664*x^27+11880*x^28+15120*x^29+15840*x^30+O(x^31),x,31)}{%
${\it Rseries}\, := \,{\it series} \left( 72\,{x}^{12}+144\,{x}^{13}+288\,{x}^{14}+504\,{x}^{15}+720\,{x}^{16}+1152\,{x}^{17}\\
\mbox{}+1512\,{x}^{18}+2160\,{x}^{19}+2448\,{x}^{20}+3816\,{x}^{21}+3960\,{x}^{22}+5544\,{x}^{23}+6264\,{x}^{24}\\
\mbox{}+7920\,{x}^{25}+8496\,{x}^{26}+11664\,{x}^{27}+11880\,{x}^{28}+15120\,{x}^{29}+15840\,{x}^{30}+O \left( {x}^{31} \right) \\
\mbox{},x,31 \right) $}

\end{maplelatex}
Expand the series to find the first few values of the number of symmetry types.\begin{mapleinput}
\mapleinline{active}{1d}{sseries:=series(sgf,x=0,enddegree+1);}{}
\end{mapleinput}
\mapleresult
\begin{maplelatex}
\mapleinline{inert}{2d}{sseries := series(x^15+2*x^16+4*x^17+8*x^18+12*x^19+20*x^20+29*x^21+42*x^22+54*x^23+82*x^24+97*x^25+131*x^26+169*x^27+207*x^28+249*x^29+331*x^30+O(x^31),x,31)}{%
${\it sseries}\, := \,{\it series} \left( {x}^{15}+2\,{x}^{16}+4\,{x}^{17}+8\,{x}^{18}+12\,{x}^{19}+20\,{x}^{20}+29\,{x}^{21}+42\,{x}^{22}\\
\mbox{}+54\,{x}^{23}+82\,{x}^{24}+97\,{x}^{25}+131\,{x}^{26}+169\,{x}^{27}+207\,{x}^{28}+249\,{x}^{29}+331\,{x}^{30}+O \left( {x}^{31} \right) \\
\mbox{},x,31 \right) $}

\end{maplelatex}
Expand the series to find the first few values of the number of reduced symmetry types.\begin{mapleinput}
\mapleinline{active}{1d}{rseries:=series(rgf,x=0,enddegree+1);}{}
\end{mapleinput}
\mapleresult
\begin{maplelatex}
\mapleinline{inert}{2d}{rseries := series(x^12+2*x^13+4*x^14+7*x^15+10*x^16+16*x^17+21*x^18+30*x^19+34*x^20+53*x^21+55*x^22+77*x^23+87*x^24+110*x^25+118*x^26+162*x^27+165*x^28+210*x^29+220*x^30+O(x^31),x,31)}{%
${\it rseries}\, := \,{\it series} \left( {x}^{12}+2\,{x}^{13}+4\,{x}^{14}+7\,{x}^{15}+10\,{x}^{16}+16\,{x}^{17}+21\,{x}^{18}+30\,{x}^{19}\\
\mbox{}+34\,{x}^{20}+53\,{x}^{21}+55\,{x}^{22}+77\,{x}^{23}+87\,{x}^{24}+110\,{x}^{25}+118\,{x}^{26}+162\,{x}^{27}+165\,{x}^{28}\\
\mbox{}+210\,{x}^{29}+220\,{x}^{30}+O \left( {x}^{31} \right) ,x,31 \right) $}

\end{maplelatex}
\begin{mapleinput}
\mapleinline{active}{1d}{Szeroth:=expand(
sum( coeff(Sgfstandnum,x,p*j)*binomial(d+t/p-j,d) ,j=0..d+1) );
print(subs(t=0,Szeroth)):  }{}
\end{mapleinput}
\mapleresult
\begin{maplelatex}
\mapleinline{inert}{2d}{Szeroth := -13896/35*t+243/4*t^2-9/2*t^3+1/8*t^4+1296}{%
${\it Szeroth}\, := \,-{\frac {13896}{35}}\,t+{\frac {243}{4}}\,{t}^{2}-9/2\,{t}^{3}+1/8\,{t}^{4}\\
\mbox{}+1296$}
\mapleinline{inert}{2d}{1296}{%
\[
1296
\]
}

\end{maplelatex}
Calculate the zeroth constituent of the .  Find its constant term.\begin{mapleinput}
\mapleinline{active}{1d}{Sno7zeroth:=expand(
sum(coeff(Sno7gfstandnum,x,pno7*j)*binomial(d+t/pno7-j,d),j=0..d+1) );
subs(t=0,Sno7zeroth);
factor(Sno7zeroth);
 }{}
\end{mapleinput}
\mapleresult
\begin{maplelatex}
\mapleinline{inert}{2d}{Sno7zeroth := -1968/5*t+243/4*t^2-9/2*t^3+1/8*t^4+1224}{%
\[
{\it Sno7zeroth}\, := \,-{\frac {1968}{5}}\,t+{\frac {243}{4}}\,{t}^{2}-9/2\,{t}^{3}+1/8\,{t}^{4}+1224
\]
}
\mapleinline{inert}{2d}{1224}{%
\[
1224
\]
}
\mapleinline{inert}{2d}{-1968/5*t+243/4*t^2-9/2*t^3+1/8*t^4+1224}{%
\[
-{\frac {1968}{5}}\,t+{\frac {243}{4}}\,{t}^{2}-9/2\,{t}^{3}+1/8\,{t}^{4}+1224
\]
}

\end{maplelatex}
Extract the constituents of the total semimagic counting function.\begin{mapleinput}
\mapleinline{active}{1d}{Sno7constituent[0]:=Sno7zeroth:
for r from 1 to pno7  do
  Sno7constituent[r]:=expand(sum( coeff(Sno7gfstandnum,x,pno7*j+r)*binomial(d+(t-r)/pno7-j,d), j=0..d)):
#  print(r):
#  print( Sno7constituent[r] ):
  if ( r <= 14 ) then print( factor(Sno7constituent[r]) ): fi:
od;}{}
\end{mapleinput}
\mapleresult
\begin{maplelatex}
\mapleinline{inert}{2d}{Sno7constituent[1] := -1158/5*t+109/2*t^2-9/2*t^3+1/8*t^4+7259/40}{%
\[
{\it Sno7constituent}_{{1}}\, := \,-{\frac {1158}{5}}\,t+{\frac {109}{2}}\,{t}^{2}-9/2\,{t}^{3}+1/8\,{t}^{4}+{\frac {7259}{40}}
\]
}
\mapleinline{inert}{2d}{1/40*(t-1)*(5*t^3-175*t^2+2005*t-7259)}{%
\[
1/40\, \left( t-1 \right)  \left( 5\,{t}^{3}-175\,{t}^{2}+2005\,t-7259 \right) 
\]
}
\mapleinline{inert}{2d}{Sno7constituent[2] := -1383/5*t+227/4*t^2-9/2*t^3+1/8*t^4+1801/5}{%
\[
{\it Sno7constituent}_{{2}}\, := \,-{\frac {1383}{5}}\,t+{\frac {227}{4}}\,{t}^{2}-9/2\,{t}^{3}+1/8\,{t}^{4}+{\frac {1801}{5}}
\]
}
\mapleinline{inert}{2d}{1/40*(t-2)*(5*t^3-170*t^2+1930*t-7204)}{%
\[
1/40\, \left( t-2 \right)  \left( 5\,{t}^{3}-170\,{t}^{2}+1930\,t-7204 \right) 
\]
}
\mapleinline{inert}{2d}{Sno7constituent[3] := -1653/5*t+117/2*t^2-9/2*t^3+1/8*t^4+23067/40}{%
\[
{\it Sno7constituent}_{{3}}\, := \,-{\frac {1653}{5}}\,t+{\frac {117}{2}}\,{t}^{2}-9/2\,{t}^{3}+1/8\,{t}^{4}+{\frac {23067}{40}}
\]
}
\mapleinline{inert}{2d}{1/40*(t-3)*(5*t^3-165*t^2+1845*t-7689)}{%
\[
1/40\, \left( t-3 \right)  \left( 5\,{t}^{3}-165\,{t}^{2}+1845\,t-7689 \right) 
\]
}
\mapleinline{inert}{2d}{Sno7constituent[4] := -1428/5*t+227/4*t^2-9/2*t^3+1/8*t^4+2452/5}{%
\[
{\it Sno7constituent}_{{4}}\, := \,-{\frac {1428}{5}}\,t+{\frac {227}{4}}\,{t}^{2}-9/2\,{t}^{3}+1/8\,{t}^{4}+{\frac {2452}{5}}
\]
}
\mapleinline{inert}{2d}{1/40*(t-4)*(5*t^3-160*t^2+1630*t-4904)}{%
\[
1/40\, \left( t-4 \right)  \left( 5\,{t}^{3}-160\,{t}^{2}+1630\,t-4904 \right) 
\]
}
\mapleinline{inert}{2d}{Sno7constituent[5] := -1158/5*t+109/2*t^2-9/2*t^3+1/8*t^4+2239/8}{%
\[
{\it Sno7constituent}_{{5}}\, := \,-{\frac {1158}{5}}\,t+{\frac {109}{2}}\,{t}^{2}-9/2\,{t}^{3}+1/8\,{t}^{4}+{\frac {2239}{8}}
\]
}
\mapleinline{inert}{2d}{1/40*(t-5)*(5*t^3-155*t^2+1405*t-2239)}{%
\[
1/40\, \left( t-5 \right)  \left( 5\,{t}^{3}-155\,{t}^{2}+1405\,t-2239 \right) 
\]
}
\mapleinline{inert}{2d}{Sno7constituent[6] := -1923/5*t+243/4*t^2-9/2*t^3+1/8*t^4+4653/5}{%
\[
{\it Sno7constituent}_{{6}}\, := \,-{\frac {1923}{5}}\,t+{\frac {243}{4}}\,{t}^{2}-9/2\,{t}^{3}+1/8\,{t}^{4}+{\frac {4653}{5}}
\]
}
\mapleinline{inert}{2d}{1/40*(t-6)*(5*t^3-150*t^2+1530*t-6204)}{%
\[
1/40\, \left( t-6 \right)  \left( 5\,{t}^{3}-150\,{t}^{2}+1530\,t-6204 \right) 
\]
}
\mapleinline{inert}{2d}{Sno7constituent[7] := -1113/5*t+109/2*t^2-9/2*t^3+1/8*t^4+5243/40}{%
\[
{\it Sno7constituent}_{{7}}\, := \,-{\frac {1113}{5}}\,t+{\frac {109}{2}}\,{t}^{2}-9/2\,{t}^{3}+1/8\,{t}^{4}+{\frac {5243}{40}}
\]
}
\mapleinline{inert}{2d}{1/40*(t-7)*(5*t^3-145*t^2+1165*t-749)}{%
\[
1/40\, \left( t-7 \right)  \left( 5\,{t}^{3}-145\,{t}^{2}+1165\,t-749 \right) 
\]
}
\mapleinline{inert}{2d}{Sno7constituent[8] := -1428/5*t+227/4*t^2-9/2*t^3+1/8*t^4+2224/5}{%
\[
{\it Sno7constituent}_{{8}}\, := \,-{\frac {1428}{5}}\,t+{\frac {227}{4}}\,{t}^{2}-9/2\,{t}^{3}+1/8\,{t}^{4}+{\frac {2224}{5}}
\]
}
\mapleinline{inert}{2d}{1/40*(t-8)*(5*t^3-140*t^2+1150*t-2224)}{%
\[
1/40\, \left( t-8 \right)  \left( 5\,{t}^{3}-140\,{t}^{2}+1150\,t-2224 \right) 
\]
}
\mapleinline{inert}{2d}{Sno7constituent[9] := -1698/5*t+117/2*t^2-9/2*t^3+1/8*t^4+31131/40}{%
\[
{\it Sno7constituent}_{{9}}\, := \,-{\frac {1698}{5}}\,t+{\frac {117}{2}}\,{t}^{2}-9/2\,{t}^{3}+1/8\,{t}^{4}+{\frac {31131}{40}}
\]
}
\mapleinline{inert}{2d}{1/40*(t-9)*(5*t^3-135*t^2+1125*t-3459)}{%
\[
1/40\, \left( t-9 \right)  \left( 5\,{t}^{3}-135\,{t}^{2}+1125\,t-3459 \right) 
\]
}

\end{maplelatex}

\mapleresult
\begin{maplelatex}
\mapleinline{inert}{2d}{Sno7constituent[10] := 413+227/4*t^2-1383/5*t+1/8*t^4-9/2*t^3}{%
\[
{\it Sno7constituent}_{{10}}\, := \,413+{\frac {227}{4}}\,{t}^{2}-{\frac {1383}{5}}\,t+1/8\,{t}^{4}-9/2\,{t}^{3}
\]
}
\mapleinline{inert}{2d}{413+227/4*t^2-1383/5*t+1/8*t^4-9/2*t^3}{%
\[
413+{\frac {227}{4}}\,{t}^{2}-{\frac {1383}{5}}\,t+1/8\,{t}^{4}-9/2\,{t}^{3}
\]
}
\mapleinline{inert}{2d}{Sno7constituent[11] := -1113/5*t+109/2*t^2-9/2*t^3+1/8*t^4+539/40}{%
\[
{\it Sno7constituent}_{{11}}\, := \,-{\frac {1113}{5}}\,t+{\frac {109}{2}}\,{t}^{2}-9/2\,{t}^{3}+1/8\,{t}^{4}+{\frac {539}{40}}
\]
}
\mapleinline{inert}{2d}{1/40*(t-11)*(5*t^3-125*t^2+805*t-49)}{%
\[
1/40\, \left( t-11 \right)  \left( 5\,{t}^{3}-125\,{t}^{2}+805\,t-49 \right) 
\]
}
\mapleinline{inert}{2d}{Sno7constituent[12] := -1968/5*t+243/4*t^2-9/2*t^3+1/8*t^4+5796/5}{%
\[
{\it Sno7constituent}_{{12}}\, := \,-{\frac {1968}{5}}\,t+{\frac {243}{4}}\,{t}^{2}-9/2\,{t}^{3}+1/8\,{t}^{4}+{\frac {5796}{5}}
\]
}
\mapleinline{inert}{2d}{1/40*(t-12)*(5*t^3-120*t^2+990*t-3864)}{%
\[
1/40\, \left( t-12 \right)  \left( 5\,{t}^{3}-120\,{t}^{2}+990\,t-3864 \right) 
\]
}
\mapleinline{inert}{2d}{Sno7constituent[13] := 109/2*t^2-1158/5*t+1/8*t^4-9/2*t^3+7547/40}{%
\[
{\it Sno7constituent}_{{13}}\, := \,{\frac {109}{2}}\,{t}^{2}-{\frac {1158}{5}}\,t+1/8\,{t}^{4}-9/2\,{t}^{3}+{\frac {7547}{40}}
\]
}
\mapleinline{inert}{2d}{109/2*t^2-1158/5*t+1/8*t^4-9/2*t^3+7547/40}{%
\[
{\frac {109}{2}}\,{t}^{2}-{\frac {1158}{5}}\,t+1/8\,{t}^{4}-9/2\,{t}^{3}+{\frac {7547}{40}}
\]
}
\mapleinline{inert}{2d}{Sno7constituent[14] := -1383/5*t+227/4*t^2-9/2*t^3+1/8*t^4+1477/5}{%
\[
{\it Sno7constituent}_{{14}}\, := \,-{\frac {1383}{5}}\,t+{\frac {227}{4}}\,{t}^{2}-9/2\,{t}^{3}+1/8\,{t}^{4}+{\frac {1477}{5}}
\]
}
\mapleinline{inert}{2d}{1/40*(t-14)*(5*t^3-110*t^2+730*t-844)}{%
\[
1/40\, \left( t-14 \right)  \left( 5\,{t}^{3}-110\,{t}^{2}+730\,t-844 \right) 
\]
}
\mapleinline{inert}{2d}{Sno7constituent[15] := 117/2*t^2-1653/5*t+1/8*t^4-9/2*t^3+5823/8}{%
\[
{\it Sno7constituent}_{{15}}\, := \,{\frac {117}{2}}\,{t}^{2}-{\frac {1653}{5}}\,t+1/8\,{t}^{4}-9/2\,{t}^{3}+{\frac {5823}{8}}
\]
}
\mapleinline{inert}{2d}{Sno7constituent[16] := 227/4*t^2-1428/5*t+2488/5+1/8*t^4-9/2*t^3}{%
${\it Sno7constituent}_{{16}}\, := \,{\frac {227}{4}}\,{t}^{2}-{\frac {1428}{5}}\,t+{\frac {2488}{5}}\\
\mbox{}+1/8\,{t}^{4}-9/2\,{t}^{3}$}
\mapleinline{inert}{2d}{Sno7constituent[17] := 109/2*t^2+8603/40-1158/5*t+1/8*t^4-9/2*t^3}{%
${\it Sno7constituent}_{{17}}\, := \,{\frac {109}{2}}\,{t}^{2}+{\frac {8603}{40}}-{\frac {1158}{5}}\,t\\
\mbox{}+1/8\,{t}^{4}-9/2\,{t}^{3}$}
\mapleinline{inert}{2d}{Sno7constituent[18] := 243/4*t^2-1923/5*t+4689/5+1/8*t^4-9/2*t^3}{%
${\it Sno7constituent}_{{18}}\, := \,{\frac {243}{4}}\,{t}^{2}-{\frac {1923}{5}}\,t+{\frac {4689}{5}}\\
\mbox{}+1/8\,{t}^{4}-9/2\,{t}^{3}$}
\mapleinline{inert}{2d}{Sno7constituent[19] := 109/2*t^2-1113/5*t+1/8*t^4-9/2*t^3+2651/40}{%
\[
{\it Sno7constituent}_{{19}}\, := \,{\frac {109}{2}}\,{t}^{2}-{\frac {1113}{5}}\,t+1/8\,{t}^{4}-9/2\,{t}^{3}+{\frac {2651}{40}}
\]
}
\mapleinline{inert}{2d}{Sno7constituent[20] := 524+227/4*t^2-1428/5*t+1/8*t^4-9/2*t^3}{%
\[
{\it Sno7constituent}_{{20}}\, := \,524+{\frac {227}{4}}\,{t}^{2}-{\frac {1428}{5}}\,t+1/8\,{t}^{4}-9/2\,{t}^{3}
\]
}
\mapleinline{inert}{2d}{Sno7constituent[21] := 117/2*t^2-1698/5*t+1/8*t^4-9/2*t^3+31419/40}{%
\[
{\it Sno7constituent}_{{21}}\, := \,{\frac {117}{2}}\,{t}^{2}-{\frac {1698}{5}}\,t+1/8\,{t}^{4}-9/2\,{t}^{3}+{\frac {31419}{40}}
\]
}
\mapleinline{inert}{2d}{Sno7constituent[22] := 227/4*t^2-1383/5*t+1741/5+1/8*t^4-9/2*t^3}{%
${\it Sno7constituent}_{{22}}\, := \,{\frac {227}{4}}\,{t}^{2}-{\frac {1383}{5}}\,t+{\frac {1741}{5}}\\
\mbox{}+1/8\,{t}^{4}-9/2\,{t}^{3}$}
\mapleinline{inert}{2d}{Sno7constituent[23] := 109/2*t^2-1113/5*t+1/8*t^4-9/2*t^3+827/40}{%
\[
{\it Sno7constituent}_{{23}}\, := \,{\frac {109}{2}}\,{t}^{2}-{\frac {1113}{5}}\,t+1/8\,{t}^{4}-9/2\,{t}^{3}+{\frac {827}{40}}
\]
}
\mapleinline{inert}{2d}{Sno7constituent[24] := 243/4*t^2-1968/5*t+1/8*t^4-9/2*t^3+5832/5}{%
\[
{\it Sno7constituent}_{{24}}\, := \,{\frac {243}{4}}\,{t}^{2}-{\frac {1968}{5}}\,t+1/8\,{t}^{4}-9/2\,{t}^{3}+{\frac {5832}{5}}
\]
}
\mapleinline{inert}{2d}{Sno7constituent[25] := 109/2*t^2-1158/5*t+1/8*t^4-9/2*t^3+2143/8}{%
\[
{\it Sno7constituent}_{{25}}\, := \,{\frac {109}{2}}\,{t}^{2}-{\frac {1158}{5}}\,t+1/8\,{t}^{4}-9/2\,{t}^{3}+{\frac {2143}{8}}
\]
}
\mapleinline{inert}{2d}{Sno7constituent[26] := 227/4*t^2-1383/5*t+1/8*t^4-9/2*t^3+1513/5}{%
\[
{\it Sno7constituent}_{{26}}\, := \,{\frac {227}{4}}\,{t}^{2}-{\frac {1383}{5}}\,t+1/8\,{t}^{4}-9/2\,{t}^{3}+{\frac {1513}{5}}
\]
}
\mapleinline{inert}{2d}{Sno7constituent[27] := 117/2*t^2-1653/5*t+1/8*t^4-9/2*t^3+26523/40}{%
\[
{\it Sno7constituent}_{{27}}\, := \,{\frac {117}{2}}\,{t}^{2}-{\frac {1653}{5}}\,t+1/8\,{t}^{4}-9/2\,{t}^{3}+{\frac {26523}{40}}
\]
}
\mapleinline{inert}{2d}{Sno7constituent[28] := 227/4*t^2-1428/5*t+1/8*t^4-9/2*t^3+2164/5}{%
\[
{\it Sno7constituent}_{{28}}\, := \,{\frac {227}{4}}\,{t}^{2}-{\frac {1428}{5}}\,t+1/8\,{t}^{4}-9/2\,{t}^{3}+{\frac {2164}{5}}
\]
}

\end{maplelatex}

\mapleresult
\begin{maplelatex}
\mapleinline{inert}{2d}{Sno7constituent[29] := 109/2*t^2-1158/5*t+1/8*t^4-9/2*t^3+8891/40}{%
\[
{\it Sno7constituent}_{{29}}\, := \,{\frac {109}{2}}\,{t}^{2}-{\frac {1158}{5}}\,t+1/8\,{t}^{4}-9/2\,{t}^{3}+{\frac {8891}{40}}
\]
}
\mapleinline{inert}{2d}{Sno7constituent[30] := 1017+243/4*t^2-1923/5*t+1/8*t^4-9/2*t^3}{%
\[
{\it Sno7constituent}_{{30}}\, := \,1017+{\frac {243}{4}}\,{t}^{2}-{\frac {1923}{5}}\,t+1/8\,{t}^{4}-9/2\,{t}^{3}
\]
}
\mapleinline{inert}{2d}{Sno7constituent[31] := 109/2*t^2-1113/5*t+1/8*t^4-9/2*t^3+2939/40}{%
\[
{\it Sno7constituent}_{{31}}\, := \,{\frac {109}{2}}\,{t}^{2}-{\frac {1113}{5}}\,t+1/8\,{t}^{4}-9/2\,{t}^{3}+{\frac {2939}{40}}
\]
}
\mapleinline{inert}{2d}{Sno7constituent[32] := 227/4*t^2-1428/5*t+1/8*t^4-9/2*t^3+2656/5}{%
\[
{\it Sno7constituent}_{{32}}\, := \,{\frac {227}{4}}\,{t}^{2}-{\frac {1428}{5}}\,t+1/8\,{t}^{4}-9/2\,{t}^{3}+{\frac {2656}{5}}
\]
}
\mapleinline{inert}{2d}{Sno7constituent[33] := 117/2*t^2-1698/5*t+1/8*t^4-9/2*t^3+28827/40}{%
\[
{\it Sno7constituent}_{{33}}\, := \,{\frac {117}{2}}\,{t}^{2}-{\frac {1698}{5}}\,t+1/8\,{t}^{4}-9/2\,{t}^{3}+{\frac {28827}{40}}
\]
}
\mapleinline{inert}{2d}{Sno7constituent[34] := 227/4*t^2-1383/5*t+1/8*t^4-9/2*t^3+1777/5}{%
\[
{\it Sno7constituent}_{{34}}\, := \,{\frac {227}{4}}\,{t}^{2}-{\frac {1383}{5}}\,t+1/8\,{t}^{4}-9/2\,{t}^{3}+{\frac {1777}{5}}
\]
}
\mapleinline{inert}{2d}{Sno7constituent[35] := 109/2*t^2-1113/5*t+799/8+1/8*t^4-9/2*t^3}{%
${\it Sno7constituent}_{{35}}\, := \,{\frac {109}{2}}\,{t}^{2}-{\frac {1113}{5}}\,t+{\frac {799}{8}}\\
\mbox{}+1/8\,{t}^{4}-9/2\,{t}^{3}$}
\mapleinline{inert}{2d}{Sno7constituent[36] := 243/4*t^2+5508/5-1968/5*t+1/8*t^4-9/2*t^3}{%
${\it Sno7constituent}_{{36}}\, := \,{\frac {243}{4}}\,{t}^{2}+{\frac {5508}{5}}-{\frac {1968}{5}}\,t\\
\mbox{}+1/8\,{t}^{4}-9/2\,{t}^{3}$}
\mapleinline{inert}{2d}{Sno7constituent[37] := 109/2*t^2-1158/5*t+1/8*t^4-9/2*t^3+11003/40}{%
\[
{\it Sno7constituent}_{{37}}\, := \,{\frac {109}{2}}\,{t}^{2}-{\frac {1158}{5}}\,t+1/8\,{t}^{4}-9/2\,{t}^{3}+{\frac {11003}{40}}
\]
}

\end{maplelatex}

\mapleresult
\begin{maplelatex}
\mapleinline{inert}{2d}{Sno7constituent[38] := 227/4*t^2-1383/5*t+1/8*t^4-9/2*t^3+1189/5}{%
\[
{\it Sno7constituent}_{{38}}\, := \,{\frac {227}{4}}\,{t}^{2}-{\frac {1383}{5}}\,t+1/8\,{t}^{4}-9/2\,{t}^{3}+{\frac {1189}{5}}
\]
}
\mapleinline{inert}{2d}{Sno7constituent[39] := 117/2*t^2-1653/5*t+1/8*t^4-9/2*t^3+26811/40}{%
\[
{\it Sno7constituent}_{{39}}\, := \,{\frac {117}{2}}\,{t}^{2}-{\frac {1653}{5}}\,t+1/8\,{t}^{4}-9/2\,{t}^{3}+{\frac {26811}{40}}
\]
}
\mapleinline{inert}{2d}{Sno7constituent[40] := 584+227/4*t^2-1428/5*t+1/8*t^4-9/2*t^3}{%
\[
{\it Sno7constituent}_{{40}}\, := \,584+{\frac {227}{4}}\,{t}^{2}-{\frac {1428}{5}}\,t+1/8\,{t}^{4}-9/2\,{t}^{3}
\]
}
\mapleinline{inert}{2d}{Sno7constituent[41] := 109/2*t^2-1158/5*t+6299/40+1/8*t^4-9/2*t^3}{%
${\it Sno7constituent}_{{41}}\, := \,{\frac {109}{2}}\,{t}^{2}-{\frac {1158}{5}}\,t+{\frac {6299}{40}}\\
\mbox{}+1/8\,{t}^{4}-9/2\,{t}^{3}$}
\mapleinline{inert}{2d}{Sno7constituent[42] := 243/4*t^2-1923/5*t+1/8*t^4-9/2*t^3+5121/5}{%
\[
{\it Sno7constituent}_{{42}}\, := \,{\frac {243}{4}}\,{t}^{2}-{\frac {1923}{5}}\,t+1/8\,{t}^{4}-9/2\,{t}^{3}+{\frac {5121}{5}}
\]
}
\mapleinline{inert}{2d}{Sno7constituent[43] := 109/2*t^2-1113/5*t+347/40+1/8*t^4-9/2*t^3}{%
${\it Sno7constituent}_{{43}}\, := \,{\frac {109}{2}}\,{t}^{2}-{\frac {1113}{5}}\,t+{\frac {347}{40}}\\
\mbox{}+1/8\,{t}^{4}-9/2\,{t}^{3}$}
\mapleinline{inert}{2d}{Sno7constituent[44] := 227/4*t^2-1428/5*t+1/8*t^4-9/2*t^3+2332/5}{%
\[
{\it Sno7constituent}_{{44}}\, := \,{\frac {227}{4}}\,{t}^{2}-{\frac {1428}{5}}\,t+1/8\,{t}^{4}-9/2\,{t}^{3}+{\frac {2332}{5}}
\]
}
\mapleinline{inert}{2d}{Sno7constituent[45] := 117/2*t^2-1698/5*t+6975/8+1/8*t^4-9/2*t^3}{%
${\it Sno7constituent}_{{45}}\, := \,{\frac {117}{2}}\,{t}^{2}-{\frac {1698}{5}}\,t+{\frac {6975}{8}}\\
\mbox{}+1/8\,{t}^{4}-9/2\,{t}^{3}$}
\mapleinline{inert}{2d}{Sno7constituent[46] := 227/4*t^2-1383/5*t+1453/5+1/8*t^4-9/2*t^3}{%
${\it Sno7constituent}_{{46}}\, := \,{\frac {227}{4}}\,{t}^{2}-{\frac {1383}{5}}\,t+{\frac {1453}{5}}\\
\mbox{}+1/8\,{t}^{4}-9/2\,{t}^{3}$}
\mapleinline{inert}{2d}{Sno7constituent[47] := 109/2*t^2-1113/5*t+4283/40+1/8*t^4-9/2*t^3}{%
${\it Sno7constituent}_{{47}}\, := \,{\frac {109}{2}}\,{t}^{2}-{\frac {1113}{5}}\,t+{\frac {4283}{40}}\\
\mbox{}+1/8\,{t}^{4}-9/2\,{t}^{3}$}
\mapleinline{inert}{2d}{Sno7constituent[48] := 243/4*t^2-1968/5*t+1/8*t^4-9/2*t^3+5544/5}{%
\[
{\it Sno7constituent}_{{48}}\, := \,{\frac {243}{4}}\,{t}^{2}-{\frac {1968}{5}}\,t+1/8\,{t}^{4}-9/2\,{t}^{3}+{\frac {5544}{5}}
\]
}
\mapleinline{inert}{2d}{Sno7constituent[49] := 109/2*t^2-1158/5*t+8411/40+1/8*t^4-9/2*t^3}{%
${\it Sno7constituent}_{{49}}\, := \,{\frac {109}{2}}\,{t}^{2}-{\frac {1158}{5}}\,t+{\frac {8411}{40}}\\
\mbox{}+1/8\,{t}^{4}-9/2\,{t}^{3}$}
\mapleinline{inert}{2d}{Sno7constituent[50] := 389+227/4*t^2-1383/5*t+1/8*t^4-9/2*t^3}{%
\[
{\it Sno7constituent}_{{50}}\, := \,389+{\frac {227}{4}}\,{t}^{2}-{\frac {1383}{5}}\,t+1/8\,{t}^{4}-9/2\,{t}^{3}
\]
}
\mapleinline{inert}{2d}{Sno7constituent[51] := 117/2*t^2-1653/5*t+1/8*t^4-9/2*t^3+24219/40}{%
\[
{\it Sno7constituent}_{{51}}\, := \,{\frac {117}{2}}\,{t}^{2}-{\frac {1653}{5}}\,t+1/8\,{t}^{4}-9/2\,{t}^{3}+{\frac {24219}{40}}
\]
}
\mapleinline{inert}{2d}{Sno7constituent[52] := 227/4*t^2-1428/5*t+2596/5+1/8*t^4-9/2*t^3}{%
${\it Sno7constituent}_{{52}}\, := \,{\frac {227}{4}}\,{t}^{2}-{\frac {1428}{5}}\,t+{\frac {2596}{5}}\\
\mbox{}+1/8\,{t}^{4}-9/2\,{t}^{3}$}
\mapleinline{inert}{2d}{Sno7constituent[53] := 109/2*t^2-1158/5*t+1/8*t^4-9/2*t^3+6587/40}{%
\[
{\it Sno7constituent}_{{53}}\, := \,{\frac {109}{2}}\,{t}^{2}-{\frac {1158}{5}}\,t+1/8\,{t}^{4}-9/2\,{t}^{3}+{\frac {6587}{40}}
\]
}
\mapleinline{inert}{2d}{Sno7constituent[54] := 243/4*t^2+4797/5-1923/5*t+1/8*t^4-9/2*t^3}{%
${\it Sno7constituent}_{{54}}\, := \,{\frac {243}{4}}\,{t}^{2}+{\frac {4797}{5}}-{\frac {1923}{5}}\,t\\
\mbox{}+1/8\,{t}^{4}-9/2\,{t}^{3}$}
\mapleinline{inert}{2d}{Sno7constituent[55] := 109/2*t^2-1113/5*t+1/8*t^4-9/2*t^3+1279/8}{%
\[
{\it Sno7constituent}_{{55}}\, := \,{\frac {109}{2}}\,{t}^{2}-{\frac {1113}{5}}\,t+1/8\,{t}^{4}-9/2\,{t}^{3}+{\frac {1279}{8}}
\]
}
\mapleinline{inert}{2d}{Sno7constituent[56] := 227/4*t^2-1428/5*t+1/8*t^4-9/2*t^3+2368/5}{%
\[
{\it Sno7constituent}_{{56}}\, := \,{\frac {227}{4}}\,{t}^{2}-{\frac {1428}{5}}\,t+1/8\,{t}^{4}-9/2\,{t}^{3}+{\frac {2368}{5}}
\]
}
\mapleinline{inert}{2d}{Sno7constituent[57] := 117/2*t^2-1698/5*t+1/8*t^4-9/2*t^3+32283/40}{%
\[
{\it Sno7constituent}_{{57}}\, := \,{\frac {117}{2}}\,{t}^{2}-{\frac {1698}{5}}\,t+1/8\,{t}^{4}-9/2\,{t}^{3}+{\frac {32283}{40}}
\]
}

\end{maplelatex}

\mapleresult
\begin{maplelatex}
\mapleinline{inert}{2d}{Sno7constituent[58] := 227/4*t^2-1383/5*t+1/8*t^4-9/2*t^3+1489/5}{%
\[
{\it Sno7constituent}_{{58}}\, := \,{\frac {227}{4}}\,{t}^{2}-{\frac {1383}{5}}\,t+1/8\,{t}^{4}-9/2\,{t}^{3}+{\frac {1489}{5}}
\]
}
\mapleinline{inert}{2d}{Sno7constituent[59] := 109/2*t^2-1113/5*t+1691/40+1/8*t^4-9/2*t^3}{%
${\it Sno7constituent}_{{59}}\, := \,{\frac {109}{2}}\,{t}^{2}-{\frac {1113}{5}}\,t+{\frac {1691}{40}}\\
\mbox{}+1/8\,{t}^{4}-9/2\,{t}^{3}$}
\mapleinline{inert}{2d}{Sno7constituent[60] := 1188-1968/5*t+243/4*t^2-9/2*t^3+1/8*t^4}{%
\[
{\it Sno7constituent}_{{60}}\, := \,1188-{\frac {1968}{5}}\,t+{\frac {243}{4}}\,{t}^{2}-9/2\,{t}^{3}+1/8\,{t}^{4}
\]
}
\mapleinline{inert}{2d}{Sno7constituent[61] := 109/2*t^2-1158/5*t+1/8*t^4-9/2*t^3+8699/40}{%
\[
{\it Sno7constituent}_{{61}}\, := \,{\frac {109}{2}}\,{t}^{2}-{\frac {1158}{5}}\,t+1/8\,{t}^{4}-9/2\,{t}^{3}+{\frac {8699}{40}}
\]
}
\mapleinline{inert}{2d}{Sno7constituent[62] := 227/4*t^2-1383/5*t+1/8*t^4-9/2*t^3+1621/5}{%
\[
{\it Sno7constituent}_{{62}}\, := \,{\frac {227}{4}}\,{t}^{2}-{\frac {1383}{5}}\,t+1/8\,{t}^{4}-9/2\,{t}^{3}+{\frac {1621}{5}}
\]
}
\mapleinline{inert}{2d}{Sno7constituent[63] := 117/2*t^2-1653/5*t+1/8*t^4-9/2*t^3+24507/40}{%
\[
{\it Sno7constituent}_{{63}}\, := \,{\frac {117}{2}}\,{t}^{2}-{\frac {1653}{5}}\,t+1/8\,{t}^{4}-9/2\,{t}^{3}+{\frac {24507}{40}}
\]
}
\mapleinline{inert}{2d}{Sno7constituent[64] := 227/4*t^2-1428/5*t+2632/5+1/8*t^4-9/2*t^3}{%
${\it Sno7constituent}_{{64}}\, := \,{\frac {227}{4}}\,{t}^{2}-{\frac {1428}{5}}\,t+{\frac {2632}{5}}\\
\mbox{}+1/8\,{t}^{4}-9/2\,{t}^{3}$}
\mapleinline{inert}{2d}{Sno7constituent[65] := 109/2*t^2-1158/5*t+1/8*t^4-9/2*t^3+1951/8}{%
\[
{\it Sno7constituent}_{{65}}\, := \,{\frac {109}{2}}\,{t}^{2}-{\frac {1158}{5}}\,t+1/8\,{t}^{4}-9/2\,{t}^{3}+{\frac {1951}{8}}
\]
}
\mapleinline{inert}{2d}{Sno7constituent[66] := 243/4*t^2-1923/5*t+1/8*t^4-9/2*t^3+4833/5}{%
\[
{\it Sno7constituent}_{{66}}\, := \,{\frac {243}{4}}\,{t}^{2}-{\frac {1923}{5}}\,t+1/8\,{t}^{4}-9/2\,{t}^{3}+{\frac {4833}{5}}
\]
}
\mapleinline{inert}{2d}{Sno7constituent[67] := 109/2*t^2-1113/5*t+1/8*t^4-9/2*t^3+3803/40}{%
\[
{\it Sno7constituent}_{{67}}\, := \,{\frac {109}{2}}\,{t}^{2}-{\frac {1113}{5}}\,t+1/8\,{t}^{4}-9/2\,{t}^{3}+{\frac {3803}{40}}
\]
}
\mapleinline{inert}{2d}{Sno7constituent[68] := 227/4*t^2-1428/5*t+1/8*t^4-9/2*t^3+2044/5}{%
\[
{\it Sno7constituent}_{{68}}\, := \,{\frac {227}{4}}\,{t}^{2}-{\frac {1428}{5}}\,t+1/8\,{t}^{4}-9/2\,{t}^{3}+{\frac {2044}{5}}
\]
}
\mapleinline{inert}{2d}{Sno7constituent[69] := 117/2*t^2-1698/5*t+1/8*t^4-9/2*t^3+32571/40}{%
\[
{\it Sno7constituent}_{{69}}\, := \,{\frac {117}{2}}\,{t}^{2}-{\frac {1698}{5}}\,t+1/8\,{t}^{4}-9/2\,{t}^{3}+{\frac {32571}{40}}
\]
}

\end{maplelatex}

\mapleresult
\begin{maplelatex}
\mapleinline{inert}{2d}{Sno7constituent[70] := 377+227/4*t^2-1383/5*t+1/8*t^4-9/2*t^3}{%
\[
{\it Sno7constituent}_{{70}}\, := \,377+{\frac {227}{4}}\,{t}^{2}-{\frac {1383}{5}}\,t+1/8\,{t}^{4}-9/2\,{t}^{3}
\]
}
\mapleinline{inert}{2d}{Sno7constituent[71] := 109/2*t^2-1113/5*t+1979/40+1/8*t^4-9/2*t^3}{%
${\it Sno7constituent}_{{71}}\, := \,{\frac {109}{2}}\,{t}^{2}-{\frac {1113}{5}}\,t+{\frac {1979}{40}}\\
\mbox{}+1/8\,{t}^{4}-9/2\,{t}^{3}$}
\mapleinline{inert}{2d}{Sno7constituent[72] := 243/4*t^2-1968/5*t+1/8*t^4-9/2*t^3+5976/5}{%
\[
{\it Sno7constituent}_{{72}}\, := \,{\frac {243}{4}}\,{t}^{2}-{\frac {1968}{5}}\,t+1/8\,{t}^{4}-9/2\,{t}^{3}+{\frac {5976}{5}}
\]
}
\mapleinline{inert}{2d}{Sno7constituent[73] := 109/2*t^2-1158/5*t+1/8*t^4-9/2*t^3+6107/40}{%
\[
{\it Sno7constituent}_{{73}}\, := \,{\frac {109}{2}}\,{t}^{2}-{\frac {1158}{5}}\,t+1/8\,{t}^{4}-9/2\,{t}^{3}+{\frac {6107}{40}}
\]
}
\mapleinline{inert}{2d}{Sno7constituent[74] := 227/4*t^2-1383/5*t+1/8*t^4-9/2*t^3+1657/5}{%
\[
{\it Sno7constituent}_{{74}}\, := \,{\frac {227}{4}}\,{t}^{2}-{\frac {1383}{5}}\,t+1/8\,{t}^{4}-9/2\,{t}^{3}+{\frac {1657}{5}}
\]
}
\mapleinline{inert}{2d}{Sno7constituent[75] := 117/2*t^2-1653/5*t+1/8*t^4-9/2*t^3+5535/8}{%
\[
{\it Sno7constituent}_{{75}}\, := \,{\frac {117}{2}}\,{t}^{2}-{\frac {1653}{5}}\,t+1/8\,{t}^{4}-9/2\,{t}^{3}+{\frac {5535}{8}}
\]
}
\mapleinline{inert}{2d}{Sno7constituent[76] := 227/4*t^2-1428/5*t+2308/5+1/8*t^4-9/2*t^3}{%
${\it Sno7constituent}_{{76}}\, := \,{\frac {227}{4}}\,{t}^{2}-{\frac {1428}{5}}\,t+{\frac {2308}{5}}\\
\mbox{}+1/8\,{t}^{4}-9/2\,{t}^{3}$}
\mapleinline{inert}{2d}{Sno7constituent[77] := 109/2*t^2-1158/5*t+10043/40+1/8*t^4-9/2*t^3}{%
${\it Sno7constituent}_{{77}}\, := \,{\frac {109}{2}}\,{t}^{2}-{\frac {1158}{5}}\,t+{\frac {10043}{40}}\\
\mbox{}+1/8\,{t}^{4}-9/2\,{t}^{3}$}
\mapleinline{inert}{2d}{Sno7constituent[78] := 243/4*t^2-1923/5*t+4509/5+1/8*t^4-9/2*t^3}{%
${\it Sno7constituent}_{{78}}\, := \,{\frac {243}{4}}\,{t}^{2}-{\frac {1923}{5}}\,t+{\frac {4509}{5}}\\
\mbox{}+1/8\,{t}^{4}-9/2\,{t}^{3}$}
\mapleinline{inert}{2d}{Sno7constituent[79] := 109/2*t^2-1113/5*t+1/8*t^4-9/2*t^3+4091/40}{%
\[
{\it Sno7constituent}_{{79}}\, := \,{\frac {109}{2}}\,{t}^{2}-{\frac {1113}{5}}\,t+1/8\,{t}^{4}-9/2\,{t}^{3}+{\frac {4091}{40}}
\]
}
\mapleinline{inert}{2d}{Sno7constituent[80] := 560+227/4*t^2-1428/5*t+1/8*t^4-9/2*t^3}{%
\[
{\it Sno7constituent}_{{80}}\, := \,560+{\frac {227}{4}}\,{t}^{2}-{\frac {1428}{5}}\,t+1/8\,{t}^{4}-9/2\,{t}^{3}
\]
}
\mapleinline{inert}{2d}{Sno7constituent[81] := 117/2*t^2-1698/5*t+1/8*t^4-9/2*t^3+29979/40}{%
\[
{\it Sno7constituent}_{{81}}\, := \,{\frac {117}{2}}\,{t}^{2}-{\frac {1698}{5}}\,t+1/8\,{t}^{4}-9/2\,{t}^{3}+{\frac {29979}{40}}
\]
}
\mapleinline{inert}{2d}{Sno7constituent[82] := 227/4*t^2-1383/5*t+1/8*t^4-9/2*t^3+1921/5}{%
\[
{\it Sno7constituent}_{{82}}\, := \,{\frac {227}{4}}\,{t}^{2}-{\frac {1383}{5}}\,t+1/8\,{t}^{4}-9/2\,{t}^{3}+{\frac {1921}{5}}
\]
}

\end{maplelatex}

\mapleresult
\begin{maplelatex}
\mapleinline{inert}{2d}{Sno7constituent[83] := 109/2*t^2-1113/5*t+1/8*t^4-9/2*t^3-613/40}{%
\[
{\it Sno7constituent}_{{83}}\, := \,{\frac {109}{2}}\,{t}^{2}-{\frac {1113}{5}}\,t+1/8\,{t}^{4}-9/2\,{t}^{3}-{\frac {613}{40}}
\]
}
\mapleinline{inert}{2d}{Sno7constituent[84] := 243/4*t^2-1968/5*t+5652/5+1/8*t^4-9/2*t^3}{%
${\it Sno7constituent}_{{84}}\, := \,{\frac {243}{4}}\,{t}^{2}-{\frac {1968}{5}}\,t+{\frac {5652}{5}}\\
\mbox{}+1/8\,{t}^{4}-9/2\,{t}^{3}$}
\mapleinline{inert}{2d}{Sno7constituent[85] := 109/2*t^2-1158/5*t+2431/8+1/8*t^4-9/2*t^3}{%
${\it Sno7constituent}_{{85}}\, := \,{\frac {109}{2}}\,{t}^{2}-{\frac {1158}{5}}\,t+{\frac {2431}{8}}\\
\mbox{}+1/8\,{t}^{4}-9/2\,{t}^{3}$}
\mapleinline{inert}{2d}{Sno7constituent[86] := 227/4*t^2+1333/5-1383/5*t+1/8*t^4-9/2*t^3}{%
${\it Sno7constituent}_{{86}}\, := \,{\frac {227}{4}}\,{t}^{2}+{\frac {1333}{5}}-{\frac {1383}{5}}\,t\\
\mbox{}+1/8\,{t}^{4}-9/2\,{t}^{3}$}
\mapleinline{inert}{2d}{Sno7constituent[87] := 117/2*t^2-1653/5*t+1/8*t^4-9/2*t^3+27963/40}{%
\[
{\it Sno7constituent}_{{87}}\, := \,{\frac {117}{2}}\,{t}^{2}-{\frac {1653}{5}}\,t+1/8\,{t}^{4}-9/2\,{t}^{3}+{\frac {27963}{40}}
\]
}
\mapleinline{inert}{2d}{Sno7constituent[88] := 227/4*t^2-1428/5*t+1/8*t^4-9/2*t^3+2344/5}{%
\[
{\it Sno7constituent}_{{88}}\, := \,{\frac {227}{4}}\,{t}^{2}-{\frac {1428}{5}}\,t+1/8\,{t}^{4}-9/2\,{t}^{3}+{\frac {2344}{5}}
\]
}
\mapleinline{inert}{2d}{Sno7constituent[89] := 109/2*t^2-1158/5*t+1/8*t^4-9/2*t^3+7451/40}{%
\[
{\it Sno7constituent}_{{89}}\, := \,{\frac {109}{2}}\,{t}^{2}-{\frac {1158}{5}}\,t+1/8\,{t}^{4}-9/2\,{t}^{3}+{\frac {7451}{40}}
\]
}
\mapleinline{inert}{2d}{Sno7constituent[90] := 1053+243/4*t^2-1923/5*t+1/8*t^4-9/2*t^3}{%
\[
{\it Sno7constituent}_{{90}}\, := \,1053+{\frac {243}{4}}\,{t}^{2}-{\frac {1923}{5}}\,t+1/8\,{t}^{4}-9/2\,{t}^{3}
\]
}
\mapleinline{inert}{2d}{Sno7constituent[91] := 109/2*t^2-1113/5*t+1499/40+1/8*t^4-9/2*t^3}{%
${\it Sno7constituent}_{{91}}\, := \,{\frac {109}{2}}\,{t}^{2}-{\frac {1113}{5}}\,t+{\frac {1499}{40}}\\
\mbox{}+1/8\,{t}^{4}-9/2\,{t}^{3}$}
\mapleinline{inert}{2d}{Sno7constituent[92] := 227/4*t^2-1428/5*t+2476/5+1/8*t^4-9/2*t^3}{%
${\it Sno7constituent}_{{92}}\, := \,{\frac {227}{4}}\,{t}^{2}-{\frac {1428}{5}}\,t+{\frac {2476}{5}}\\
\mbox{}+1/8\,{t}^{4}-9/2\,{t}^{3}$}
\mapleinline{inert}{2d}{Sno7constituent[93] := 117/2*t^2-1698/5*t+1/8*t^4-9/2*t^3+30267/40}{%
\[
{\it Sno7constituent}_{{93}}\, := \,{\frac {117}{2}}\,{t}^{2}-{\frac {1698}{5}}\,t+1/8\,{t}^{4}-9/2\,{t}^{3}+{\frac {30267}{40}}
\]
}
\mapleinline{inert}{2d}{Sno7constituent[94] := 227/4*t^2-1383/5*t+1/8*t^4-9/2*t^3+1597/5}{%
\[
{\it Sno7constituent}_{{94}}\, := \,{\frac {227}{4}}\,{t}^{2}-{\frac {1383}{5}}\,t+1/8\,{t}^{4}-9/2\,{t}^{3}+{\frac {1597}{5}}
\]
}
\mapleinline{inert}{2d}{Sno7constituent[95] := 109/2*t^2-1113/5*t+1/8*t^4-9/2*t^3+1087/8}{%
\[
{\it Sno7constituent}_{{95}}\, := \,{\frac {109}{2}}\,{t}^{2}-{\frac {1113}{5}}\,t+1/8\,{t}^{4}-9/2\,{t}^{3}+{\frac {1087}{8}}
\]
}
\mapleinline{inert}{2d}{Sno7constituent[96] := 243/4*t^2-1968/5*t+5688/5+1/8*t^4-9/2*t^3}{%
${\it Sno7constituent}_{{96}}\, := \,{\frac {243}{4}}\,{t}^{2}-{\frac {1968}{5}}\,t+{\frac {5688}{5}}\\
\mbox{}+1/8\,{t}^{4}-9/2\,{t}^{3}$}
\mapleinline{inert}{2d}{Sno7constituent[97] := 109/2*t^2-1158/5*t+1/8*t^4-9/2*t^3+9563/40}{%
\[
{\it Sno7constituent}_{{97}}\, := \,{\frac {109}{2}}\,{t}^{2}-{\frac {1158}{5}}\,t+1/8\,{t}^{4}-9/2\,{t}^{3}+{\frac {9563}{40}}
\]
}
\mapleinline{inert}{2d}{Sno7constituent[98] := 227/4*t^2-1383/5*t+1/8*t^4-9/2*t^3+1369/5}{%
\[
{\it Sno7constituent}_{{98}}\, := \,{\frac {227}{4}}\,{t}^{2}-{\frac {1383}{5}}\,t+1/8\,{t}^{4}-9/2\,{t}^{3}+{\frac {1369}{5}}
\]
}
\mapleinline{inert}{2d}{Sno7constituent[99] := 117/2*t^2-1653/5*t+1/8*t^4-9/2*t^3+25371/40}{%
\[
{\it Sno7constituent}_{{99}}\, := \,{\frac {117}{2}}\,{t}^{2}-{\frac {1653}{5}}\,t+1/8\,{t}^{4}-9/2\,{t}^{3}+{\frac {25371}{40}}
\]
}
\mapleinline{inert}{2d}{Sno7constituent[100] := 548+227/4*t^2-1428/5*t+1/8*t^4-9/2*t^3}{%
\[
{\it Sno7constituent}_{{100}}\, := \,548+{\frac {227}{4}}\,{t}^{2}-{\frac {1428}{5}}\,t+1/8\,{t}^{4}-9/2\,{t}^{3}
\]
}
\mapleinline{inert}{2d}{Sno7constituent[101] := 109/2*t^2-1158/5*t+7739/40+1/8*t^4-9/2*t^3}{%
${\it Sno7constituent}_{{101}}\, := \,{\frac {109}{2}}\,{t}^{2}-{\frac {1158}{5}}\,t+{\frac {7739}{40}}\\
\mbox{}+1/8\,{t}^{4}-9/2\,{t}^{3}$}
\mapleinline{inert}{2d}{Sno7constituent[102] := 243/4*t^2-1923/5*t+1/8*t^4-9/2*t^3+4941/5}{%
\[
{\it Sno7constituent}_{{102}}\, := \,{\frac {243}{4}}\,{t}^{2}-{\frac {1923}{5}}\,t+1/8\,{t}^{4}-9/2\,{t}^{3}+{\frac {4941}{5}}
\]
}

\end{maplelatex}

\mapleresult
\begin{maplelatex}
\mapleinline{inert}{2d}{Sno7constituent[103] := 109/2*t^2-1113/5*t+1787/40+1/8*t^4-9/2*t^3}{%
${\it Sno7constituent}_{{103}}\, := \,{\frac {109}{2}}\,{t}^{2}-{\frac {1113}{5}}\,t+{\frac {1787}{40}}\\
\mbox{}+1/8\,{t}^{4}-9/2\,{t}^{3}$}
\mapleinline{inert}{2d}{Sno7constituent[104] := 227/4*t^2-1428/5*t+1/8*t^4-9/2*t^3+2512/5}{%
\[
{\it Sno7constituent}_{{104}}\, := \,{\frac {227}{4}}\,{t}^{2}-{\frac {1428}{5}}\,t+1/8\,{t}^{4}-9/2\,{t}^{3}+{\frac {2512}{5}}
\]
}
\mapleinline{inert}{2d}{Sno7constituent[105] := 117/2*t^2-1698/5*t+6687/8+1/8*t^4-9/2*t^3}{%
${\it Sno7constituent}_{{105}}\, := \,{\frac {117}{2}}\,{t}^{2}-{\frac {1698}{5}}\,t+{\frac {6687}{8}}\\
\mbox{}+1/8\,{t}^{4}-9/2\,{t}^{3}$}
\mapleinline{inert}{2d}{Sno7constituent[106] := 227/4*t^2-1383/5*t+1/8*t^4-9/2*t^3+1633/5}{%
\[
{\it Sno7constituent}_{{106}}\, := \,{\frac {227}{4}}\,{t}^{2}-{\frac {1383}{5}}\,t+1/8\,{t}^{4}-9/2\,{t}^{3}+{\frac {1633}{5}}
\]
}
\mapleinline{inert}{2d}{Sno7constituent[107] := 109/2*t^2-1113/5*t+1/8*t^4-9/2*t^3+2843/40}{%
\[
{\it Sno7constituent}_{{107}}\, := \,{\frac {109}{2}}\,{t}^{2}-{\frac {1113}{5}}\,t+1/8\,{t}^{4}-9/2\,{t}^{3}+{\frac {2843}{40}}
\]
}
\mapleinline{inert}{2d}{Sno7constituent[108] := 243/4*t^2-1968/5*t+1/8*t^4-9/2*t^3+5364/5}{%
\[
{\it Sno7constituent}_{{108}}\, := \,{\frac {243}{4}}\,{t}^{2}-{\frac {1968}{5}}\,t+1/8\,{t}^{4}-9/2\,{t}^{3}+{\frac {5364}{5}}
\]
}
\mapleinline{inert}{2d}{Sno7constituent[109] := 109/2*t^2-1158/5*t+1/8*t^4-9/2*t^3+9851/40}{%
\[
{\it Sno7constituent}_{{109}}\, := \,{\frac {109}{2}}\,{t}^{2}-{\frac {1158}{5}}\,t+1/8\,{t}^{4}-9/2\,{t}^{3}+{\frac {9851}{40}}
\]
}
\mapleinline{inert}{2d}{Sno7constituent[110] := 353+227/4*t^2-1383/5*t+1/8*t^4-9/2*t^3}{%
\[
{\it Sno7constituent}_{{110}}\, := \,353+{\frac {227}{4}}\,{t}^{2}-{\frac {1383}{5}}\,t+1/8\,{t}^{4}-9/2\,{t}^{3}
\]
}
\mapleinline{inert}{2d}{Sno7constituent[111] := 117/2*t^2-1653/5*t+1/8*t^4-9/2*t^3+25659/40}{%
\[
{\it Sno7constituent}_{{111}}\, := \,{\frac {117}{2}}\,{t}^{2}-{\frac {1653}{5}}\,t+1/8\,{t}^{4}-9/2\,{t}^{3}+{\frac {25659}{40}}
\]
}
\mapleinline{inert}{2d}{Sno7constituent[112] := 227/4*t^2-1428/5*t+2776/5+1/8*t^4-9/2*t^3}{%
${\it Sno7constituent}_{{112}}\, := \,{\frac {227}{4}}\,{t}^{2}-{\frac {1428}{5}}\,t+{\frac {2776}{5}}\\
\mbox{}+1/8\,{t}^{4}-9/2\,{t}^{3}$}
\mapleinline{inert}{2d}{Sno7constituent[113] := 109/2*t^2-1158/5*t+1/8*t^4-9/2*t^3+5147/40}{%
\[
{\it Sno7constituent}_{{113}}\, := \,{\frac {109}{2}}\,{t}^{2}-{\frac {1158}{5}}\,t+1/8\,{t}^{4}-9/2\,{t}^{3}+{\frac {5147}{40}}
\]
}
\mapleinline{inert}{2d}{Sno7constituent[114] := 243/4*t^2-1923/5*t+1/8*t^4-9/2*t^3+4977/5}{%
\[
{\it Sno7constituent}_{{114}}\, := \,{\frac {243}{4}}\,{t}^{2}-{\frac {1923}{5}}\,t+1/8\,{t}^{4}-9/2\,{t}^{3}+{\frac {4977}{5}}
\]
}
\mapleinline{inert}{2d}{Sno7constituent[115] := 109/2*t^2-1113/5*t+991/8+1/8*t^4-9/2*t^3}{%
${\it Sno7constituent}_{{115}}\, := \,{\frac {109}{2}}\,{t}^{2}-{\frac {1113}{5}}\,t+{\frac {991}{8}}\\
\mbox{}+1/8\,{t}^{4}-9/2\,{t}^{3}$}

\end{maplelatex}

\mapleresult
\begin{maplelatex}
\mapleinline{inert}{2d}{Sno7constituent[116] := 227/4*t^2-1428/5*t+1/8*t^4-9/2*t^3+2188/5}{%
\[
{\it Sno7constituent}_{{116}}\, := \,{\frac {227}{4}}\,{t}^{2}-{\frac {1428}{5}}\,t+1/8\,{t}^{4}-9/2\,{t}^{3}+{\frac {2188}{5}}
\]
}
\mapleinline{inert}{2d}{Sno7constituent[117] := 117/2*t^2-1698/5*t+1/8*t^4-9/2*t^3+33723/40}{%
\[
{\it Sno7constituent}_{{117}}\, := \,{\frac {117}{2}}\,{t}^{2}-{\frac {1698}{5}}\,t+1/8\,{t}^{4}-9/2\,{t}^{3}+{\frac {33723}{40}}
\]
}
\mapleinline{inert}{2d}{Sno7constituent[118] := 227/4*t^2-1383/5*t+1309/5+1/8*t^4-9/2*t^3}{%
${\it Sno7constituent}_{{118}}\, := \,{\frac {227}{4}}\,{t}^{2}-{\frac {1383}{5}}\,t+{\frac {1309}{5}}\\
\mbox{}+1/8\,{t}^{4}-9/2\,{t}^{3}$}
\mapleinline{inert}{2d}{Sno7constituent[119] := 109/2*t^2-1113/5*t+3131/40+1/8*t^4-9/2*t^3}{%
${\it Sno7constituent}_{{119}}\, := \,{\frac {109}{2}}\,{t}^{2}-{\frac {1113}{5}}\,t+{\frac {3131}{40}}\\
\mbox{}+1/8\,{t}^{4}-9/2\,{t}^{3}$}
\mapleinline{inert}{2d}{Sno7constituent[120] := -1968/5*t+243/4*t^2-9/2*t^3+1/8*t^4+1224}{%
\[
{\it Sno7constituent}_{{120}}\, := \,-{\frac {1968}{5}}\,t+{\frac {243}{4}}\,{t}^{2}-9/2\,{t}^{3}+1/8\,{t}^{4}+1224
\]
}

\end{maplelatex}
Extract the coefficients of the constituents.\mapleinline{inert}{2d}{%?}{%
$\mbox {{\tt `\%?`}}$}
\begin{mapleinput}
\mapleinline{active}{1d}{for r from 1 to pno7  do
 for coeffdeg from 0 to d do 
  Sno7c[coeffdeg,r]:=coeff(Sno7constituent[r],t,coeffdeg):
  #print( r, Sno7c[coeffdeg,r] ):
 od:
od:}{}
\end{mapleinput}
\mapleresult
\begin{maplelatex}
\mapleinline{inert}{2d}{%?}{%
$\mbox {{\tt `\%?`}}$}

\end{maplelatex}
Print and analyze the constituent coefficients for periods.  First the higher coefficients, which ought to be constant.  Print the first coefficient, then any that don't repeat the preceding value.\begin{mapleinput}
\mapleinline{active}{1d}{for coeffdeg from 3 to d do
  print("degree", coeffdeg, "coeff", Sno7c[coeffdeg,1]):
  print(1,Sno7c[coeffdeg,1]);
  for r from 2 to pno7  do
    stepdifference:=Sno7c[coeffdeg,r]-Sno7c[coeffdeg,r-1]:
    if( stepdifference<\TEXTsymbol{>}0 ) then 
    print(r,Sno7c[coeffdeg,r],stepdifference):
    fi: 
  od: 
  print("Compared all coefficients of degree", coeffdeg); 
od: }{}
\end{mapleinput}
\mapleresult
\begin{maplelatex}
\mapleinline{inert}{2d}{"degree", 3, "coeff", (-9)/2}{%
\[
{\it ``degree''},\,3,\,{\it ``coeff''},\,-9/2
\]
}
\mapleinline{inert}{2d}{1, (-9)/2}{%
\[
1,\,-9/2
\]
}
\mapleinline{inert}{2d}{"Compared all coefficients of degree", 3}{%
$\mbox {{\tt ``Compared all coefficients of degree''}},\,3$}
\mapleinline{inert}{2d}{"degree", 4, "coeff", 1/8}{%
\[
{\it ``degree''},\,4,\,{\it ``coeff''},\,1/8
\]
}
\mapleinline{inert}{2d}{1, 1/8}{%
\[
1,\,1/8
\]
}
\mapleinline{inert}{2d}{"Compared all coefficients of degree", 4}{%
$\mbox {{\tt ``Compared all coefficients of degree''}},\,4$}

\end{maplelatex}
Next, the constant terms, whose period is expected to be pno7.  Print all constant terms up to the presumed period "stepsize".  Print the difference (at step "stepsize") if they are not repeating.Note that the even terms repeat at step 30 (a period of 15, half the expected period).\begin{mapleinput}
\mapleinline{active}{1d}{stepsize:=30; lcd:=40;
for r from 1 to stepsize do
  print(r, Sno7c[0,r], "With common denom.:", Sno7c[0,r]*lcd, "/l.c.d."); 
od: 
for r from stepsize+1 to pno7  do 
  stepdifference:=Sno7c[0,r]-Sno7c[0,r-stepsize]:
  if( stepdifference<\TEXTsymbol{>}0 ) then print(r,Sno7c[0,r],stepdifference, "With common denom.:", Sno7c[0,r]*lcd, "/l.c.d."): fi:
  #print(r,Sno7c[0,r],stepdifference);
od:
print("Constant terms completed."); }{}
\end{mapleinput}
\mapleresult
\begin{maplelatex}
\mapleinline{inert}{2d}{stepsize := 30}{%
\[
{\it stepsize}\, := \,30
\]
}
\mapleinline{inert}{2d}{lcd := 40}{%
\[
{\it lcd}\, := \,40
\]
}
\mapleinline{inert}{2d}{1, 7259/40, "With common denom.:", 7259, "/l.c.d."}{%
$1,\,{\frac {7259}{40}},\,\mbox {{\tt ``With common denom.:''}},\,7259,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{2, 1801/5, "With common denom.:", 14408, "/l.c.d."}{%
$2,\,{\frac {1801}{5}},\,\mbox {{\tt ``With common denom.:''}},\,14408,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{3, 23067/40, "With common denom.:", 23067, "/l.c.d."}{%
$3,\,{\frac {23067}{40}},\,\mbox {{\tt ``With common denom.:''}},\,23067,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{4, 2452/5, "With common denom.:", 19616, "/l.c.d."}{%
$4,\,{\frac {2452}{5}},\,\mbox {{\tt ``With common denom.:''}},\,19616,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{5, 2239/8, "With common denom.:", 11195, "/l.c.d."}{%
$5,\,{\frac {2239}{8}},\,\mbox {{\tt ``With common denom.:''}},\,11195,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{6, 4653/5, "With common denom.:", 37224, "/l.c.d."}{%
$6,\,{\frac {4653}{5}},\,\mbox {{\tt ``With common denom.:''}},\,37224,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{7, 5243/40, "With common denom.:", 5243, "/l.c.d."}{%
$7,\,{\frac {5243}{40}},\,\mbox {{\tt ``With common denom.:''}},\,5243,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{8, 2224/5, "With common denom.:", 17792, "/l.c.d."}{%
$8,\,{\frac {2224}{5}},\,\mbox {{\tt ``With common denom.:''}},\,17792,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{9, 31131/40, "With common denom.:", 31131, "/l.c.d."}{%
$9,\,{\frac {31131}{40}},\,\mbox {{\tt ``With common denom.:''}},\,31131,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{10, 413, "With common denom.:", 16520, "/l.c.d."}{%
$10,\,413,\,\mbox {{\tt ``With common denom.:''}},\,16520,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{11, 539/40, "With common denom.:", 539, "/l.c.d."}{%
$11,\,{\frac {539}{40}},\,\mbox {{\tt ``With common denom.:''}},\,539,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{12, 5796/5, "With common denom.:", 46368, "/l.c.d."}{%
$12,\,{\frac {5796}{5}},\,\mbox {{\tt ``With common denom.:''}},\,46368,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{13, 7547/40, "With common denom.:", 7547, "/l.c.d."}{%
$13,\,{\frac {7547}{40}},\,\mbox {{\tt ``With common denom.:''}},\,7547,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{14, 1477/5, "With common denom.:", 11816, "/l.c.d."}{%
$14,\,{\frac {1477}{5}},\,\mbox {{\tt ``With common denom.:''}},\,11816,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{15, 5823/8, "With common denom.:", 29115, "/l.c.d."}{%
$15,\,{\frac {5823}{8}},\,\mbox {{\tt ``With common denom.:''}},\,29115,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{16, 2488/5, "With common denom.:", 19904, "/l.c.d."}{%
$16,\,{\frac {2488}{5}},\,\mbox {{\tt ``With common denom.:''}},\,19904,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{17, 8603/40, "With common denom.:", 8603, "/l.c.d."}{%
$17,\,{\frac {8603}{40}},\,\mbox {{\tt ``With common denom.:''}},\,8603,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{18, 4689/5, "With common denom.:", 37512, "/l.c.d."}{%
$18,\,{\frac {4689}{5}},\,\mbox {{\tt ``With common denom.:''}},\,37512,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{19, 2651/40, "With common denom.:", 2651, "/l.c.d."}{%
$19,\,{\frac {2651}{40}},\,\mbox {{\tt ``With common denom.:''}},\,2651,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{20, 524, "With common denom.:", 20960, "/l.c.d."}{%
$20,\,524,\,\mbox {{\tt ``With common denom.:''}},\,20960,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{21, 31419/40, "With common denom.:", 31419, "/l.c.d."}{%
$21,\,{\frac {31419}{40}},\,\mbox {{\tt ``With common denom.:''}},\,31419,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{22, 1741/5, "With common denom.:", 13928, "/l.c.d."}{%
$22,\,{\frac {1741}{5}},\,\mbox {{\tt ``With common denom.:''}},\,13928,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{23, 827/40, "With common denom.:", 827, "/l.c.d."}{%
$23,\,{\frac {827}{40}},\,\mbox {{\tt ``With common denom.:''}},\,827,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{24, 5832/5, "With common denom.:", 46656, "/l.c.d."}{%
$24,\,{\frac {5832}{5}},\,\mbox {{\tt ``With common denom.:''}},\,46656,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{25, 2143/8, "With common denom.:", 10715, "/l.c.d."}{%
$25,\,{\frac {2143}{8}},\,\mbox {{\tt ``With common denom.:''}},\,10715,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{26, 1513/5, "With common denom.:", 12104, "/l.c.d."}{%
$26,\,{\frac {1513}{5}},\,\mbox {{\tt ``With common denom.:''}},\,12104,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{27, 26523/40, "With common denom.:", 26523, "/l.c.d."}{%
$27,\,{\frac {26523}{40}},\,\mbox {{\tt ``With common denom.:''}},\,26523,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{28, 2164/5, "With common denom.:", 17312, "/l.c.d."}{%
$28,\,{\frac {2164}{5}},\,\mbox {{\tt ``With common denom.:''}},\,17312,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{29, 8891/40, "With common denom.:", 8891, "/l.c.d."}{%
$29,\,{\frac {8891}{40}},\,\mbox {{\tt ``With common denom.:''}},\,8891,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{30, 1017, "With common denom.:", 40680, "/l.c.d."}{%
$30,\,1017,\,\mbox {{\tt ``With common denom.:''}},\,40680,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{31, 2939/40, -108, "With common denom.:", 2939, "/l.c.d."}{%
$31,\,{\frac {2939}{40}},\,-108,\,\mbox {{\tt ``With common denom.:''}},\,2939,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{32, 2656/5, 171, "With common denom.:", 21248, "/l.c.d."}{%
$32,\,{\frac {2656}{5}},\,171,\,\mbox {{\tt ``With common denom.:''}},\,21248,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{33, 28827/40, 144, "With common denom.:", 28827, "/l.c.d."}{%
$33,\,{\frac {28827}{40}},\,144,\,\mbox {{\tt ``With common denom.:''}},\,28827,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{34, 1777/5, -135, "With common denom.:", 14216, "/l.c.d."}{%
$34,\,{\frac {1777}{5}},\,-135,\,\mbox {{\tt ``With common denom.:''}},\,14216,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{35, 799/8, -180, "With common denom.:", 3995, "/l.c.d."}{%
$35,\,{\frac {799}{8}},\,-180,\,\mbox {{\tt ``With common denom.:''}},\,3995,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{36, 5508/5, 171, "With common denom.:", 44064, "/l.c.d."}{%
$36,\,{\frac {5508}{5}},\,171,\,\mbox {{\tt ``With common denom.:''}},\,44064,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{37, 11003/40, 144, "With common denom.:", 11003, "/l.c.d."}{%
$37,\,{\frac {11003}{40}},\,144,\,\mbox {{\tt ``With common denom.:''}},\,11003,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{38, 1189/5, -207, "With common denom.:", 9512, "/l.c.d."}{%
$38,\,{\frac {1189}{5}},\,-207,\,\mbox {{\tt ``With common denom.:''}},\,9512,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{39, 26811/40, -108, "With common denom.:", 26811, "/l.c.d."}{%
$39,\,{\frac {26811}{40}},\,-108,\,\mbox {{\tt ``With common denom.:''}},\,26811,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{40, 584, 171, "With common denom.:", 23360, "/l.c.d."}{%
$40,\,584,\,171,\,\mbox {{\tt ``With common denom.:''}},\,23360,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{41, 6299/40, 144, "With common denom.:", 6299, "/l.c.d."}{%
$41,\,{\frac {6299}{40}},\,144,\,\mbox {{\tt ``With common denom.:''}},\,6299,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{42, 5121/5, -135, "With common denom.:", 40968, "/l.c.d."}{%
$42,\,{\frac {5121}{5}},\,-135,\,\mbox {{\tt ``With common denom.:''}},\,40968,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{43, 347/40, -180, "With common denom.:", 347, "/l.c.d."}{%
$43,\,{\frac {347}{40}},\,-180,\,\mbox {{\tt ``With common denom.:''}},\,347,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{44, 2332/5, 171, "With common denom.:", 18656, "/l.c.d."}{%
$44,\,{\frac {2332}{5}},\,171,\,\mbox {{\tt ``With common denom.:''}},\,18656,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{45, 6975/8, 144, "With common denom.:", 34875, "/l.c.d."}{%
$45,\,{\frac {6975}{8}},\,144,\,\mbox {{\tt ``With common denom.:''}},\,34875,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{46, 1453/5, -207, "With common denom.:", 11624, "/l.c.d."}{%
$46,\,{\frac {1453}{5}},\,-207,\,\mbox {{\tt ``With common denom.:''}},\,11624,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{47, 4283/40, -108, "With common denom.:", 4283, "/l.c.d."}{%
$47,\,{\frac {4283}{40}},\,-108,\,\mbox {{\tt ``With common denom.:''}},\,4283,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{48, 5544/5, 171, "With common denom.:", 44352, "/l.c.d."}{%
$48,\,{\frac {5544}{5}},\,171,\,\mbox {{\tt ``With common denom.:''}},\,44352,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{49, 8411/40, 144, "With common denom.:", 8411, "/l.c.d."}{%
$49,\,{\frac {8411}{40}},\,144,\,\mbox {{\tt ``With common denom.:''}},\,8411,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{50, 389, -135, "With common denom.:", 15560, "/l.c.d."}{%
$50,\,389,\,-135,\,\mbox {{\tt ``With common denom.:''}},\,15560,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{51, 24219/40, -180, "With common denom.:", 24219, "/l.c.d."}{%
$51,\,{\frac {24219}{40}},\,-180,\,\mbox {{\tt ``With common denom.:''}},\,24219,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{52, 2596/5, 171, "With common denom.:", 20768, "/l.c.d."}{%
$52,\,{\frac {2596}{5}},\,171,\,\mbox {{\tt ``With common denom.:''}},\,20768,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{53, 6587/40, 144, "With common denom.:", 6587, "/l.c.d."}{%
$53,\,{\frac {6587}{40}},\,144,\,\mbox {{\tt ``With common denom.:''}},\,6587,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{54, 4797/5, -207, "With common denom.:", 38376, "/l.c.d."}{%
$54,\,{\frac {4797}{5}},\,-207,\,\mbox {{\tt ``With common denom.:''}},\,38376,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{55, 1279/8, -108, "With common denom.:", 6395, "/l.c.d."}{%
$55,\,{\frac {1279}{8}},\,-108,\,\mbox {{\tt ``With common denom.:''}},\,6395,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{56, 2368/5, 171, "With common denom.:", 18944, "/l.c.d."}{%
$56,\,{\frac {2368}{5}},\,171,\,\mbox {{\tt ``With common denom.:''}},\,18944,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{57, 32283/40, 144, "With common denom.:", 32283, "/l.c.d."}{%
$57,\,{\frac {32283}{40}},\,144,\,\mbox {{\tt ``With common denom.:''}},\,32283,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{58, 1489/5, -135, "With common denom.:", 11912, "/l.c.d."}{%
$58,\,{\frac {1489}{5}},\,-135,\,\mbox {{\tt ``With common denom.:''}},\,11912,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{59, 1691/40, -180, "With common denom.:", 1691, "/l.c.d."}{%
$59,\,{\frac {1691}{40}},\,-180,\,\mbox {{\tt ``With common denom.:''}},\,1691,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{60, 1188, 171, "With common denom.:", 47520, "/l.c.d."}{%
$60,\,1188,\,171,\,\mbox {{\tt ``With common denom.:''}},\,47520,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{61, 8699/40, 144, "With common denom.:", 8699, "/l.c.d."}{%
$61,\,{\frac {8699}{40}},\,144,\,\mbox {{\tt ``With common denom.:''}},\,8699,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{62, 1621/5, -207, "With common denom.:", 12968, "/l.c.d."}{%
$62,\,{\frac {1621}{5}},\,-207,\,\mbox {{\tt ``With common denom.:''}},\,12968,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{63, 24507/40, -108, "With common denom.:", 24507, "/l.c.d."}{%
$63,\,{\frac {24507}{40}},\,-108,\,\mbox {{\tt ``With common denom.:''}},\,24507,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{64, 2632/5, 171, "With common denom.:", 21056, "/l.c.d."}{%
$64,\,{\frac {2632}{5}},\,171,\,\mbox {{\tt ``With common denom.:''}},\,21056,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{65, 1951/8, 144, "With common denom.:", 9755, "/l.c.d."}{%
$65,\,{\frac {1951}{8}},\,144,\,\mbox {{\tt ``With common denom.:''}},\,9755,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{66, 4833/5, -135, "With common denom.:", 38664, "/l.c.d."}{%
$66,\,{\frac {4833}{5}},\,-135,\,\mbox {{\tt ``With common denom.:''}},\,38664,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{67, 3803/40, -180, "With common denom.:", 3803, "/l.c.d."}{%
$67,\,{\frac {3803}{40}},\,-180,\,\mbox {{\tt ``With common denom.:''}},\,3803,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{68, 2044/5, 171, "With common denom.:", 16352, "/l.c.d."}{%
$68,\,{\frac {2044}{5}},\,171,\,\mbox {{\tt ``With common denom.:''}},\,16352,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{69, 32571/40, 144, "With common denom.:", 32571, "/l.c.d."}{%
$69,\,{\frac {32571}{40}},\,144,\,\mbox {{\tt ``With common denom.:''}},\,32571,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{70, 377, -207, "With common denom.:", 15080, "/l.c.d."}{%
$70,\,377,\,-207,\,\mbox {{\tt ``With common denom.:''}},\,15080,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{71, 1979/40, -108, "With common denom.:", 1979, "/l.c.d."}{%
$71,\,{\frac {1979}{40}},\,-108,\,\mbox {{\tt ``With common denom.:''}},\,1979,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{72, 5976/5, 171, "With common denom.:", 47808, "/l.c.d."}{%
$72,\,{\frac {5976}{5}},\,171,\,\mbox {{\tt ``With common denom.:''}},\,47808,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{73, 6107/40, 144, "With common denom.:", 6107, "/l.c.d."}{%
$73,\,{\frac {6107}{40}},\,144,\,\mbox {{\tt ``With common denom.:''}},\,6107,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{74, 1657/5, -135, "With common denom.:", 13256, "/l.c.d."}{%
$74,\,{\frac {1657}{5}},\,-135,\,\mbox {{\tt ``With common denom.:''}},\,13256,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{75, 5535/8, -180, "With common denom.:", 27675, "/l.c.d."}{%
$75,\,{\frac {5535}{8}},\,-180,\,\mbox {{\tt ``With common denom.:''}},\,27675,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{76, 2308/5, 171, "With common denom.:", 18464, "/l.c.d."}{%
$76,\,{\frac {2308}{5}},\,171,\,\mbox {{\tt ``With common denom.:''}},\,18464,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{77, 10043/40, 144, "With common denom.:", 10043, "/l.c.d."}{%
$77,\,{\frac {10043}{40}},\,144,\,\mbox {{\tt ``With common denom.:''}},\,10043,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{78, 4509/5, -207, "With common denom.:", 36072, "/l.c.d."}{%
$78,\,{\frac {4509}{5}},\,-207,\,\mbox {{\tt ``With common denom.:''}},\,36072,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{79, 4091/40, -108, "With common denom.:", 4091, "/l.c.d."}{%
$79,\,{\frac {4091}{40}},\,-108,\,\mbox {{\tt ``With common denom.:''}},\,4091,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{80, 560, 171, "With common denom.:", 22400, "/l.c.d."}{%
$80,\,560,\,171,\,\mbox {{\tt ``With common denom.:''}},\,22400,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{81, 29979/40, 144, "With common denom.:", 29979, "/l.c.d."}{%
$81,\,{\frac {29979}{40}},\,144,\,\mbox {{\tt ``With common denom.:''}},\,29979,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{82, 1921/5, -135, "With common denom.:", 15368, "/l.c.d."}{%
$82,\,{\frac {1921}{5}},\,-135,\,\mbox {{\tt ``With common denom.:''}},\,15368,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{83, (-613)/40, -180, "With common denom.:", -613, "/l.c.d."}{%
$83,\,-{\frac {613}{40}},\,-180,\,\mbox {{\tt ``With common denom.:''}},\,-613,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{84, 5652/5, 171, "With common denom.:", 45216, "/l.c.d."}{%
$84,\,{\frac {5652}{5}},\,171,\,\mbox {{\tt ``With common denom.:''}},\,45216,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{85, 2431/8, 144, "With common denom.:", 12155, "/l.c.d."}{%
$85,\,{\frac {2431}{8}},\,144,\,\mbox {{\tt ``With common denom.:''}},\,12155,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{86, 1333/5, -207, "With common denom.:", 10664, "/l.c.d."}{%
$86,\,{\frac {1333}{5}},\,-207,\,\mbox {{\tt ``With common denom.:''}},\,10664,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{87, 27963/40, -108, "With common denom.:", 27963, "/l.c.d."}{%
$87,\,{\frac {27963}{40}},\,-108,\,\mbox {{\tt ``With common denom.:''}},\,27963,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{88, 2344/5, 171, "With common denom.:", 18752, "/l.c.d."}{%
$88,\,{\frac {2344}{5}},\,171,\,\mbox {{\tt ``With common denom.:''}},\,18752,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{89, 7451/40, 144, "With common denom.:", 7451, "/l.c.d."}{%
$89,\,{\frac {7451}{40}},\,144,\,\mbox {{\tt ``With common denom.:''}},\,7451,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{90, 1053, -135, "With common denom.:", 42120, "/l.c.d."}{%
$90,\,1053,\,-135,\,\mbox {{\tt ``With common denom.:''}},\,42120,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{91, 1499/40, -180, "With common denom.:", 1499, "/l.c.d."}{%
$91,\,{\frac {1499}{40}},\,-180,\,\mbox {{\tt ``With common denom.:''}},\,1499,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{92, 2476/5, 171, "With common denom.:", 19808, "/l.c.d."}{%
$92,\,{\frac {2476}{5}},\,171,\,\mbox {{\tt ``With common denom.:''}},\,19808,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{93, 30267/40, 144, "With common denom.:", 30267, "/l.c.d."}{%
$93,\,{\frac {30267}{40}},\,144,\,\mbox {{\tt ``With common denom.:''}},\,30267,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{94, 1597/5, -207, "With common denom.:", 12776, "/l.c.d."}{%
$94,\,{\frac {1597}{5}},\,-207,\,\mbox {{\tt ``With common denom.:''}},\,12776,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{95, 1087/8, -108, "With common denom.:", 5435, "/l.c.d."}{%
$95,\,{\frac {1087}{8}},\,-108,\,\mbox {{\tt ``With common denom.:''}},\,5435,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{96, 5688/5, 171, "With common denom.:", 45504, "/l.c.d."}{%
$96,\,{\frac {5688}{5}},\,171,\,\mbox {{\tt ``With common denom.:''}},\,45504,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{97, 9563/40, 144, "With common denom.:", 9563, "/l.c.d."}{%
$97,\,{\frac {9563}{40}},\,144,\,\mbox {{\tt ``With common denom.:''}},\,9563,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{98, 1369/5, -135, "With common denom.:", 10952, "/l.c.d."}{%
$98,\,{\frac {1369}{5}},\,-135,\,\mbox {{\tt ``With common denom.:''}},\,10952,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{99, 25371/40, -180, "With common denom.:", 25371, "/l.c.d."}{%
$99,\,{\frac {25371}{40}},\,-180,\,\mbox {{\tt ``With common denom.:''}},\,25371,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{100, 548, 171, "With common denom.:", 21920, "/l.c.d."}{%
$100,\,548,\,171,\,\mbox {{\tt ``With common denom.:''}},\,21920,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{101, 7739/40, 144, "With common denom.:", 7739, "/l.c.d."}{%
$101,\,{\frac {7739}{40}},\,144,\,\mbox {{\tt ``With common denom.:''}},\,7739,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{102, 4941/5, -207, "With common denom.:", 39528, "/l.c.d."}{%
$102,\,{\frac {4941}{5}},\,-207,\,\mbox {{\tt ``With common denom.:''}},\,39528,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{103, 1787/40, -108, "With common denom.:", 1787, "/l.c.d."}{%
$103,\,{\frac {1787}{40}},\,-108,\,\mbox {{\tt ``With common denom.:''}},\,1787,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{104, 2512/5, 171, "With common denom.:", 20096, "/l.c.d."}{%
$104,\,{\frac {2512}{5}},\,171,\,\mbox {{\tt ``With common denom.:''}},\,20096,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{105, 6687/8, 144, "With common denom.:", 33435, "/l.c.d."}{%
$105,\,{\frac {6687}{8}},\,144,\,\mbox {{\tt ``With common denom.:''}},\,33435,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{106, 1633/5, -135, "With common denom.:", 13064, "/l.c.d."}{%
$106,\,{\frac {1633}{5}},\,-135,\,\mbox {{\tt ``With common denom.:''}},\,13064,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{107, 2843/40, -180, "With common denom.:", 2843, "/l.c.d."}{%
$107,\,{\frac {2843}{40}},\,-180,\,\mbox {{\tt ``With common denom.:''}},\,2843,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{108, 5364/5, 171, "With common denom.:", 42912, "/l.c.d."}{%
$108,\,{\frac {5364}{5}},\,171,\,\mbox {{\tt ``With common denom.:''}},\,42912,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{109, 9851/40, 144, "With common denom.:", 9851, "/l.c.d."}{%
$109,\,{\frac {9851}{40}},\,144,\,\mbox {{\tt ``With common denom.:''}},\,9851,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{110, 353, -207, "With common denom.:", 14120, "/l.c.d."}{%
$110,\,353,\,-207,\,\mbox {{\tt ``With common denom.:''}},\,14120,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{111, 25659/40, -108, "With common denom.:", 25659, "/l.c.d."}{%
$111,\,{\frac {25659}{40}},\,-108,\,\mbox {{\tt ``With common denom.:''}},\,25659,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{112, 2776/5, 171, "With common denom.:", 22208, "/l.c.d."}{%
$112,\,{\frac {2776}{5}},\,171,\,\mbox {{\tt ``With common denom.:''}},\,22208,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{113, 5147/40, 144, "With common denom.:", 5147, "/l.c.d."}{%
$113,\,{\frac {5147}{40}},\,144,\,\mbox {{\tt ``With common denom.:''}},\,5147,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{114, 4977/5, -135, "With common denom.:", 39816, "/l.c.d."}{%
$114,\,{\frac {4977}{5}},\,-135,\,\mbox {{\tt ``With common denom.:''}},\,39816,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{115, 991/8, -180, "With common denom.:", 4955, "/l.c.d."}{%
$115,\,{\frac {991}{8}},\,-180,\,\mbox {{\tt ``With common denom.:''}},\,4955,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{116, 2188/5, 171, "With common denom.:", 17504, "/l.c.d."}{%
$116,\,{\frac {2188}{5}},\,171,\,\mbox {{\tt ``With common denom.:''}},\,17504,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{117, 33723/40, 144, "With common denom.:", 33723, "/l.c.d."}{%
$117,\,{\frac {33723}{40}},\,144,\,\mbox {{\tt ``With common denom.:''}},\,33723,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{118, 1309/5, -207, "With common denom.:", 10472, "/l.c.d."}{%
$118,\,{\frac {1309}{5}},\,-207,\,\mbox {{\tt ``With common denom.:''}},\,10472,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{119, 3131/40, -108, "With common denom.:", 3131, "/l.c.d."}{%
$119,\,{\frac {3131}{40}},\,-108,\,\mbox {{\tt ``With common denom.:''}},\,3131,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{120, 1224, 171, "With common denom.:", 48960, "/l.c.d."}{%
$120,\,1224,\,171,\,\mbox {{\tt ``With common denom.:''}},\,48960,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{"Constant terms completed."}{%
$\mbox {{\tt ``Constant terms completed.''}}$}

\end{maplelatex}
Now, the linear terms.  First print all linear coefficients up to the presumed period "stepsize".  Then analyze for period and print the difference (at step "stepsize") if they are not repeating.\begin{mapleinput}
\mapleinline{active}{1d}{stepsize:=12; lcd:=5;
for r from 1 to stepsize do
  print(r, Sno7c[1,r], "With common denom.:", -Sno7c[1,r]*lcd, "/l.c.d."); 
od: 
for r from stepsize+1 to pno7  do 
  stepdifference:=Sno7c[1,r]-Sno7c[1,r-stepsize]:
  if( stepdifference<\TEXTsymbol{>}0 ) then print(r,Sno7c[1,r],stepdifference): fi:
od:
print("Sno7linear coefficients completed."); }{}
\end{mapleinput}
\mapleresult
\begin{maplelatex}
\mapleinline{inert}{2d}{stepsize := 12}{%
\[
{\it stepsize}\, := \,12
\]
}
\mapleinline{inert}{2d}{lcd := 5}{%
\[
{\it lcd}\, := \,5
\]
}
\mapleinline{inert}{2d}{1, (-1158)/5, "With common denom.:", 1158, "/l.c.d."}{%
$1,\,-{\frac {1158}{5}},\,\mbox {{\tt ``With common denom.:''}},\,1158,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{2, (-1383)/5, "With common denom.:", 1383, "/l.c.d."}{%
$2,\,-{\frac {1383}{5}},\,\mbox {{\tt ``With common denom.:''}},\,1383,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{3, (-1653)/5, "With common denom.:", 1653, "/l.c.d."}{%
$3,\,-{\frac {1653}{5}},\,\mbox {{\tt ``With common denom.:''}},\,1653,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{4, (-1428)/5, "With common denom.:", 1428, "/l.c.d."}{%
$4,\,-{\frac {1428}{5}},\,\mbox {{\tt ``With common denom.:''}},\,1428,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{5, (-1158)/5, "With common denom.:", 1158, "/l.c.d."}{%
$5,\,-{\frac {1158}{5}},\,\mbox {{\tt ``With common denom.:''}},\,1158,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{6, (-1923)/5, "With common denom.:", 1923, "/l.c.d."}{%
$6,\,-{\frac {1923}{5}},\,\mbox {{\tt ``With common denom.:''}},\,1923,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{7, (-1113)/5, "With common denom.:", 1113, "/l.c.d."}{%
$7,\,-{\frac {1113}{5}},\,\mbox {{\tt ``With common denom.:''}},\,1113,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{8, (-1428)/5, "With common denom.:", 1428, "/l.c.d."}{%
$8,\,-{\frac {1428}{5}},\,\mbox {{\tt ``With common denom.:''}},\,1428,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{9, (-1698)/5, "With common denom.:", 1698, "/l.c.d."}{%
$9,\,-{\frac {1698}{5}},\,\mbox {{\tt ``With common denom.:''}},\,1698,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{10, (-1383)/5, "With common denom.:", 1383, "/l.c.d."}{%
$10,\,-{\frac {1383}{5}},\,\mbox {{\tt ``With common denom.:''}},\,1383,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{11, (-1113)/5, "With common denom.:", 1113, "/l.c.d."}{%
$11,\,-{\frac {1113}{5}},\,\mbox {{\tt ``With common denom.:''}},\,1113,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{12, (-1968)/5, "With common denom.:", 1968, "/l.c.d."}{%
$12,\,-{\frac {1968}{5}},\,\mbox {{\tt ``With common denom.:''}},\,1968,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{"Sno7linear coefficients completed."}{%
$\mbox {{\tt ``Sno7linear coefficients completed.''}}$}

\end{maplelatex}
The quadratic terms.  First print all quadratic coefficients up to the presumed period "stepsize".  Then analyze for period and print the difference (at step "stepsize") if they are not repeating.\begin{mapleinput}
\mapleinline{active}{1d}{stepsize:=6; lcd:=4; 
for r from 1 to stepsize do
  print(r, Sno7c[2,r],  "With common denom.:", Sno7c[2,r]*lcd, "/l.c.d.")); 
od: 
for r from stepsize+1 to pno7  do 
  stepdifference:=Sno7c[2,r]-Sno7c[2,r-stepsize]:
  if( stepdifference<\TEXTsymbol{>}0 ) then print(r,Sno7c[2,r],stepdifference): fi:
od:
print("Quadratic coefficients completed."); }{}
\end{mapleinput}
\mapleresult
\begin{maplelatex}
\mapleinline{inert}{2d}{stepsize := 6}{%
\[
{\it stepsize}\, := \,6
\]
}
\mapleinline{inert}{2d}{lcd := 4}{%
\[
{\it lcd}\, := \,4
\]
}
Error, `)` unexpected

\end{maplelatex}
Calculate the zeroth constituent of the .  Find its constant term.\begin{mapleinput}
\mapleinline{active}{1d}{sno7zeroth:=expand(
sum(coeff(sno7gfstandnum,x,pno7*j)*binomial(d+t/pno7-j,d),j=0..d+1) );
print(subs(t=0,sno7zeroth)):  }{}
\end{mapleinput}
\mapleresult
\begin{maplelatex}
\mapleinline{inert}{2d}{sno7zeroth := -82/15*t+27/32*t^2-1/16*t^3+1/576*t^4+17}{%
${\it sno7zeroth}\, := \,-{\frac {82}{15}}\,t+{\frac {27}{32}}\,{t}^{2}-1/16\,{t}^{3}+{\frac {1}{576}}\,{t}^{4}\\
\mbox{}+17$}
\mapleinline{inert}{2d}{17}{%
\[
17
\]
}

\end{maplelatex}
Extract the constituents of the semimagic symmetry-type counting function.\begin{mapleinput}
\mapleinline{active}{1d}{sno7constituent[0]:=sno7zeroth:
for r from 1 to pno7  do
  sno7constituent[r]:=expand(sum( coeff(sno7gfstandnum,x,pno7*j+r)*binomial(d+(t-r)/pno7-j,d), j=0..d)):
#  print(r):
#  print( sno7constituent[r] ):
  if ( r <= 14 ) then print( factor(sno7constituent[r]) ): fi:
od; }{}
\end{mapleinput}
\mapleresult
\begin{maplelatex}
\mapleinline{inert}{2d}{sno7constituent[1] := -193/60*t+109/144*t^2-1/16*t^3+1/576*t^4+7259/2880}{%
${\it sno7constituent}_{{1}}\, := \,-{\frac {193}{60}}\,t+{\frac {109}{144}}\,{t}^{2}-1/16\,{t}^{3}+{\frac {1}{576}}\,{t}^{4}\\
\mbox{}+{\frac {7259}{2880}}$}
\mapleinline{inert}{2d}{1/2880*(t-1)*(5*t^3-175*t^2+2005*t-7259)}{%
\[
{\frac {1}{2880}}\, \left( t-1 \right)  \left( 5\,{t}^{3}-175\,{t}^{2}+2005\,t-7259 \right) 
\]
}
\mapleinline{inert}{2d}{sno7constituent[2] := -461/120*t+227/288*t^2-1/16*t^3+1/576*t^4+1801/360}{%
${\it sno7constituent}_{{2}}\, := \,-{\frac {461}{120}}\,t+{\frac {227}{288}}\,{t}^{2}-1/16\,{t}^{3}+{\frac {1}{576}}\,{t}^{4}\\
\mbox{}+{\frac {1801}{360}}$}
\mapleinline{inert}{2d}{1/2880*(t-2)*(5*t^3-170*t^2+1930*t-7204)}{%
\[
{\frac {1}{2880}}\, \left( t-2 \right)  \left( 5\,{t}^{3}-170\,{t}^{2}+1930\,t-7204 \right) 
\]
}
\mapleinline{inert}{2d}{sno7constituent[3] := -551/120*t+13/16*t^2-1/16*t^3+1/576*t^4+2563/320}{%
${\it sno7constituent}_{{3}}\, := \,-{\frac {551}{120}}\,t+{\frac {13}{16}}\,{t}^{2}-1/16\,{t}^{3}+{\frac {1}{576}}\,{t}^{4}\\
\mbox{}+{\frac {2563}{320}}$}
\mapleinline{inert}{2d}{1/2880*(t-3)*(5*t^3-165*t^2+1845*t-7689)}{%
\[
{\frac {1}{2880}}\, \left( t-3 \right)  \left( 5\,{t}^{3}-165\,{t}^{2}+1845\,t-7689 \right) 
\]
}
\mapleinline{inert}{2d}{sno7constituent[4] := -119/30*t+227/288*t^2-1/16*t^3+1/576*t^4+613/90}{%
${\it sno7constituent}_{{4}}\, := \,-{\frac {119}{30}}\,t+{\frac {227}{288}}\,{t}^{2}-1/16\,{t}^{3}+{\frac {1}{576}}\,{t}^{4}\\
\mbox{}+{\frac {613}{90}}$}
\mapleinline{inert}{2d}{1/2880*(t-4)*(5*t^3-160*t^2+1630*t-4904)}{%
\[
{\frac {1}{2880}}\, \left( t-4 \right)  \left( 5\,{t}^{3}-160\,{t}^{2}+1630\,t-4904 \right) 
\]
}

\end{maplelatex}

\mapleresult
\begin{maplelatex}
\mapleinline{inert}{2d}{sno7constituent[5] := -193/60*t+109/144*t^2-1/16*t^3+1/576*t^4+2239/576}{%
${\it sno7constituent}_{{5}}\, := \,-{\frac {193}{60}}\,t+{\frac {109}{144}}\,{t}^{2}-1/16\,{t}^{3}+{\frac {1}{576}}\,{t}^{4}\\
\mbox{}+{\frac {2239}{576}}$}
\mapleinline{inert}{2d}{1/2880*(t-5)*(5*t^3-155*t^2+1405*t-2239)}{%
\[
{\frac {1}{2880}}\, \left( t-5 \right)  \left( 5\,{t}^{3}-155\,{t}^{2}+1405\,t-2239 \right) 
\]
}
\mapleinline{inert}{2d}{sno7constituent[6] := -641/120*t+27/32*t^2-1/16*t^3+1/576*t^4+517/40}{%
${\it sno7constituent}_{{6}}\, := \,-{\frac {641}{120}}\,t+{\frac {27}{32}}\,{t}^{2}-1/16\,{t}^{3}+{\frac {1}{576}}\,{t}^{4}\\
\mbox{}+{\frac {517}{40}}$}
\mapleinline{inert}{2d}{1/2880*(t-6)*(5*t^3-150*t^2+1530*t-6204)}{%
\[
{\frac {1}{2880}}\, \left( t-6 \right)  \left( 5\,{t}^{3}-150\,{t}^{2}+1530\,t-6204 \right) 
\]
}
\mapleinline{inert}{2d}{sno7constituent[7] := -371/120*t+109/144*t^2-1/16*t^3+1/576*t^4+5243/2880}{%
${\it sno7constituent}_{{7}}\, := \,-{\frac {371}{120}}\,t+{\frac {109}{144}}\,{t}^{2}-1/16\,{t}^{3}+{\frac {1}{576}}\,{t}^{4}\\
\mbox{}+{\frac {5243}{2880}}$}
\mapleinline{inert}{2d}{1/2880*(t-7)*(5*t^3-145*t^2+1165*t-749)}{%
\[
{\frac {1}{2880}}\, \left( t-7 \right)  \left( 5\,{t}^{3}-145\,{t}^{2}+1165\,t-749 \right) 
\]
}
\mapleinline{inert}{2d}{sno7constituent[8] := -119/30*t+227/288*t^2-1/16*t^3+1/576*t^4+278/45}{%
${\it sno7constituent}_{{8}}\, := \,-{\frac {119}{30}}\,t+{\frac {227}{288}}\,{t}^{2}-1/16\,{t}^{3}+{\frac {1}{576}}\,{t}^{4}\\
\mbox{}+{\frac {278}{45}}$}
\mapleinline{inert}{2d}{1/2880*(t-8)*(5*t^3-140*t^2+1150*t-2224)}{%
\[
{\frac {1}{2880}}\, \left( t-8 \right)  \left( 5\,{t}^{3}-140\,{t}^{2}+1150\,t-2224 \right) 
\]
}
\mapleinline{inert}{2d}{sno7constituent[9] := -283/60*t+13/16*t^2-1/16*t^3+1/576*t^4+3459/320}{%
${\it sno7constituent}_{{9}}\, := \,-{\frac {283}{60}}\,t+{\frac {13}{16}}\,{t}^{2}-1/16\,{t}^{3}+{\frac {1}{576}}\,{t}^{4}\\
\mbox{}+{\frac {3459}{320}}$}
\mapleinline{inert}{2d}{1/2880*(t-9)*(5*t^3-135*t^2+1125*t-3459)}{%
\[
{\frac {1}{2880}}\, \left( t-9 \right)  \left( 5\,{t}^{3}-135\,{t}^{2}+1125\,t-3459 \right) 
\]
}
\mapleinline{inert}{2d}{sno7constituent[10] := 227/288*t^2-461/120*t+413/72+1/576*t^4-1/16*t^3}{%
${\it sno7constituent}_{{10}}\, := \,{\frac {227}{288}}\,{t}^{2}-{\frac {461}{120}}\,t+{\frac {413}{72}}\\
\mbox{}+{\frac {1}{576}}\,{t}^{4}-1/16\,{t}^{3}$}
\mapleinline{inert}{2d}{227/288*t^2-461/120*t+413/72+1/576*t^4-1/16*t^3}{%
${\frac {227}{288}}\,{t}^{2}-{\frac {461}{120}}\,t+{\frac {413}{72}}\\
\mbox{}+{\frac {1}{576}}\,{t}^{4}-1/16\,{t}^{3}$}
\mapleinline{inert}{2d}{sno7constituent[11] := -371/120*t+109/144*t^2-1/16*t^3+1/576*t^4+539/2880}{%
${\it sno7constituent}_{{11}}\, := \,-{\frac {371}{120}}\,t+{\frac {109}{144}}\,{t}^{2}-1/16\,{t}^{3}+{\frac {1}{576}}\,{t}^{4}\\
\mbox{}+{\frac {539}{2880}}$}

\end{maplelatex}

\mapleresult
\begin{maplelatex}
\mapleinline{inert}{2d}{1/2880*(t-11)*(5*t^3-125*t^2+805*t-49)}{%
\[
{\frac {1}{2880}}\, \left( t-11 \right)  \left( 5\,{t}^{3}-125\,{t}^{2}+805\,t-49 \right) 
\]
}
\mapleinline{inert}{2d}{sno7constituent[12] := -82/15*t+27/32*t^2-1/16*t^3+1/576*t^4+161/10}{%
${\it sno7constituent}_{{12}}\, := \,-{\frac {82}{15}}\,t+{\frac {27}{32}}\,{t}^{2}-1/16\,{t}^{3}+{\frac {1}{576}}\,{t}^{4}\\
\mbox{}+{\frac {161}{10}}$}
\mapleinline{inert}{2d}{1/2880*(t-12)*(5*t^3-120*t^2+990*t-3864)}{%
\[
{\frac {1}{2880}}\, \left( t-12 \right)  \left( 5\,{t}^{3}-120\,{t}^{2}+990\,t-3864 \right) 
\]
}
\mapleinline{inert}{2d}{sno7constituent[13] := 109/144*t^2-193/60*t+1/576*t^4-1/16*t^3+7547/2880}{%
${\it sno7constituent}_{{13}}\, := \,{\frac {109}{144}}\,{t}^{2}-{\frac {193}{60}}\,t+{\frac {1}{576}}\,{t}^{4}\\
\mbox{}-1/16\,{t}^{3}+{\frac {7547}{2880}}$}
\mapleinline{inert}{2d}{109/144*t^2-193/60*t+1/576*t^4-1/16*t^3+7547/2880}{%
${\frac {109}{144}}\,{t}^{2}-{\frac {193}{60}}\,t+{\frac {1}{576}}\,{t}^{4}\\
\mbox{}-1/16\,{t}^{3}+{\frac {7547}{2880}}$}
\mapleinline{inert}{2d}{sno7constituent[14] := -461/120*t+227/288*t^2-1/16*t^3+1/576*t^4+1477/360}{%
${\it sno7constituent}_{{14}}\, := \,-{\frac {461}{120}}\,t+{\frac {227}{288}}\,{t}^{2}-1/16\,{t}^{3}+{\frac {1}{576}}\,{t}^{4}\\
\mbox{}+{\frac {1477}{360}}$}
\mapleinline{inert}{2d}{1/2880*(t-14)*(5*t^3-110*t^2+730*t-844)}{%
\[
{\frac {1}{2880}}\, \left( t-14 \right)  \left( 5\,{t}^{3}-110\,{t}^{2}+730\,t-844 \right) 
\]
}
\mapleinline{inert}{2d}{sno7constituent[15] := 13/16*t^2-551/120*t+647/64+1/576*t^4-1/16*t^3}{%
${\it sno7constituent}_{{15}}\, := \,{\frac {13}{16}}\,{t}^{2}-{\frac {551}{120}}\,t+{\frac {647}{64}}\\
\mbox{}+{\frac {1}{576}}\,{t}^{4}-1/16\,{t}^{3}$}
\mapleinline{inert}{2d}{sno7constituent[16] := 227/288*t^2-119/30*t+311/45+1/576*t^4-1/16*t^3}{%
${\it sno7constituent}_{{16}}\, := \,{\frac {227}{288}}\,{t}^{2}-{\frac {119}{30}}\,t+{\frac {311}{45}}\\
\mbox{}+{\frac {1}{576}}\,{t}^{4}-1/16\,{t}^{3}$}
\mapleinline{inert}{2d}{sno7constituent[17] := 109/144*t^2+8603/2880-193/60*t+1/576*t^4-1/16*t^3}{%
${\it sno7constituent}_{{17}}\, := \,{\frac {109}{144}}\,{t}^{2}+{\frac {8603}{2880}}-{\frac {193}{60}}\,t\\
\mbox{}+{\frac {1}{576}}\,{t}^{4}-1/16\,{t}^{3}$}
\mapleinline{inert}{2d}{sno7constituent[18] := 27/32*t^2-641/120*t+1/576*t^4-1/16*t^3+521/40}{%
${\it sno7constituent}_{{18}}\, := \,{\frac {27}{32}}\,{t}^{2}-{\frac {641}{120}}\,t+{\frac {1}{576}}\,{t}^{4}\\
\mbox{}-1/16\,{t}^{3}+{\frac {521}{40}}$}
\mapleinline{inert}{2d}{sno7constituent[19] := 109/144*t^2-371/120*t+1/576*t^4-1/16*t^3+2651/2880}{%
${\it sno7constituent}_{{19}}\, := \,{\frac {109}{144}}\,{t}^{2}-{\frac {371}{120}}\,t+{\frac {1}{576}}\,{t}^{4}\\
\mbox{}-1/16\,{t}^{3}+{\frac {2651}{2880}}$}
\mapleinline{inert}{2d}{sno7constituent[20] := 227/288*t^2-119/30*t+1/576*t^4-1/16*t^3+131/18}{%
${\it sno7constituent}_{{20}}\, := \,{\frac {227}{288}}\,{t}^{2}-{\frac {119}{30}}\,t+{\frac {1}{576}}\,{t}^{4}\\
\mbox{}-1/16\,{t}^{3}+{\frac {131}{18}}$}
\mapleinline{inert}{2d}{sno7constituent[21] := 13/16*t^2-283/60*t+3491/320+1/576*t^4-1/16*t^3}{%
${\it sno7constituent}_{{21}}\, := \,{\frac {13}{16}}\,{t}^{2}-{\frac {283}{60}}\,t+{\frac {3491}{320}}\\
\mbox{}+{\frac {1}{576}}\,{t}^{4}-1/16\,{t}^{3}$}
\mapleinline{inert}{2d}{sno7constituent[22] := 227/288*t^2-461/120*t+1/576*t^4-1/16*t^3+1741/360}{%
${\it sno7constituent}_{{22}}\, := \,{\frac {227}{288}}\,{t}^{2}-{\frac {461}{120}}\,t+{\frac {1}{576}}\,{t}^{4}\\
\mbox{}-1/16\,{t}^{3}+{\frac {1741}{360}}$}
\mapleinline{inert}{2d}{sno7constituent[23] := 109/144*t^2-371/120*t+1/576*t^4-1/16*t^3+827/2880}{%
${\it sno7constituent}_{{23}}\, := \,{\frac {109}{144}}\,{t}^{2}-{\frac {371}{120}}\,t+{\frac {1}{576}}\,{t}^{4}\\
\mbox{}-1/16\,{t}^{3}+{\frac {827}{2880}}$}
\mapleinline{inert}{2d}{sno7constituent[24] := 27/32*t^2-82/15*t+1/576*t^4-1/16*t^3+81/5}{%
${\it sno7constituent}_{{24}}\, := \,{\frac {27}{32}}\,{t}^{2}-{\frac {82}{15}}\,t+{\frac {1}{576}}\,{t}^{4}\\
\mbox{}-1/16\,{t}^{3}+{\frac {81}{5}}$}
\mapleinline{inert}{2d}{sno7constituent[25] := 109/144*t^2-193/60*t+1/576*t^4-1/16*t^3+2143/576}{%
${\it sno7constituent}_{{25}}\, := \,{\frac {109}{144}}\,{t}^{2}-{\frac {193}{60}}\,t+{\frac {1}{576}}\,{t}^{4}\\
\mbox{}-1/16\,{t}^{3}+{\frac {2143}{576}}$}
\mapleinline{inert}{2d}{sno7constituent[26] := 227/288*t^2-461/120*t+1/576*t^4-1/16*t^3+1513/360}{%
${\it sno7constituent}_{{26}}\, := \,{\frac {227}{288}}\,{t}^{2}-{\frac {461}{120}}\,t+{\frac {1}{576}}\,{t}^{4}\\
\mbox{}-1/16\,{t}^{3}+{\frac {1513}{360}}$}
\mapleinline{inert}{2d}{sno7constituent[27] := 13/16*t^2-551/120*t+1/576*t^4-1/16*t^3+2947/320}{%
${\it sno7constituent}_{{27}}\, := \,{\frac {13}{16}}\,{t}^{2}-{\frac {551}{120}}\,t+{\frac {1}{576}}\,{t}^{4}\\
\mbox{}-1/16\,{t}^{3}+{\frac {2947}{320}}$}
\mapleinline{inert}{2d}{sno7constituent[28] := 227/288*t^2-119/30*t+541/90+1/576*t^4-1/16*t^3}{%
${\it sno7constituent}_{{28}}\, := \,{\frac {227}{288}}\,{t}^{2}-{\frac {119}{30}}\,t+{\frac {541}{90}}\\
\mbox{}+{\frac {1}{576}}\,{t}^{4}-1/16\,{t}^{3}$}
\mapleinline{inert}{2d}{sno7constituent[29] := 109/144*t^2-193/60*t+8891/2880+1/576*t^4-1/16*t^3}{%
${\it sno7constituent}_{{29}}\, := \,{\frac {109}{144}}\,{t}^{2}-{\frac {193}{60}}\,t+{\frac {8891}{2880}}\\
\mbox{}+{\frac {1}{576}}\,{t}^{4}-1/16\,{t}^{3}$}

\end{maplelatex}

\mapleresult
\begin{maplelatex}
\mapleinline{inert}{2d}{sno7constituent[30] := 27/32*t^2-641/120*t+1/576*t^4-1/16*t^3+113/8}{%
${\it sno7constituent}_{{30}}\, := \,{\frac {27}{32}}\,{t}^{2}-{\frac {641}{120}}\,t+{\frac {1}{576}}\,{t}^{4}\\
\mbox{}-1/16\,{t}^{3}+{\frac {113}{8}}$}
\mapleinline{inert}{2d}{sno7constituent[31] := 109/144*t^2-371/120*t+1/576*t^4-1/16*t^3+2939/2880}{%
${\it sno7constituent}_{{31}}\, := \,{\frac {109}{144}}\,{t}^{2}-{\frac {371}{120}}\,t+{\frac {1}{576}}\,{t}^{4}\\
\mbox{}-1/16\,{t}^{3}+{\frac {2939}{2880}}$}
\mapleinline{inert}{2d}{sno7constituent[32] := 227/288*t^2-119/30*t+332/45+1/576*t^4-1/16*t^3}{%
${\it sno7constituent}_{{32}}\, := \,{\frac {227}{288}}\,{t}^{2}-{\frac {119}{30}}\,t+{\frac {332}{45}}\\
\mbox{}+{\frac {1}{576}}\,{t}^{4}-1/16\,{t}^{3}$}
\mapleinline{inert}{2d}{sno7constituent[33] := 13/16*t^2-283/60*t+1/576*t^4-1/16*t^3+3203/320}{%
${\it sno7constituent}_{{33}}\, := \,{\frac {13}{16}}\,{t}^{2}-{\frac {283}{60}}\,t+{\frac {1}{576}}\,{t}^{4}\\
\mbox{}-1/16\,{t}^{3}+{\frac {3203}{320}}$}
\mapleinline{inert}{2d}{sno7constituent[34] := 227/288*t^2-461/120*t+1/576*t^4-1/16*t^3+1777/360}{%
${\it sno7constituent}_{{34}}\, := \,{\frac {227}{288}}\,{t}^{2}-{\frac {461}{120}}\,t+{\frac {1}{576}}\,{t}^{4}\\
\mbox{}-1/16\,{t}^{3}+{\frac {1777}{360}}$}
\mapleinline{inert}{2d}{sno7constituent[35] := 109/144*t^2-371/120*t+799/576+1/576*t^4-1/16*t^3}{%
${\it sno7constituent}_{{35}}\, := \,{\frac {109}{144}}\,{t}^{2}-{\frac {371}{120}}\,t+{\frac {799}{576}}\\
\mbox{}+{\frac {1}{576}}\,{t}^{4}-1/16\,{t}^{3}$}
\mapleinline{inert}{2d}{sno7constituent[36] := 27/32*t^2-82/15*t+1/576*t^4-1/16*t^3+153/10}{%
${\it sno7constituent}_{{36}}\, := \,{\frac {27}{32}}\,{t}^{2}-{\frac {82}{15}}\,t+{\frac {1}{576}}\,{t}^{4}\\
\mbox{}-1/16\,{t}^{3}+{\frac {153}{10}}$}
\mapleinline{inert}{2d}{sno7constituent[37] := 109/144*t^2-193/60*t+1/576*t^4-1/16*t^3+11003/2880}{%
${\it sno7constituent}_{{37}}\, := \,{\frac {109}{144}}\,{t}^{2}-{\frac {193}{60}}\,t+{\frac {1}{576}}\,{t}^{4}\\
\mbox{}-1/16\,{t}^{3}+{\frac {11003}{2880}}$}
\mapleinline{inert}{2d}{sno7constituent[38] := 227/288*t^2-461/120*t+1189/360+1/576*t^4-1/16*t^3}{%
${\it sno7constituent}_{{38}}\, := \,{\frac {227}{288}}\,{t}^{2}-{\frac {461}{120}}\,t+{\frac {1189}{360}}\\
\mbox{}+{\frac {1}{576}}\,{t}^{4}-1/16\,{t}^{3}$}
\mapleinline{inert}{2d}{sno7constituent[39] := 13/16*t^2-551/120*t+1/576*t^4-1/16*t^3+2979/320}{%
${\it sno7constituent}_{{39}}\, := \,{\frac {13}{16}}\,{t}^{2}-{\frac {551}{120}}\,t+{\frac {1}{576}}\,{t}^{4}\\
\mbox{}-1/16\,{t}^{3}+{\frac {2979}{320}}$}
\mapleinline{inert}{2d}{sno7constituent[40] := 227/288*t^2-119/30*t+1/576*t^4-1/16*t^3+73/9}{%
${\it sno7constituent}_{{40}}\, := \,{\frac {227}{288}}\,{t}^{2}-{\frac {119}{30}}\,t+{\frac {1}{576}}\,{t}^{4}\\
\mbox{}-1/16\,{t}^{3}+{\frac {73}{9}}$}
\mapleinline{inert}{2d}{sno7constituent[41] := 109/144*t^2-193/60*t+1/576*t^4-1/16*t^3+6299/2880}{%
${\it sno7constituent}_{{41}}\, := \,{\frac {109}{144}}\,{t}^{2}-{\frac {193}{60}}\,t+{\frac {1}{576}}\,{t}^{4}\\
\mbox{}-1/16\,{t}^{3}+{\frac {6299}{2880}}$}
\mapleinline{inert}{2d}{sno7constituent[42] := 27/32*t^2-641/120*t+1/576*t^4-1/16*t^3+569/40}{%
${\it sno7constituent}_{{42}}\, := \,{\frac {27}{32}}\,{t}^{2}-{\frac {641}{120}}\,t+{\frac {1}{576}}\,{t}^{4}\\
\mbox{}-1/16\,{t}^{3}+{\frac {569}{40}}$}
\mapleinline{inert}{2d}{sno7constituent[43] := 109/144*t^2+347/2880-371/120*t+1/576*t^4-1/16*t^3}{%
${\it sno7constituent}_{{43}}\, := \,{\frac {109}{144}}\,{t}^{2}+{\frac {347}{2880}}-{\frac {371}{120}}\,t\\
\mbox{}+{\frac {1}{576}}\,{t}^{4}-1/16\,{t}^{3}$}
\mapleinline{inert}{2d}{sno7constituent[44] := 227/288*t^2-119/30*t+583/90+1/576*t^4-1/16*t^3}{%
${\it sno7constituent}_{{44}}\, := \,{\frac {227}{288}}\,{t}^{2}-{\frac {119}{30}}\,t+{\frac {583}{90}}\\
\mbox{}+{\frac {1}{576}}\,{t}^{4}-1/16\,{t}^{3}$}

\end{maplelatex}

\mapleresult
\begin{maplelatex}
\mapleinline{inert}{2d}{sno7constituent[45] := 13/16*t^2-283/60*t+775/64+1/576*t^4-1/16*t^3}{%
${\it sno7constituent}_{{45}}\, := \,{\frac {13}{16}}\,{t}^{2}-{\frac {283}{60}}\,t+{\frac {775}{64}}\\
\mbox{}+{\frac {1}{576}}\,{t}^{4}-1/16\,{t}^{3}$}
\mapleinline{inert}{2d}{sno7constituent[46] := 227/288*t^2-461/120*t+1/576*t^4-1/16*t^3+1453/360}{%
${\it sno7constituent}_{{46}}\, := \,{\frac {227}{288}}\,{t}^{2}-{\frac {461}{120}}\,t+{\frac {1}{576}}\,{t}^{4}\\
\mbox{}-1/16\,{t}^{3}+{\frac {1453}{360}}$}
\mapleinline{inert}{2d}{sno7constituent[47] := 109/144*t^2-371/120*t+4283/2880+1/576*t^4-1/16*t^3}{%
${\it sno7constituent}_{{47}}\, := \,{\frac {109}{144}}\,{t}^{2}-{\frac {371}{120}}\,t+{\frac {4283}{2880}}\\
\mbox{}+{\frac {1}{576}}\,{t}^{4}-1/16\,{t}^{3}$}
\mapleinline{inert}{2d}{sno7constituent[48] := 27/32*t^2-82/15*t+1/576*t^4-1/16*t^3+77/5}{%
${\it sno7constituent}_{{48}}\, := \,{\frac {27}{32}}\,{t}^{2}-{\frac {82}{15}}\,t+{\frac {1}{576}}\,{t}^{4}\\
\mbox{}-1/16\,{t}^{3}+{\frac {77}{5}}$}
\mapleinline{inert}{2d}{sno7constituent[49] := 109/144*t^2-193/60*t+1/576*t^4-1/16*t^3+8411/2880}{%
${\it sno7constituent}_{{49}}\, := \,{\frac {109}{144}}\,{t}^{2}-{\frac {193}{60}}\,t+{\frac {1}{576}}\,{t}^{4}\\
\mbox{}-1/16\,{t}^{3}+{\frac {8411}{2880}}$}
\mapleinline{inert}{2d}{sno7constituent[50] := 227/288*t^2-461/120*t+1/576*t^4-1/16*t^3+389/72}{%
${\it sno7constituent}_{{50}}\, := \,{\frac {227}{288}}\,{t}^{2}-{\frac {461}{120}}\,t+{\frac {1}{576}}\,{t}^{4}\\
\mbox{}-1/16\,{t}^{3}+{\frac {389}{72}}$}
\mapleinline{inert}{2d}{sno7constituent[51] := 13/16*t^2-551/120*t+1/576*t^4-1/16*t^3+2691/320}{%
${\it sno7constituent}_{{51}}\, := \,{\frac {13}{16}}\,{t}^{2}-{\frac {551}{120}}\,t+{\frac {1}{576}}\,{t}^{4}\\
\mbox{}-1/16\,{t}^{3}+{\frac {2691}{320}}$}
\mapleinline{inert}{2d}{sno7constituent[52] := 227/288*t^2-119/30*t+1/576*t^4-1/16*t^3+649/90}{%
${\it sno7constituent}_{{52}}\, := \,{\frac {227}{288}}\,{t}^{2}-{\frac {119}{30}}\,t+{\frac {1}{576}}\,{t}^{4}\\
\mbox{}-1/16\,{t}^{3}+{\frac {649}{90}}$}
\mapleinline{inert}{2d}{sno7constituent[53] := 109/144*t^2-193/60*t+1/576*t^4-1/16*t^3+6587/2880}{%
${\it sno7constituent}_{{53}}\, := \,{\frac {109}{144}}\,{t}^{2}-{\frac {193}{60}}\,t+{\frac {1}{576}}\,{t}^{4}\\
\mbox{}-1/16\,{t}^{3}+{\frac {6587}{2880}}$}
\mapleinline{inert}{2d}{sno7constituent[54] := 27/32*t^2-641/120*t+533/40+1/576*t^4-1/16*t^3}{%
${\it sno7constituent}_{{54}}\, := \,{\frac {27}{32}}\,{t}^{2}-{\frac {641}{120}}\,t+{\frac {533}{40}}\\
\mbox{}+{\frac {1}{576}}\,{t}^{4}-1/16\,{t}^{3}$}
\mapleinline{inert}{2d}{sno7constituent[55] := 109/144*t^2-371/120*t+1/576*t^4-1/16*t^3+1279/576}{%
${\it sno7constituent}_{{55}}\, := \,{\frac {109}{144}}\,{t}^{2}-{\frac {371}{120}}\,t+{\frac {1}{576}}\,{t}^{4}\\
\mbox{}-1/16\,{t}^{3}+{\frac {1279}{576}}$}
\mapleinline{inert}{2d}{sno7constituent[56] := 227/288*t^2-119/30*t+1/576*t^4-1/16*t^3+296/45}{%
${\it sno7constituent}_{{56}}\, := \,{\frac {227}{288}}\,{t}^{2}-{\frac {119}{30}}\,t+{\frac {1}{576}}\,{t}^{4}\\
\mbox{}-1/16\,{t}^{3}+{\frac {296}{45}}$}
\mapleinline{inert}{2d}{sno7constituent[57] := 13/16*t^2-283/60*t+1/576*t^4-1/16*t^3+3587/320}{%
${\it sno7constituent}_{{57}}\, := \,{\frac {13}{16}}\,{t}^{2}-{\frac {283}{60}}\,t+{\frac {1}{576}}\,{t}^{4}\\
\mbox{}-1/16\,{t}^{3}+{\frac {3587}{320}}$}
\mapleinline{inert}{2d}{sno7constituent[58] := 227/288*t^2-461/120*t+1/576*t^4-1/16*t^3+1489/360}{%
${\it sno7constituent}_{{58}}\, := \,{\frac {227}{288}}\,{t}^{2}-{\frac {461}{120}}\,t+{\frac {1}{576}}\,{t}^{4}\\
\mbox{}-1/16\,{t}^{3}+{\frac {1489}{360}}$}
\mapleinline{inert}{2d}{sno7constituent[59] := 109/144*t^2-371/120*t+1/576*t^4-1/16*t^3+1691/2880}{%
${\it sno7constituent}_{{59}}\, := \,{\frac {109}{144}}\,{t}^{2}-{\frac {371}{120}}\,t+{\frac {1}{576}}\,{t}^{4}\\
\mbox{}-1/16\,{t}^{3}+{\frac {1691}{2880}}$}
\mapleinline{inert}{2d}{sno7constituent[60] := 33/2-82/15*t+27/32*t^2-1/16*t^3+1/576*t^4}{%
${\it sno7constituent}_{{60}}\, := \,{\frac {33}{2}}-{\frac {82}{15}}\,t+{\frac {27}{32}}\,{t}^{2}\\
\mbox{}-1/16\,{t}^{3}+{\frac {1}{576}}\,{t}^{4}$}
\mapleinline{inert}{2d}{sno7constituent[61] := 109/144*t^2-193/60*t+1/576*t^4-1/16*t^3+8699/2880}{%
${\it sno7constituent}_{{61}}\, := \,{\frac {109}{144}}\,{t}^{2}-{\frac {193}{60}}\,t+{\frac {1}{576}}\,{t}^{4}\\
\mbox{}-1/16\,{t}^{3}+{\frac {8699}{2880}}$}

\end{maplelatex}

\mapleresult
\begin{maplelatex}
\mapleinline{inert}{2d}{sno7constituent[62] := 227/288*t^2-461/120*t+1/576*t^4-1/16*t^3+1621/360}{%
${\it sno7constituent}_{{62}}\, := \,{\frac {227}{288}}\,{t}^{2}-{\frac {461}{120}}\,t+{\frac {1}{576}}\,{t}^{4}\\
\mbox{}-1/16\,{t}^{3}+{\frac {1621}{360}}$}
\mapleinline{inert}{2d}{sno7constituent[63] := 13/16*t^2-551/120*t+2723/320+1/576*t^4-1/16*t^3}{%
${\it sno7constituent}_{{63}}\, := \,{\frac {13}{16}}\,{t}^{2}-{\frac {551}{120}}\,t+{\frac {2723}{320}}\\
\mbox{}+{\frac {1}{576}}\,{t}^{4}-1/16\,{t}^{3}$}
\mapleinline{inert}{2d}{sno7constituent[64] := 227/288*t^2-119/30*t+329/45+1/576*t^4-1/16*t^3}{%
${\it sno7constituent}_{{64}}\, := \,{\frac {227}{288}}\,{t}^{2}-{\frac {119}{30}}\,t+{\frac {329}{45}}\\
\mbox{}+{\frac {1}{576}}\,{t}^{4}-1/16\,{t}^{3}$}
\mapleinline{inert}{2d}{sno7constituent[65] := 109/144*t^2-193/60*t+1/576*t^4-1/16*t^3+1951/576}{%
${\it sno7constituent}_{{65}}\, := \,{\frac {109}{144}}\,{t}^{2}-{\frac {193}{60}}\,t+{\frac {1}{576}}\,{t}^{4}\\
\mbox{}-1/16\,{t}^{3}+{\frac {1951}{576}}$}
\mapleinline{inert}{2d}{sno7constituent[66] := 27/32*t^2-641/120*t+1/576*t^4-1/16*t^3+537/40}{%
${\it sno7constituent}_{{66}}\, := \,{\frac {27}{32}}\,{t}^{2}-{\frac {641}{120}}\,t+{\frac {1}{576}}\,{t}^{4}\\
\mbox{}-1/16\,{t}^{3}+{\frac {537}{40}}$}
\mapleinline{inert}{2d}{sno7constituent[67] := 109/144*t^2-371/120*t+3803/2880+1/576*t^4-1/16*t^3}{%
${\it sno7constituent}_{{67}}\, := \,{\frac {109}{144}}\,{t}^{2}-{\frac {371}{120}}\,t+{\frac {3803}{2880}}\\
\mbox{}+{\frac {1}{576}}\,{t}^{4}-1/16\,{t}^{3}$}
\mapleinline{inert}{2d}{sno7constituent[68] := 227/288*t^2-119/30*t+1/576*t^4-1/16*t^3+511/90}{%
${\it sno7constituent}_{{68}}\, := \,{\frac {227}{288}}\,{t}^{2}-{\frac {119}{30}}\,t+{\frac {1}{576}}\,{t}^{4}\\
\mbox{}-1/16\,{t}^{3}+{\frac {511}{90}}$}
\mapleinline{inert}{2d}{sno7constituent[69] := 13/16*t^2-283/60*t+1/576*t^4-1/16*t^3+3619/320}{%
${\it sno7constituent}_{{69}}\, := \,{\frac {13}{16}}\,{t}^{2}-{\frac {283}{60}}\,t+{\frac {1}{576}}\,{t}^{4}\\
\mbox{}-1/16\,{t}^{3}+{\frac {3619}{320}}$}
\mapleinline{inert}{2d}{sno7constituent[70] := 227/288*t^2-461/120*t+1/576*t^4-1/16*t^3+377/72}{%
${\it sno7constituent}_{{70}}\, := \,{\frac {227}{288}}\,{t}^{2}-{\frac {461}{120}}\,t+{\frac {1}{576}}\,{t}^{4}\\
\mbox{}-1/16\,{t}^{3}+{\frac {377}{72}}$}
\mapleinline{inert}{2d}{sno7constituent[71] := 109/144*t^2-371/120*t+1979/2880+1/576*t^4-1/16*t^3}{%
${\it sno7constituent}_{{71}}\, := \,{\frac {109}{144}}\,{t}^{2}-{\frac {371}{120}}\,t+{\frac {1979}{2880}}\\
\mbox{}+{\frac {1}{576}}\,{t}^{4}-1/16\,{t}^{3}$}
\mapleinline{inert}{2d}{sno7constituent[72] := 27/32*t^2-82/15*t+1/576*t^4-1/16*t^3+83/5}{%
${\it sno7constituent}_{{72}}\, := \,{\frac {27}{32}}\,{t}^{2}-{\frac {82}{15}}\,t+{\frac {1}{576}}\,{t}^{4}\\
\mbox{}-1/16\,{t}^{3}+{\frac {83}{5}}$}
\mapleinline{inert}{2d}{sno7constituent[73] := 109/144*t^2-193/60*t+1/576*t^4-1/16*t^3+6107/2880}{%
${\it sno7constituent}_{{73}}\, := \,{\frac {109}{144}}\,{t}^{2}-{\frac {193}{60}}\,t+{\frac {1}{576}}\,{t}^{4}\\
\mbox{}-1/16\,{t}^{3}+{\frac {6107}{2880}}$}
\mapleinline{inert}{2d}{sno7constituent[74] := 227/288*t^2-461/120*t+1657/360+1/576*t^4-1/16*t^3}{%
${\it sno7constituent}_{{74}}\, := \,{\frac {227}{288}}\,{t}^{2}-{\frac {461}{120}}\,t+{\frac {1657}{360}}\\
\mbox{}+{\frac {1}{576}}\,{t}^{4}-1/16\,{t}^{3}$}
\mapleinline{inert}{2d}{sno7constituent[75] := 13/16*t^2-551/120*t+1/576*t^4-1/16*t^3+615/64}{%
${\it sno7constituent}_{{75}}\, := \,{\frac {13}{16}}\,{t}^{2}-{\frac {551}{120}}\,t+{\frac {1}{576}}\,{t}^{4}\\
\mbox{}-1/16\,{t}^{3}+{\frac {615}{64}}$}
\mapleinline{inert}{2d}{sno7constituent[76] := 227/288*t^2-119/30*t+1/576*t^4-1/16*t^3+577/90}{%
${\it sno7constituent}_{{76}}\, := \,{\frac {227}{288}}\,{t}^{2}-{\frac {119}{30}}\,t+{\frac {1}{576}}\,{t}^{4}\\
\mbox{}-1/16\,{t}^{3}+{\frac {577}{90}}$}
\mapleinline{inert}{2d}{sno7constituent[77] := 109/144*t^2-193/60*t+1/576*t^4-1/16*t^3+10043/2880}{%
${\it sno7constituent}_{{77}}\, := \,{\frac {109}{144}}\,{t}^{2}-{\frac {193}{60}}\,t+{\frac {1}{576}}\,{t}^{4}\\
\mbox{}-1/16\,{t}^{3}+{\frac {10043}{2880}}$}
\mapleinline{inert}{2d}{sno7constituent[78] := 27/32*t^2-641/120*t+1/576*t^4-1/16*t^3+501/40}{%
${\it sno7constituent}_{{78}}\, := \,{\frac {27}{32}}\,{t}^{2}-{\frac {641}{120}}\,t+{\frac {1}{576}}\,{t}^{4}\\
\mbox{}-1/16\,{t}^{3}+{\frac {501}{40}}$}
\mapleinline{inert}{2d}{sno7constituent[79] := 109/144*t^2-371/120*t+1/576*t^4-1/16*t^3+4091/2880}{%
${\it sno7constituent}_{{79}}\, := \,{\frac {109}{144}}\,{t}^{2}-{\frac {371}{120}}\,t+{\frac {1}{576}}\,{t}^{4}\\
\mbox{}-1/16\,{t}^{3}+{\frac {4091}{2880}}$}
\mapleinline{inert}{2d}{sno7constituent[80] := 227/288*t^2-119/30*t+1/576*t^4-1/16*t^3+70/9}{%
${\it sno7constituent}_{{80}}\, := \,{\frac {227}{288}}\,{t}^{2}-{\frac {119}{30}}\,t+{\frac {1}{576}}\,{t}^{4}\\
\mbox{}-1/16\,{t}^{3}+{\frac {70}{9}}$}
\mapleinline{inert}{2d}{sno7constituent[81] := 13/16*t^2-283/60*t+1/576*t^4-1/16*t^3+3331/320}{%
${\it sno7constituent}_{{81}}\, := \,{\frac {13}{16}}\,{t}^{2}-{\frac {283}{60}}\,t+{\frac {1}{576}}\,{t}^{4}\\
\mbox{}-1/16\,{t}^{3}+{\frac {3331}{320}}$}

\end{maplelatex}

\mapleresult
\begin{maplelatex}
\mapleinline{inert}{2d}{sno7constituent[82] := 227/288*t^2-461/120*t+1/576*t^4-1/16*t^3+1921/360}{%
${\it sno7constituent}_{{82}}\, := \,{\frac {227}{288}}\,{t}^{2}-{\frac {461}{120}}\,t+{\frac {1}{576}}\,{t}^{4}\\
\mbox{}-1/16\,{t}^{3}+{\frac {1921}{360}}$}
\mapleinline{inert}{2d}{sno7constituent[83] := 109/144*t^2-371/120*t-613/2880+1/576*t^4-1/16*t^3}{%
${\it sno7constituent}_{{83}}\, := \,{\frac {109}{144}}\,{t}^{2}-{\frac {371}{120}}\,t-{\frac {613}{2880}}\\
\mbox{}+{\frac {1}{576}}\,{t}^{4}-1/16\,{t}^{3}$}
\mapleinline{inert}{2d}{sno7constituent[84] := 27/32*t^2-82/15*t+1/576*t^4-1/16*t^3+157/10}{%
${\it sno7constituent}_{{84}}\, := \,{\frac {27}{32}}\,{t}^{2}-{\frac {82}{15}}\,t+{\frac {1}{576}}\,{t}^{4}\\
\mbox{}-1/16\,{t}^{3}+{\frac {157}{10}}$}
\mapleinline{inert}{2d}{sno7constituent[85] := 109/144*t^2-193/60*t+1/576*t^4-1/16*t^3+2431/576}{%
${\it sno7constituent}_{{85}}\, := \,{\frac {109}{144}}\,{t}^{2}-{\frac {193}{60}}\,t+{\frac {1}{576}}\,{t}^{4}\\
\mbox{}-1/16\,{t}^{3}+{\frac {2431}{576}}$}
\mapleinline{inert}{2d}{sno7constituent[86] := 227/288*t^2-461/120*t+1/576*t^4-1/16*t^3+1333/360}{%
${\it sno7constituent}_{{86}}\, := \,{\frac {227}{288}}\,{t}^{2}-{\frac {461}{120}}\,t+{\frac {1}{576}}\,{t}^{4}\\
\mbox{}-1/16\,{t}^{3}+{\frac {1333}{360}}$}

\end{maplelatex}

\mapleresult
\begin{maplelatex}
\mapleinline{inert}{2d}{sno7constituent[87] := 13/16*t^2-551/120*t+1/576*t^4-1/16*t^3+3107/320}{%
${\it sno7constituent}_{{87}}\, := \,{\frac {13}{16}}\,{t}^{2}-{\frac {551}{120}}\,t+{\frac {1}{576}}\,{t}^{4}\\
\mbox{}-1/16\,{t}^{3}+{\frac {3107}{320}}$}
\mapleinline{inert}{2d}{sno7constituent[88] := 227/288*t^2-119/30*t+293/45+1/576*t^4-1/16*t^3}{%
${\it sno7constituent}_{{88}}\, := \,{\frac {227}{288}}\,{t}^{2}-{\frac {119}{30}}\,t+{\frac {293}{45}}\\
\mbox{}+{\frac {1}{576}}\,{t}^{4}-1/16\,{t}^{3}$}
\mapleinline{inert}{2d}{sno7constituent[89] := 109/144*t^2-193/60*t+1/576*t^4-1/16*t^3+7451/2880}{%
${\it sno7constituent}_{{89}}\, := \,{\frac {109}{144}}\,{t}^{2}-{\frac {193}{60}}\,t+{\frac {1}{576}}\,{t}^{4}\\
\mbox{}-1/16\,{t}^{3}+{\frac {7451}{2880}}$}
\mapleinline{inert}{2d}{sno7constituent[90] := 27/32*t^2-641/120*t+1/576*t^4-1/16*t^3+117/8}{%
${\it sno7constituent}_{{90}}\, := \,{\frac {27}{32}}\,{t}^{2}-{\frac {641}{120}}\,t+{\frac {1}{576}}\,{t}^{4}\\
\mbox{}-1/16\,{t}^{3}+{\frac {117}{8}}$}

\end{maplelatex}

\mapleresult
\begin{maplelatex}
\mapleinline{inert}{2d}{sno7constituent[91] := 109/144*t^2-371/120*t+1499/2880+1/576*t^4-1/16*t^3}{%
${\it sno7constituent}_{{91}}\, := \,{\frac {109}{144}}\,{t}^{2}-{\frac {371}{120}}\,t+{\frac {1499}{2880}}\\
\mbox{}+{\frac {1}{576}}\,{t}^{4}-1/16\,{t}^{3}$}
\mapleinline{inert}{2d}{sno7constituent[92] := 227/288*t^2-119/30*t+1/576*t^4-1/16*t^3+619/90}{%
${\it sno7constituent}_{{92}}\, := \,{\frac {227}{288}}\,{t}^{2}-{\frac {119}{30}}\,t+{\frac {1}{576}}\,{t}^{4}\\
\mbox{}-1/16\,{t}^{3}+{\frac {619}{90}}$}
\mapleinline{inert}{2d}{sno7constituent[93] := 13/16*t^2-283/60*t+3363/320+1/576*t^4-1/16*t^3}{%
${\it sno7constituent}_{{93}}\, := \,{\frac {13}{16}}\,{t}^{2}-{\frac {283}{60}}\,t+{\frac {3363}{320}}\\
\mbox{}+{\frac {1}{576}}\,{t}^{4}-1/16\,{t}^{3}$}
\mapleinline{inert}{2d}{sno7constituent[94] := 227/288*t^2-461/120*t+1/576*t^4-1/16*t^3+1597/360}{%
${\it sno7constituent}_{{94}}\, := \,{\frac {227}{288}}\,{t}^{2}-{\frac {461}{120}}\,t+{\frac {1}{576}}\,{t}^{4}\\
\mbox{}-1/16\,{t}^{3}+{\frac {1597}{360}}$}
\mapleinline{inert}{2d}{sno7constituent[95] := 109/144*t^2-371/120*t+1/576*t^4-1/16*t^3+1087/576}{%
${\it sno7constituent}_{{95}}\, := \,{\frac {109}{144}}\,{t}^{2}-{\frac {371}{120}}\,t+{\frac {1}{576}}\,{t}^{4}\\
\mbox{}-1/16\,{t}^{3}+{\frac {1087}{576}}$}
\mapleinline{inert}{2d}{sno7constituent[96] := 27/32*t^2-82/15*t+1/576*t^4-1/16*t^3+79/5}{%
${\it sno7constituent}_{{96}}\, := \,{\frac {27}{32}}\,{t}^{2}-{\frac {82}{15}}\,t+{\frac {1}{576}}\,{t}^{4}\\
\mbox{}-1/16\,{t}^{3}+{\frac {79}{5}}$}
\mapleinline{inert}{2d}{sno7constituent[97] := 109/144*t^2-193/60*t+1/576*t^4-1/16*t^3+9563/2880}{%
${\it sno7constituent}_{{97}}\, := \,{\frac {109}{144}}\,{t}^{2}-{\frac {193}{60}}\,t+{\frac {1}{576}}\,{t}^{4}\\
\mbox{}-1/16\,{t}^{3}+{\frac {9563}{2880}}$}
\mapleinline{inert}{2d}{sno7constituent[98] := 227/288*t^2-461/120*t+1/576*t^4-1/16*t^3+1369/360}{%
${\it sno7constituent}_{{98}}\, := \,{\frac {227}{288}}\,{t}^{2}-{\frac {461}{120}}\,t+{\frac {1}{576}}\,{t}^{4}\\
\mbox{}-1/16\,{t}^{3}+{\frac {1369}{360}}$}
\mapleinline{inert}{2d}{sno7constituent[99] := 13/16*t^2-551/120*t+1/576*t^4-1/16*t^3+2819/320}{%
${\it sno7constituent}_{{99}}\, := \,{\frac {13}{16}}\,{t}^{2}-{\frac {551}{120}}\,t+{\frac {1}{576}}\,{t}^{4}\\
\mbox{}-1/16\,{t}^{3}+{\frac {2819}{320}}$}
\mapleinline{inert}{2d}{sno7constituent[100] := 227/288*t^2-119/30*t+1/576*t^4-1/16*t^3+137/18}{%
${\it sno7constituent}_{{100}}\, := \,{\frac {227}{288}}\,{t}^{2}-{\frac {119}{30}}\,t+{\frac {1}{576}}\,{t}^{4}\\
\mbox{}-1/16\,{t}^{3}+{\frac {137}{18}}$}
\mapleinline{inert}{2d}{sno7constituent[101] := 109/144*t^2-193/60*t+1/576*t^4-1/16*t^3+7739/2880}{%
${\it sno7constituent}_{{101}}\, := \,{\frac {109}{144}}\,{t}^{2}-{\frac {193}{60}}\,t+{\frac {1}{576}}\,{t}^{4}\\
\mbox{}-1/16\,{t}^{3}+{\frac {7739}{2880}}$}
\mapleinline{inert}{2d}{sno7constituent[102] := 27/32*t^2-641/120*t+549/40+1/576*t^4-1/16*t^3}{%
${\it sno7constituent}_{{102}}\, := \,{\frac {27}{32}}\,{t}^{2}-{\frac {641}{120}}\,t+{\frac {549}{40}}\\
\mbox{}+{\frac {1}{576}}\,{t}^{4}-1/16\,{t}^{3}$}
\mapleinline{inert}{2d}{sno7constituent[103] := 109/144*t^2-371/120*t+1/576*t^4-1/16*t^3+1787/2880}{%
${\it sno7constituent}_{{103}}\, := \,{\frac {109}{144}}\,{t}^{2}-{\frac {371}{120}}\,t+{\frac {1}{576}}\,{t}^{4}\\
\mbox{}-1/16\,{t}^{3}+{\frac {1787}{2880}}$}
\mapleinline{inert}{2d}{sno7constituent[104] := 227/288*t^2-119/30*t+1/576*t^4-1/16*t^3+314/45}{%
${\it sno7constituent}_{{104}}\, := \,{\frac {227}{288}}\,{t}^{2}-{\frac {119}{30}}\,t+{\frac {1}{576}}\,{t}^{4}\\
\mbox{}-1/16\,{t}^{3}+{\frac {314}{45}}$}
\mapleinline{inert}{2d}{sno7constituent[105] := 13/16*t^2-283/60*t+1/576*t^4-1/16*t^3+743/64}{%
${\it sno7constituent}_{{105}}\, := \,{\frac {13}{16}}\,{t}^{2}-{\frac {283}{60}}\,t+{\frac {1}{576}}\,{t}^{4}\\
\mbox{}-1/16\,{t}^{3}+{\frac {743}{64}}$}
\mapleinline{inert}{2d}{sno7constituent[106] := 227/288*t^2-461/120*t+1/576*t^4-1/16*t^3+1633/360}{%
${\it sno7constituent}_{{106}}\, := \,{\frac {227}{288}}\,{t}^{2}-{\frac {461}{120}}\,t+{\frac {1}{576}}\,{t}^{4}\\
\mbox{}-1/16\,{t}^{3}+{\frac {1633}{360}}$}
\mapleinline{inert}{2d}{sno7constituent[107] := 109/144*t^2-371/120*t+2843/2880+1/576*t^4-1/16*t^3}{%
${\it sno7constituent}_{{107}}\, := \,{\frac {109}{144}}\,{t}^{2}-{\frac {371}{120}}\,t+{\frac {2843}{2880}}\\
\mbox{}+{\frac {1}{576}}\,{t}^{4}-1/16\,{t}^{3}$}
\mapleinline{inert}{2d}{sno7constituent[108] := 27/32*t^2-82/15*t+1/576*t^4-1/16*t^3+149/10}{%
${\it sno7constituent}_{{108}}\, := \,{\frac {27}{32}}\,{t}^{2}-{\frac {82}{15}}\,t+{\frac {1}{576}}\,{t}^{4}\\
\mbox{}-1/16\,{t}^{3}+{\frac {149}{10}}$}
\mapleinline{inert}{2d}{sno7constituent[109] := 109/144*t^2-193/60*t+1/576*t^4-1/16*t^3+9851/2880}{%
${\it sno7constituent}_{{109}}\, := \,{\frac {109}{144}}\,{t}^{2}-{\frac {193}{60}}\,t+{\frac {1}{576}}\,{t}^{4}\\
\mbox{}-1/16\,{t}^{3}+{\frac {9851}{2880}}$}
\mapleinline{inert}{2d}{sno7constituent[110] := 227/288*t^2-461/120*t+1/576*t^4-1/16*t^3+353/72}{%
${\it sno7constituent}_{{110}}\, := \,{\frac {227}{288}}\,{t}^{2}-{\frac {461}{120}}\,t+{\frac {1}{576}}\,{t}^{4}\\
\mbox{}-1/16\,{t}^{3}+{\frac {353}{72}}$}

\end{maplelatex}

\mapleresult
\begin{maplelatex}
\mapleinline{inert}{2d}{sno7constituent[111] := 13/16*t^2-551/120*t+2851/320+1/576*t^4-1/16*t^3}{%
${\it sno7constituent}_{{111}}\, := \,{\frac {13}{16}}\,{t}^{2}-{\frac {551}{120}}\,t+{\frac {2851}{320}}\\
\mbox{}+{\frac {1}{576}}\,{t}^{4}-1/16\,{t}^{3}$}
\mapleinline{inert}{2d}{sno7constituent[112] := 227/288*t^2-119/30*t+1/576*t^4-1/16*t^3+347/45}{%
${\it sno7constituent}_{{112}}\, := \,{\frac {227}{288}}\,{t}^{2}-{\frac {119}{30}}\,t+{\frac {1}{576}}\,{t}^{4}\\
\mbox{}-1/16\,{t}^{3}+{\frac {347}{45}}$}
\mapleinline{inert}{2d}{sno7constituent[113] := 109/144*t^2-193/60*t+1/576*t^4-1/16*t^3+5147/2880}{%
${\it sno7constituent}_{{113}}\, := \,{\frac {109}{144}}\,{t}^{2}-{\frac {193}{60}}\,t+{\frac {1}{576}}\,{t}^{4}\\
\mbox{}-1/16\,{t}^{3}+{\frac {5147}{2880}}$}
\mapleinline{inert}{2d}{sno7constituent[114] := 27/32*t^2-641/120*t+1/576*t^4-1/16*t^3+553/40}{%
${\it sno7constituent}_{{114}}\, := \,{\frac {27}{32}}\,{t}^{2}-{\frac {641}{120}}\,t+{\frac {1}{576}}\,{t}^{4}\\
\mbox{}-1/16\,{t}^{3}+{\frac {553}{40}}$}
\mapleinline{inert}{2d}{sno7constituent[115] := 109/144*t^2-371/120*t+1/576*t^4-1/16*t^3+991/576}{%
${\it sno7constituent}_{{115}}\, := \,{\frac {109}{144}}\,{t}^{2}-{\frac {371}{120}}\,t+{\frac {1}{576}}\,{t}^{4}\\
\mbox{}-1/16\,{t}^{3}+{\frac {991}{576}}$}
\mapleinline{inert}{2d}{sno7constituent[116] := 227/288*t^2-119/30*t+547/90+1/576*t^4-1/16*t^3}{%
${\it sno7constituent}_{{116}}\, := \,{\frac {227}{288}}\,{t}^{2}-{\frac {119}{30}}\,t+{\frac {547}{90}}\\
\mbox{}+{\frac {1}{576}}\,{t}^{4}-1/16\,{t}^{3}$}
\mapleinline{inert}{2d}{sno7constituent[117] := 13/16*t^2-283/60*t+1/576*t^4-1/16*t^3+3747/320}{%
${\it sno7constituent}_{{117}}\, := \,{\frac {13}{16}}\,{t}^{2}-{\frac {283}{60}}\,t+{\frac {1}{576}}\,{t}^{4}\\
\mbox{}-1/16\,{t}^{3}+{\frac {3747}{320}}$}
\mapleinline{inert}{2d}{sno7constituent[118] := 227/288*t^2+1309/360-461/120*t+1/576*t^4-1/16*t^3}{%
${\it sno7constituent}_{{118}}\, := \,{\frac {227}{288}}\,{t}^{2}+{\frac {1309}{360}}-{\frac {461}{120}}\,t\\
\mbox{}+{\frac {1}{576}}\,{t}^{4}-1/16\,{t}^{3}$}
\mapleinline{inert}{2d}{sno7constituent[119] := 109/144*t^2+3131/2880-371/120*t+1/576*t^4-1/16*t^3}{%
${\it sno7constituent}_{{119}}\, := \,{\frac {109}{144}}\,{t}^{2}+{\frac {3131}{2880}}-{\frac {371}{120}}\,t\\
\mbox{}+{\frac {1}{576}}\,{t}^{4}-1/16\,{t}^{3}$}
\mapleinline{inert}{2d}{sno7constituent[120] := -82/15*t+27/32*t^2-1/16*t^3+1/576*t^4+17}{%
${\it sno7constituent}_{{120}}\, := \,-{\frac {82}{15}}\,t+{\frac {27}{32}}\,{t}^{2}-1/16\,{t}^{3}+{\frac {1}{576}}\,{t}^{4}\\
\mbox{}+17$}

\end{maplelatex}
Extract the coefficients of the constituents.\begin{mapleinput}
\mapleinline{active}{1d}{for r from 1 to pno7  do
 for coeffdeg from 0 to d do 
  sno7c[coeffdeg,r]:=coeff(sno7constituent[r],t,coeffdeg):
  #print( r, coeffdeg, sno7c[coeffdeg,r] ):
 od:
od: }{}
\end{mapleinput}Print and analyze the constituent coefficients for periods.  First the higher coefficients, which are constant.  Print the first coefficient, then any that don't repeat the preceding value (there are none).\begin{mapleinput}
\mapleinline{active}{1d}{for coeffdeg from 3 to d do
  print("degree", coeffdeg, "coeff", sno7c[coeffdeg,1]):
  for r from 2 to pno7  do
    stepdifference:=sno7c[coeffdeg,r]-sno7c[coeffdeg,r-1]:
    if( stepdifference<\TEXTsymbol{>}0 ) then 
    print(r,sno7c[coeffdeg,r],stepdifference):
    fi: 
  od: 
od: }{}
\end{mapleinput}
\mapleresult
\begin{maplelatex}
\mapleinline{inert}{2d}{"degree", 3, "coeff", (-1)/16}{%
\[
{\it ``degree''},\,3,\,{\it ``coeff''},\,-1/16
\]
}
\mapleinline{inert}{2d}{"degree", 4, "coeff", 1/576}{%
\[
{\it ``degree''},\,4,\,{\it ``coeff''},\,{\frac {1}{576}}
\]
}

\end{maplelatex}
Next, the constant terms, whose period is expected to be pno7=120.  Print all constant terms up to the presumed period "stepsize".  Print the difference (at step "stepsize") if they are not repeating.\begin{mapleinput}
\mapleinline{active}{1d}{stepsize:=pno7; lcd:=2880;
for r from 1 to stepsize do
  print(r, sno7c[0,r], "With common denom.:", sno7c[0,r]*lcd, "/l.c.d."); 
od: 
for r from stepsize+1 to pno7  do 
  stepdifference:=sno7c[0,r]-sno7c[0,r-stepsize]:
  if( stepdifference<\TEXTsymbol{>}0 ) then print(r,sno7c[0,r],stepdifference): fi:
od:
print("Constant terms completed."); }{}
\end{mapleinput}
\mapleresult
\begin{maplelatex}
\mapleinline{inert}{2d}{stepsize := 120}{%
\[
{\it stepsize}\, := \,120
\]
}
\mapleinline{inert}{2d}{lcd := 2880}{%
\[
{\it lcd}\, := \,2880
\]
}
\mapleinline{inert}{2d}{1, 7259/2880, "With common denom.:", 7259, "/l.c.d."}{%
$1,\,{\frac {7259}{2880}},\,\mbox {{\tt ``With common denom.:''}},\,7259,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{2, 1801/360, "With common denom.:", 14408, "/l.c.d."}{%
$2,\,{\frac {1801}{360}},\,\mbox {{\tt ``With common denom.:''}},\,14408,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{3, 2563/320, "With common denom.:", 23067, "/l.c.d."}{%
$3,\,{\frac {2563}{320}},\,\mbox {{\tt ``With common denom.:''}},\,23067,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{4, 613/90, "With common denom.:", 19616, "/l.c.d."}{%
$4,\,{\frac {613}{90}},\,\mbox {{\tt ``With common denom.:''}},\,19616,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{5, 2239/576, "With common denom.:", 11195, "/l.c.d."}{%
$5,\,{\frac {2239}{576}},\,\mbox {{\tt ``With common denom.:''}},\,11195,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{6, 517/40, "With common denom.:", 37224, "/l.c.d."}{%
$6,\,{\frac {517}{40}},\,\mbox {{\tt ``With common denom.:''}},\,37224,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{7, 5243/2880, "With common denom.:", 5243, "/l.c.d."}{%
$7,\,{\frac {5243}{2880}},\,\mbox {{\tt ``With common denom.:''}},\,5243,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{8, 278/45, "With common denom.:", 17792, "/l.c.d."}{%
$8,\,{\frac {278}{45}},\,\mbox {{\tt ``With common denom.:''}},\,17792,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{9, 3459/320, "With common denom.:", 31131, "/l.c.d."}{%
$9,\,{\frac {3459}{320}},\,\mbox {{\tt ``With common denom.:''}},\,31131,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{10, 413/72, "With common denom.:", 16520, "/l.c.d."}{%
$10,\,{\frac {413}{72}},\,\mbox {{\tt ``With common denom.:''}},\,16520,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{11, 539/2880, "With common denom.:", 539, "/l.c.d."}{%
$11,\,{\frac {539}{2880}},\,\mbox {{\tt ``With common denom.:''}},\,539,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{12, 161/10, "With common denom.:", 46368, "/l.c.d."}{%
$12,\,{\frac {161}{10}},\,\mbox {{\tt ``With common denom.:''}},\,46368,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{13, 7547/2880, "With common denom.:", 7547, "/l.c.d."}{%
$13,\,{\frac {7547}{2880}},\,\mbox {{\tt ``With common denom.:''}},\,7547,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{14, 1477/360, "With common denom.:", 11816, "/l.c.d."}{%
$14,\,{\frac {1477}{360}},\,\mbox {{\tt ``With common denom.:''}},\,11816,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{15, 647/64, "With common denom.:", 29115, "/l.c.d."}{%
$15,\,{\frac {647}{64}},\,\mbox {{\tt ``With common denom.:''}},\,29115,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{16, 311/45, "With common denom.:", 19904, "/l.c.d."}{%
$16,\,{\frac {311}{45}},\,\mbox {{\tt ``With common denom.:''}},\,19904,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{17, 8603/2880, "With common denom.:", 8603, "/l.c.d."}{%
$17,\,{\frac {8603}{2880}},\,\mbox {{\tt ``With common denom.:''}},\,8603,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{18, 521/40, "With common denom.:", 37512, "/l.c.d."}{%
$18,\,{\frac {521}{40}},\,\mbox {{\tt ``With common denom.:''}},\,37512,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{19, 2651/2880, "With common denom.:", 2651, "/l.c.d."}{%
$19,\,{\frac {2651}{2880}},\,\mbox {{\tt ``With common denom.:''}},\,2651,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{20, 131/18, "With common denom.:", 20960, "/l.c.d."}{%
$20,\,{\frac {131}{18}},\,\mbox {{\tt ``With common denom.:''}},\,20960,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{21, 3491/320, "With common denom.:", 31419, "/l.c.d."}{%
$21,\,{\frac {3491}{320}},\,\mbox {{\tt ``With common denom.:''}},\,31419,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{22, 1741/360, "With common denom.:", 13928, "/l.c.d."}{%
$22,\,{\frac {1741}{360}},\,\mbox {{\tt ``With common denom.:''}},\,13928,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{23, 827/2880, "With common denom.:", 827, "/l.c.d."}{%
$23,\,{\frac {827}{2880}},\,\mbox {{\tt ``With common denom.:''}},\,827,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{24, 81/5, "With common denom.:", 46656, "/l.c.d."}{%
$24,\,{\frac {81}{5}},\,\mbox {{\tt ``With common denom.:''}},\,46656,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{25, 2143/576, "With common denom.:", 10715, "/l.c.d."}{%
$25,\,{\frac {2143}{576}},\,\mbox {{\tt ``With common denom.:''}},\,10715,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{26, 1513/360, "With common denom.:", 12104, "/l.c.d."}{%
$26,\,{\frac {1513}{360}},\,\mbox {{\tt ``With common denom.:''}},\,12104,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{27, 2947/320, "With common denom.:", 26523, "/l.c.d."}{%
$27,\,{\frac {2947}{320}},\,\mbox {{\tt ``With common denom.:''}},\,26523,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{28, 541/90, "With common denom.:", 17312, "/l.c.d."}{%
$28,\,{\frac {541}{90}},\,\mbox {{\tt ``With common denom.:''}},\,17312,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{29, 8891/2880, "With common denom.:", 8891, "/l.c.d."}{%
$29,\,{\frac {8891}{2880}},\,\mbox {{\tt ``With common denom.:''}},\,8891,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{30, 113/8, "With common denom.:", 40680, "/l.c.d."}{%
$30,\,{\frac {113}{8}},\,\mbox {{\tt ``With common denom.:''}},\,40680,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{31, 2939/2880, "With common denom.:", 2939, "/l.c.d."}{%
$31,\,{\frac {2939}{2880}},\,\mbox {{\tt ``With common denom.:''}},\,2939,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{32, 332/45, "With common denom.:", 21248, "/l.c.d."}{%
$32,\,{\frac {332}{45}},\,\mbox {{\tt ``With common denom.:''}},\,21248,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{33, 3203/320, "With common denom.:", 28827, "/l.c.d."}{%
$33,\,{\frac {3203}{320}},\,\mbox {{\tt ``With common denom.:''}},\,28827,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{34, 1777/360, "With common denom.:", 14216, "/l.c.d."}{%
$34,\,{\frac {1777}{360}},\,\mbox {{\tt ``With common denom.:''}},\,14216,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{35, 799/576, "With common denom.:", 3995, "/l.c.d."}{%
$35,\,{\frac {799}{576}},\,\mbox {{\tt ``With common denom.:''}},\,3995,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{36, 153/10, "With common denom.:", 44064, "/l.c.d."}{%
$36,\,{\frac {153}{10}},\,\mbox {{\tt ``With common denom.:''}},\,44064,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{37, 11003/2880, "With common denom.:", 11003, "/l.c.d."}{%
$37,\,{\frac {11003}{2880}},\,\mbox {{\tt ``With common denom.:''}},\,11003,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{38, 1189/360, "With common denom.:", 9512, "/l.c.d."}{%
$38,\,{\frac {1189}{360}},\,\mbox {{\tt ``With common denom.:''}},\,9512,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{39, 2979/320, "With common denom.:", 26811, "/l.c.d."}{%
$39,\,{\frac {2979}{320}},\,\mbox {{\tt ``With common denom.:''}},\,26811,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{40, 73/9, "With common denom.:", 23360, "/l.c.d."}{%
$40,\,{\frac {73}{9}},\,\mbox {{\tt ``With common denom.:''}},\,23360,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{41, 6299/2880, "With common denom.:", 6299, "/l.c.d."}{%
$41,\,{\frac {6299}{2880}},\,\mbox {{\tt ``With common denom.:''}},\,6299,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{42, 569/40, "With common denom.:", 40968, "/l.c.d."}{%
$42,\,{\frac {569}{40}},\,\mbox {{\tt ``With common denom.:''}},\,40968,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{43, 347/2880, "With common denom.:", 347, "/l.c.d."}{%
$43,\,{\frac {347}{2880}},\,\mbox {{\tt ``With common denom.:''}},\,347,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{44, 583/90, "With common denom.:", 18656, "/l.c.d."}{%
$44,\,{\frac {583}{90}},\,\mbox {{\tt ``With common denom.:''}},\,18656,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{45, 775/64, "With common denom.:", 34875, "/l.c.d."}{%
$45,\,{\frac {775}{64}},\,\mbox {{\tt ``With common denom.:''}},\,34875,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{46, 1453/360, "With common denom.:", 11624, "/l.c.d."}{%
$46,\,{\frac {1453}{360}},\,\mbox {{\tt ``With common denom.:''}},\,11624,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{47, 4283/2880, "With common denom.:", 4283, "/l.c.d."}{%
$47,\,{\frac {4283}{2880}},\,\mbox {{\tt ``With common denom.:''}},\,4283,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{48, 77/5, "With common denom.:", 44352, "/l.c.d."}{%
$48,\,{\frac {77}{5}},\,\mbox {{\tt ``With common denom.:''}},\,44352,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{49, 8411/2880, "With common denom.:", 8411, "/l.c.d."}{%
$49,\,{\frac {8411}{2880}},\,\mbox {{\tt ``With common denom.:''}},\,8411,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{50, 389/72, "With common denom.:", 15560, "/l.c.d."}{%
$50,\,{\frac {389}{72}},\,\mbox {{\tt ``With common denom.:''}},\,15560,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{51, 2691/320, "With common denom.:", 24219, "/l.c.d."}{%
$51,\,{\frac {2691}{320}},\,\mbox {{\tt ``With common denom.:''}},\,24219,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{52, 649/90, "With common denom.:", 20768, "/l.c.d."}{%
$52,\,{\frac {649}{90}},\,\mbox {{\tt ``With common denom.:''}},\,20768,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{53, 6587/2880, "With common denom.:", 6587, "/l.c.d."}{%
$53,\,{\frac {6587}{2880}},\,\mbox {{\tt ``With common denom.:''}},\,6587,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{54, 533/40, "With common denom.:", 38376, "/l.c.d."}{%
$54,\,{\frac {533}{40}},\,\mbox {{\tt ``With common denom.:''}},\,38376,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{55, 1279/576, "With common denom.:", 6395, "/l.c.d."}{%
$55,\,{\frac {1279}{576}},\,\mbox {{\tt ``With common denom.:''}},\,6395,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{56, 296/45, "With common denom.:", 18944, "/l.c.d."}{%
$56,\,{\frac {296}{45}},\,\mbox {{\tt ``With common denom.:''}},\,18944,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{57, 3587/320, "With common denom.:", 32283, "/l.c.d."}{%
$57,\,{\frac {3587}{320}},\,\mbox {{\tt ``With common denom.:''}},\,32283,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{58, 1489/360, "With common denom.:", 11912, "/l.c.d."}{%
$58,\,{\frac {1489}{360}},\,\mbox {{\tt ``With common denom.:''}},\,11912,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{59, 1691/2880, "With common denom.:", 1691, "/l.c.d."}{%
$59,\,{\frac {1691}{2880}},\,\mbox {{\tt ``With common denom.:''}},\,1691,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{60, 33/2, "With common denom.:", 47520, "/l.c.d."}{%
$60,\,{\frac {33}{2}},\,\mbox {{\tt ``With common denom.:''}},\,47520,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{61, 8699/2880, "With common denom.:", 8699, "/l.c.d."}{%
$61,\,{\frac {8699}{2880}},\,\mbox {{\tt ``With common denom.:''}},\,8699,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{62, 1621/360, "With common denom.:", 12968, "/l.c.d."}{%
$62,\,{\frac {1621}{360}},\,\mbox {{\tt ``With common denom.:''}},\,12968,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{63, 2723/320, "With common denom.:", 24507, "/l.c.d."}{%
$63,\,{\frac {2723}{320}},\,\mbox {{\tt ``With common denom.:''}},\,24507,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{64, 329/45, "With common denom.:", 21056, "/l.c.d."}{%
$64,\,{\frac {329}{45}},\,\mbox {{\tt ``With common denom.:''}},\,21056,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{65, 1951/576, "With common denom.:", 9755, "/l.c.d."}{%
$65,\,{\frac {1951}{576}},\,\mbox {{\tt ``With common denom.:''}},\,9755,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{66, 537/40, "With common denom.:", 38664, "/l.c.d."}{%
$66,\,{\frac {537}{40}},\,\mbox {{\tt ``With common denom.:''}},\,38664,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{67, 3803/2880, "With common denom.:", 3803, "/l.c.d."}{%
$67,\,{\frac {3803}{2880}},\,\mbox {{\tt ``With common denom.:''}},\,3803,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{68, 511/90, "With common denom.:", 16352, "/l.c.d."}{%
$68,\,{\frac {511}{90}},\,\mbox {{\tt ``With common denom.:''}},\,16352,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{69, 3619/320, "With common denom.:", 32571, "/l.c.d."}{%
$69,\,{\frac {3619}{320}},\,\mbox {{\tt ``With common denom.:''}},\,32571,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{70, 377/72, "With common denom.:", 15080, "/l.c.d."}{%
$70,\,{\frac {377}{72}},\,\mbox {{\tt ``With common denom.:''}},\,15080,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{71, 1979/2880, "With common denom.:", 1979, "/l.c.d."}{%
$71,\,{\frac {1979}{2880}},\,\mbox {{\tt ``With common denom.:''}},\,1979,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{72, 83/5, "With common denom.:", 47808, "/l.c.d."}{%
$72,\,{\frac {83}{5}},\,\mbox {{\tt ``With common denom.:''}},\,47808,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{73, 6107/2880, "With common denom.:", 6107, "/l.c.d."}{%
$73,\,{\frac {6107}{2880}},\,\mbox {{\tt ``With common denom.:''}},\,6107,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{74, 1657/360, "With common denom.:", 13256, "/l.c.d."}{%
$74,\,{\frac {1657}{360}},\,\mbox {{\tt ``With common denom.:''}},\,13256,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{75, 615/64, "With common denom.:", 27675, "/l.c.d."}{%
$75,\,{\frac {615}{64}},\,\mbox {{\tt ``With common denom.:''}},\,27675,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{76, 577/90, "With common denom.:", 18464, "/l.c.d."}{%
$76,\,{\frac {577}{90}},\,\mbox {{\tt ``With common denom.:''}},\,18464,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{77, 10043/2880, "With common denom.:", 10043, "/l.c.d."}{%
$77,\,{\frac {10043}{2880}},\,\mbox {{\tt ``With common denom.:''}},\,10043,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{78, 501/40, "With common denom.:", 36072, "/l.c.d."}{%
$78,\,{\frac {501}{40}},\,\mbox {{\tt ``With common denom.:''}},\,36072,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{79, 4091/2880, "With common denom.:", 4091, "/l.c.d."}{%
$79,\,{\frac {4091}{2880}},\,\mbox {{\tt ``With common denom.:''}},\,4091,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{80, 70/9, "With common denom.:", 22400, "/l.c.d."}{%
$80,\,{\frac {70}{9}},\,\mbox {{\tt ``With common denom.:''}},\,22400,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{81, 3331/320, "With common denom.:", 29979, "/l.c.d."}{%
$81,\,{\frac {3331}{320}},\,\mbox {{\tt ``With common denom.:''}},\,29979,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{82, 1921/360, "With common denom.:", 15368, "/l.c.d."}{%
$82,\,{\frac {1921}{360}},\,\mbox {{\tt ``With common denom.:''}},\,15368,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{83, (-613)/2880, "With common denom.:", -613, "/l.c.d."}{%
$83,\,-{\frac {613}{2880}},\,\mbox {{\tt ``With common denom.:''}},\,-613,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{84, 157/10, "With common denom.:", 45216, "/l.c.d."}{%
$84,\,{\frac {157}{10}},\,\mbox {{\tt ``With common denom.:''}},\,45216,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{85, 2431/576, "With common denom.:", 12155, "/l.c.d."}{%
$85,\,{\frac {2431}{576}},\,\mbox {{\tt ``With common denom.:''}},\,12155,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{86, 1333/360, "With common denom.:", 10664, "/l.c.d."}{%
$86,\,{\frac {1333}{360}},\,\mbox {{\tt ``With common denom.:''}},\,10664,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{87, 3107/320, "With common denom.:", 27963, "/l.c.d."}{%
$87,\,{\frac {3107}{320}},\,\mbox {{\tt ``With common denom.:''}},\,27963,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{88, 293/45, "With common denom.:", 18752, "/l.c.d."}{%
$88,\,{\frac {293}{45}},\,\mbox {{\tt ``With common denom.:''}},\,18752,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{89, 7451/2880, "With common denom.:", 7451, "/l.c.d."}{%
$89,\,{\frac {7451}{2880}},\,\mbox {{\tt ``With common denom.:''}},\,7451,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{90, 117/8, "With common denom.:", 42120, "/l.c.d."}{%
$90,\,{\frac {117}{8}},\,\mbox {{\tt ``With common denom.:''}},\,42120,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{91, 1499/2880, "With common denom.:", 1499, "/l.c.d."}{%
$91,\,{\frac {1499}{2880}},\,\mbox {{\tt ``With common denom.:''}},\,1499,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{92, 619/90, "With common denom.:", 19808, "/l.c.d."}{%
$92,\,{\frac {619}{90}},\,\mbox {{\tt ``With common denom.:''}},\,19808,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{93, 3363/320, "With common denom.:", 30267, "/l.c.d."}{%
$93,\,{\frac {3363}{320}},\,\mbox {{\tt ``With common denom.:''}},\,30267,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{94, 1597/360, "With common denom.:", 12776, "/l.c.d."}{%
$94,\,{\frac {1597}{360}},\,\mbox {{\tt ``With common denom.:''}},\,12776,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{95, 1087/576, "With common denom.:", 5435, "/l.c.d."}{%
$95,\,{\frac {1087}{576}},\,\mbox {{\tt ``With common denom.:''}},\,5435,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{96, 79/5, "With common denom.:", 45504, "/l.c.d."}{%
$96,\,{\frac {79}{5}},\,\mbox {{\tt ``With common denom.:''}},\,45504,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{97, 9563/2880, "With common denom.:", 9563, "/l.c.d."}{%
$97,\,{\frac {9563}{2880}},\,\mbox {{\tt ``With common denom.:''}},\,9563,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{98, 1369/360, "With common denom.:", 10952, "/l.c.d."}{%
$98,\,{\frac {1369}{360}},\,\mbox {{\tt ``With common denom.:''}},\,10952,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{99, 2819/320, "With common denom.:", 25371, "/l.c.d."}{%
$99,\,{\frac {2819}{320}},\,\mbox {{\tt ``With common denom.:''}},\,25371,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{100, 137/18, "With common denom.:", 21920, "/l.c.d."}{%
$100,\,{\frac {137}{18}},\,\mbox {{\tt ``With common denom.:''}},\,21920,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{101, 7739/2880, "With common denom.:", 7739, "/l.c.d."}{%
$101,\,{\frac {7739}{2880}},\,\mbox {{\tt ``With common denom.:''}},\,7739,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{102, 549/40, "With common denom.:", 39528, "/l.c.d."}{%
$102,\,{\frac {549}{40}},\,\mbox {{\tt ``With common denom.:''}},\,39528,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{103, 1787/2880, "With common denom.:", 1787, "/l.c.d."}{%
$103,\,{\frac {1787}{2880}},\,\mbox {{\tt ``With common denom.:''}},\,1787,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{104, 314/45, "With common denom.:", 20096, "/l.c.d."}{%
$104,\,{\frac {314}{45}},\,\mbox {{\tt ``With common denom.:''}},\,20096,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{105, 743/64, "With common denom.:", 33435, "/l.c.d."}{%
$105,\,{\frac {743}{64}},\,\mbox {{\tt ``With common denom.:''}},\,33435,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{106, 1633/360, "With common denom.:", 13064, "/l.c.d."}{%
$106,\,{\frac {1633}{360}},\,\mbox {{\tt ``With common denom.:''}},\,13064,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{107, 2843/2880, "With common denom.:", 2843, "/l.c.d."}{%
$107,\,{\frac {2843}{2880}},\,\mbox {{\tt ``With common denom.:''}},\,2843,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{108, 149/10, "With common denom.:", 42912, "/l.c.d."}{%
$108,\,{\frac {149}{10}},\,\mbox {{\tt ``With common denom.:''}},\,42912,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{109, 9851/2880, "With common denom.:", 9851, "/l.c.d."}{%
$109,\,{\frac {9851}{2880}},\,\mbox {{\tt ``With common denom.:''}},\,9851,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{110, 353/72, "With common denom.:", 14120, "/l.c.d."}{%
$110,\,{\frac {353}{72}},\,\mbox {{\tt ``With common denom.:''}},\,14120,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{111, 2851/320, "With common denom.:", 25659, "/l.c.d."}{%
$111,\,{\frac {2851}{320}},\,\mbox {{\tt ``With common denom.:''}},\,25659,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{112, 347/45, "With common denom.:", 22208, "/l.c.d."}{%
$112,\,{\frac {347}{45}},\,\mbox {{\tt ``With common denom.:''}},\,22208,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{113, 5147/2880, "With common denom.:", 5147, "/l.c.d."}{%
$113,\,{\frac {5147}{2880}},\,\mbox {{\tt ``With common denom.:''}},\,5147,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{114, 553/40, "With common denom.:", 39816, "/l.c.d."}{%
$114,\,{\frac {553}{40}},\,\mbox {{\tt ``With common denom.:''}},\,39816,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{115, 991/576, "With common denom.:", 4955, "/l.c.d."}{%
$115,\,{\frac {991}{576}},\,\mbox {{\tt ``With common denom.:''}},\,4955,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{116, 547/90, "With common denom.:", 17504, "/l.c.d."}{%
$116,\,{\frac {547}{90}},\,\mbox {{\tt ``With common denom.:''}},\,17504,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{117, 3747/320, "With common denom.:", 33723, "/l.c.d."}{%
$117,\,{\frac {3747}{320}},\,\mbox {{\tt ``With common denom.:''}},\,33723,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{118, 1309/360, "With common denom.:", 10472, "/l.c.d."}{%
$118,\,{\frac {1309}{360}},\,\mbox {{\tt ``With common denom.:''}},\,10472,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{119, 3131/2880, "With common denom.:", 3131, "/l.c.d."}{%
$119,\,{\frac {3131}{2880}},\,\mbox {{\tt ``With common denom.:''}},\,3131,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{120, 17, "With common denom.:", 48960, "/l.c.d."}{%
$120,\,17,\,\mbox {{\tt ``With common denom.:''}},\,48960,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{"Constant terms completed."}{%
$\mbox {{\tt ``Constant terms completed.''}}$}

\end{maplelatex}
Now, the linear terms.  First print all linear coefficients up to the presumed period "stepsize".  Then analyze for period and print the difference (at step "stepsize") if they are not repeating.\begin{mapleinput}
\mapleinline{active}{1d}{stepsize:=12; lcd:=120;
for r from 1 to stepsize do
  print(r, sno7c[1,r], "With sign adjusted:", -sno7c[1,r]*lcd, "/l.c.d."); 
od: 
for r from stepsize+1 to pno7  do 
  stepdifference:=sno7c[1,r]-sno7c[1,r-stepsize]:
  if( stepdifference<\TEXTsymbol{>}0 ) then print(r,sno7c[1,r],stepdifference): fi:
od:
print("Linear coefficients completed."); }{}
\end{mapleinput}
\mapleresult
\begin{maplelatex}
\mapleinline{inert}{2d}{stepsize := 12}{%
\[
{\it stepsize}\, := \,12
\]
}
\mapleinline{inert}{2d}{lcd := 120}{%
\[
{\it lcd}\, := \,120
\]
}
\mapleinline{inert}{2d}{1, (-193)/60, "With sign adjusted:", 386, "/l.c.d."}{%
$1,\,-{\frac {193}{60}},\,\mbox {{\tt ``With sign adjusted:''}},\,386,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{2, (-461)/120, "With sign adjusted:", 461, "/l.c.d."}{%
$2,\,-{\frac {461}{120}},\,\mbox {{\tt ``With sign adjusted:''}},\,461,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{3, (-551)/120, "With sign adjusted:", 551, "/l.c.d."}{%
$3,\,-{\frac {551}{120}},\,\mbox {{\tt ``With sign adjusted:''}},\,551,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{4, (-119)/30, "With sign adjusted:", 476, "/l.c.d."}{%
$4,\,-{\frac {119}{30}},\,\mbox {{\tt ``With sign adjusted:''}},\,476,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{5, (-193)/60, "With sign adjusted:", 386, "/l.c.d."}{%
$5,\,-{\frac {193}{60}},\,\mbox {{\tt ``With sign adjusted:''}},\,386,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{6, (-641)/120, "With sign adjusted:", 641, "/l.c.d."}{%
$6,\,-{\frac {641}{120}},\,\mbox {{\tt ``With sign adjusted:''}},\,641,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{7, (-371)/120, "With sign adjusted:", 371, "/l.c.d."}{%
$7,\,-{\frac {371}{120}},\,\mbox {{\tt ``With sign adjusted:''}},\,371,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{8, (-119)/30, "With sign adjusted:", 476, "/l.c.d."}{%
$8,\,-{\frac {119}{30}},\,\mbox {{\tt ``With sign adjusted:''}},\,476,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{9, (-283)/60, "With sign adjusted:", 566, "/l.c.d."}{%
$9,\,-{\frac {283}{60}},\,\mbox {{\tt ``With sign adjusted:''}},\,566,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{10, (-461)/120, "With sign adjusted:", 461, "/l.c.d."}{%
$10,\,-{\frac {461}{120}},\,\mbox {{\tt ``With sign adjusted:''}},\,461,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{11, (-371)/120, "With sign adjusted:", 371, "/l.c.d."}{%
$11,\,-{\frac {371}{120}},\,\mbox {{\tt ``With sign adjusted:''}},\,371,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{12, (-82)/15, "With sign adjusted:", 656, "/l.c.d."}{%
$12,\,-{\frac {82}{15}},\,\mbox {{\tt ``With sign adjusted:''}},\,656,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{"Linear coefficients completed."}{%
$\mbox {{\tt ``Linear coefficients completed.''}}$}

\end{maplelatex}
The quadratic terms.  First print all quadratic coefficients up to the presumed period "stepsize".  Then analyze for period and print the difference (at step "stepsize") if they are not repeating.\begin{mapleinput}
\mapleinline{active}{1d}{stepsize:=6; lcd:=288;
for r from 1 to stepsize do
  print(r, sno7c[2,r], "With common denom.:", sno7c[2,r]*lcd, "/l.c.d."); 
od: 
for r from stepsize+1 to pno7  do 
  stepdifference:=sno7c[2,r]-sno7c[2,r-stepsize]:
  if( stepdifference<\TEXTsymbol{>}0 ) then print(r,sno7c[2,r],stepdifference): fi:
od:
print("Quadratic coefficients completed."); }{}
\end{mapleinput}
\mapleresult
\begin{maplelatex}
\mapleinline{inert}{2d}{stepsize := 6}{%
\[
{\it stepsize}\, := \,6
\]
}
\mapleinline{inert}{2d}{lcd := 288}{%
\[
{\it lcd}\, := \,288
\]
}
\mapleinline{inert}{2d}{1, 109/144, "With common denom.:", 218, "/l.c.d."}{%
$1,\,{\frac {109}{144}},\,\mbox {{\tt ``With common denom.:''}},\,218,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{2, 227/288, "With common denom.:", 227, "/l.c.d."}{%
$2,\,{\frac {227}{288}},\,\mbox {{\tt ``With common denom.:''}},\,227,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{3, 13/16, "With common denom.:", 234, "/l.c.d."}{%
$3,\,{\frac {13}{16}},\,\mbox {{\tt ``With common denom.:''}},\,234,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{4, 227/288, "With common denom.:", 227, "/l.c.d."}{%
$4,\,{\frac {227}{288}},\,\mbox {{\tt ``With common denom.:''}},\,227,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{5, 109/144, "With common denom.:", 218, "/l.c.d."}{%
$5,\,{\frac {109}{144}},\,\mbox {{\tt ``With common denom.:''}},\,218,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{6, 27/32, "With common denom.:", 243, "/l.c.d."}{%
$6,\,{\frac {27}{32}},\,\mbox {{\tt ``With common denom.:''}},\,243,\,\mbox {{\tt ``/l.c.d.''}}$}
\mapleinline{inert}{2d}{"Quadratic coefficients completed."}{%
$\mbox {{\tt ``Quadratic coefficients completed.''}}$}

\end{maplelatex}
\begin{mapleinput}
\mapleinline{active}{1d}{S7gfstandnum; p7; d7; }{}
\end{mapleinput}
\mapleresult
\begin{maplelatex}
\mapleinline{inert}{2d}{72*x^10*(x^20+x^19+x^18+x^17+x^16+x^15+x^14+x^13+x^12+x^11+x^10+x^9+x^8+x^7+x^6+x^5+x^4+x^3+x^2+x+1)*(x^12-x^11+x^9-x^8+x^6-x^4+x^3-x+1)}{%
$72\,{x}^{10} \left( {x}^{20}+{x}^{19}+{x}^{18}+{x}^{17}+{x}^{16}+{x}^{15}+{x}^{14}+{x}^{13}+{x}^{12}+{x}^{11}+{x}^{10}+{x}^{9}+{x}^{8}+{x}^{7}+{x}^{6}+{x}^{5}+{x}^{4}+{x}^{3}+{x}^{2}\\
\mbox{}+x+1 \right)  \left( {x}^{12}-{x}^{11}+{x}^{9}-{x}^{8}+{x}^{6}-{x}^{4}+{x}^{3}-x+1 \right) $}
\mapleinline{inert}{2d}{21}{%
\[
21
\]
}
\mapleinline{inert}{2d}{1}{%
\[
1
\]
}

\end{maplelatex}
Calculate the zeroth constituent.  Find its constant term.\begin{mapleinput}
\mapleinline{active}{1d}{S7zeroth:=expand(
sum(coeff(S7gfstandnum,x,p7*j)*binomial(d7+t/p7-j,d7),j=0..d7+1) );
print(subs(t=0,S7zeroth)):  }{}
\end{mapleinput}
\mapleresult
\begin{maplelatex}
\mapleinline{inert}{2d}{S7zeroth := -72+24/7*t}{%
\[
{\it S7zeroth}\, := \,-72+{\frac {24}{7}}\,t
\]
}
\mapleinline{inert}{2d}{-72}{%
\[
-72
\]
}

\end{maplelatex}
Extract the constituents of the total semimagic counting function.\begin{mapleinput}
\mapleinline{active}{1d}{S7constituent[0]:=S7zeroth:
for r from 1 to p7  do
  S7constituent[r]:=expand(sum( coeff(S7gfstandnum,x,p7*j+r)*binomial(d7+(t-r)/p7-j,d7), j=0..d7 )):
#  print(r):
#  print( S7constituent[r] ):
#  print( factor(S7constituent[r]) ):
  S7constituent[r]-24/7*(t-r) ;
od;}{}
\end{mapleinput}
\mapleresult
\begin{maplelatex}
\mapleinline{inert}{2d}{S7constituent[1] := 24/7*t-24/7}{%
\[
{\it S7constituent}_{{1}}\, := \,{\frac {24}{7}}\,t-{\frac {24}{7}}
\]
}
\mapleinline{inert}{2d}{0}{%
\[
0
\]
}
\mapleinline{inert}{2d}{S7constituent[2] := 24/7*t-48/7}{%
\[
{\it S7constituent}_{{2}}\, := \,{\frac {24}{7}}\,t-{\frac {48}{7}}
\]
}
\mapleinline{inert}{2d}{0}{%
\[
0
\]
}
\mapleinline{inert}{2d}{S7constituent[3] := 24/7*t-72/7}{%
\[
{\it S7constituent}_{{3}}\, := \,{\frac {24}{7}}\,t-{\frac {72}{7}}
\]
}
\mapleinline{inert}{2d}{0}{%
\[
0
\]
}
\mapleinline{inert}{2d}{S7constituent[4] := 24/7*t-96/7}{%
\[
{\it S7constituent}_{{4}}\, := \,{\frac {24}{7}}\,t-{\frac {96}{7}}
\]
}
\mapleinline{inert}{2d}{0}{%
\[
0
\]
}
\mapleinline{inert}{2d}{S7constituent[5] := 24/7*t-120/7}{%
\[
{\it S7constituent}_{{5}}\, := \,{\frac {24}{7}}\,t-{\frac {120}{7}}
\]
}
\mapleinline{inert}{2d}{0}{%
\[
0
\]
}
\mapleinline{inert}{2d}{S7constituent[6] := 24/7*t-144/7}{%
\[
{\it S7constituent}_{{6}}\, := \,{\frac {24}{7}}\,t-{\frac {144}{7}}
\]
}
\mapleinline{inert}{2d}{0}{%
\[
0
\]
}
\mapleinline{inert}{2d}{S7constituent[7] := 24/7*t-24}{%
\[
{\it S7constituent}_{{7}}\, := \,{\frac {24}{7}}\,t-24
\]
}
\mapleinline{inert}{2d}{0}{%
\[
0
\]
}
\mapleinline{inert}{2d}{S7constituent[8] := 24/7*t-192/7}{%
\[
{\it S7constituent}_{{8}}\, := \,{\frac {24}{7}}\,t-{\frac {192}{7}}
\]
}
\mapleinline{inert}{2d}{0}{%
\[
0
\]
}
\mapleinline{inert}{2d}{S7constituent[9] := 24/7*t-216/7}{%
\[
{\it S7constituent}_{{9}}\, := \,{\frac {24}{7}}\,t-{\frac {216}{7}}
\]
}
\mapleinline{inert}{2d}{0}{%
\[
0
\]
}
\mapleinline{inert}{2d}{S7constituent[10] := 264/7+24/7*t}{%
\[
{\it S7constituent}_{{10}}\, := \,{\frac {264}{7}}+{\frac {24}{7}}\,t
\]
}
\mapleinline{inert}{2d}{72}{%
\[
72
\]
}
\mapleinline{inert}{2d}{S7constituent[11] := 24/7*t-264/7}{%
\[
{\it S7constituent}_{{11}}\, := \,{\frac {24}{7}}\,t-{\frac {264}{7}}
\]
}
\mapleinline{inert}{2d}{0}{%
\[
0
\]
}
\mapleinline{inert}{2d}{S7constituent[12] := 24/7*t-288/7}{%
\[
{\it S7constituent}_{{12}}\, := \,{\frac {24}{7}}\,t-{\frac {288}{7}}
\]
}
\mapleinline{inert}{2d}{0}{%
\[
0
\]
}
\mapleinline{inert}{2d}{S7constituent[13] := 192/7+24/7*t}{%
\[
{\it S7constituent}_{{13}}\, := \,{\frac {192}{7}}+{\frac {24}{7}}\,t
\]
}
\mapleinline{inert}{2d}{72}{%
\[
72
\]
}

\end{maplelatex}

\mapleresult
\begin{maplelatex}
\mapleinline{inert}{2d}{S7constituent[14] := 24/7*t-48}{%
\[
{\it S7constituent}_{{14}}\, := \,{\frac {24}{7}}\,t-48
\]
}
\mapleinline{inert}{2d}{0}{%
\[
0
\]
}
\mapleinline{inert}{2d}{S7constituent[15] := 24/7*t-360/7}{%
\[
{\it S7constituent}_{{15}}\, := \,{\frac {24}{7}}\,t-{\frac {360}{7}}
\]
}
\mapleinline{inert}{2d}{0}{%
\[
0
\]
}
\mapleinline{inert}{2d}{S7constituent[16] := 120/7+24/7*t}{%
\[
{\it S7constituent}_{{16}}\, := \,{\frac {120}{7}}+{\frac {24}{7}}\,t
\]
}
\mapleinline{inert}{2d}{72}{%
\[
72
\]
}
\mapleinline{inert}{2d}{S7constituent[17] := 96/7+24/7*t}{%
\[
{\it S7constituent}_{{17}}\, := \,{\frac {96}{7}}+{\frac {24}{7}}\,t
\]
}
\mapleinline{inert}{2d}{72}{%
\[
72
\]
}
\mapleinline{inert}{2d}{S7constituent[18] := 24/7*t-432/7}{%
\[
{\it S7constituent}_{{18}}\, := \,{\frac {24}{7}}\,t-{\frac {432}{7}}
\]
}
\mapleinline{inert}{2d}{0}{%
\[
0
\]
}
\mapleinline{inert}{2d}{S7constituent[19] := 48/7+24/7*t}{%
\[
{\it S7constituent}_{{19}}\, := \,{\frac {48}{7}}+{\frac {24}{7}}\,t
\]
}
\mapleinline{inert}{2d}{72}{%
\[
72
\]
}
\mapleinline{inert}{2d}{S7constituent[20] := 24/7+24/7*t}{%
\[
{\it S7constituent}_{{20}}\, := \,{\frac {24}{7}}+{\frac {24}{7}}\,t
\]
}
\mapleinline{inert}{2d}{72}{%
\[
72
\]
}
\mapleinline{inert}{2d}{S7constituent[21] := -72+24/7*t}{%
\[
{\it S7constituent}_{{21}}\, := \,-72+{\frac {24}{7}}\,t
\]
}
\mapleinline{inert}{2d}{0}{%
\[
0
\]
}

\end{maplelatex}
Extract the coefficients of the constituents.\begin{mapleinput}
\mapleinline{active}{1d}{for r from 1 to p7  do
 for coeffdeg from 0 to d7 do 
  S7c[coeffdeg,r]:=coeff(S7constituent[r],t,coeffdeg):
  #print( r, S7c[coeffdeg,r] ):
 od:
od:}{}
\end{mapleinput}Next, the constant terms, whose period is expected to be p7=21.  Print all constant terms up to the presumed period "stepsize".  Print the difference (at step "stepsize") if they are not repeating.\begin{mapleinput}
\mapleinline{active}{1d}{stepsize:=21; 
for r from 1 to stepsize do
  print(r, S7c[0,r]); 
od: 
for r from stepsize+1 to p7  do 
  stepdifference:=S7c[0,r]-S7c[0,r-stepsize]:
  if( stepdifference<\TEXTsymbol{>}0 ) then print(r,S7c[0,r],stepdifference): fi:
  #print(r,S7c[0,r],stepdifference);
od:
print("Constant terms completed."); }{}
\end{mapleinput}
\mapleresult
\begin{maplelatex}
\mapleinline{inert}{2d}{stepsize := 21}{%
\[
{\it stepsize}\, := \,21
\]
}
\mapleinline{inert}{2d}{1, (-24)/7}{%
\[
1,\,-{\frac {24}{7}}
\]
}
\mapleinline{inert}{2d}{2, (-48)/7}{%
\[
2,\,-{\frac {48}{7}}
\]
}
\mapleinline{inert}{2d}{3, (-72)/7}{%
\[
3,\,-{\frac {72}{7}}
\]
}
\mapleinline{inert}{2d}{4, (-96)/7}{%
\[
4,\,-{\frac {96}{7}}
\]
}
\mapleinline{inert}{2d}{5, (-120)/7}{%
\[
5,\,-{\frac {120}{7}}
\]
}
\mapleinline{inert}{2d}{6, (-144)/7}{%
\[
6,\,-{\frac {144}{7}}
\]
}
\mapleinline{inert}{2d}{7, -24}{%
\[
7,\,-24
\]
}
\mapleinline{inert}{2d}{8, (-192)/7}{%
\[
8,\,-{\frac {192}{7}}
\]
}
\mapleinline{inert}{2d}{9, (-216)/7}{%
\[
9,\,-{\frac {216}{7}}
\]
}
\mapleinline{inert}{2d}{10, 264/7}{%
\[
10,\,{\frac {264}{7}}
\]
}
\mapleinline{inert}{2d}{11, (-264)/7}{%
\[
11,\,-{\frac {264}{7}}
\]
}
\mapleinline{inert}{2d}{12, (-288)/7}{%
\[
12,\,-{\frac {288}{7}}
\]
}
\mapleinline{inert}{2d}{13, 192/7}{%
\[
13,\,{\frac {192}{7}}
\]
}
\mapleinline{inert}{2d}{14, -48}{%
\[
14,\,-48
\]
}
\mapleinline{inert}{2d}{15, (-360)/7}{%
\[
15,\,-{\frac {360}{7}}
\]
}
\mapleinline{inert}{2d}{16, 120/7}{%
\[
16,\,{\frac {120}{7}}
\]
}
\mapleinline{inert}{2d}{17, 96/7}{%
\[
17,\,{\frac {96}{7}}
\]
}
\mapleinline{inert}{2d}{18, (-432)/7}{%
\[
18,\,-{\frac {432}{7}}
\]
}
\mapleinline{inert}{2d}{19, 48/7}{%
\[
19,\,{\frac {48}{7}}
\]
}
\mapleinline{inert}{2d}{20, 24/7}{%
\[
20,\,{\frac {24}{7}}
\]
}
\mapleinline{inert}{2d}{21, -72}{%
\[
21,\,-72
\]
}
\mapleinline{inert}{2d}{"Constant terms completed."}{%
$\mbox {{\tt ``Constant terms completed.''}}$}

\end{maplelatex}
Calculate the zeroth constituent of the .  Find its constant term.\begin{mapleinput}
\mapleinline{active}{1d}{s7zeroth:=expand(
sum(coeff(numer(s7gf),x,p7*j)*binomial(d7+t/p7-j,d7),j=0..d7+1) );
print(subs(t=0,s7zeroth)):  }{}
\end{mapleinput}
\mapleresult
\begin{maplelatex}
\mapleinline{inert}{2d}{s7zeroth := -1+1/21*t}{%
\[
{\it s7zeroth}\, := \,-1+1/21\,t
\]
}
\mapleinline{inert}{2d}{-1}{%
\[
-1
\]
}

\end{maplelatex}
Extract the constituents of the semimagic symmetry-type counting function.\begin{mapleinput}
\mapleinline{active}{1d}{s7constituent[0]:=s7zeroth:
for r from 1 to p7  do
  s7constituent[r]:=expand(sum( coeff(numer(s7gf),x,p7*j+r)*binomial(d7+(t-r)/p7-j,d7), j=0..d7)):
#  print(r):
#  print( s7constituent[r] ):
#  print( factor(s7constituent[r]) ):
  s7constituent[r]-1/21*(t-r) ;
od; }{}
\end{mapleinput}
\mapleresult
\begin{maplelatex}
\mapleinline{inert}{2d}{s7constituent[1] := 1/21*t-1/21}{%
\[
{\it s7constituent}_{{1}}\, := \,1/21\,t-1/21
\]
}
\mapleinline{inert}{2d}{0}{%
\[
0
\]
}
\mapleinline{inert}{2d}{s7constituent[2] := 1/21*t-2/21}{%
\[
{\it s7constituent}_{{2}}\, := \,1/21\,t-2/21
\]
}
\mapleinline{inert}{2d}{0}{%
\[
0
\]
}
\mapleinline{inert}{2d}{s7constituent[3] := 1/21*t-1/7}{%
\[
{\it s7constituent}_{{3}}\, := \,1/21\,t-1/7
\]
}
\mapleinline{inert}{2d}{0}{%
\[
0
\]
}
\mapleinline{inert}{2d}{s7constituent[4] := 1/21*t-4/21}{%
\[
{\it s7constituent}_{{4}}\, := \,1/21\,t-{\frac {4}{21}}
\]
}
\mapleinline{inert}{2d}{0}{%
\[
0
\]
}
\mapleinline{inert}{2d}{s7constituent[5] := 1/21*t-5/21}{%
\[
{\it s7constituent}_{{5}}\, := \,1/21\,t-{\frac {5}{21}}
\]
}
\mapleinline{inert}{2d}{0}{%
\[
0
\]
}
\mapleinline{inert}{2d}{s7constituent[6] := 1/21*t-2/7}{%
\[
{\it s7constituent}_{{6}}\, := \,1/21\,t-2/7
\]
}
\mapleinline{inert}{2d}{0}{%
\[
0
\]
}
\mapleinline{inert}{2d}{s7constituent[7] := 1/21*t-1/3}{%
\[
{\it s7constituent}_{{7}}\, := \,1/21\,t-1/3
\]
}
\mapleinline{inert}{2d}{0}{%
\[
0
\]
}
\mapleinline{inert}{2d}{s7constituent[8] := 1/21*t-8/21}{%
\[
{\it s7constituent}_{{8}}\, := \,1/21\,t-{\frac {8}{21}}
\]
}
\mapleinline{inert}{2d}{0}{%
\[
0
\]
}
\mapleinline{inert}{2d}{s7constituent[9] := 1/21*t-3/7}{%
\[
{\it s7constituent}_{{9}}\, := \,1/21\,t-3/7
\]
}
\mapleinline{inert}{2d}{0}{%
\[
0
\]
}
\mapleinline{inert}{2d}{s7constituent[10] := 11/21+1/21*t}{%
\[
{\it s7constituent}_{{10}}\, := \,{\frac {11}{21}}+1/21\,t
\]
}
\mapleinline{inert}{2d}{1}{%
\[
1
\]
}
\mapleinline{inert}{2d}{s7constituent[11] := 1/21*t-11/21}{%
\[
{\it s7constituent}_{{11}}\, := \,1/21\,t-{\frac {11}{21}}
\]
}
\mapleinline{inert}{2d}{0}{%
\[
0
\]
}
\mapleinline{inert}{2d}{s7constituent[12] := 1/21*t-4/7}{%
\[
{\it s7constituent}_{{12}}\, := \,1/21\,t-4/7
\]
}
\mapleinline{inert}{2d}{0}{%
\[
0
\]
}
\mapleinline{inert}{2d}{s7constituent[13] := 8/21+1/21*t}{%
\[
{\it s7constituent}_{{13}}\, := \,{\frac {8}{21}}+1/21\,t
\]
}
\mapleinline{inert}{2d}{1}{%
\[
1
\]
}
\mapleinline{inert}{2d}{s7constituent[14] := 1/21*t-2/3}{%
\[
{\it s7constituent}_{{14}}\, := \,1/21\,t-2/3
\]
}
\mapleinline{inert}{2d}{0}{%
\[
0
\]
}
\mapleinline{inert}{2d}{s7constituent[15] := 1/21*t-5/7}{%
\[
{\it s7constituent}_{{15}}\, := \,1/21\,t-5/7
\]
}

\end{maplelatex}

\mapleresult
\begin{maplelatex}
\mapleinline{inert}{2d}{0}{%
\[
0
\]
}
\mapleinline{inert}{2d}{s7constituent[16] := 5/21+1/21*t}{%
\[
{\it s7constituent}_{{16}}\, := \,{\frac {5}{21}}+1/21\,t
\]
}
\mapleinline{inert}{2d}{1}{%
\[
1
\]
}
\mapleinline{inert}{2d}{s7constituent[17] := 4/21+1/21*t}{%
\[
{\it s7constituent}_{{17}}\, := \,{\frac {4}{21}}+1/21\,t
\]
}
\mapleinline{inert}{2d}{1}{%
\[
1
\]
}
\mapleinline{inert}{2d}{s7constituent[18] := 1/21*t-6/7}{%
\[
{\it s7constituent}_{{18}}\, := \,1/21\,t-6/7
\]
}
\mapleinline{inert}{2d}{0}{%
\[
0
\]
}
\mapleinline{inert}{2d}{s7constituent[19] := 2/21+1/21*t}{%
\[
{\it s7constituent}_{{19}}\, := \,2/21+1/21\,t
\]
}
\mapleinline{inert}{2d}{1}{%
\[
1
\]
}
\mapleinline{inert}{2d}{s7constituent[20] := 1/21+1/21*t}{%
\[
{\it s7constituent}_{{20}}\, := \,1/21+1/21\,t
\]
}
\mapleinline{inert}{2d}{1}{%
\[
1
\]
}
\mapleinline{inert}{2d}{s7constituent[21] := -1+1/21*t}{%
\[
{\it s7constituent}_{{21}}\, := \,-1+1/21\,t
\]
}
\mapleinline{inert}{2d}{0}{%
\[
0
\]
}

\end{maplelatex}
A better form for this is (t-t')/21+c where t' := least  residue of t mod p7=21 (thus, 0' = 21), and c depends on t'. \begin{mapleinput}
\mapleinline{active}{1d}{for r from 1 to p7  do
  print( r, s7constituent[r]-(t-r)/21 );
od;}{}
\end{mapleinput}
\mapleresult
\begin{maplelatex}
\mapleinline{inert}{2d}{1, 0}{%
\[
1,\,0
\]
}
\mapleinline{inert}{2d}{2, 0}{%
\[
2,\,0
\]
}
\mapleinline{inert}{2d}{3, 0}{%
\[
3,\,0
\]
}
\mapleinline{inert}{2d}{4, 0}{%
\[
4,\,0
\]
}
\mapleinline{inert}{2d}{5, 0}{%
\[
5,\,0
\]
}
\mapleinline{inert}{2d}{6, 0}{%
\[
6,\,0
\]
}
\mapleinline{inert}{2d}{7, 0}{%
\[
7,\,0
\]
}
\mapleinline{inert}{2d}{8, 0}{%
\[
8,\,0
\]
}
\mapleinline{inert}{2d}{9, 0}{%
\[
9,\,0
\]
}
\mapleinline{inert}{2d}{10, 1}{%
\[
10,\,1
\]
}
\mapleinline{inert}{2d}{11, 0}{%
\[
11,\,0
\]
}
\mapleinline{inert}{2d}{12, 0}{%
\[
12,\,0
\]
}
\mapleinline{inert}{2d}{13, 1}{%
\[
13,\,1
\]
}
\mapleinline{inert}{2d}{14, 0}{%
\[
14,\,0
\]
}
\mapleinline{inert}{2d}{15, 0}{%
\[
15,\,0
\]
}
\mapleinline{inert}{2d}{16, 1}{%
\[
16,\,1
\]
}
\mapleinline{inert}{2d}{17, 1}{%
\[
17,\,1
\]
}
\mapleinline{inert}{2d}{18, 0}{%
\[
18,\,0
\]
}
\mapleinline{inert}{2d}{19, 1}{%
\[
19,\,1
\]
}
\mapleinline{inert}{2d}{20, 1}{%
\[
20,\,1
\]
}
\mapleinline{inert}{2d}{21, 0}{%
\[
21,\,0
\]
}

\end{maplelatex}
Extract the coefficients of the constituents.\begin{mapleinput}
\mapleinline{active}{1d}{for r from 1 to p7  do
 for coeffdeg from 0 to d7+1 do 
  s7c[coeffdeg,r]:=coeff(s7constituent[r],t,coeffdeg):
  #print( r, coeffdeg, s7c[coeffdeg,r] ):
 od:
od: }{}
\end{mapleinput}Next, the constant terms, whose period is expected to be p7=21.  Print all constant terms up to the presumed period "stepsize".  Print the difference (at step "stepsize") if they are not repeating.\begin{mapleinput}
\mapleinline{active}{1d}{stepsize:=21; 
for r from 1 to stepsize do
  print(r, s7c[0,r]); 
od: 
for r from stepsize+1 to p7  do 
  stepdifference:=s7c[0,r]-s7c[0,r-stepsize]:
  if( stepdifference<\TEXTsymbol{>}0 ) then print(r,s7c[0,r],stepdifference): fi:
od:
print("Constant terms completed."); }{}
\end{mapleinput}
\mapleresult
\begin{maplelatex}
\mapleinline{inert}{2d}{stepsize := 21}{%
\[
{\it stepsize}\, := \,21
\]
}
\mapleinline{inert}{2d}{1, (-1)/21}{%
\[
1,\,-1/21
\]
}
\mapleinline{inert}{2d}{2, (-2)/21}{%
\[
2,\,-2/21
\]
}
\mapleinline{inert}{2d}{3, (-1)/7}{%
\[
3,\,-1/7
\]
}
\mapleinline{inert}{2d}{4, (-4)/21}{%
\[
4,\,-{\frac {4}{21}}
\]
}
\mapleinline{inert}{2d}{5, (-5)/21}{%
\[
5,\,-{\frac {5}{21}}
\]
}
\mapleinline{inert}{2d}{6, (-2)/7}{%
\[
6,\,-2/7
\]
}
\mapleinline{inert}{2d}{7, (-1)/3}{%
\[
7,\,-1/3
\]
}
\mapleinline{inert}{2d}{8, (-8)/21}{%
\[
8,\,-{\frac {8}{21}}
\]
}
\mapleinline{inert}{2d}{9, (-3)/7}{%
\[
9,\,-3/7
\]
}
\mapleinline{inert}{2d}{10, 11/21}{%
\[
10,\,{\frac {11}{21}}
\]
}
\mapleinline{inert}{2d}{11, (-11)/21}{%
\[
11,\,-{\frac {11}{21}}
\]
}
\mapleinline{inert}{2d}{12, (-4)/7}{%
\[
12,\,-4/7
\]
}
\mapleinline{inert}{2d}{13, 8/21}{%
\[
13,\,{\frac {8}{21}}
\]
}
\mapleinline{inert}{2d}{14, (-2)/3}{%
\[
14,\,-2/3
\]
}
\mapleinline{inert}{2d}{15, (-5)/7}{%
\[
15,\,-5/7
\]
}
\mapleinline{inert}{2d}{16, 5/21}{%
\[
16,\,{\frac {5}{21}}
\]
}
\mapleinline{inert}{2d}{17, 4/21}{%
\[
17,\,{\frac {4}{21}}
\]
}
\mapleinline{inert}{2d}{18, (-6)/7}{%
\[
18,\,-6/7
\]
}
\mapleinline{inert}{2d}{19, 2/21}{%
\[
19,\,2/21
\]
}
\mapleinline{inert}{2d}{20, 1/21}{%
\[
20,\,1/21
\]
}
\mapleinline{inert}{2d}{21, -1}{%
\[
21,\,-1
\]
}
\mapleinline{inert}{2d}{"Constant terms completed."}{%
$\mbox {{\tt ``Constant terms completed.''}}$}

\end{maplelatex}
\begin{mapleinput}
\mapleinline{active}{1d}{}{}
\end{mapleinput}\end{document}
%% End of Maple 9.00 Output