#############################################################################
##
#F                             CHEVIE library
##
#Y  Copyright 1992--1993,  Lehrstuhl D f"ur Mathematik,    RWTH Aachen,   and
#Y                         IWR   der   Universit"at    Heidelberg,   Germany.
##
#############################################################################
#                                                                           #
#   Die Greenfunktionen der GL_7(q)                                         #
#                                                                           #
#############################################################################
##
#A {\sc }, 
#A 
##
lprint(`**********************************************************************\
****`);
lprint(`*                                                                     \
   *`);
lprint(`*                                                                     \
   *`);
lprint(`*                    Green Functions of GL_7(q)                       \
   *`);
lprint(`*                                                                     \
   *`);
lprint(`*                                                                     \
   *`);
lprint(`**********************************************************************\
****`);

GL7green:=array(-2..15, -1..
15   , [
[ `GL_{7}(q)`,   A6002green   ,   (q-1)^7*(q^6+q^5+q^4+q^3+q^2+q+1)*q^21*(q+1)^
3*(q^2+q+1)^2*(q^2-q+1)*(q^4+q^3+q^2+q+1)*(q^2+1)   ,   15   ,   15   ,   15   
,   15   ],
[``, [
], [   [[1,1,1,1,1,1,1]]
], [   [[2,1,1,1,1,1]]
], [   [[2,2,1,1,1]]
], [   [[2,2,2,1]]
], [   [[3,1,1,1,1]]
], [   [[3,2,1,1]]
], [   [[3,2,2]]
], [   [[3,3,1]]
], [   [[4,1,1,1]]
], [   [[4,2,1]]
], [   [[4,3]]
], [   [[5,1,1]]
], [   [[5,2]]
], [   [[6,1]]
], [   [[7]]
] ],
[``, 1
,   1
,   (q-1)*(q^6+q^5+q^4+q^3+q^2+q+1)*(q+1)*(q^2+q+1)*(q^2-q+1)
,   (q-1)^2*(q^6+q^5+q^4+q^3+q^2+q+1)*q*(q+1)*(q^2+q+1)*(q^2-q+1)*(q^4+q^3+q^2+
q+1)*(q^2+1)
,   (q-1)^3*(q^6+q^5+q^4+q^3+q^2+q+1)*q^3*(q+1)^2*(q^2+q+1)*(q^2-q+1)*(q^4+q^3+
q^2+q+1)*(q^2+1)
,   (q-1)^2*(q^6+q^5+q^4+q^3+q^2+q+1)*q^5*(q+1)*(q^2+q+1)*(q^2-q+1)*(q^4+q^3+q^
2+q+1)
,   (q-1)^3*(q^6+q^5+q^4+q^3+q^2+q+1)*q^5*(q+1)^2*(q^2+q+1)^2*(q^2-q+1)*(q^4+q^
3+q^2+q+1)*(q^2+1)
,   (q-1)^4*(q^6+q^5+q^4+q^3+q^2+q+1)*q^6*(q+1)^2*(q^2+q+1)^2*(q^2-q+1)*(q^4+q^
3+q^2+q+1)*(q^2+1)
,   (q-1)^4*(q^6+q^5+q^4+q^3+q^2+q+1)*q^8*(q+1)^2*(q^2+q+1)^2*(q^2-q+1)*(q^4+q^
3+q^2+q+1)*(q^2+1)
,   (q-1)^3*(q^6+q^5+q^4+q^3+q^2+q+1)*q^9*(q+1)^2*(q^2+q+1)*(q^2-q+1)*(q^4+q^3+
q^2+q+1)*(q^2+1)
,   (q-1)^4*(q^6+q^5+q^4+q^3+q^2+q+1)*q^9*(q+1)^3*(q^2+q+1)^2*(q^2-q+1)*(q^4+q^
3+q^2+q+1)*(q^2+1)
,   (q-1)^5*(q^6+q^5+q^4+q^3+q^2+q+1)*q^10*(q+1)^3*(q^2+q+1)^2*(q^2-q+1)*(q^4+q
^3+q^2+q+1)*(q^2+1)
,   (q-1)^4*(q^6+q^5+q^4+q^3+q^2+q+1)*q^12*(q+1)^2*(q^2+q+1)^2*(q^2-q+1)*(q^4+q
^3+q^2+q+1)*(q^2+1)
,   (q-1)^5*(q^6+q^5+q^4+q^3+q^2+q+1)*q^12*(q+1)^3*(q^2+q+1)^2*(q^2-q+1)*(q^4+q
^3+q^2+q+1)*(q^2+1)
,   (q-1)^5*(q^6+q^5+q^4+q^3+q^2+q+1)*q^14*(q+1)^3*(q^2+q+1)^2*(q^2-q+1)*(q^4+q
^3+q^2+q+1)*(q^2+1)
,   (q-1)^6*(q^6+q^5+q^4+q^3+q^2+q+1)*q^15*(q+1)^3*(q^2+q+1)^2*(q^2-q+1)*(q^4+q
^3+q^2+q+1)*(q^2+1)
]
,[   [[1,1,1,1,1,1,1]]   ,   (q^2-q+1)*(q^4+q^3+q^2+q+1)*(q^6+q^5+q^4+q^3+q^2+q
+1)*(q^2+1)*(q^2+q+1)^2*(q+1)^3
,   (q^2-q+1)*(q^4+q^3+q^2+q+1)*(q^6+q^5+q^4+q^3+q^2+q+1)*(q^2+1)*(q^2+q+1)^2*(
q+1)^3
,   (q^2+q+1)*(q^4+q^3+q^2+q+1)*(6*q^5+5*q^4+4*q^3+3*q^2+2*q+1)*(q^2+1)*(q+1)^2
,   (q^2+q+1)*(14*q^7+22*q^6+24*q^5+21*q^4+13*q^3+7*q^2+3*q+1)*(q+1)^2
,   (q+1)*(q^2+q+1)*(14*q^6+28*q^5+28*q^4+20*q^3+10*q^2+4*q+1)
,   (q^2+1)*(15*q^4+10*q^3+6*q^2+3*q+1)*(q^2+q+1)*(q+1)^2
,   (q+1)*(35*q^6+62*q^5+58*q^4+34*q^3+15*q^2+5*q+1)
,   (q+1)*(21*q^5+35*q^4+28*q^3+15*q^2+5*q+1)
,   (q+1)*(21*q^4+28*q^3+15*q^2+5*q+1)
,   (q+1)*(q^2+q+1)*(20*q^3+10*q^2+4*q+1)
,   35*q^4+43*q^3+20*q^2+6*q+1
,   14*q^3+14*q^2+6*q+1
,   (q+1)*(15*q^2+5*q+1)
,   14*q^2+6*q+1
,   6*q+1
,   1
]
,[   [[2,1,1,1,1,1]]   ,   -(q-1)*(q^2-q+1)*(q^4+q^3+q^2+q+1)*(q^6+q^5+q^4+q^3+
q^2+q+1)*(q^2+1)*(q+1)^2*(q^2+q+1)^2
,   -(q-1)*(q^2-q+1)*(q^4+q^3+q^2+q+1)*(q^6+q^5+q^4+q^3+q^2+q+1)*(q^2+1)*(q+1)^
2*(q^2+q+1)^2
,   -(q+1)*(q^2+1)*(q^4+q^3+q^2+q+1)*(4*q^6-q^5-q^4-q^3-q^2-q-1)*(q^2+q+1)
,   -(q+1)*(q^2+q+1)*(6*q^8+2*q^7-2*q^6-5*q^5-8*q^4-6*q^3-4*q^2-2*q-1)
,   -(q+1)*(q^2+q+1)*(4*q^6-2*q^5-4*q^4-6*q^3-4*q^2-2*q-1)
,   -(q+1)*(q^2+1)*(q^2+q+1)*(5*q^5-5*q^4-4*q^3-3*q^2-2*q-1)
,   -5*q^7+20*q^5+5*q^6+26*q^4+19*q^3+10*q^2+4*q+1
,   -(q+1)*(q^5-7*q^4-8*q^3-7*q^2-3*q-1)
,   (q+1)*(q^4+8*q^3+7*q^2+3*q+1)
,   (q^2+q+1)*(10*q^3+6*q^2+3*q+1)
,   5*q^4+15*q^3+10*q^2+4*q+1
,   (2*q+1)*(2*q^2+2*q+1)
,   5*q^3+10*q^2+4*q+1
,   6*q^2+4*q+1
,   4*q+1
,   1
]
,[   [[2,2,1,1,1]]   ,   (q+1)*(q^2-q+1)*(q^4+q^3+q^2+q+1)*(q^6+q^5+q^4+q^3+q^2
+q+1)*(q^2+1)*(q-1)^2*(q^2+q+1)^2
,   (q+1)*(q^2-q+1)*(q^4+q^3+q^2+q+1)*(q^6+q^5+q^4+q^3+q^2+q+1)*(q^2+1)*(q-1)^2
*(q^2+q+1)^2
,   (q-1)*(q^2+1)*(q^4+q^3+q^2+q+1)*(2*q^6-q^5-q^4-q^3-q^2-q-1)*(q^2+q+1)
,   (q+1)*(q^2+q+1)*(2*q^8-4*q^7+2*q^6-3*q^5+2*q^4+2*q^2+1)
,   (2*q^7-2*q^6+2*q^3+2*q^2+q+1)*(q^2+q+1)
,   -(q-1)*(q^2+1)*(q^2+q+1)*(q^5+5*q^4+4*q^3+3*q^2+2*q+1)
,   -(q+1)*(q^6+2*q^5-2*q^4-2*q^3-3*q^2-q-1)
,   q^6+3*q^4+3*q^3+4*q^2+2*q+1
,   (q+1)*(q^4+3*q^2+q+1)
,   -(q^2+q+1)*(4*q^4-2*q^3-2*q^2-q-1)
,   -q^4+3*q^3+4*q^2+2*q+1
,   2*q^3+2*q^2+2*q+1
,   -q^3+4*q^2+2*q+1
,   2*q^2+2*q+1
,   2*q+1
,   1
]
,[   [[2,2,2,1]]   ,   -(q^2-q+1)*(q^4+q^3+q^2+q+1)*(q^6+q^5+q^4+q^3+q^2+q+1)*(
q^2+1)*(q^2+q+1)^2*(q-1)^3
,   -(q^2-q+1)*(q^4+q^3+q^2+q+1)*(q^6+q^5+q^4+q^3+q^2+q+1)*(q^2+1)*(q^2+q+1)^2*
(q-1)^3
,   (q^2-q+1)*(q^4+q^3+q^2+q+1)*(q^2+1)*(q-1)^2*(q^2+q+1)^2
,   -(q-1)*(2*q^8-2*q^7+2*q^6-q^5+2*q^4+2*q^2+1)*(q^2+q+1)
,   (q^2+q+1)*(2*q^6-2*q^5+2*q^4-2*q^3+2*q^2-q+1)
,   (q^2+q+1)*(3*q^4+2*q^3+2*q^2+q+1)*(q^2+1)*(q-1)^2
,   -(q-1)*(q^6+4*q^4+2*q^3+3*q^2+q+1)
,   3*q^6-2*q^5+3*q^4-q^3+2*q^2+1
,   -(q-1)*(3*q^4+2*q^3+3*q^2+q+1)
,   -(q-1)*(q^2+q+1)*(2*q^2+1)
,   q^4-q^3+2*q^2+1
,   2*q^2+1
,   -(q-1)*(3*q^2+q+1)
,   2*q^2+1
,   1
,   1
]
,[   [[3,1,1,1,1]]   ,   (q^2-q+1)*(q^2+q+1)*(q^2+1)*(q^4+q^3+q^2+q+1)*(q^6+q^5
+q^4+q^3+q^2+q+1)*(q-1)^2*(q+1)^3
,   (q^2-q+1)*(q^2+q+1)*(q^2+1)*(q^4+q^3+q^2+q+1)*(q^6+q^5+q^4+q^3+q^2+q+1)*(q-
1)^2*(q+1)^3
,   (q-1)*(q^2+1)*(q^4+q^3+q^2+q+1)*(3*q^6-q^5-q^4-q^3-q^2-q-1)*(q+1)^2
,   (q-1)*(2*q^7-3*q^6-q^5-5*q^4-3*q^3-3*q^2-q-1)*(q+1)^3
,   -(q-1)*(q+1)*(q^2+q+1)*(q^5+3*q^4+5*q^3+3*q^2+2*q+1)
,   (3*q^6-5*q^5+q^4+q^3+q^2+q+1)*(q^2+1)*(q+1)^2
,   -(q+1)*(q^6+4*q^5-q^4-4*q^3-3*q^2-2*q-1)
,   -(q+1)*(3*q^5+q^4-q^3-3*q^2-2*q-1)
,   -(q+1)*(3*q^4-q^3-3*q^2-2*q-1)
,   (q+1)*(2*q^5+4*q^3+3*q^2+2*q+1)
,   -q^4+4*q^3+5*q^2+3*q+1
,   -q^3+2*q^2+3*q+1
,   (q+1)*(3*q^2+2*q+1)
,   (q+1)*(2*q+1)
,   3*q+1
,   1
]
,[   [[3,2,1,1]]   ,   -(q^2-q+1)*(q^2+q+1)*(q^2+1)*(q^4+q^3+q^2+q+1)*(q^6+q^5+
q^4+q^3+q^2+q+1)*(q+1)^2*(q-1)^3
,   -(q^2-q+1)*(q^2+q+1)*(q^2+1)*(q^4+q^3+q^2+q+1)*(q^6+q^5+q^4+q^3+q^2+q+1)*(q
+1)^2*(q-1)^3
,   -(q+1)*(q^2+1)*(q^4+q^3+q^2+q+1)*(q^6-q^5-q^4-q^3-q^2-q-1)*(q-1)^2
,   (q-1)*(q+1)*(q^2+1)*(q^3+q^2+1)*(q^3-q-1)
,   -(q-1)*(q+1)*(q^2+q+1)*(q^5-q^4+q^3+q^2+1)
,   (q-1)*(q+1)*(q^2+1)*(q^3+q^2+1)*(q^3-q-1)
,   q^7-q^5-q^6-q^4+q^3+q^2+q+1
,   -(q+1)*(q^5-q^4+q^3-q^2-1)
,   (q+1)*(q^4-q^3+q^2+1)
,   -(q-1)*(2*q^2+1)*(q+1)^2
,   -(q+1)*(q^3-q^2-1)
,   q^3+q+1
,   -q^3+q^2+q+1
,   q+1
,   q+1
,   1
]
,[   [[3,2,2]]   ,   (q+1)*(q^2+q+1)*(q^2-q+1)*(q^2+1)*(q^4+q^3+q^2+q+1)*(q^6+q
^5+q^4+q^3+q^2+q+1)*(q-1)^4
,   (q+1)*(q^2+q+1)*(q^2-q+1)*(q^2+1)*(q^4+q^3+q^2+q+1)*(q^6+q^5+q^4+q^3+q^2+q+
1)*(q-1)^4
,   -(q^2+1)*(q^4+q^3+q^2+q+1)*(q^6+q^5+q^4+q^3+q^2+q+1)*(q-1)^3
,   (q+1)*(2*q^8-q^7+2*q^6+2*q^4+2*q^2+1)*(q-1)^2
,   -(q-1)*(q^2+q+1)*(q^6+q^2-q+1)
,   -(q^2+1)*(q^3+q^2+1)*(q^3-q-1)*(q-1)^2
,   -(q-1)*(q^6-2*q^5+q^4+q^2+1)
,   q^6+q^2-q+1
,   (q-1)*(q+1)*(q^3-2*q^2+q-1)
,   (2*q^4+2*q^3+2*q^2+q+1)*(q-1)^2
,   -(q-1)*(q^3+q^2+1)
,   -q^3+2*q^2-q+1
,   -(q-1)*(q^2+1)
,   2*q^2-q+1
,   1-q
,   1
]
,[   [[3,3,1]]   ,   (q^2-q+1)*(q^4+q^3+q^2+q+1)*(q^6+q^5+q^4+q^3+q^2+q+1)*(q^2
+1)*(q+1)^3*(q-1)^4
,   (q^2-q+1)*(q^4+q^3+q^2+q+1)*(q^6+q^5+q^4+q^3+q^2+q+1)*(q^2+1)*(q+1)^3*(q-1)
^4
,   -(q^2-q+1)*(q^4+q^3+q^2+q+1)*(q^2+1)*(q-1)^3*(q+1)^3
,   -(q^2-q+1)*(q^5-q^3-q^2-q-1)*(q-1)^2*(q+1)^2
,   (q+1)*(2*q^6+q^5+q^4+2*q^3+q^2+q+1)*(q-1)^2
,   (q^2-q+1)*(q^2+1)*(q-1)^2*(q+1)^3
,   -(q-1)*(q+1)*(q^2+1)*(q^3-q^2+1)
,   -(q-1)*(q^2-q+1)*(q+1)^2
,   (q+1)*(q^3-q+1)
,   (q+1)*(2*q^3+q^2+q+1)*(q-1)^2
,   -(q-1)*(q^3+q+1)
,   2*q^3-q^2+1
,   -(q-1)*(q+1)
,   -(q-1)*(q+1)
,   1
,   1
]
,[   [[4,1,1,1]]   ,   -(q^2-q+1)*(q^4+q^3+q^2+q+1)*(q^6+q^5+q^4+q^3+q^2+q+1)*(
q+1)^2*(q^2+q+1)^2*(q-1)^3
,   -(q^2-q+1)*(q^4+q^3+q^2+q+1)*(q^6+q^5+q^4+q^3+q^2+q+1)*(q+1)^2*(q^2+q+1)^2*
(q-1)^3
,   -(q+1)*(q^4+q^3+q^2+q+1)*(2*q^6-q^5-q^4-q^3-q^2-q-1)*(q^2+q+1)*(q-1)^2
,   (q-1)*(q+1)*(q^2+q+1)*(2*q^6+2*q^5-q^4-q^3-q^2-q-1)
,   (q-1)*(q^2+q+1)*(2*q^6+2*q^5-2*q^3-2*q^2-2*q-1)
,   -(q-1)*(q+1)*(q^6-2*q^5+q^4+q^3+q^2+q+1)*(q^2+q+1)
,   (q-1)*(q+1)*(q^5-q^4-3*q^3-3*q^2-2*q-1)
,   (q-1)*(q^5-q^4-4*q^3-5*q^2-3*q-1)
,   -(q-1)*(q+1)*(q^3+3*q^2+2*q+1)
,   (q+1)*(q^2+q+1)
,   -q^4-q^3+2*q^2+2*q+1
,   -2*q^3+2*q+1
,   (q+1)*(q^2+q+1)
,   2*q+1
,   2*q+1
,   1
]
,[   [[4,2,1]]   ,   (q+1)*(q^2-q+1)*(q^4+q^3+q^2+q+1)*(q^6+q^5+q^4+q^3+q^2+q+1
)*(q^2+q+1)^2*(q-1)^4
,   (q+1)*(q^2-q+1)*(q^4+q^3+q^2+q+1)*(q^6+q^5+q^4+q^3+q^2+q+1)*(q^2+q+1)^2*(q-
1)^4
,   -(q+1)*(q^2-q+1)*(q^4+q^3+q^2+q+1)*(q^2+q+1)^2*(q-1)^3
,   (q^2+q+1)*(q^4+q^3+q^2+q+1)*(q-1)^2
,   -(q-1)*(q^2+q+1)
,   -(q+1)*(q^5-q^4-q^2-1)*(q^2+q+1)*(q-1)^2
,   (q-1)*(q+1)*(q^5-q^4+q^3-q^2-1)
,   -(q-1)*(q^5+q^4+q^2+q+1)
,   -(q-1)*(q^4+q^2+q+1)
,   -(q-1)*(q^2+q+1)
,   q^4-q^3+1
,   1
,   -(q-1)*(q^2+q+1)
,   1
,   1
,   1
]
,[   [[4,3]]   ,   -(q^2-q+1)*(q^2+q+1)*(q^4+q^3+q^2+q+1)*(q^6+q^5+q^4+q^3+q^2+
q+1)*(q+1)^2*(q-1)^5
,   -(q^2-q+1)*(q^2+q+1)*(q^4+q^3+q^2+q+1)*(q^6+q^5+q^4+q^3+q^2+q+1)*(q+1)^2*(q
-1)^5
,   (q+1)*(q^4+q^3+q^2+q+1)*(q^6+q^5+q^4+q^3+q^2+q+1)*(q-1)^4
,   -(q+1)*(q^6+q^5+q^4+q^3+q^2+q+1)*(q-1)^3
,   -(q^2+q+1)*(q^5-q^4-q^3+q^2-1)*(q-1)^2
,   -(q+1)*(q^6+q^5+q^4+q^3+q^2+q+1)*(q-1)^3
,   (q+1)*(q^4+1)*(q-1)^2
,   (q-1)*(q^5-q^4-q^3+q^2-1)
,   -(q-1)*(q+1)*(q^3-q+1)
,   (q+1)*(q-1)^2
,   -(q-1)*(q^3-q^2+1)
,   q^3-q+1
,   (q+1)*(q-1)^2
,   1-q
,   1-q
,   1
]
,[   [[5,1,1]]   ,   (q^2-q+1)*(q^6+q^5+q^4+q^3+q^2+q+1)*(q^2+1)*(q^2+q+1)^2*(q
+1)^3*(q-1)^4
,   (q^2-q+1)*(q^6+q^5+q^4+q^3+q^2+q+1)*(q^2+1)*(q^2+q+1)^2*(q+1)^3*(q-1)^4
,   (q^2+1)*(q^2+q+1)*(q^6-q^5-q^4-q^3-q^2-q-1)*(q+1)^2*(q-1)^3
,   -(q^2+q+1)*(q^5-q^2-1)*(q-1)^2*(q+1)^2
,   -(q+1)*(q^2+q+1)*(q^4-q^3-q^2-q-1)*(q-1)^2
,   (q^2+1)*(q^2+q+1)*(q-1)^2*(q+1)^2
,   (q-1)*(q+1)*(2*q^4-q^2-q-1)
,   (q-1)*(q+1)*(q^4+q^3-q^2-q-1)
,   (q-1)*(q+1)*(q^3-q^2-q-1)
,   -(q-1)*(q+1)*(q^2+q+1)
,   -(q-1)*(2*q^2+2*q+1)
,   -(q-1)*(q+1)^2
,   q+1
,   -q^2+q+1
,   q+1
,   1
]
,[   [[5,2]]   ,   -(q^2-q+1)*(q^6+q^5+q^4+q^3+q^2+q+1)*(q^2+1)*(q+1)^2*(q^2+q+
1)^2*(q-1)^5
,   -(q^2-q+1)*(q^6+q^5+q^4+q^3+q^2+q+1)*(q^2+1)*(q+1)^2*(q^2+q+1)^2*(q-1)^5
,   (q+1)*(q^2+q+1)*(q^6+q^5+q^4+q^3+q^2+q+1)*(q^2+1)*(q-1)^4
,   -(q+1)*(q^2+q+1)*(q^5+q^2+1)*(q-1)^3
,   (q+1)*(q^2+q+1)*(q^4-q^3+q^2-q+1)*(q-1)^2
,   -(q+1)*(q^2+1)*(q^2+q+1)*(q-1)^3
,   (q^2+q+1)*(q-1)^2
,   -(q-1)*(q+1)*(q^4-q^3+q^2-q+1)
,   (q+1)*(q^2+1)*(q-1)^2
,   (q^2+q+1)*(q-1)^2
,   1-q
,   -(q-1)*(q^2+1)
,   1-q
,   q^2-q+1
,   1-q
,   1
]
,[   [[6,1]]   ,   -(q^2+q+1)*(q^4+q^3+q^2+q+1)*(q^6+q^5+q^4+q^3+q^2+q+1)*(q^2+
1)*(q+1)^2*(q-1)^5
,   -(q^2+q+1)*(q^4+q^3+q^2+q+1)*(q^6+q^5+q^4+q^3+q^2+q+1)*(q^2+1)*(q+1)^2*(q-1
)^5
,   (q^2+q+1)*(q^4+q^3+q^2+q+1)*(q^2+1)*(q+1)^2*(q-1)^4
,   (q+1)*(q^2+q+1)*(q^5-q^3-q^2-q-1)*(q-1)^3
,   -(q+1)*(q^5+q^4-q^2-q-1)*(q-1)^2
,   -(q^2+1)*(q^2+q+1)*(q+1)^2*(q-1)^3
,   -(q^3-q^2-1)*(q-1)^2*(q+1)^2
,   (q+1)*(q^2+q+1)*(q-1)^2
,   (q-1)*(q^3-q-1)
,   (q+1)*(q^2+q+1)*(q-1)^2
,   (q-1)*(q^3-q-1)
,   -(q-1)*(q+1)
,   -(q-1)*(q+1)
,   -(q-1)*(q+1)
,   1
,   1
]
,[   [[7]]   ,   (q^2-q+1)*(q^4+q^3+q^2+q+1)*(q^2+1)*(q^2+q+1)^2*(q+1)^3*(q-1)^
6
,   (q^2-q+1)*(q^4+q^3+q^2+q+1)*(q^2+1)*(q^2+q+1)^2*(q+1)^3*(q-1)^6
,   -(q^2+q+1)*(q^4+q^3+q^2+q+1)*(q^2+1)*(q+1)^2*(q-1)^5
,   (q^2+1)*(q^2+q+1)*(q+1)^2*(q-1)^4
,   -(q+1)*(q^2+q+1)*(q-1)^3
,   (q^2+1)*(q^2+q+1)*(q+1)^2*(q-1)^4
,   -(q+1)*(q^2+q+1)*(q-1)^3
,   (q+1)*(q-1)^2
,   (q+1)*(q-1)^2
,   -(q+1)*(q^2+q+1)*(q-1)^3
,   (q+1)*(q-1)^2
,   1-q
,   (q+1)*(q-1)^2
,   1-q
,   1-q
,   1
]
]):

KlassentypOrdA6002green:=array(1..15,   [1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1
, 1, 1]   ):
NurPolynomA6002green:=true:
InformationA6002green:=TEXT(
`- Information about the tables of Green functions for GL_7(q).`,
``,
`- CHEVIE-name of the table: GL7green`,
``,
`- These Green functions were introduced in:`,
`  {\\sc J.~A.~Green}, The characters of the finite general linear`,
`  groups, {\\em Trans. Amer. Math. Soc.} {\\bf 80} (1955), 402--447.`,
``,
`- See also:`,
`  {\\sc R.~Steinberg}, The representations of $GL(3,q)$,  $GL(4,q)$, $PGL(3,q\
)$ `,
`  and $PGL(4,q)$, {\\em Can. J. of Math.} {\\bf 3} (1951), 225--235.`,
``,
`- This CHEVIE-table is computed by an algorithm from `,
`  the following article:`,
`  {\\sc A.~Lascoux and M.~P.~Sch{\\"u}tzenberger}, Sur une conjecture de `,
`  H.~O.~Foulkes, {\\em C. R. Acad. Sci. Paris} {\\bf 286A}  (1978), 323--324.\
`,
``,
`- The program which generates the files with the Green functions `,
`  of GL_n(q) and GU_n(q) is part of the CHEVIE-system. You `,
`  can reproduce them with the CHEVIE commands: `,
`  > GreenFunctionsA(n,filename);`,
`  > GreenFunctions2A(n,filename);`,
`  (see the corresponding help)`,
`  These programs are written by U. Porsch and F. Luebeck.`,
``):
g:=GL7green:
print(`g := ``GL7green`` `);
