#############################################################################
##
#F                             CHEVIE library
##
#Y  Copyright 1992--1993,  Lehrstuhl D f"ur Mathematik,    RWTH Aachen,   and
#Y                         IWR   der   Universit"at    Heidelberg,   Germany.
##
#T : Orthogonalitaetsrelationen o.k. uep 14.1.92
##############################################################
#
# Charaktertafel von 2F4(q), q^2 = 2^(2n+1);
#
# Die Konjugiertenklassen sind geordnet wie im paper von K. Shinoda,
# The conjugacy classes of the finite Ree groups of type F4, J.Fac.Sci. Univ.
# Tokyo 22 (1975),pp 1-15.
# The characters without name are numbered as in G. Malle: Die unipotenten
# Charaktere von 2F4(q^2); Comm. in Algebra, 18(7), 2361-2381 (1990)
#
###############################################################################
lprint(`**************************************************************************`);
lprint(`*                                                                        *`);
lprint(`*                                                                        *`);
lprint(`*                 Generic Character Table of Ree's group                 *`);
lprint(`*                                                                        *`);
lprint(`*                      ^2F_4(q), q^2 = 2^(2n+1)                          *`);
lprint(`*                                                                        *`);
lprint(`*       NOTE: The 10 character families corresponding to the             *`);
lprint(`*       semisimple elements t_7, t_9, t_12, t_13 are missing.            *`);
lprint(`*                                                                        *`);
lprint(`**************************************************************************`);

q:='q':   qQ:='qQ':   DELTA:='DELTA':
r2:='r2': EW3:='EW3': EW4:='EW4':


`Ree` := array(-2..41,-1..51,[
 [`^2F_4(q^2)`,`2F4002`,q^24*(q^12+1)*(q^8-1)*(q^6+1)*(q^2-1), 41, 41, 51, 51],

 [`classname`, [` `],
  [` `,[1,0],[`^2F_4`,`u_0`]],
  [` `,[1,1],[`^2F_4`,`u_1`]],
  [` `,[1,2],[`^2F_4`,`u_2`]],
  [` `,[1,3],[`^2F_4`,`u_3`]],
  [` `,[1,4],[`^2F_4`,`u_4`]],
  [` `,[1,5],[`^2F_4`,`u_5`]],
  [` `,[1,6],[`^2F_4`,`u_6`]],
  [` `,[1,7],[`^2F_4`,`u_7`]],
  [` `,[1,8],[`^2F_4`,`u_8`]],
  [` `,[1,9],[`^2F_4`,`u_9`]],
  [` `,[1,10],[`^2F_4`,`u_{10}`]],
  [` `,[1,11],[`^2F_4`,`u_{11}`]],
  [` `,[1,12],[`^2F_4`,`u_{12}`]],
  [` `,[1,13],[`^2F_4`,`u_{13}`]],
  [` `,[1,14],[`^2F_4`,`u_{14}`]],
  [` `,[1,15],[`^2F_4`,`u_{15}`]],
  [` `,[1,16],[`^2F_4`,`u_{16}`]],
  [` `,[1,17],[`^2F_4`,`u_{17}`]],
  [` `,[1,18],[`^2F_4`,`u_{18}`]],
  [` `,[2,0],[`^2B_2`,`u_0`],`t_1,1`],
  [` `,[2,1],[`^2B_2`,`u_1`],`t_1,u_1`],
  [` `,[2,2],[`^2B_2`,`u_2`],`t_1,u_2`],
  [` `,[2,3],[`^2B_2`,`u_3`],`t_1,u_3`],
  [` `,[3,0],[`A_1`,[2  ]],`t_2,1`],
  [` `,[3,1],[`A_1`,[1,1]],`t_2,u`],
  [` `,[4,0],[`A_0`,[1]],`t_3,1`],
  [` `,[5,0],[`^2A_2`,`u_0`],`t_4,1`],
  [` `,[5,1],[`^2A_2`,`u_1`],`t_4,u_1`],
  [` `,[5,2],[`^2A_2`,`u_2`],`t_4,u_2`],
  [` `,[5,3],[`^2A_2`,`u_3`],`t_4,u_3`],
  [` `,[5,4],[`^2A_2`,`u_4`],`t_4,u_4`],
  [` `,[6,0],[`A_1`,[2  ]],`t_5,1`],
  [` `,[6,1],[`A_1`,[1,1]],`t_5,u`],
  [` `,[7,0],[`A_0`,[1]],`t_6,1`],
  [` `,[8,0],[`^2B_2`,`u_0`],`t_7,1`],
  [` `,[8,1],[`^2B_2`,`u_1`],`t_7,u_1`],
  [` `,[8,2],[`^2B_2`,`u_2`],`t_7,u_2`],
  [` `,[8,3],[`^2B_2`,`u_3`],`t_7,u_3`],
  [` `,[9,0],[`A_0`,[1]],`t_8,1`],
  [` `,[10,0],[`^2B_2`,`u_0`],`t_9,1`],
  [` `,[10,1],[`^2B_2`,`u_1`],`t_9,u_1`],
  [` `,[10,2],[`^2B_2`,`u_2`],`t_9,u_2`],
  [` `,[10,3],[`^2B_2`,`u_3`],`t_9,u_3`],
  [` `,[11,0],[`A_0`,[1]],`t_{10},1`],
  [` `,[12,0],[`A_0`,[1]],`t_{11},1`],
  [` `,[13,0],[`A_0`,[1]],`t_{12},1`],
  [` `,[14,0],[`A_0`,[1]],`t_{13},1`],
  [` `,[15,0],[`A_0`,[1]],`t_{14},1`],
  [` `,[16,0],[`A_0`,[1]],`t_{15},1`],
  [` `,[17,0],[`A_0`,[1]],`t_{16},1`],
  [` `,[18,0],[`A_0`,[1]],`t_{17},1`]],

 [`classlength`, 1, 1, (q^4-q^2+1)*(q^4+1)*(q^8-q^4+1)*(q^2-1)*(q^2+1)^2,
  q^4*(q^2+1)*(q^4-q^2+1)*(q^8-q^4+1)*(q^2-1)*(q^4+1)^2, 1/2*q^10*(q^4-q^2+
  1)*(q^4+1)*(q^8-q^4+1)*(q^2-1)*(q^2+1)^2, 1/2*q^10*(q^4-q^2+1)*(q^
  4+1)*(q^8-q^4+1)*(q^2-1)*(q^2+1)^2, q^8*(q^4-q^2+1)*(q^8-q^4+1)*(q
  -1)^2*(q+1)^2*(q^2+1)^2*(q^4+1)^2, q^10*(q^4-q^2+1)*(q^8-q^4+1)*(q-1
  )^2*(q+1)^2*(q^2+1)^2*(q^4+1)^2, 1/6*q^12*(q^4-q^2+1)*(q^8-q^4+1)*(q
  -1)^2*(q+1)^2*(q^2+1)^2*(q^4+1)^2, 1/2*q^12*(q^4-q^2+1)*(q^8-q^4+1)*
  (q^2-1)^2*(q^2+1)^2*(q^4+1)^2, 1/3*q^12*(q^4-q^2+1)*(q^8-q^4+1
  )*(q^2-1)^2*(q^2+1)^2*(q^4+1)^2, 1/2*q^16*(q^4-q^2+1)*(q^8-q^4
  +1)*(q^2-1)^2*(q^2+1)^2*(q^4+1)^2, 1/4*q^16*(q^4-q^2+1)*(q^8-q
  ^4+1)*(q^2-1)^2*(q^2+1)^2*(q^4+1)^2, 1/4*q^16*(q^4-q^2+1)*(q^8
  -q^4+1)*(q^2-1)^2*(q^2+1)^2*(q^4+1)^2, 1/2*q^18*(q^4-q^2+1)*(q
  ^8-q^4+1)*(q^2-1)^2*(q^2+1)^2*(q^4+1)^2, 1/2*q^18*(q^4-q^2+1)*
  (q^8-q^4+1)*(q^2-1)^2*(q^2+1)^2*(q^4+1)^2, 1/4*q^20*(q^4-q^2+1
  )*(q^8-q^4+1)*(q^2-1)^2*(q^2+1)^2*(q^4+1)^2, 1/4*q^20*(q^4-q^2
  +1)*(q^8-q^4+1)*(q^2-1)^2*(q^2+1)^2*(q^4+1)^2, 1/4*q^20*(q^4-q
  ^2+1)*(q^8-q^4+1)*(q^2-1)^2*(q^2+1)^2*(q^4+1)^2, 1/4*q^20*(q^4
  -q^2+1)*(q^8-q^4+1)*(q^2-1)^2*(q^2+1)^2*(q^4+1)^2, q^20*(q^4-q
  ^2+1)*(q^4+1)*(q^8-q^4+1)*(q^2+1)^2, q^20*(q^4-q^2+1)*(q^8-q^4+1)*(q
  -1)*(q+1)*(q^2+1)^2*(q^4+1)^2, 1/2*q^22*(q^4-q^2+1)*(q^8-q^4+1)*(q-1)*
  (q+1)*(q^2+1)^2*(q^4+1)^2, 1/2*q^22*(q^4-q^2+1)*(q^8-q^4+1)*(q-1)*(q+1
  )*(q^2+1)^2*(q^4+1)^2, q^22*(q^2+1)*(q^4-q^2+1)*(q^8-q^4+1)*(q^4+1)
  ^2, q^22*(q^4-q^2+1)*(q^8-q^4+1)*(q^2-1)*(q^2+1)^2*(q^4+1)^2, q^
  24*(q^4-q^2+1)*(q^8-q^4+1)*(q^2+1)^2*(q^4+1)^2, q^18*(q^8-q^4+1)*(q-
  1)*(q+1)*(q^4+1)^2, q^18*(q^2+1)*(q^4-q^2+1)*(q^8-q^4+1)*(q-1)^2*(q+1)
  ^2*(q^4+1)^2, 1/3*q^20*(q^4-q^2+1)*(q^8-q^4+1)*(q^2-1)^2*(q^2+
  1)^2*(q^4+1)^2, 1/3*q^20*(q^4-q^2+1)*(q^8-q^4+1)*(q^2-1)^2*(q^
  2+1)^2*(q^4+1)^2, 1/3*q^20*(q^4-q^2+1)*(q^8-q^4+1)*(q^2-1)^2*(q
  ^2+1)^2*(q^4+1)^2, q^22*(q^4-q^2+1)*(q^8-q^4+1)*(q^2-1)*(q^4+1)^
  2, q^22*(q^2+1)*(q^4-q^2+1)*(q^8-q^4+1)*(q^2-1)^2*(q^4+1)^2, q
  ^24*(q^2+1)*(q^4-q^2+1)*(q^8-q^4+1)*(q^2-1)*(q^4+1)^2, q^20*(q^4-
  q^2+1)*(q^8-q^4+1)*(q^2-1)*(q^2+1)^2*(q^2+r2*q+1), q^20*(q^4-
  q^2+1)*(q^4+1)*(q^8-q^4+1)*(q^2-1)^2*(q^2+1)^2*(q^2+r2*q+1
  ), 1/2*q^22*(q^4-q^2+1)*(q^4+1)*(q^8-q^4+1)*(q^2-1)^2*(q^2+1)^2
  *(q^2+r2*q+1), 1/2*q^22*(q^4-q^2+1)*(q^4+1)*(q^8-q^4+1)*(q-1)^2*(
  q+1)^2*(q^2+1)^2*(q^2+r2*q+1), q^24*(q^4-q^2+1)*(q^4+1)*(q^8-q^
  4+1)*(q^2-1)*(q^2+1)^2*(q^2+r2*q+1), q^20*(q^4-q^2+1)*(q^8-q^
  4+1)*(q^2-1)*(q^2+1)^2*(q^2-r2*q+1), q^20*(q^4+1)*(q^4-q^2+1)*
  (q^8-q^4+1)*(q^2-1)^2*(q^2+1)^2*(q^2-r2*q+1), 1/2*q^22*(q^
  4-q^2+1)*(q^4+1)*(q^8-q^4+1)*(q^2-1)^2*(q^2+1)^2*(q^2-r2*q
  +1), 1/2*q^22*(q^4-q^2+1)*(q^4+1)*(q^8-q^4+1)*(q^2-1)^2*(q^2+1)
  ^2*(q^2-r2*q+1), q^24*(q^4-q^2+1)*(q^4+1)*(q^8-q^4+1)*(q^2-1)
  *(q^2+1)^2*(q^2-r2*q+1), q^24*(q^4-q^2+1)*(q^4+1)*(q^8-q^4+1)*(q^2-1)^2
  *(q^2+1)^2, q^24*(q^4-q^2+1)*(q^8-q^4+1)*(q-1)^2*(q+1)^
  2*(q^2+1)^2*(q^4+2*r2*q^3+4*q^2+2*r2*q+1), q^24*(q^4-q^2+1)
  *(q^8-q^4+1)*(q^2-1)^2*(q^2+1)^2*(q^4-2*r2*q^3+4*q^2-2*r2*q+1),
  q^24*(q^4-q^2+1)*(q^8-q^4+1)*(q^2-1)^2*(q^4+1)^2, q
  ^24*(q^8-q^4+1)*(q^2-1)^2*(q^2+1)^2*(q^4+1)^2, q^24*(q^4-q^2+
  1)*(q^2-1)^2*(q^2+1)^2*(q^4+1)^2*(q^4+r2*q^3+q^2+r2*q+1),
  q^24*(q^4-q^2+1)*(q^2-1)^2*(q^2+1)^2*(q^4+1)^2*(q^4-r2*q^3+q^2-r2*q+1)], 

 [[` `,[1,0],[`^2F_4`,`1`]],
 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
  1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
  1, 1, 1, 1, 1], 

 [[` `,[1,1],[`^2F_4`,`^2B_2[a],1`]],
  1/2*(q^2-1)*(q^2+1)^2*(q^4-q^2+1)*r2*q,
  1/2*(q^2-1)*(q^2+1)^2*(q^4-q^2+1)*r2*q, -1/2*r2*q*(q^6-q^4+1),
  1/2*q*r2*(q^2-1)*(q^2+1), 1/2*EW4*r2*q^5+1/2*r2*q^3-1/2*r2*q,
  1/2*r2*q^3-1/2*r2*q-1/2*EW4*r2*q^5, -1/2*r2*q, 1/2*(q^2-1)*r2*q,
  r2*q^3-1/2*r2*q, -1/2*r2*q, -1/2*(q^2+1)*r2*q, -1/2*r2*q, EW4*q^2-1/2*r2*q,
  -1/2*r2*q-EW4*q^2, -1/2*r2*q, -1/2*r2*q, 1/2*EW4*r2*q, -1/2*EW4*r2*q,
  1/2*EW4*r2*q, -1/2*EW4*r2*q, 1/2*(q^2-1)*r2*q, -1/2*r2*q, 1/2*EW4*r2*q, 
  -1/2*EW4*r2*q, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1/2*r2*q^3-1/2*r2*q-1,
  -1/2*r2*q-1, -1/2*EW4*r2*q-1, -1+1/2*EW4*r2*q, -1, 1/2*r2*q^3-1/2*r2*q+1,
  -1/2*r2*q+1, -1/2*EW4*r2*q+1, 1+1/2*EW4*r2*q, 1, 0, -2, 2, 0, 0, -1, 1], 

 [[` `,[1,2],[`^2F_4`,`^2B_2[b],1`]],
  1/2*(q^2-1)*(q^2+1)^2*(q^4-q^2+1)*r2*q,
  1/2*(q^2-1)*(q^2+1)^2*(q^4-q^2+1)*r2*q, -1/2*r2*q*(q^6-q^4+1),
  1/2*(q^2-1)*(q^2+1)*r2*q, -1/2*EW4*r2*q^5+1/2*r2*q^3-1/2*r2*q, 
  1/2*EW4*r2*q^5+1/2*r2*q^3-1/2*r2*q, -1/2*r2*q, 1/2*(q^2-1)*r2*q, 
  r2*q^3-1/2*r2*q, -1/2*r2*q, -1/2*(q^2+1)*r2*q, -1/2*r2*q, -EW4*q^2-1/2*r2*q,
  EW4*q^2-1/2*r2*q, -1/2*r2*q, -1/2*r2*q, -1/2*EW4*r2*q, 1/2*EW4*r2*q,
  -1/2*EW4*r2*q, 1/2*EW4*r2*q, 1/2*(q^2-1)*r2*q, -1/2*r2*q, -1/2*EW4*r2*q,
  1/2*EW4*r2*q, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1/2*r2*q^3-1/2*r2*q-1,
  -1/2*r2*q-1, 1/2*EW4*r2*q-1, -1/2*EW4*r2*q-1, -1, 1/2*r2*q^3-1/2*r2*q+1,
  -1/2*r2*q+1, 1/2*EW4*r2*q+1, -1/2*EW4*r2*q+1, 1, 0, -2, 2, 0, 0, -1, 1], 

 [[` `,[1,3],[`^2F_4`,`\\epsilon'`]],
  (q^4-q^2+1)*(q^8-q^4+1)*q^2, (q^4-q^2+1)*(q^8-q^4+1)*q^2,
  q^8-q^4+q^2, -(q^2-1)*q^2, (q^4-q^2+1)*q^2, (q^4-q^2+1)*q^2, -(q^2-1)*q^2,
  -(q^2-1)*q^2, q^2, q^2, q^2, q^2, q^2, q^2, 0, 0, 0, 0, 0, 0, 1, 1, 1, 1,
  q^2, 0, 1, -q^4+q^2-1, q^2-1, -1, -1, -1, q^2-2, -2, -1, -r2*q^3+r2*q+1,
  r2*q+1, 1, 1, 1, r2*q^3-r2*q+1, -r2*q+1, 1, 1, 1, -1, 3, 3, -3, 0, 0, 0], 

 [[` `,[1,4],[`^2F_4`,`\\rho_2'`]],
  q^4/4*(q^2+1)^2*(q^2-r2*q+1)^2*(q^4-q^2+1)*(q^4+r2*q^3+q^2+r2*q+1),
  1/4*(q^2+1)^2*(q^2-r2*q+1)^2*(q^4-q^2+1)*(q^4+r2*q^3+q^2+r2*q+1)*q^4,
  1/4*(q^2-r2*q+1)*(2*q^10+r2*q^9+r2*q^7+q^6+q^4),
  1/4*(q^2+1)*(r2*q^7+q^6-r2*q^5+q^4), 1/4*(q^2-r2*q+1)*(q^6+2*r2*q^5+3*q^4),
  1/4*(q^2-r2*q+1)*(q^6+2*r2*q^5+3*q^4), -1/4*r2*q^5+1/4*q^4,
  -1/4*r2*q^5+3/4*q^4, -1/4*q^6+5/4*q^4, 1/4*(q^2+1)*q^4, -1/4*(q^2+1)*q^4,
  1/4*q^4, -1/4*q^4, -1/4*q^4, 1/4*r2*q^3, -1/4*r2*q^3, 1/2*q^2, 1/2*q^2,
  -1/2*q^2, -1/2*q^2, q^4+1, 1, 1, 1, q^2+1, 1, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0,
  0, 0, 0, 0, (q^2-1)*(q^2-r2*q+1), r2*q-1, -1, -1, 0, 0, 0, -4, 0, 0, -1, 0], 

 [[` `,[1,5],[`^2F_4`,`\\rho_2''`]],
  q^4/4(q^2+1)^2*(q^2+r2*q+1)^2*(q^4-q^2+1)*(q^4-r2*q^3+q^2-r2*q+1),
  1/4*(q^2+1)^2*(q^2+r2*q+1)^2*(q^4-q^2+1)*(q^4-r2*q^3+q^2-r2*q+1)*q^4,
  1/4*(q^2+r2*q+1)*(2*q^10-r2*q^9-r2*q^7+q^6+q^4),
  1/4*(q^2+1)*(-r2*q^7+q^6+r2*q^5+q^4), 1/4*(q^2+r2*q+1)*(q^6-2*r2*q^5+3*q^4),
  1/4*(q^2+r2*q+1)*(q^6-2*r2*q^5+3*q^4), 1/4*r2*q^5+1/4*q^4,
  1/4*r2*q^5+3/4*q^4, -1/4*q^6+5/4*q^4, 1/4*(q^2+1)*q^4, -1/4*(q^2+1)*q^4,
  1/4*q^4, -1/4*q^4, -1/4*q^4, -1/4*r2*q^3, 1/4*r2*q^3, -1/2*q^2, -1/2*q^2,
  1/2*q^2, 1/2*q^2, q^4+1, 1, 1, 1, q^2+1, 1, 2, 0, 0, 0, 0, 0, 0, 0, 0,
  (q^2-1)*(q^2+r2*q+1), -r2*q-1, -1, -1, 0, 0, 0, 0, 0, 0, 0, -4, 0, 0, 0,
  0, -1], 

 [[` `,[1,6],[`^2F_4`,`\\rho_2`]],
  1/2*(q^4+1)^2*(q^8-q^4+1)*q^4, 1/2*(q^4+1)^2*(q^8-q^4+1)*q^4,
  1/2*(q^4+1)*q^4, 1/2*(q^2+r2*q+1)*(q^2-r2*q+1)*q^4, 1/2*(q^4+1)*q^4,
  1/2*(q^4+1)*q^4, 1/2*q^4, 1/2*q^4, 1/2*(q^2+1)*q^4, -1/2*(q^2-1)*q^4,
  1/2*(q^2+1)*q^4, -1/2*q^4, 1/2*q^4, 1/2*q^4, 0, 0, 0, 0, 0, 0, q^4+1, 1,
  1, 1, q^2+1, 1, 2, (q^2-1)*q^2, -q^2, 0, 0, 0, -q^2+1, 1, 0, 0, 0, 0, 0,
  0, 0, 0,0, 0, 0, 0, 0, 0, 2, -1, 0, 0], 

 [[` `,[1,7],[`^2F_4`,`\\chi_8`]],
  q^4/12*(q^2-1)^2*(q^2+r2*q+1)^2*(q^4-q^2+1)*(q^4+r2*q^3+q^2+r2*q+1),
  1/12*(q^2-1)^2*(q^2+r2*q+1)^2*(q^4-q^2+1)*(q^4+r2*q^3+q^2+r2*q+1)*q^4,
  1/12*(q^2-1)*(q^2+r2*q+1)*(2*q^8+r2*q^7-2*q^6-2*r2*q^5-q^4),
  1/12*(q^2-1)*(-3*r2*q^7-7*q^6-3*r2*q^5-q^4), -1/4*(q^2-1)*(q^2+r2*q+1)*q^4,
  -1/4*(q^2-1)*(q^2+r2*q+1)*q^4, 1/3*q^6+1/4*r2*q^5+1/12*q^4,
  1/4*r2*q^5+1/4*q^4, -1/12*q^6+5/12*q^4, 1/12*(q^2+1)*q^4, -1/12*(q^2+1)*q^4,
  -1/4*q^4, 1/4*q^4, 1/4*q^4, -1/4*r2*q^3, 1/4*r2*q^3, 1/2*q^2, 1/2*q^2,
  -1/2*q^2, -1/2*q^2, 0, 0, 0, 0, 0, 0, 0, 1/3*(q^2-1)*(q^4-q^2+1), 2/3*q^2-1/3,
  2/3*q^2-1/3, -1/3*q^2-1/3, -1/3*q^2-1/3, q^2-1, -1, 0, (q^2-1)*(q^2+r2*q+1),
  -r2*q-1, -1, -1, 0, 0, 0, 0, 0, 0, 0, -4, 0, -2, 0, 1, 0], 

 [[` `,[1,8],[`^2F_4`,`\\chi_9`]],
  q^4/12*(q^2-1)^2*(q^2-r2*q+1)^2*(q^4-q^2+1)*(q^4-r2*q^3+q^2-r2*q+1),
  1/12*(q^2-1)^2*(q^2-r2*q+1)^2*(q^4-q^2+1)*(q^4-r2*q^3+q^2-r2*q+1)*q^4,
  1/12*(q^2-1)*(q^2-r2*q+1)*(2*q^8-r2*q^7-2*q^6+2*r2*q^5-q^4),
  1/12*(q^2-1)*(3*r2*q^7-7*q^6+3*r2*q^5-q^4), -1/4*(q^2-1)*(q^2-r2*q+1)*q^4,
  -1/4*(q^2-1)*(q^2-r2*q+1)*q^4, 1/3*q^6-1/4*r2*q^5+1/12*q^4,
  -1/4*r2*q^5+1/4*q^4, -1/12*q^6+5/12*q^4, 1/12*(q^2+1)*q^4, -1/12*(q^2+1)*q^4,
  -1/4*q^4, 1/4*q^4, 1/4*q^4, 1/4*r2*q^3, -1/4*r2*q^3, -1/2*q^2, -1/2*q^2,
  1/2*q^2, 1/2*q^2, 0, 0, 0, 0, 0, 0, 0, 1/3*(q^2-1)*(q^4-q^2+1), 2/3*q^2-1/3,
  2/3*q^2-1/3, -1/3*q^2-1/3, -1/3*q^2-1/3, q^2-1, -1, 0, 0, 0, 0, 0, 0,
  (q^2-1)*(q^2-r2*q+1), r2*q-1, -1, -1, 0, 0, 0, -4, -2, 0, 0, 1], 

 [[` `,[1,9],[`^2F_4`,`\\chi_{10}`]],
  1/6*(q^4-1)^2*(q^8-q^4+1)*q^4, 1/6*(q^4-1)^2*(q^8-q^4+1)*
  q^4, 1/6*(q^4-1)*(2*q^8-q^4), -1/6*(q^4-1)*q^4, -1/2*(q^4-1)*q^4,
  -1/2*(q^4-1)*q^4, -1/3*q^6+1/6*q^4, 1/2*q^4, -1/6*q^6+5/6*q^4, 1/6*
  (q^2+1)*q^4, -1/6*(q^2+1)*q^4, -1/2*q^4, 1/2*q^4, 1/2*q^4, 0, 0, 0, 0,
  0, 0, 0, 0, 0, 0, 0, 0, 0, -1/3*(q^4-1)*(q^2+1), 1/3*q^2+1/3, -2/3*q^2+1/3,
  1/3*q^2+1/3, 1/3*q^2+1/3, 0, 0, 0, (q^4-1), -1, -1, -1, 0, (q^4-1), -1,
  -1, -1, 0, -2, -2, -2, 0, 1, 0, 0], 

 [[` `,[1,10],[`^2F_4`,`\\chi_{11}`]],
  1/4*(q^4-1)^2*(q^4-q^2+1)*(q^4-r2*q^3+q^2-r2*q+1)*q^4,
  1/4*(q^4-1)^2*(q^4-q^2+1)*(q^4-r2*q^3+q^2-r2*q+1)*q^4, 1/4*(q^2-1)*
  (-r2*q^9+r2*q^7-q^6+r2*q^5-q^4), 1/4*(q^4-1)*(r2*q^5-q^4), 1/4*(q^2-1)*
  ((-1+2*EW4)*q^6+r2*q^5-q^4), 1/4*(q^2-1)*(-q^6+r2*q^5-q^4)-1/2
  *(q^2-1)*q^6*EW4, -1/4*r2*q^5+1/4*q^4, -1/4*r2*q^5+1/4*q^4, 
  1/4*(q^2+1)*q^4, -1/4*(q^2-1)*q^4, 1/4*(q^2+1)*q^4, 1/4*q^4, 
  -1/4*q^4-1/2*EW4*r2*q^3, -1/4*q^4+1/2*EW4*r2*q^3, 
  -1/4*r2*q^3, 1/4*r2*q^3, 1/2*EW4*q^2, -1/2*EW4*q^2, 
  -1/2*EW4*q^2, 1/2*EW4*q^2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
  0, 0, 0, 0, -1/2*(q^2-1)*r2*q, 1/2*r2*q, 1/2*EW4*r2*q, -1/2*
  EW4*r2*q, 0, 1/2*(q^2-1)*(2*q^2-r2*q+2), 1/2*r2*q-1, -1/2*EW4*
  r2*q-1, -1+1/2*EW4*r2*q, 0, -1, 1, -3, 0, 0, 0, 1], 

 [[` `,[1,11],[`^2F_4`,`\\chi_{12}`]],
  1/4*(q^4-1)^2*(q^4-q^2+1)*(q^4-r2*q^3+q^2-r2*q+1)*q^4, 
  1/4*(q^4-1)^2*(q^4-q^2+1)*(q^4-r2*q^3+q^2-r2*q+1)*q^4, 1/4*(q^2-1)*
  (-r2*q^9+r2*q^7-q^6+r2*q^5-q^4), 1/4*(q^4-1)*(r2*q^5-q^4), 1/4*(q^2-1)*
  ((-1-2*EW4)*q^6+r2*q^5-q^4), 1/4*(q^2-1)*(-q^6+r2*q^5-q^4)+1/2
  *(q^2-1)*q^6*EW4, -1/4*r2*q^5+1/4*q^4, -1/4*r2*q^5+1/4*q^4, 
  1/4*(q^2+1)*q^4, -1/4*(q^2-1)*q^4, 1/4*(q^2+1)*q^4, 1/4*q^4, 
  -1/4*q^4+1/2*EW4*r2*q^3, -1/4*q^4-1/2*EW4*r2*q^3, 
  -1/4*r2*q^3, 1/4*r2*q^3, -1/2*EW4*q^2, 1/2*EW4*q^2, 1/2*
  EW4*q^2, -1/2*EW4*q^2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
  0, 0, 0, -1/2*(q^2-1)*r2*q, 1/2*r2*q, -1/2*EW4*r2*q, 1/2*EW4*r2*q, 
  0, 1/2*(q^2-1)*(2*q^2-r2*q+2), 1/2*r2*q-1, 1/2*EW4*r2*q-1, -1/2*
  EW4*r2*q-1, 0, -1, 1, -3, 0, 0, 0, 1], 

 [[` `,[1,12],[`^2F_4`,`\\chi_{13}`]],
  1/4*(q^4-1)^2*(q^4-q^2+1)*(q^4+r2*q^3+q^2+r2*q+1)*q^4, 
  1/4*(q^4-1)^2*(q^4-q^2+1)*(q^4+r2*q^3+q^2+r2*q+1)*q^4, 1/4*(q^2-1)*
  (r2*q^9-r2*q^7-q^6-r2*q^5-q^4), 1/4*(q^4-1)*(-r2*q^5-q^4), 1/4*
  (q^2-1)*((-1+2*EW4)*q^6-r2*q^5-q^4), 1/4*(q^2-1)*(-q^6-r2*q^5-q^4)
  -1/2*(q^2-1)*q^6*EW4, 1/4*r2*q^5+1/4*q^4, 1/4*r2*q^5+1/4*q^4,
  1/4*(q^2+1)*q^4, -1/4*(q^2-1)*q^4, 1/4*(q^2+1)*q^4, 1/4*q^4,
  -1/4*q^4-1/2*EW4*r2*q^3, -1/4*q^4+1/2*EW4*r2*q^3,
  1/4*r2*q^3, -1/4*r2*q^3, -1/2*EW4*q^2, 1/2*EW4*q^2, 
  1/2*EW4*q^2, -1/2*EW4*q^2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
  0, 0, 0, 0, 1/2*(q^2-1)*(2*q^2+r2*q+2), -1/2*r2*q-1, 1/2*EW4*r2*q-1,
  -1/2*EW4*r2*q-1, 0, 1/2*(q^2-1)*r2*q, -1/2*r2*q, -1/2*EW4*r2*q,
  1/2*EW4*r2*q, 0, -1, -3, 1, 0, 0, 1, 0], 

 [[` `,[1,13],[`^2F_4`,`\\chi_{14}`]],
  1/4*(q^4-1)^2*(q^4-q^2+1)*(q^4+r2*q^3+q^2+r2*q+1)*q^4,
  1/4*(q^4-1)^2*(q^4-q^2+1)*(q^4+r2*q^3+q^2+r2*q+1)*q^4, 1/4*(q^2-1)*
  (r2*q^9-r2*q^7-q^6-r2*q^5-q^4), 1/4*(q^4-1)*(-r2*q^5-q^4), 1/4*
  (q^2-1)*((-1-2*EW4)*q^6-r2*q^5-q^4), 1/4*(q^2-1)*(-q^6-r2*q^5-q^4)
  +1/2*(q^2-1)*q^6*EW4, 1/4*r2*q^5+1/4*q^4, 1/4*r2*q^5+1/4*q^4, 
  1/4*(q^2+1)*q^4, -1/4*(q^2-1)*q^4, 1/4*(q^2+1)*q^4, 1/4*q^4,
  -1/4*q^4+1/2*EW4*r2*q^3, -1/4*q^4-1/2*EW4*r2*q^3,
  1/4*r2*q^3, -1/4*r2*q^3, 1/2*EW4*q^2, -1/2*EW4*q^2,
  -1/2*EW4*q^2, 1/2*EW4*q^2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
  0, 0, 0, 0, 1/2*(q^2-1)*(2*q^2+r2*q+2), -1/2*r2*q-1, -1/2*EW4*r2*q-1,
  -1+1/2*EW4*r2*q, 0, 1/2*(q^2-1)*r2*q, -1/2*r2*q, 1/2*EW4*r2*q,
  -1/2*EW4*r2*q, 0, -1, -3, 1, 0, 0, 1, 0], 

 [[` `,[1,14],[`^2F_4`,`\\chi_{15}`]],
  1/3*(q^8-1)^2*q^4, 1/3*(q^8-1)^2*q^4, -1/3*q^4*(q^8-1),
  -1/3*(q^4-1)*q^4, 0, 0, 1/3*(q^2+1)*q^4, 0, -1/3*(q^2+1)*q^4, 
  1/3*(q^2+1)*q^4, -1/3*q^4*(q^2-2), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
  0, 0, 0, 1/3*(q^4-1)*(q^2+1), -1/3*q^2-1/3, -1/3*q^2-1/3, 1/6*q^2+
  1/2*EW4*sqrt(3)*q^2-1/3, 1/6*q^2-1/2*EW4*sqrt(3)*q^2-1/3, 0, 0, 0, 0, 0,
  0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 1, 1], 

 [[` `,[1,15],[`^2F_4`,`\\chi_{16}`]],
  1/3*(q^8-1)^2*q^4, 1/3*(q^8-1)^2*q^4, -1/3*q^4*(q^8-1),
  -1/3*(q^4-1)*q^4, 0, 0, 1/3*(q^2+1)*q^4, 0, -1/3*(q^2+1)*q^4,
  1/3*(q^2+1)*q^4, -1/3*q^4*(q^2-2), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
  0, 0, 0, 1/3*(q^4-1)*(q^2+1), -1/3*q^2-1/3, -1/3*q^2-1/3, 1/6*q^2-
  1/2*EW4*sqrt(3)*q^2-1/3, 1/6*q^2+1/2*EW4*sqrt(3)*q^2-1/3, 0, 0, 0, 0, 0,
  0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 1, 1], 

 [[` `,[1,16],[`^2F_4`,`\\chi_{17}`]],
  1/3*(q^2-1)^2*(q^4-q^2+1)*(q^8-q^4+1)*q^4, 1/3*(q^2-1)^2*
  (q^4-q^2+1)*(q^8-q^4+1)*q^4, 1/3*(q^2-1)*(-q^10-q^8+2
  *q^6-q^4), 1/3*(q^2-1)*(2*q^6-q^4), 0, 0, -2/3*q^6+1/3*q^4, 0, -1/3*(q^
  2+1)*q^4, 1/3*(q^2+1)*q^4, -1/3*q^6+2/3*q^4, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0
  , 0, 0, 0, 0, 0, 0, -2/3*(q^2-1)*(q^4-q^2+1), -4/3*q^2+2/3, 2/3*q^2+2/3,
  -1/3*q^2+2/3, -1/3*q^2+2/3, -2*q^2+2, 2, 0, -(q^2-1)*r2*q, r2*q, 0, 0
  , 0, (q^2-1)*r2*q, -r2*q, 0, 0, 0, -2, 2, 2, 4, 0, 0, 0], 

 [[` `,[1,17],[`^2F_4`,`\\epsilon''`]],
  (q^4-q^2+1)*(q^8-q^4+1)*q^10, (q^4-q^2+1)*(q^8-q^4+1)*q^
  10, -(q^2-1)*q^10, q^10, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, q^4,
  0, 0, 0, 1, 1, 1, (q^4-q^2+1)*q^2, q^2, 0, 0, 0, 2*q^2-1, -1, 1, 
  -q^4-r2*q^3+r2*q, r2*q, 0, 0, -1, -q^4+r2*q^3-r2*q, -r2*q, 0, 0, -1, -1, 3,
  3, -3, 0, 0, 0], 

 [[` `,[1,18],[`^2F_4`,`^2B_2[a],\\epsilon`]],
  1/2*(q^2-1)*(q^2+1)^2*(q^4-q^2+1)*r2*q^13
  , 1/2*(q^2-1)*(q^2+1)^2*(q^4-q^2+1)*r2*q^13, -1/2*r2*q^13, 0, 
  1/2*EW4*r2*q^9, -1/2*EW4*r2*q^9, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0
  , 0, 0, 1/2*(q^2-1)*r2*q, -1/2*r2*q, 1/2*EW4*r2*q, -1/2*EW4*r2*q, 0, 0, 0, 0,
  0, 0, 0, 0, 0, 0, 0, -q^4-1/2*r2*q^3+1/2*r2*q, 1/2*r2*q, 1/2*EW4*r2*q,
  -1/2*EW4*r2*q, -1, q^4-1/2*r2*q^3+1/2*r2*q, 1/2*r2*q, 1/2*EW4*r2*q,
  -1/2*EW4*r2*q, 1, 0, 2, -2, 0, 0, 1, -1], 

 [[` `,[1,19],[`^2F_4`,`^2B_2[b],\\epsilon`]],
  1/2*(q^2-1)*(q^2+1)^2*(q^4-q^2+1)*r2*q^13, 1/2*(q^
  2-1)*(q^2+1)^2*(q^4-q^2+1)*r2*q^13, -1/2*r2*q^13, 0, -1/2*EW4*r2*q^
  9, 1/2*EW4*r2*q^9, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1/2
  *(q^2-1)*r2*q, -1/2*r2*q, -1/2*EW4*r2*q, 1/2*EW4*r2*q, 0, 0
  , 0, 0, 0, 0, 0, 0, 0, 0, 0, -q^4-1/2*r2*q^3+1/2*r2*q, 1/2*r2*q, 
  -1/2*EW4*r2*q, 1/2*EW4*r2*q, -1, q^4-1/2*r2*q^3+1/2*r2*q, 1/2*r2*q, 
  -1/2*EW4*r2*q, 1/2*EW4*r2*q, 1, 0, 2, -2, 0, 0, 1, -1], 

 [[` `,[1,20],[`^2F_4`,`\\epsilon`]],
  q^24, q^24, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, q^4,
  0, 0, 0, q^2, 0, 1, -q^6, 0, 0, 0, 0, -q^2, 0, -1, -q^4, 0, 0, 0, -1, -q^4,
  0, 0, 0, -1, 1, 1, 1, 1, 1, 1, 1],

 [[` `,[2,0],[`^2B_2`,`1`]],
  (q^4-q^2+1)*(q^4+1)*(q^8-q^4+1)*(q^2+1)^2,
  (q^4-q^2+1)*(q^4+1)*(q^8-q^4+1)*(q^2+1)^2, 1+q^8+q^12+q^6+q^2,
  (q^4-q^2+1)*(q^2+1)^2, (1+q^4+q^3+q+q^2)*(q^4-q^3+q^2-q+1),
  (1+q^4+q^3+q+q^2)*(q^4-q^3+q^2-q+1), q^2+1, (q^2-q+1)*(q^2+q+1), 3*q^4+q^2+1,
  (q^2-q+1)*(q^2+q+1), q^2+1, q^2+1, q^2+1, q^2+1, 1, 1, 1, 1, 1, 1,
  1+q^4+GEWZ2^(aA*kK*(1-q*r2))+GEWZ2^(aA*kK*(q*r2-1))
  +GEWZ2^(aA*kK*(2-q*r2))+GEWZ2^(aA*kK*(q*r2-2))
  +GEWZ2^(aA*kK*(1-q*r2))*q^4+GEWZ2^(aA*kK*(q*r2-1))*q^4,
  1+GEWZ2^(aA*kK*(1-q*r2))+GEWZ2^(aA*kK*(q*r2-1))+GEWZ2^(aA*kK*(2-q*r2))
  +GEWZ2^(aA*kK*(q*r2-2)),
  1+GEWZ2^(aA*kK*(1-q*r2))+GEWZ2^(aA*kK*(q*r2-1))+GEWZ2^(aA*kK*(2-q*r2))
  +GEWZ2^(aA*kK*(q*r2-2)),
  1+GEWZ2^(aA*kK*(1-q*r2))+GEWZ2^(aA*kK*(q*r2-1))+GEWZ2^(aA*kK*(2-q*r2))
  +GEWZ2^(aA*kK*(q*r2-2)),
  (q^2+1)*(GEWZ2^(aA*kK*(2-q*r2))+GEWZ2^(aA*kK*(q*r2-2))
  +GEWZ2^(aA*kK*(4-3*q*r2))+GEWZ2^(aA*kK*(3*q*r2-4))),
  GEWZ2^(aA*kK*(2-q*r2))+GEWZ2^(aA*kK*(q*r2-2))
  +GEWZ2^(aA*kK*(4-3*q*r2))+GEWZ2^(aA*kK*(3*q*r2-4)),
  GEWZ2^(kK*bB*(2-r2*q))+GEWZ2^(kK*bB*(r2*q-2))
  +GEWZ2^(kK*(bB+aA-bB*r2*q-aA*q*r2))+GEWZ2^(-kK*(bB+aA-bB*r2*q-aA*q*r2))
  +GEWZ2^(kK*(bB-aA-bB*r2*q+aA*q*r2))+GEWZ2^(-kK*(bB-aA-bB*r2*q+aA*q*r2))
  +GEWZ2^(aA*kK*(2-q*r2))+GEWZ2^(aA*kK*(q*r2-2)),
  0, 0, 0, 0, 0, 0, 0, 0, q^4+1, 1, 1, 1,
  GEWZ2^(aA*kK)+GEWZ2^(-aA*kK), q^4+1, 1, 1, 1,
  GEWZ2^(aA*kK*(3-2*q*r2))+GEWZ2^(aA*kK*(2*q*r2-3)), 0, 0, 0, 0, 0, 0, 0],

 [[` `,[2,1],[`^2B_2`,`^2B_2[a]`]],
  1/2*r2*q*(q^2-1)*(q^2+1)^2*(q^8-q^4+1)*(q^4-q^2+1)*(q^4+1),
  1/2*r2*q*(q^2-1)*(q^2+1)^2*(q^8-q^4+1)*(q^4-q^2+1)*(q^4+1),
  -1/2*r2*q*(q^2+1)*(q^10-q^8+q^6-q^2+1), 1/2*r2*q*(q^2-1)*(q^2+1),
  1/2*r2*q*(q^2-1)+r2*q^5/2*EW4*(q^4+1), 1/2*r2*q*(q^2-1)-r2*q^5/2*EW4*(q^4+1),
  -1/2*r2*q, 1/2*r2*q*(q^2-1), 1/2*r2*(2*q^2-1)*q, -1/2*r2*q,
  -1/2*r2*q*(q^2+1), -1/2*r2*q, -1/2*r2*q+q^2*EW4, -1/2*r2*q-q^2*EW4,
  -1/2*r2*q, -1/2*r2*q, r2*q/2*EW4, -r2*q/2*EW4, r2*q/2*EW4, -r2*q/2*EW4,
  1/2*r2*q*(q^2-1)*(GEWZ2^(aA*kK*(q*r2-2))+GEWZ2^(aA*kK*(2-q*r2))),
  -1/2*r2*q*(GEWZ2^(aA*kK*(q*r2-2))+GEWZ2^(aA*kK*(2-q*r2))),
  q*r2/2*EW4*(GEWZ2^(aA*kK*(q*r2-2))+GEWZ2^(aA*kK*(2-q*r2))),
  -q*r2/2*EW4*(GEWZ2^(aA*kK*(q*r2-2))+GEWZ2^(aA*kK*(2-q*r2))),
  0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, -q^4-1, -1, -1, -1,
  -GEWZ2^(aA*kK)-GEWZ2^(-aA*kK), q^4+1, 1, 1, 1,
  GEWZ2^(aA*kK*(3-2*q*r2))+GEWZ2^(aA*kK*(2*q*r2-3)), 0, 0, 0, 0, 0, 0, 0],

 [[` `,[2,2],[`^2B_2`,`^2B_2[b]`]],
  1/2*r2*q*(q^2-1)*(q^2+1)^2*(q^8-q^4+1)*(q^4-q^2+1)*(q^4+1),
  1/2*r2*q*(q^2-1)*(q^2+1)^2*(q^8-q^4+1)*(q^4-q^2+1)*(q^4+1),
  -1/2*r2*q*(q^2+1)*(q^10-q^8+q^6-q^2+1), 1/2*r2*q*(q^2-1)*(q^2+1),
  1/2*r2*q*(q^2-1)-r2*q^5/2*EW4*(q^4+1), 1/2*r2*q*(q^2-1)+r2*q^5/2*EW4*(q^4+1),
  -1/2*r2*q, 1/2*r2*q*(q^2-1), 1/2*r2*(2*q^2-1)*q, -1/2*r2*q,
  -1/2*r2*q*(q^2+1), -1/2*r2*q, -1/2*r2*q-q^2*EW4, -1/2*r2*q+q^2*EW4,
  -1/2*r2*q, -1/2*r2*q, -r2*q/2*EW4, r2*q/2*EW4, -r2*q/2*EW4, r2*q/2*EW4,
  1/2*r2*q*(q^2-1)*(GEWZ2^(aA*kK*(q*r2-2))+GEWZ2^(aA*kK*(2-q*r2))),
  -1/2*r2*q*(GEWZ2^(aA*kK*(q*r2-2))+GEWZ2^(aA*kK*(2-q*r2))),
  -q*r2/2*EW4*(GEWZ2^(aA*kK*(q*r2-2))+GEWZ2^(aA*kK*(2-q*r2))),
  q*r2/2*EW4*(GEWZ2^(aA*kK*(q*r2-2))+GEWZ2^(aA*kK*(2-q*r2))),
  0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, -q^4-1, -1, -1, -1,
  -GEWZ2^(aA*kK)-GEWZ2^(-aA*kK), q^4+1, 1, 1, 1,
  GEWZ2^(aA*kK*(3-2*q*r2))+GEWZ2^(aA*kK*(2*q*r2-3)), 0, 0, 0, 0, 0, 0, 0],

 [[` `,[2,3],[`^2B_2`,`\\epsilon`]],
  q^4*(q^4-q^2+1)*(q^4+1)*(q^8-q^4+1)*(q^2+1)^2,
  q^4*(q^4-q^2+1)*(q^4+1)*(q^8-q^4+1)*(q^2+1)^2, q^4*(q^2+1+q^6),
  q^4*(q^2+1)*(q^4+1), q^4*(2+q^4), q^4*(2+q^4), q^4, 2*q^4, 3*q^4, q^4,
  0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
  GEWZ2^(aA*kK*(q*r2-1))*q^4+GEWZ2^(aA*kK*(2-q*r2))*q^4
  +GEWZ2^(aA*kK*(q*r2-2))*q^4+1+GEWZ2^(aA*kK*(1-q*r2))
  +GEWZ2^(aA*kK*(q*r2-1))+q^4+GEWZ2^(aA*kK*(1-q*r2))*q^4,
  1+GEWZ2^(aA*kK*(1-q*r2))+GEWZ2^(aA*kK*(q*r2-1)),
  1+GEWZ2^(aA*kK*(1-q*r2))+GEWZ2^(aA*kK*(q*r2-1)),
  1+GEWZ2^(aA*kK*(1-q*r2))+GEWZ2^(aA*kK*(q*r2-1)),
  (q^2+1)*(GEWZ2^(aA*kK*(3*q*r2-4))+GEWZ2^(aA*kK*(4-3*q*r2))
  +GEWZ2^(aA*kK*(2-q*r2))+GEWZ2^(aA*kK*(q*r2-2))),
  GEWZ2^(aA*kK*(3*q*r2-4))+GEWZ2^(aA*kK*(4-3*q*r2))
  +GEWZ2^(aA*kK*(2-q*r2))+GEWZ2^(aA*kK*(q*r2-2)),
  GEWZ2^(kK*bB*r2*q-2*kK*bB)+GEWZ2^(2*kK*bB-kK*bB*r2*q)
  +GEWZ2^(kK*bB*r2*q-kK*bB-aA*q*r2*kK+aA*kK)
  +GEWZ2^(-kK*bB*r2*q+kK*bB-aA*q*r2*kK+aA*kK)
  +GEWZ2^(kK*bB*r2*q-kK*bB+aA*q*r2*kK-aA*kK)
  +GEWZ2^(-kK*bB*r2*q+kK*bB+aA*q*r2*kK-aA*kK)
  +GEWZ2^(-aA*q*r2*kK+2*aA*kK)+GEWZ2^(aA*q*r2*kK-2*aA*kK),
  0, 0, 0, 0, 0, 0, 0, 0, -q^4-1, -1, -1, -1,
  -GEWZ2^(aA*kK)-GEWZ2^(-aA*kK), -q^4-1, -1, -1, -1,
  -GEWZ2^(aA*kK*(2*q*r2-3))-GEWZ2^(aA*kK*(3-2*q*r2)), 0, 0, 0, 0, 0, 0, 0],

 [[` `,[3,0],[`A_1`,[2  ]]],
  (q^2+1)*(q^4-q^2+1)*(q^8-q^4+1)*(q^4+1)^2,
  (q^2+1)*(q^4-q^2+1)*(q^8-q^4+1)*(q^4+1)^2, (q^2+1)*(q^4+1)*(q^4-q^2+1),
  1+q^8+q^6+q^4+q^10, (q^4+1)^2, (q^4+1)^2, q^4+1, 2*q^4+1, 3*q^4+1, q^4+1,
  1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
  (q^4+1)*(GEWZ2^(aA*kK*(2-q*r2))+GEWZ2^(aA*kK*(q*r2-2))
  +GEWZ2^(aA*q*r2*kK)+GEWZ2^(-aA*q*r2*kK)),
  GEWZ2^(aA*kK*(2-q*r2))+GEWZ2^(aA*kK*(q*r2-2))
  +GEWZ2^(aA*q*r2*kK)+GEWZ2^(-aA*q*r2*kK),
  GEWZ2^(aA*kK*(2-q*r2))+GEWZ2^(aA*kK*(q*r2-2))
  +GEWZ2^(aA*q*r2*kK)+GEWZ2^(-aA*q*r2*kK),
  GEWZ2^(aA*kK*(2-q*r2))+GEWZ2^(aA*kK*(q*r2-2))
  +GEWZ2^(aA*q*r2*kK)+GEWZ2^(-aA*q*r2*kK),
  q^2+1+GEWZ2^(aA*kK*(4-4*q*r2))+GEWZ2^(aA*kK*(4*q*r2-4))
  +GEWZ2^(aA*kK*(4-2*q*r2))*q^2+GEWZ2^(aA*kK*(2*q*r2-4))*q^2
  +GEWZ2^(aA*kK*(4-2*q*r2))+GEWZ2^(aA*kK*(2*q*r2-4)),
  1+GEWZ2^(aA*kK*(4-4*q*r2))+GEWZ2^(aA*kK*(4*q*r2-4))
  +GEWZ2^(aA*kK*(4-2*q*r2))+GEWZ2^(aA*kK*(2*q*r2-4)),
  GEWZ2^(aA*q*r2*kK+kK*bB*r2*q-2*aA*kK)+GEWZ2^(-aA*q*r2*kK-kK*bB*r2*q+2*aA*kK)
  +GEWZ2^(aA*q*r2*kK-kK*bB*r2*q-2*aA*kK)+GEWZ2^(-aA*q*r2*kK+kK*bB*r2*q+2*aA*kK)
  +GEWZ2^(aA*q*r2*kK+kK*bB*r2*q-2*kK*bB)+GEWZ2^(-aA*q*r2*kK-kK*bB*r2*q+2*kK*bB)
  +GEWZ2^(aA*q*r2*kK-kK*bB*r2*q+2*kK*bB)+GEWZ2^(-aA*q*r2*kK+kK*bB*r2*q-2*kK*bB),
  (q^2+1)*(q^4-q^2+1), 1, 1, 1, 1, q^2+1, 1,
  GEWZ2^(aA*kK*(2-2*q*r2))+GEWZ2^(aA*kK*(2*q*r2-2)),
  0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0],

 [[` `,[3,1],[`A_1`,[1,1]]],
  q^2*(q^2+1)*(q^4-q^2+1)*(q^8-q^4+1)*(q^4+1)^2,
  q^2*(q^2+1)*(q^4-q^2+1)*(q^8-q^4+1)*(q^4+1)^2,q^2*(q^2+1)*(q^4-q^2+1)*(q^4+1),
  q^2*(1+q^4+q^6), q^2*(q^2+1)*(q^4+1), q^2*(q^2+1)*(q^4+1), q^2, q^2*(q^2+1),
  q^2*(3*q^2+1), q^2*(q^2+1), q^2, q^2, q^2, q^2, 0, 0, 0, 0, 0, 0,
  (q^4+1)*(GEWZ2^(aA*kK*(2-q*r2))+GEWZ2^(aA*kK*(q*r2-2))+GEWZ2^(aA*q*r2*kK)
  +GEWZ2^(-aA*q*r2*kK)),
  GEWZ2^(aA*kK*(2-q*r2))+GEWZ2^(aA*kK*(q*r2-2))+GEWZ2^(aA*q*r2*kK)
  +GEWZ2^(-aA*q*r2*kK),
  GEWZ2^(aA*kK*(2-q*r2))+GEWZ2^(aA*kK*(q*r2-2))+GEWZ2^(aA*q*r2*kK)
  +GEWZ2^(-aA*q*r2*kK),
  GEWZ2^(aA*kK*(2-q*r2))+GEWZ2^(aA*kK*(q*r2-2))+GEWZ2^(aA*q*r2*kK)
  +GEWZ2^(-aA*q*r2*kK),
  1+q^2+GEWZ2^(aA*kK*(4-2*q*r2))+GEWZ2^(aA*kK*(2*q*r2-4))
  +GEWZ2^(aA*kK*(4-4*q*r2))*q^2+GEWZ2^(aA*kK*(4*q*r2-4))*q^2
  +GEWZ2^(aA*kK*(4-2*q*r2))*q^2+GEWZ2^(aA*kK*(2*q*r2-4))*q^2,
  1+GEWZ2^(aA*kK*(4-2*q*r2))+GEWZ2^(aA*kK*(2*q*r2-4)),
  GEWZ2^(aA*q*r2*kK+kK*bB*r2*q-2*aA*kK)+GEWZ2^(-aA*q*r2*kK-kK*bB*r2*q+2*aA*kK)
  +GEWZ2^(aA*q*r2*kK-kK*bB*r2*q+2*kK*bB)+GEWZ2^(-aA*q*r2*kK+kK*bB*r2*q-2*kK*bB)
  +GEWZ2^(aA*q*r2*kK+kK*bB*r2*q-2*kK*bB)+GEWZ2^(-aA*q*r2*kK-kK*bB*r2*q+2*kK*bB)
  +GEWZ2^(aA*q*r2*kK-kK*bB*r2*q-2*aA*kK)+GEWZ2^(-aA*q*r2*kK+kK*bB*r2*q+2*aA*kK),
  -(q^2+1)*(q^4-q^2+1), -1, -1, -1, -1, -q^2-1, -1,
  -GEWZ2^(aA*kK*(2-2*q*r2))-GEWZ2^(aA*kK*(2*q*r2-2)),
  0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0],

 [[` `,[4,0],[`A_0`,[1]]],
  (q^2+1)^2*(q^4+1)^2*(q^4-q^2+1)*(q^8-q^4+1),
  (q^2+1)^2*(q^4+1)^2*(q^4-q^2+1)*(q^8-q^4+1), (q^2+1)^2*(q^4+1)*(q^4-q^2+1),
  (q^2+1)*(q^8+q^6+q^4+1), (q^4+1)*(2*q^4+q^2+1), (q^4+1)*(2*q^4+q^2+1),
  q^4+q^2+1, 3*q^4+q^2+1, 6*q^4+q^2+1, 2*q^4+q^2+1, q^2+1, q^2+1, q^2+1,
  q^2+1, 1, 1, 1, 1, 1, 1,
  (q^4+1)*(GEWZ2^(aA*(kK+lL))+GEWZ2^(aA*q*r2*kK)+GEWZ2^(aA*(kK-lL))
  +GEWZ2^(aA*q*r2*lL)+GEWZ2^(-aA*q*r2*lL)+GEWZ2^(-aA*(kK-lL))+GEWZ2^(-aA*(kK
  +lL))+GEWZ2^(-aA*q*r2*kK)), GEWZ2^(aA*(kK+lL))+GEWZ2^(aA*q*r2*kK)+GEWZ2^(
  aA*(kK-lL))+GEWZ2^(aA*q*r2*lL)+GEWZ2^(-aA*q*r2*lL)+GEWZ2^(-aA*(kK-lL))
  +GEWZ2^(-aA*(kK+lL))+GEWZ2^(-aA*q*r2*kK), GEWZ2^(aA*(kK+lL))+GEWZ2^(aA*q
  *r2*kK)+GEWZ2^(aA*(kK-lL))+GEWZ2^(aA*q*r2*lL)+GEWZ2^(-aA*q*r2*lL)+GEWZ2^(
  -aA*(kK-lL))+GEWZ2^(-aA*(kK+lL))+GEWZ2^(-aA*q*r2*kK), GEWZ2^(aA*(kK+lL))
  +GEWZ2^(aA*q*r2*kK)+GEWZ2^(aA*(kK-lL))+GEWZ2^(aA*q*r2*lL)+GEWZ2^(-aA*q*r2*lL)
  +GEWZ2^(-aA*(kK-lL))+GEWZ2^(-aA*(kK+lL))+GEWZ2^(-aA*q*r2*kK), 
  (q^2+1)*(GEWZ2^(aA*q*r2*kK+(2*aA-aA*q*r2)*lL)+GEWZ2^(aA*q*r2*kK+(-2*aA
  +aA*q*r2)*lL)+GEWZ2^((2*aA-aA*q*r2)*kK+aA*q*r2*lL)+GEWZ2^((2*aA-aA*q*r2)*kK
  -aA*q*r2*lL)+GEWZ2^((-2*aA+aA*q*r2)*kK+aA*q*r2*lL)+GEWZ2^((-2*aA+aA*q*r2)*kK
  -aA*q*r2*lL)+GEWZ2^(-aA*q*r2*kK+(2*aA-aA*q*r2)*lL)+GEWZ2^(-aA*q*r2*kK+(-2*aA
  +aA*q*r2)*lL)), GEWZ2^(aA*q*r2*kK+(2*aA-aA*q*r2)*lL)+GEWZ2^(aA*q*r2*kK+
  (-2*aA+aA*q*r2)*lL)+GEWZ2^((2*aA-aA*q*r2)*kK+aA*q*r2*lL)+GEWZ2^((2*aA
  -aA*q*r2)*kK-aA*q*r2*lL)+GEWZ2^((-2*aA+aA*q*r2)*kK+aA*q*r2*lL)+GEWZ2^((-2*aA
  +aA*q*r2)*kK-aA*q*r2*lL)+GEWZ2^(-aA*q*r2*kK+(2*aA-aA*q*r2)*lL)+GEWZ2^(
  -aA*q*r2*kK+(-2*aA+aA*q*r2)*lL), 
  GEWZ2^((aA+bB)*kK+(aA-bB)*lL)+GEWZ2^(r2*q*aA*kK+r2*q*bB*lL)
  +GEWZ2^((aA+bB)*kK+(-aA+bB)*lL)+GEWZ2^(r2*q*bB*kK+r2*q*aA*lL)
  +GEWZ2^(r2*q*aA*kK-r2*q*bB*lL)+GEWZ2^((aA-bB)*kK+(aA+bB)*lL)
  +GEWZ2^(r2*q*bB*kK-r2*q*aA*lL)+GEWZ2^((-aA+bB)*kK+(aA+bB)*lL)
  +GEWZ2^((aA-bB)*kK+(-aA-bB)*lL)+GEWZ2^(-r2*q*bB*kK+r2*q*aA*lL)
  +GEWZ2^((-aA+bB)*kK+(-aA-bB)*lL)+GEWZ2^(-r2*q*aA*kK+r2*q*bB*lL)
  +GEWZ2^(-r2*q*bB*kK-r2*q*aA*lL)+GEWZ2^((-aA-bB)*kK+(aA-bB)*lL)
  +GEWZ2^(-r2*q*aA*kK-r2*q*bB*lL)+GEWZ2^((-aA-bB)*kK+(-aA+bB)*lL),
  0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0],

 [[` `,[5,0],[`^2A_2`,[3    ]]],
  (q^2-1)*(q^8-q^4+1)*(q^4+1)^2, (q^2-1)*(q^8-q^4+1)*(q^4+1)^2,
  (q^2-1)*(q^4+1), -1+q^2-q^4-q^8+q^6, (q^2-1)*(q^4+1), (q^2-1)*(q^4+1),
  (q^2-1)*(q^4+1), -q^4+q^2-1, q^2-1, q^2-1, q^2-1, q^2-1, q^2-1, q^2-1,
  -1, -1, -1, -1, -1, -1, 0, 0, 0, 0, q^2-1, -1, 0,
  q^2-q^4-EW3^((2*r2*q-DELTA)/3)*q^4+EW3^((2*r2*q-DELTA)/3)*q^2
  -EW3^((DELTA-2*r2*q)/3)*q^4+EW3^((DELTA-2*r2*q)/3)*q^2-EW3^((DELTA-2*r2*q)/3)
  -EW3^((2*r2*q-DELTA)/3), q^2+EW3^((2*r2*q-DELTA)/3)*q^2
  +EW3^((DELTA-2*r2*q)/3)*q^2-EW3^((DELTA-2*r2*q)/3)-EW3^((2*r2*q-DELTA)/3),
  -EW3^((DELTA-2*r2*q)/3)-EW3^((2*r2*q-DELTA)/3), -EW3^((DELTA-2*r2*q)/3)
  -EW3^((2*r2*q-DELTA)/3), -EW3^((DELTA-2*r2*q)/3)-EW3^((2*r2*q-DELTA)/3),
  -1+q^2+EW3^(-aA)*q^2-2*EW3^(-aA)+EW3^aA*q^2-2*EW3^aA,
  -2*EW3^(-aA)-2*EW3^aA-1, -EW3^aA-EW3^(-aA),
  0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
  -EW3^(bB-aA)-EW3^(-aA-bB)-EW3^bB-EW3^aA-EW3^(-aA)-EW3^(-bB)-EW3^(aA+bB)
  -EW3^(aA-bB), -EW3^aA-EW3^(-aA), 0, 0],

 [[` `,[5,1],[`^2A_2`,[2,1  ]]],
  q^2*(q^8-q^4+1)*(q^2-1)^2*(q^4+1)^2,
  q^2*(q^8-q^4+1)*(q^2-1)^2*(q^4+1)^2, q^2*(q^4+1)*(q^2-1)^2,
  q^2*(q^4+1)*(q^2-1)^2, -q^2*(q^2-1)*(q^4+1), -q^2*(q^2-1)*(q^4+1),
  q^2*(q^2-1)^2, -q^2*(q^2-1), q^2*(q^2+1), -q^2*(q^2-1), -q^2*(2*q^2-1), q^2,
  q^2, q^2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
  -(q^2-1)*(-q^4-EW3^((DELTA-2*r2*q)/3)*q^4-EW3^((2*r2*q-DELTA)/3)*q^4
  +EW3^((2*r2*q-DELTA)/3)*q^2+EW3^((DELTA-2*r2*q)/3)*q^2-1
  -EW3^((DELTA-2*r2*q)/3)-EW3^((2*r2*q-DELTA)/3)), q^2-1
  +2*EW3^((DELTA-2*r2*q)/3)*q^2+2*EW3^((2*r2*q-DELTA)/3)*q^2
  -EW3^((2*r2*q-DELTA)/3)-EW3^((DELTA-2*r2*q)/3), -EW3^((DELTA-2*r2*q)/3)-1
  -EW3^((2*r2*q-DELTA)/3), -EW3^((DELTA-2*r2*q)/3)-1-EW3^((2*r2*q-DELTA)/3),
  -EW3^((DELTA-2*r2*q)/3)-1-EW3^((2*r2*q-DELTA)/3),
  (q^2-1)*(2+3*EW3^(-aA)+3*EW3^aA), -2-3*EW3^(-aA)-3*EW3^aA,
  0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
  -2*EW3^(-aA)-2*EW3^(aA-bB)-2*EW3^bB-2*EW3^(-bB)-2*EW3^(bB-aA)-2*EW3^(-aA-bB)
  -2*EW3^(aA+bB)-2*EW3^aA, EW3^aA+EW3^(-aA), 0, 0],

 [[` `,[5,2],[`^2A_2`,[1,1,1]]],
  q^6*(q^2-1)*(q^8-q^4+1)*(q^4+1)^2,
  q^6*(q^2-1)*(q^8-q^4+1)*(q^4+1)^2, q^6*(q^2-1)*(q^4+1), -q^6*(q^4-q^2+1), 0,
  0, -q^6, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, q^2-1, -1, 0,
  q^2*(-1+q^2-EW3^((2*r2*q-DELTA)/3)*q^4-EW3^((2*r2*q-DELTA)/3)
  +EW3^((2*r2*q-DELTA)/3)*q^2-EW3^((DELTA-2*r2*q)/3)*q^4-EW3^((DELTA-2*r2*q)/3)
  +EW3^((DELTA-2*r2*q)/3)*q^2),
  -q^2*(1+EW3^((2*r2*q-DELTA)/3)+EW3^((DELTA-2*r2*q)/3)), 0, 0, 0,
  -q^2+1+EW3^(-aA)-2*EW3^(-aA)*q^2+EW3^aA-2*EW3^aA*q^2, 1+EW3^(-aA)+EW3^aA,
  -EW3^(-aA)-EW3^aA, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
  EW3^(-aA)+EW3^(-bB+aA)+EW3^bB+EW3^(-bB)+EW3^(bB-aA)+EW3^(-bB-aA)+EW3^(aA+bB)
  +EW3^aA, EW3^(-aA)+EW3^aA, 0, 0],

 [[` `,[6,0],[`A_1`,[2  ]]],
  (q^2-1)*(q^4-q^2+1)*(q^8-q^4+1)*(q^4+1)^2,
  (q^2-1)*(q^4-q^2+1)*(q^8-q^4+1)*(q^4+1)^2, (q^2-1)*(q^4+1)*(q^4-q^2+1),
  (q^5+q^4-q^3-q^2+1)*(q^5-q^4-q^3+q^2-1), -(q^4+1)*(q-1)^2*(q+1)^2,
  -(q^4+1)*(q-1)^2*(q+1)^2, (q^2-1)*(2*q^4-q^2+1), -2*q^4+2*q^2-1, 2*q^2-1+q^4,
  -(q-1)^2*(q+1)^2, -2*q^4+2*q^2-1, 2*q^2-1, 2*q^2-1, 2*q^2-1, -1, -1, -1, -1,
  -1, -1, 0, 0, 0, 0, q^2-1, -1, 0,
  (q^4-q^2+1)*(q^2+EW3^kK*q^2+EW3^(-kK)*q^2-1-2*EW3^(-kK)-2*EW3^kK),
  3*EW3^kK*q^2-2*EW3^kK+3*EW3^(-kK)*q^2-2*EW3^(-kK)+2*q^2-1,
  -2*EW3^kK-2*EW3^(-kK)-1, -2*EW3^kK-2*EW3^(-kK)-1, -2*EW3^kK-2*EW3^(-kK)-1,
  -1+q^2-2*GEWY2^(aA*kK)-2*GEWY2^(-aA*kK)-GEWY2^(2*aA*kK)-GEWY2^(-2*aA*kK)
  -GEWY2^(aA*kK*r2*q)-GEWY2^(-aA*kK*r2*q)
  +2*GEWY2^(aA*kK)*q^2+2*GEWY2^(-aA*kK)*q^2
  +GEWY2^(aA*kK*r2*q)*q^2+GEWY2^(-aA*kK*r2*q)*q^2
  -GEWY2^(aA*kK*(1+r2*q))-GEWY2^(-aA*kK*(1+r2*q))
  +GEWY2^(aA*kK*(1-r2*q))*q^2+GEWY2^(aA*kK*(r2*q-1))*q^2
  +GEWY2^(aA*kK*(1+r2*q))*q^2+GEWY2^(-aA*kK*(1+r2*q))*q^2
  -GEWY2^(aA*kK*(1-r2*q))-GEWY2^(aA*kK*(r2*q-1)),
  -1-GEWY2^(2*aA*kK)-GEWY2^(-2*aA*kK)-GEWY2^(aA*kK*r2*q)-GEWY2^(-aA*kK*r2*q)
  -2*GEWY2^(aA*kK)-2*GEWY2^(-aA*kK)-GEWY2^(aA*kK*(1-r2*q))
  -GEWY2^(aA*kK*(r2*q-1))-GEWY2^(aA*kK*(1+r2*q))-GEWY2^(-aA*kK*(1+r2*q)),
  -GEWY2^(aA*kK)-GEWY2^(-aA*kK), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
  -GEWY2^(2*kK*bB)-GEWY2^(-2*kK*bB)-GEWY2^(2*aA*kK)-GEWY2^(-2*aA*kK)
  -GEWY2^(kK*r2*q*(aA-bB))-GEWY2^(kK*r2*q*(bB-aA))
  -GEWY2^(kK*r2*q*(aA+bB))-GEWY2^(-kK*r2*q*(aA+bB))
  -GEWY2^(kK*bB+aA*kK*r2*q-aA*kK)-GEWY2^(aA*kK-kK*bB-aA*kK*r2*q)
  -GEWY2^(kK*bB+aA*kK*r2*q+aA*kK)-GEWY2^(-kK*bB-aA*kK*r2*q-aA*kK)
  -GEWY2^(kK*bB*r2*q+kK*bB+aA*kK)-GEWY2^(-kK*bB*r2*q-kK*bB-aA*kK)
  -GEWY2^(kK*bB+aA*kK-kK*bB*r2*q)-GEWY2^(kK*bB*r2*q-kK*bB-aA*kK)
  -GEWY2^(kK*bB-aA*kK*r2*q-aA*kK)-GEWY2^(aA*kK*r2*q+aA*kK-kK*bB)
  -GEWY2^(kK*bB-aA*kK+kK*bB*r2*q)-GEWY2^(aA*kK-kK*bB*r2*q-kK*bB)
  -GEWY2^(kK*bB-aA*kK*r2*q+aA*kK)-GEWY2^(aA*kK*r2*q-aA*kK-kK*bB)
  -GEWY2^(kK*bB-aA*kK-kK*bB*r2*q)-GEWY2^(aA*kK+kK*bB*r2*q-kK*bB), 0, 0, 0],

 [[` `,[6,1],[`A_1`,[1,1]]],
  q^2*(q^2-1)*(q^4-q^2+1)*(q^8-q^4+1)*(q^4+1)^2,
  q^2*(q^2-1)*(q^4-q^2+1)*(q^8-q^4+1)*(q^4+1)^2,q^2*(q^2-1)*(q^4-q^2+1)*(q^4+1),
  -q^2*(2*q^8-2*q^2+1-3*q^6+3*q^4), q^2*(q^2-1)*(q^4+1), q^2*(q^2-1)*(q^4+1),
  -q^2*(2*q^4-2*q^2+1), q^2*(q^2-1), -q^2*(q^2+1), q^2*(q^2-1), q^2*(2*q^2-1),
  -q^2, -q^2, -q^2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, (q^2-1), -1, 0,
  -(q^4-q^2+1)*(q^2+2*EW3^kK*q^2+2*EW3^(-kK)*q^2-1-EW3^(-kK)-EW3^kK),
  EW3^kK-3*EW3^kK*q^2+EW3^(-kK)-3*EW3^(-kK)*q^2+1-2*q^2,
  EW3^kK+EW3^(-kK)+1, EW3^kK+EW3^(-kK)+1, EW3^kK+EW3^(-kK)+1,
  1-q^2+2*GEWY2^(aA*kK)+2*GEWY2^(-aA*kK)+GEWY2^(aA*kK*(1+r2*q))
  +GEWY2^(-aA*kK*(1+r2*q))-GEWY2^(aA*kK*r2*q)*q^2-GEWY2^(-aA*kK*r2*q)*q^2
  +GEWY2^(aA*kK*r2*q)+GEWY2^(-aA*kK*r2*q)-2*GEWY2^(aA*kK)*q^2
  -2*GEWY2^(-aA*kK)*q^2-GEWY2^(2*aA*kK)*q^2-GEWY2^(-2*aA*kK)*q^2
  -GEWY2^(aA*kK*(1+r2*q))*q^2-GEWY2^(-aA*kK*(1+r2*q))*q^2+GEWY2^(aA*kK*(1-r2*q))
  +GEWY2^(aA*kK*(r2*q-1))-GEWY2^(aA*kK*(1-r2*q))*q^2-GEWY2^(aA*kK*(r2*q-1))*q^2,
  1+2*GEWY2^(aA*kK)+2*GEWY2^(-aA*kK)+GEWY2^(aA*kK*r2*q)+GEWY2^(-aA*kK*r2*q)
  +GEWY2^(aA*kK*(1-r2*q))+GEWY2^(aA*kK*(r2*q-1))+GEWY2^(aA*kK*(1+r2*q))
  +GEWY2^(-aA*kK*(1+r2*q)), -GEWY2^(aA*kK)-GEWY2^(-aA*kK),
  0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
  GEWY2^(2*kK*bB)+GEWY2^(-2*kK*bB)+GEWY2^(2*aA*kK)+GEWY2^(-2*aA*kK)
  +GEWY2^(kK*r2*q*(aA-bB))+GEWY2^(kK*r2*q*(bB-aA))
  +GEWY2^(kK*r2*q*(aA+bB))+GEWY2^(-kK*r2*q*(aA+bB))
  +GEWY2^(kK*bB+aA*kK*r2*q-aA*kK)+GEWY2^(aA*kK-kK*bB-aA*kK*r2*q)
  +GEWY2^(kK*bB+aA*kK*r2*q+aA*kK)+GEWY2^(-kK*bB-aA*kK*r2*q-aA*kK)
  +GEWY2^(kK*bB*r2*q+kK*bB+aA*kK)+GEWY2^(-kK*bB*r2*q-kK*bB-aA*kK)
  +GEWY2^(kK*bB+aA*kK-kK*bB*r2*q)+GEWY2^(kK*bB*r2*q-kK*bB-aA*kK)
  +GEWY2^(kK*bB-aA*kK*r2*q-aA*kK)+GEWY2^(aA*kK*r2*q+aA*kK-kK*bB)
  +GEWY2^(kK*bB-aA*kK+kK*bB*r2*q)+GEWY2^(aA*kK-kK*bB*r2*q-kK*bB)
  +GEWY2^(kK*bB-aA*kK*r2*q+aA*kK)+GEWY2^(aA*kK*r2*q-aA*kK-kK*bB)
  +GEWY2^(kK*bB-aA*kK-kK*bB*r2*q)+GEWY2^(aA*kK+kK*bB*r2*q-kK*bB), 0, 0, 0],

 [[` `,[7,0],[`A_0`,[1]]],
  (q^2-1)*(q^2+1)*(q^4+1)^2*(q^4-q^2+1)*(q^8-q^4+1),
  (q^2-1)*(q^2+1)*(q^4+1)^2*(q^4-q^2+1)*(q^8-q^4+1),
  (q^2-1)*(q^2+1)*(q^4+1)*(q^4-q^2+1), -(q^10+q^4-q^2+1), (q^2-1)*(q^4+1),
  (q^2-1)*(q^4+1), -q^4+q^2-1, -q^4+q^2-1, q^2-1, q^2-1, q^2-1, q^2-1,
  q^2-1, q^2-1, -1, -1, -1, -1, -1, -1, 0,0,0,0,
  (q^2-1)*(GEWZ2^(aA*kK)+GEWZ2^(-aA*kK)),-GEWZ2^(aA*kK)-GEWZ2^(-aA*kK), 0,
  -(q^2+1)*(q^4-q^2+1)*(EW3^kK+EW3^(-kK)), -EW3^kK-EW3^(-kK),
  -EW3^kK-EW3^(-kK), -EW3^kK-EW3^(-kK), -EW3^kK-EW3^(-kK),
  -(q^2+1)*(GEWY2^(aA*kK)+GEWY2^(-aA*kK)),-GEWY2^(aA*kK)-GEWY2^(-aA*kK), 
  -GEWZ4^(aA*kK)-GEWZ4^(-aA*kK)-GEWZ4^(aA*kK*q^2)-GEWZ4^(-aA*kK*q^2),
  0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0],

 [[` `,[9,0],[`A_0`,[1]]],
  (q^2-1)*(q^2+1)^2*(q^2+r2*q+1)*(q^4+1)*(q^4-q^2+1)*(q^8-q^4+1),
  (q^2-1)*(q^2+1)^2*(q^2+r2*q+1)*(q^4+1)*(q^4-q^2+1)*(q^8-q^4+1),
  -(q^2+r2*q+1)*(r2*q^11-q^10+q^6-q^4+1), (q^2-1)*(q^2+1)*(q^6+q^2+r2*q+1),
  -q^6+q^4+r2*q^3-q^2-r2*q-1, -q^6+q^4+r2*q^3-q^2-r2*q-1, q^4-q^2-r2*q-1,
  q^4+r2*q^3-q^2-r2*q-1, 2*r2*q^3-q^2-r2*q-1, -q^2-r2*q-1, -(q^2+1)*(r2*q+1),
  -q^2-r2*q-1, -q^2-r2*q-1, -q^2-r2*q-1, -r2*q-1, -r2*q-1, -1, -1, -1, -1,
  (q^2+r2*q+1)*(q^2-1)*(GEWZ2^(aA*kK)+GEWZ2^(-aA*kK)), 
  -(r2*q+1)*(GEWZ2^(aA*kK)+GEWZ2^(-aA*kK)), -GEWZ2^(aA*kK)-GEWZ2^(-aA*kK),
  -GEWZ2^(aA*kK)-GEWZ2^(-aA*kK), 0,0,0,0,0,0,0,0,0,0,0,
  -(q^4+1)*(GEWC8pp^(aA*kK)+GEWC8pp^(-aA*kK)+GEWC8pp^(aA*kK*(r2*q-1))
  +GEWC8pp^(-aA*kK*(r2*q-1))), -GEWC8pp^(aA*kK)-GEWC8pp^(-aA*kK)
  -GEWC8pp^(aA*kK*(r2*q-1))-GEWC8pp^(-aA*kK*(r2*q-1)), -GEWC8pp^(aA*kK)
  -GEWC8pp^(-aA*kK)-GEWC8pp^(aA*kK*(r2*q-1))-GEWC8pp^(-aA*kK*(r2*q-1)),
  -GEWC8pp^(aA*kK)-GEWC8pp^(-aA*kK)-GEWC8pp^(aA*kK*(r2*q-1))
  -GEWC8pp^(-aA*kK*(r2*q-1)),  -GEWC8ppZ2^(aA*kK)-GEWC8ppZ2^(-aA*kK)
  -GEWC8ppZ2^(aA*kK*q^2)-GEWC8ppZ2^(-aA*kK*q^2)
  -GEWC8ppZ2^(aA*kK*(r2*q^3-r2*q+1))-GEWC8ppZ2^(-aA*kK*(r2*q^3-r2*q+1))
  -GEWC8ppZ2^(aA*kK*(r2*q^3-q^2-r2*q+2))-GEWC8ppZ2^(-aA*kK*(r2*q^3-q^2-r2*q+2)),  0,0,0,0,0,0,0,0,0,0,0,0],

 [[` `,[11,0],[`A_0`,[1]]],
  (q^2-1)*(q^2+1)^2*(q^2-r2*q+1)*(q^4+1)*(q^4-q^2+1)*(q^8-q^4+1),
  (q^2-1)*(q^2+1)^2*(q^2-r2*q+1)*(q^4+1)*(q^4-q^2+1)*(q^8-q^4+1),
  -(q^2-r2*q+1)*(-r2*q^11-q^10+q^6-q^4+1), (q^2-1)*(q^2+1)*(q^6+q^2-r2*q+1),
  -q^6+q^4-r2*q^3-q^2+r2*q-1, -q^6+q^4-r2*q^3-q^2+r2*q-1, q^4-q^2+r2*q-1,
  q^4-r2*q^3-q^2+r2*q-1, -2*r2*q^3-q^2+r2*q-1, -q^2+r2*q-1, -(q^2+1)*(-r2*q+1),
  -q^2+r2*q-1, -q^2+r2*q-1, -q^2+r2*q-1, r2*q-1, r2*q-1, -1, -1, -1, -1,
  (q^2-r2*q+1)*(q^2-1)*(GEWZ2^(aA*kK)+GEWZ2^(-aA*kK)), 
  (r2*q-1)*(GEWZ2^(aA*kK)+GEWZ2^(-aA*kK)), -GEWZ2^(aA*kK)-GEWZ2^(-aA*kK),
  -GEWZ2^(aA*kK)-GEWZ2^(-aA*kK), 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  -(q^4+1)*(GEWC8p^(aA*kK)+GEWC8p^(-aA*kK)+GEWC8p^(aA*kK*(r2*q+1))
  +GEWC8p^(-aA*kK*(r2*q+1))), -GEWC8p^(aA*kK)-GEWC8p^(-aA*kK)
  -GEWC8p^(aA*kK*(r2*q+1))-GEWC8p^(-aA*kK*(r2*q+1)), -GEWC8p^(aA*kK)
  -GEWC8p^(-aA*kK)-GEWC8p^(aA*kK*(r2*q+1))-GEWC8p^(-aA*kK*(r2*q+1)),
  -GEWC8p^(aA*kK)-GEWC8p^(-aA*kK)-GEWC8p^(aA*kK*(r2*q+1))
  -GEWC8p^(-aA*kK*(r2*q+1)),  -GEWC8pZ2^(aA*kK)-GEWC8pZ2^(-aA*kK)
  -GEWC8pZ2^(aA*kK*q^2)-GEWC8pZ2^(-aA*kK*q^2)
  -GEWC8pZ2^(aA*kK*(r2*q^3-r2*q-1))-GEWC8pZ2^(-aA*kK*(r2*q^3-r2*q-1))
  -GEWC8pZ2^(aA*kK*(r2*q^3+q^2-r2*q-2))-GEWC8pZ2^(-aA*kK*(r2*q^3+q^2-r2*q-2)),
  0,0,0,0,0,0,0],

 [[` `,[12,0],[`A_0`,[1]]],
  (q^2-1)^2*(q^2+1)^2*(q^4+1)*(q^4-q^2+1)*(q^8-q^4+1),
  (q^2-1)^2*(q^2+1)^2*(q^4+1)*(q^4-q^2+1)*(q^8-q^4+1),
  (q^2-1)^2*(q^2+1)^2*(q^4-q^2+1), (q^2-1)*(q^2+1)*(-q^6+q^2-1),
  2*q^8-q^6-q^4-q^2+1, 2*q^8-q^6-q^4-q^2+1, 2*q^6-q^4-q^2+1,
  -q^4-q^2+1, -2*q^4-q^2+1, -2*q^4-q^2+1, -2*q^4-q^2+1, -q^2+1, -q^2+1,
  -q^2+1, 1, 1, 1, 1, 1, 1, 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  -(q^2-r2*q+1)*(q^2-1)*(GEWC8pp^(aA*kK)+GEWC8pp^(-aA*kK)+GEWC8pp^(aA*kK*(1
  -q*r2))+GEWC8pp^(-aA*kK*(1-q*r2))),-1/2*r2*(2*q-r2)*(GEWC8pp^(aA*kK)
  +GEWC8pp^(-aA*kK)+GEWC8pp^(aA*kK*(1-q*r2))+GEWC8pp^(aA*kK*(q*r2-1))),
  GEWC8pp^(aA*kK)+GEWC8pp^(-aA*kK)+GEWC8pp^(aA*kK*(1-q*r2))+GEWC8pp^(aA*kK*
  (q*r2-1)), GEWC8pp^(aA*kK)+GEWC8pp^(-aA*kK)+GEWC8pp^(aA*kK*(1-q*r2))
  +GEWC8pp^(aA*kK*(q*r2-1)), 0, -(q^2+r2*q+1)*(q^2-1)*(GEWC8p^(aA*lL)
  +GEWC8p^(-aA*lL)+GEWC8p^(aA*lL*(1+q*r2))
  +GEWC8p^(-aA*lL*(q*r2+1))),1/2*r2*(2*q+r2)*(GEWC8p^(aA*lL)+GEWC8p^(-aA*lL)
  +GEWC8p^(aA*lL*(1+q*r2))+GEWC8p^(-aA*lL*(q*r2+1))),
  GEWC8p^(aA*lL)+GEWC8p^(-aA*lL)+GEWC8p^(aA*lL*(1+q*r2))
  +GEWC8p^(-aA*lL*(q*r2+1)), GEWC8p^(aA*lL)+GEWC8p^(-aA*lL)
  +GEWC8p^(aA*lL*(1+q*r2))+GEWC8p^(-aA*lL*(q*r2+1)),
  0, (GEWC8pp^(aA*kK)+GEWC8pp^(-aA*kK)+GEWC8pp^(aA*kK*(r2*q-1))
  +GEWC8pp^(-aA*kK*(r2*q-1)))*(GEWC8p^(bB*lL)+GEWC8p^(-bB*lL)
  +GEWC8p^(bB*lL*(r2*q+1))+GEWC8p^(-bB*lL*(r2*q+1))),
  0,0,0,0,0,0],

 [[` `,[15,0],[`A_0`,[1]]],
  (q^2-1)^2*(q^4+1)^2*(q^4-q^2+1)*(q^8-q^4+1),
  (q^2-1)^2*(q^4+1)^2*(q^4-q^2+1)*(q^8-q^4+1), (q^2-1)^2*(q^4+1)*(q^4-q^2+1),
  -(q^2-1)*(3*q^8-3*q^6+3*q^4-2*q^2+1), (q^2-1)*(q^4+1)*(2*q^2-1),
  (q^2-1)*(q^4+1)*(2*q^2-1), -4*q^6+5*q^4-3*q^2+1, 3*q^4-3*q^2+1,
  -2*q^4-3*q^2+1, (q^2-1)*(2*q^2-1), 4*q^4-3*q^2+1, -3*q^2+1, -3*q^2+1,
  -3*q^2+1, 1, 1, 1, 1, 1, 1, 0,0,0,0, 0,0, 0,
  -(q^2-1)*(q^4-q^2+1)*(EW3^(kK-lL)+EW3^(kK+lL)+EW3^(lL-kK)+EW3^lL+EW3^(-lL)
  +EW3^(-kK)+EW3^(-kK-lL)+EW3^kK),
  -(2*q^2-1)*(EW3^(kK-lL)+EW3^(kK+lL)+EW3^(lL-kK)+EW3^lL+EW3^(-lL)+EW3^(-kK)
  +EW3^(-kK-lL)+EW3^kK),
  EW3^(kK-lL)+EW3^(kK+lL)+EW3^(lL-kK)+EW3^lL+EW3^(-lL)+EW3^(-kK)+EW3^(-kK-lL)
  +EW3^kK,
  EW3^(kK-lL)+EW3^(kK+lL)+EW3^(lL-kK)+EW3^lL+EW3^(-lL)+EW3^(-kK)+EW3^(-kK-lL)
  +EW3^kK,
  EW3^(kK-lL)+EW3^(kK+lL)+EW3^(lL-kK)+EW3^lL+EW3^(-lL)+EW3^(-kK)+EW3^(-kK-lL)
  +EW3^kK,
  (-q^2+1)*(GEWY2^(aA*kK+aA*lL)+ GEWY2^(-aA*kK-aA*lL)+GEWY2^((aA+r2*q*aA/2)*kK
  +r2*q*aA/2*lL)+GEWY2^((aA-r2*q*aA/2)*kK-r2*q*aA/2*lL)+GEWY2^(aA*kK-aA*lL)
  +GEWY2^(-aA*kK+aA*lL)+GEWY2^((aA+r2*q*aA/2)*kK-r2*q*aA/2*lL)+GEWY2^((aA
  -r2*q*aA/2)*kK+r2*q*aA/2*lL)+GEWY2^(-r2*q*aA/2*kK+(aA+r2*q*aA/2)*lL)
  +GEWY2^(r2*q*aA/2*kK+(aA+r2*q*aA/2)*lL)+GEWY2^(r2*q*aA/2*kK+(aA-r2*q*aA/2)*lL)  +GEWY2^(-r2*q*aA/2*kK+(aA-r2*q*aA/2)*lL)+GEWY2^(r2*q*aA*kK)+ GEWY2^(-r2*q
  *aA*kK)+GEWY2^((r2*q*aA/2)*kK+(-aA+r2*q*aA/2)*lL)+GEWY2^((-r2*q*aA/2)*kK+(
  -aA+r2*q*aA/2)*lL)+GEWY2^(r2*q*aA*lL)+ GEWY2^(-r2*q*aA*lL)+GEWY2^((r2*q*aA/2)
  *kK+(-aA-r2*q*aA/2)*lL)+GEWY2^((-r2*q*aA/2)*kK+(-aA-r2*q*aA/2)*lL)+GEWY2^((
  -aA+r2*q*aA/2)*kK+r2*q*aA/2*lL)+GEWY2^((-aA-r2*q*aA/2)*kK-r2*q*aA/2*lL)+GEWY2
  ^((-aA-r2*q*aA/2)*kK+r2*q*aA/2*lL)+GEWY2^((-aA+r2*q*aA/2)*kK-r2*q*aA/2*lL)),
  GEWY2^(aA*kK+aA*lL)+ GEWY2^(-aA*kK-aA*lL)+GEWY2^((aA+r2*q*aA/2)*kK
  +r2*q*aA/2*lL)+GEWY2^((aA-r2*q*aA/2)*kK-r2*q*aA/2*lL)+GEWY2^(aA*kK-aA*lL)
  +GEWY2^(-aA*kK+aA*lL)+GEWY2^((aA+r2*q*aA/2)*kK-r2*q*aA/2*lL)+GEWY2^((aA
  -r2*q*aA/2)*kK+r2*q*aA/2*lL)+GEWY2^(-r2*q*aA/2*kK+(aA+r2*q*aA/2)*lL)
  +GEWY2^(r2*q*aA/2*kK+(aA+r2*q*aA/2)*lL)+GEWY2^(r2*q*aA/2*kK+(aA-r2*q*aA/2)
  *lL)+GEWY2^(-r2*q*aA/2*kK+(aA-r2*q*aA/2)*lL)+GEWY2^(r2*q*aA*kK)+ GEWY2^(-r2
  *q*aA*kK)+GEWY2^((r2*q*aA/2)*kK+(-aA+r2*q*aA/2)*lL)+GEWY2^((-r2*q*aA/2)*kK
  +(-aA+r2*q*aA/2)*lL)+GEWY2^(r2*q*aA*lL)+ GEWY2^(-r2*q*aA*lL)+GEWY2^((r2*q
  *aA/2)*kK+(-aA-r2*q*aA/2)*lL)+GEWY2^((-r2*q*aA/2)*kK+(-aA-r2*q*aA/2)*lL)
  +GEWY2^((-aA+r2*q*aA/2)*kK+r2*q*aA/2*lL)+GEWY2^((-aA-r2*q*aA/2)*kK-r2*q
  *aA/2*lL)+GEWY2^((-aA-r2*q*aA/2)*kK+r2*q*aA/2*lL)+GEWY2^((-aA+r2*q*aA/2)*kK
  -r2*q*aA/2*lL),
  0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  GEWY2^((aA+bB)*kK+(aA-bB)*lL)+GEWY2^((aA+bB)*kK+(-aA+bB)*lL)
  +GEWY2^((-(aA+bB)*q/r2+aA)*kK+((-aA+bB)*q/r2+bB)*lL)
  +GEWY2^(((aA+bB)*q/r2+aA)*kK+((aA-bB)*q/r2+bB)*lL)  
  +GEWY2^(((aA+bB)*q/r2+aA)*kK+((-aA+bB)*q/r2-bB)*lL)
  +GEWY2^(((aA-bB)*q/r2+aA)*kK+(-(aA+bB)*q/r2+bB)*lL)
  +GEWY2^(((-aA+bB)*q/r2+aA)*kK+((aA+bB)*q/r2+bB)*lL)
  +GEWY2^((aA-bB)*kK+(aA+bB)*lL)+GEWY2^((aA-bB)*kK+(-aA-bB)*lL)
  +GEWY2^(((-aA+bB)*q/r2+aA)*kK+(-(aA+bB)*q/r2-bB)*lL)
  +GEWY2^((-(aA+bB)*q/r2+bB)*kK+((aA-bB)*q/r2+aA)*lL)
  +GEWY2^(((aA-bB)*q/r2+bB)*kK+((aA+bB)*q/r2+aA)*lL)
  +GEWY2^(((aA-bB)*q/r2+aA)*kK+((aA+bB)*q/r2-bB)*lL)
  +GEWY2^((-(aA+bB)*q/r2+aA)*kK+((aA-bB)*q/r2-bB)*lL)
  +GEWY2^(((aA+bB)*q/r2+bB)*kK+((-aA+bB)*q/r2+aA)*lL)
  +GEWY2^(((-aA+bB)*q/r2+bB)*kK+(-(aA+bB)*q/r2+aA)*lL)
  +GEWY2^((r2*q*aA)*kK+(r2*q*bB)*lL)+GEWY2^((-r2*q*aA)*kK+(-r2*q*bB)*lL)
  +GEWY2^(((aA+bB)*q/r2+bB)*kK+((aA-bB)*q/r2-aA)*lL)
  +GEWY2^(((-aA+bB)*q/r2+bB)*kK+((aA+bB)*q/r2-aA)*lL)
  +GEWY2^((r2*q*bB)*kK+(r2*q*aA)*lL)+GEWY2^((r2*q*aA)*kK+(-r2*q*bB)*lL)
  +GEWY2^(((aA-bB)*q/r2+bB)*kK+(-(aA+bB)*q/r2-aA)*lL)
  +GEWY2^((-(aA+bB)*q/r2+bB)*kK+((-aA+bB)*q/r2-aA)*lL)
  +GEWY2^((r2*q*bB)*kK+(-r2*q*aA)*lL)
  +GEWY2^(((aA+bB)*q/r2-bB)*kK+((aA-bB)*q/r2+aA)*lL)
  +GEWY2^(((aA-bB)*q/r2-bB)*kK+(-(aA+bB)*q/r2+aA)*lL)
  +GEWY2^((-aA+bB)*kK+(aA+bB)*lL)+GEWY2^((-r2*q*bB)*kK+(-r2*q*aA)*lL)
  +GEWY2^((-(aA+bB)*q/r2-bB)*kK+((-aA+bB)*q/r2+aA)*lL)
  +GEWY2^((-r2*q*aA)*kK+(r2*q*bB)*lL)
  +GEWY2^(((-aA+bB)*q/r2-bB)*kK+((aA+bB)*q/r2+aA)*lL)
  +GEWY2^((-r2*q*bB)*kK+(r2*q*aA)*lL)
  +GEWY2^(((aA+bB)*q/r2-bB)*kK+((-aA+bB)*q/r2-aA)*lL)
  +GEWY2^(((-aA+bB)*q/r2-bB)*kK+(-(aA+bB)*q/r2-aA)*lL)
  +GEWY2^(((aA+bB)*q/r2-aA)*kK+((aA-bB)*q/r2-bB)*lL)
  +GEWY2^(((aA-bB)*q/r2-aA)*kK+((aA+bB)*q/r2+bB)*lL)
  +GEWY2^((-(aA+bB)*q/r2-aA)*kK+((-aA+bB)*q/r2-bB)*lL)
  +GEWY2^((-(aA+bB)*q/r2-aA)*kK+((aA-bB)*q/r2+bB)*lL)
  +GEWY2^((-aA+bB)*kK+(-aA-bB)*lL)
  +GEWY2^(((aA-bB)*q/r2-bB)*kK+((aA+bB)*q/r2-aA)*lL)
  +GEWY2^((-(aA+bB)*q/r2-bB)*kK+((aA-bB)*q/r2-aA)*lL)
  +GEWY2^(((aA+bB)*q/r2-aA)*kK+((-aA+bB)*q/r2+bB)*lL)
  +GEWY2^(((aA-bB)*q/r2-aA)*kK+(-(aA+bB)*q/r2-bB)*lL)
  +GEWY2^(((-aA+bB)*q/r2-aA)*kK+(-(aA+bB)*q/r2+bB)*lL)
  +GEWY2^((-aA-bB)*kK+(aA-bB)*lL)
  +GEWY2^(((-aA+bB)*q/r2-aA)*kK+((aA+bB)*q/r2-bB)*lL)
  +GEWY2^((-aA-bB)*kK+(-aA+bB)*lL), 0,0,0],

 [[` `,[16,0],[`A_0`,[1]]],
  (q^2-1)^2*(q^2+1)^2*(q^4+1)^2*(q^8-q^4+1),
  (q^2-1)^2*(q^2+1)^2*(q^4+1)^2*(q^8-q^4+1), (q^2-1)^2*(q^2+1)^2*(q^4+1),
  -(q^2-1)*(q^2+1), -(q^2-1)*(q^2+1)*(q^4+1), -(q^2-1)*(q^2+1)*(q^4+1),
  -q^6-q^4+1, 1, q^4+1, -(q^2-1)*(q^2+1), -2*q^4+1, 1,1,1,1,1,1,1,1,1,
  0,0,0,0,0,0,0, -(q^2-1)*(q^2+1)^2*(EW3^kK+EW3^(-kK)), (q^2+1)
  *(EW3^kK+EW3^(-kK)), EW3^kK+EW3^(-kK), EW3^kK+EW3^(-kK), EW3^kK+EW3^(-kK),
  0,0,0,0,0,0,0,0, 0,0,0,0,0,0,0,0,0, 
  GEWC12^(aA*kK)+GEWC12^(-aA*kK)+GEWC12^(aA*kK*q^2)+GEWC12^(-aA*kK*q^2)
  +GEWC12^(aA*kK*(q^2-1))+GEWC12^(aA*kK*(1-q^2)), 0,0],

 [[` `,[17,0],[`A_0`,[1]]],
  (q^2+1)^2*(q^2-1)^2*(q^4+1)^2*(q^4-q^2+1)*(q^4+r2*q^3+q^2+r2*q+1),
  (q^2+1)^2*(q^2-1)^2*(q^4+1)^2*(q^4-q^2+1)*(q^4+r2*q^3+q^2+r2*q+1),
  -1/2*(q^2-1)*(q^4+1)*(2*q^7+q^6*r2+r2*q^4+2*q^3+r2*q^2+2*q+r2)*r2,
  (q^2+1)*(q^2-1)*(-r2*q^5-2*q^4-r2*q-1),
  -(q^2+r2*q+1)^2*(q^2-1)*(q^2-r2*q+1), -(q^2+r2*q+1)^2*(q^2-1)*(q^2-r2*q+1),
  q^6+q^5*r2+q^4+r2*q+1, r2*q^5-r2*q^3+r2*q+1, -q^4-2*r2*q^3+r2*q+1,
  q^4+r2*q+1, 2*q^4+r2*q+r2*q^3+1, r2*q+1, r2*q+1, r2*q+1, r2*q+1, r2*q+1,
  1, 1, 1, 1, 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  GEWC24pp^(aA*kK)+GEWC24pp^(-aA*kK)+GEWC24pp^(aA*kK*q^2)+GEWC24pp^(-aA*kK*q^2)
  +GEWC24pp^(aA*kK*(r2*q^3-1))+GEWC24pp^(-aA*kK*(r2*q^3-1))
  +GEWC24pp^(aA*kK*(r2*q^3-q^2-1))+GEWC24pp^(-aA*kK*(r2*q^3-q^2-1))
  +GEWC24pp^(aA*kK*(r2*q^3-q^2+r2*q-1))+GEWC24pp^(-aA*kK*(r2*q^3-q^2+r2*q-1))
  +GEWC24pp^(aA*kK*(r2*q^3-q^2+r2*q-2))+GEWC24pp^(aA*kK*(2-r2*q^3+q^2-r2*q)),0],

 [[` `,[18,0],[`A_0`,[1]]],
  (q^2+1)^2*(q^2-1)^2*(q^4+1)^2*(q^4-q^2+1)*(q^4-r2*q^3+q^2-r2*q+1),
  (q^2+1)^2*(q^2-1)^2*(q^4+1)^2*(q^4-q^2+1)*(q^4-r2*q^3+q^2-r2*q+1),
  1/2*(q^2-1)*(q^4+1)*(2*q^7-q^6*r2-r2*q^4+2*q^3-r2*q^2+2*q-r2)*r2,
  (q^2+1)*(q^2-1)*(r2*q^5-2*q^4+r2*q-1),
  -(q^2-r2*q+1)^2*(q^2-1)*(q^2+r2*q+1), -(q^2-r2*q+1)^2*(q^2-1)*(q^2+r2*q+1),
  q^6-q^5*r2+q^4-r2*q+1, -r2*q^5+r2*q^3-r2*q+1, -q^4+2*r2*q^3-r2*q+1,
  q^4-r2*q+1, 2*q^4-r2*q-r2*q^3+1, -r2*q+1, -r2*q+1, -r2*q+1, -r2*q+1, -r2*q+1,
  1, 1, 1, 1, 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
  GEWC24p^(aA*kK)+GEWC24p^(-aA*kK)+GEWC24p^(aA*kK*q^2)+GEWC24p^(-aA*kK*q^2)
  +GEWC24p^(aA*kK*(r2*q^3+1))+GEWC24p^(-aA*kK*(r2*q^3+1))
  +GEWC24p^(aA*kK*(r2*q^3+q^2+1))+GEWC24p^(-aA*kK*(r2*q^3+q^2+1))
  +GEWC24p^(aA*kK*(r2*q^3+q^2+r2*q+1))+GEWC24p^(-aA*kK*(r2*q^3+q^2+r2*q+1))
  +GEWC24p^(aA*kK*(r2*q^3+q^2+r2*q+2))+GEWC24p^(-aA*kK*(r2*q^3+q^2+r2*q+2))]

]):

Klassen.`Ree`.Parameter := array(-1..51,[
 [[],[]], [[],[]],
 [[],[]],
 [[],[]],
 [[],[]],
 [[],[]],
 [[],[]],
 [[],[]],
 [[],[]],
 [[],[]],
 [[],[]],
 [[],[]],
 [[],[]],
 [[],[]],
 [[],[]],
 [[],[]],
 [[],[]],
 [[],[]],
 [[],[]],
 [[],[]],
 [[],[]],
 [[aA=1..q^2-1],[[aA,q^2-1]]],
 [[aA=1..q^2-1],[[aA,q^2-1]]],
 [[aA=1..q^2-1],[[aA,q^2-1]]],
 [[aA=1..q^2-1],[[aA,q^2-1]]],
 [[aA=1..q^2-1],[[aA,q^2-1]]],
 [[aA=1..q^2-1],[[aA,q^2-1]]],
 [[aA=1..q^2-1, bB=1..q^2-1],[`many`]],
 [[],[]],
 [[],[]],
 [[],[]],
 [[],[]],
 [[],[]],
 [[aA=1..q^2+1],[[aA,(q^2+1)/3]]],
 [[aA=1..q^2+1],[[aA,(q^2+1)/3]]],
 [[aA=1..q^4-1],[[aA,q^2-1],[aA,q^2+1]]],
 [[aA=1..q^2-r2*q+1],[[aA,q^2-r2*q+1]]],
 [[aA=1..q^2-r2*q+1],[[aA,q^2-r2*q+1]]],
 [[aA=1..q^2-r2*q+1],[[aA,q^2-r2*q+1]]],
 [[aA=1..q^2-r2*q+1],[[aA,q^2-r2*q+1]]],
 [[aA=1..(q^2-1)*(q^2-r2*q+1)],[[aA,q^2-1],[aA,q^2-r2*q+1]]],
 [[aA=1..q^2+r2*q+1],[[aA,q^2+r2*q+1]]],
 [[aA=1..q^2+r2*q+1],[[aA,q^2+r2*q+1]]],
 [[aA=1..q^2+r2*q+1],[[aA,q^2+r2*q+1]]],
 [[aA=1..q^2+r2*q+1],[[aA,q^2+r2*q+1]]],
 [[aA=1..(q^2-1)*(q^2+r2*q+1)],[[aA,q^2-1],[aA,q^2+r2*q+1]]],
 [[aA=1..q^2-r2*q+1,bB=1..q^2+r2*q+1],[[aA,q^2-r2*q+1],[bB,q^2+r2*q+1]]],
 [[aA=1..q^2-r2*q+1,bB=1..q^2-r2*q+1],[`many`]],
 [[aA=1..q^2+r2*q+1,bB=1..q^2+r2*q+1],[`many`]],
 [[aA=1..q^2+1,bB=1..q^2+1],[`many`]],
 [[aA=1..q^4-q^2+1],[aA,(q^4-q^2+1)/3]],
 [[aA=1..q^4-r2*q^3+q^2-r2*q+1],[aA,q^4-r2*q^3+q^2-r2*q+1]],
 [[aA=1..q^4+r2*q^3+q^2+r2*q+1],[aA,q^4+r2*q^3+q^2+r2*q+1]]
]):

Char.`Ree`.Parameter := array(-1..41,[
 [[],[]], [[],[]],
 [[],[]],
 [[],[]],
 [[],[]],
 [[],[]],
 [[],[]],
 [[],[]],
 [[],[]],
 [[],[]],
 [[],[]],
 [[],[]],
 [[],[]],
 [[],[]],
 [[],[]],
 [[],[]],
 [[],[]],
 [[],[]],
 [[],[]],
 [[],[]],
 [[],[]],
 [[],[]],
 [[],[]],
 [[kK=1..q^2-1],[[kK,q^2-1]]],
 [[kK=1..q^2-1],[[kK,q^2-1]]],
 [[kK=1..q^2-1],[[kK,q^2-1]]],
 [[kK=1..q^2-1],[[kK,q^2-1]]],
 [[kK=1..q^2-1],[[kK,q^2-1]]],
 [[kK=1..q^2-1],[[kK,q^2-1]]],
 [[kK=1..q^2-1, lL=1..q^2-1],[`many`]],
 [[],[]],
 [[],[]],
 [[],[]],
 [[kK=1..q^2+1],[[kK,(q^2+1)/3]]],
 [[kK=1..q^2+1],[[kK,(q^2+1)/3]]],
 [[kK=1..q^4-1],[[kK,q^2-1],[kK,q^2+1]]],
 [[kK=1..(q^2-1)*(q^2-r2*q+1)],[[kK,q^2-1],[kK,q^2-r2*q+1]]],
 [[kK=1..(q^2-1)*(q^2+r2*q+1)],[[kK,q^2-1],[kK,q^2+r2*q+1]]],
 [[kK=1..q^2-r2*q+1,lL=1..q^2+r2*q+1],[[kK,q^2-r2*q+1],[lL,q^2+r2*q+1]]],
 [[kK=1..q^2+1,lL=1..q^2+1],[`many`]],
 [[kK=1..q^4-q^2+1],[kK,(q^4-q^2+1)/3]],
 [[kK=1..q^4-r2*q^3+q^2-r2*q+1],[kK,q^4-r2*q^3+q^2-r2*q+1]],
 [[kK=1..q^4+r2*q^3+q^2+r2*q+1],[kK,q^4+r2*q^3+q^2+r2*q+1]]
]):

# Summationsprozeduren (nach Shinoda)

Klassen.`2F4002`.Summe.1 := proc(tt) tt end: 
Klassen.`2F4002`.Summe.2 := proc(tt) tt end: 
Klassen.`2F4002`.Summe.3 := proc(tt) tt end: 
Klassen.`2F4002`.Summe.4 := proc(tt) tt end: 
Klassen.`2F4002`.Summe.5 := proc(tt) tt end: 
Klassen.`2F4002`.Summe.6 := proc(tt) tt end: 
Klassen.`2F4002`.Summe.7 := proc(tt) tt end: 
Klassen.`2F4002`.Summe.8 := proc(tt) tt end: 
Klassen.`2F4002`.Summe.9 := proc(tt) tt end: 
Klassen.`2F4002`.Summe.10:= proc(tt) tt end: 
Klassen.`2F4002`.Summe.11:= proc(tt) tt end: 
Klassen.`2F4002`.Summe.12:= proc(tt) tt end: 
Klassen.`2F4002`.Summe.13:= proc(tt) tt end: 
Klassen.`2F4002`.Summe.14:= proc(tt) tt end: 
Klassen.`2F4002`.Summe.15:= proc(tt) tt end: 
Klassen.`2F4002`.Summe.16:= proc(tt) tt end: 
Klassen.`2F4002`.Summe.17:= proc(tt) tt end: 
Klassen.`2F4002`.Summe.18:= proc(tt) tt end: 
Klassen.`2F4002`.Summe.19:= proc(tt) tt end: 
Klassen.`2F4002`.Summe.20 := proc(tt) 
  local s1;   s1 := nesum(tt,aA=1..q^2-2);   linkomb(1/2,s1);
end:
Klassen.`2F4002`.Summe.21 := proc(tt) 
  local s1;   s1 := nesum(tt,aA=1..q^2-2);   linkomb(1/2,s1);
end:
Klassen.`2F4002`.Summe.22 := proc(tt) 
  local s1;   s1 := nesum(tt,aA=1..q^2-2);   linkomb(1/2,s1);
end:
Klassen.`2F4002`.Summe.23 := proc(tt) 
  local s1;   s1 := nesum(tt,aA=1..q^2-2);   linkomb(1/2,s1);
end:
Klassen.`2F4002`.Summe.24 := proc(tt) 
  local s1;   s1 := nesum(tt,aA=1..q^2-2);   linkomb(1/2,s1);
end:
Klassen.`2F4002`.Summe.25 := proc(tt) 
  local s1;   s1 := nesum(tt,aA=1..q^2-2);   linkomb(1/2,s1);
end:
Klassen.`2F4002`.Summe.26 := proc(tt)
  local s1,s2,s3,s4,s5,s6,s7,s8,tt1;
  s1 := nesum(tt,aA=1..q^2-2);
  s2 := nesum(s1,bB=1..q^2-2);
  tt1 := eesubs(bB=aA,tt);           s3 := nesum(tt1,aA=1..q^2-2);
  tt1 := eesubs(bB=-aA,tt);          s4 := nesum(tt1,aA=1..q^2-2);
  tt1 := eesubs(aA=-(q*r2-1)*bB,tt); s5:= nesum(tt1,bB=1..q^2-2);
  tt1 := eesubs(aA=(q*r2-1)*bB,tt);  s6:= nesum(tt1,bB=1..q^2-2);
  tt1 := eesubs(bB=-(q*r2-1)*aA,tt); s7:= nesum(tt1,aA=1..q^2-2);
  tt1 := eesubs(bB=(q*r2-1)*aA,tt);  s8:= nesum(tt1,aA=1..q^2-2);
  linkomb(1/16,s2,-1/16,s3,-1/16,s4,-1/16,s5,-1/16,s6,-1/16,s7,-1/16,s8);
end:
Klassen.`2F4002`.Summe.27 := proc(tt) tt end: 
Klassen.`2F4002`.Summe.28 := proc(tt) tt end: 
Klassen.`2F4002`.Summe.29 := proc(tt) tt end: 
Klassen.`2F4002`.Summe.30 := proc(tt) tt end: 
Klassen.`2F4002`.Summe.31 := proc(tt) tt end: 
Klassen.`2F4002`.Summe.32 := proc(tt) 
  local s1,s2,s3;
  s1:= nesum(tt,aA=1..q^2);
  s2:= eesubs(aA=(q^2+1)/3,tt);  s3:= eesubs(aA=2*(q^2+1)/3,tt);
  linkomb(1/2,s1,-1/2,s2,-1/2,s3);
end: 
Klassen.`2F4002`.Summe.33 := proc(tt) 
  local s1,s2,s3;
  s1:= nesum(tt,aA=1..q^2);
  s2:= eesubs(aA=(q^2+1)/3,tt);  s3:= eesubs(aA=2*(q^2+1)/3,tt);
  linkomb(1/2,s1,-1/2,s2,-1/2,s3);
end: 
Klassen.`2F4002`.Summe.34 := proc(tt)
  local s1,s2,s3,tt1;
  s1 := nesum(tt,aA=1..q^4-2);
  tt1 := eesubs(aA=(q^2-1)*aA,tt);
  s2 := nesum(tt1,aA=1..q^2);
  tt1 := eesubs(aA=(q^2+1)*aA,tt);
  s3 := nesum(tt1,aA=1..q^2-2);
  linkomb(1/4,s1,-1/4,s2,-1/4,s3); 
end: 
Klassen.`2F4002`.Summe.35 := proc(tt)
  local s1;   s1 := nesum(tt,aA=1..q^2-r2*q);   linkomb(1/4,s1);
end: 
Klassen.`2F4002`.Summe.36 := proc(tt) 
  local s1;   s1 := nesum(tt,aA=1..q^2-r2*q);   linkomb(1/4,s1);
end: 
Klassen.`2F4002`.Summe.37 := proc(tt) 
  local s1;   s1 := nesum(tt,aA=1..q^2-r2*q);   linkomb(1/4,s1);
end: 
Klassen.`2F4002`.Summe.38 := proc(tt) 
  local s1;   s1 := nesum(tt,aA=1..q^2-r2*q);   linkomb(1/4,s1);
end: 
Klassen.`2F4002`.Summe.39 := proc(tt)
  local s1,s2,s3,tt1;
  s1 := nesum(tt,aA=1..q^4-r2*q^3+r2*q-2);
  tt1 := eesubs(aA=(q^2-1)*aA,tt);
  s2 := nesum(tt1,aA=1..q^2-r2*q);
  tt1 := eesubs(aA=(q^2-r2*q+1)*aA,tt);
  s3 := nesum(tt1,aA=1..q^2-2);
  linkomb(1/8,s1,-1/8,s2,-1/8,s3); 
end:
Klassen.`2F4002`.Summe.40 := proc(tt)
  local s1;   s1 := nesum(tt,aA=1..q^2+r2*q);   linkomb(1/4,s1);
end: 
Klassen.`2F4002`.Summe.41 := proc(tt) 
  local s1;   s1 := nesum(tt,aA=1..q^2+r2*q);   linkomb(1/4,s1);
end: 
Klassen.`2F4002`.Summe.42 := proc(tt) 
  local s1;   s1 := nesum(tt,aA=1..q^2+r2*q);   linkomb(1/4,s1);
end: 
Klassen.`2F4002`.Summe.43 := proc(tt) 
  local s1;   s1 := nesum(tt,aA=1..q^2+r2*q);   linkomb(1/4,s1);
end: 
Klassen.`2F4002`.Summe.44 := proc(tt) 
  local s1,s2,s3,tt1;
  s1 := nesum(tt,aA=1..q^4+r2*q^3-r2*q-2);
  tt1 := eesubs(aA=(q^2-1)*aA,tt);
  s2 := nesum(tt1,aA=1..q^2+r2*q);
  tt1 := eesubs(aA=(q^2+r2*q+1)*aA,tt);
  s3 := nesum(tt1,aA=1..q^2-2);
  linkomb(1/8,s1,-1/8,s2,-1/8,s3); 
end:
Klassen.`2F4002`.Summe.45 := proc(tt)
  local s1,s2;
  s1 := nesum(tt,aA=1..q^2-r2*q);
  s2 := nesum(s1,bB=1..q^2+r2*q);
  linkomb(1/16,s2); 
end: 
Klassen.`2F4002`.Summe.46 := proc(tt)
  local s1;   s1 := nesum(tt,aA=1..(q^2-r2*q-4)*(q^2-r2*q));   linkomb(1/96,s1);
end: 
Klassen.`2F4002`.Summe.47 := proc(tt)
  local s1;   s1 := nesum(tt,aA=1..(q^2+r2*q-4)*(q^2+r2*q));   linkomb(1/96,s1);
end: 
Klassen.`2F4002`.Summe.48 := proc(tt)
  local s1,s2,s3,s4,s5,s6,s7,s8,s9,s10,s11,s12,s13,s14,s15,s16,tt1;
  s1 := nesum(tt,aA=1..q^2);
  s2 := nesum(s1,bB=1..q^2);
  tt1 := eesubs(aA=bB,tt);           s3 := nesum(tt1,bB=1..q^2);
  tt1 := eesubs(aA=-bB,tt);          s4 := nesum(tt1,bB=1..q^2);
  tt1 := eesubs(aA=(q*r2-1)*bB,tt);  s5 := nesum(tt1,bB=1..q^2);
  tt1 := eesubs(aA=-(q*r2-1)*bB,tt); s6 := nesum(tt1,bB=1..q^2);
  tt1 := eesubs(aA=(q*r2+1)*bB,tt);  s7 := nesum(tt1,bB=1..q^2);
  tt1 := eesubs(aA=-(q*r2+1)*bB,tt); s8 := nesum(tt1,bB=1..q^2);
  tt1 := eesubs(bB=(q*r2-1)*aA,tt);  s9 := nesum(tt1,aA=1..q^2);
  tt1 := eesubs(bB=-(q*r2-1)*aA,tt); s10:= nesum(tt1,aA=1..q^2);
  tt1 := eesubs(bB=(q*r2+1)*aA,tt);  s11:= nesum(tt1,aA=1..q^2);
  tt1 := eesubs(bB=-(q*r2+1)*aA,tt); s12:= nesum(tt1,aA=1..q^2);
  s13 := eesubs(aA=bB, bB=(q^2+1)/3,tt);  s14 := eesubs(aA=-bB, bB=(q^2+1)/3,tt);
  s15 := eesubs(aA=bB, bB=2*(q^2+1)/3,tt);s16 := eesubs(aA=-bB, bB=2*(q^2+1)/3,tt);
  linkomb(1/48,s2,-1/48,s3,-1/48,s4,-1/48,s5,-1/48,s6,-1/48,s7,-1/48,s8,
    -1/48,s9,-1/48,s10,-1/48,s11,-1/48,s12,1/12,s13,1/12,s14,1/12,s15,1/12,s16);
end:
Klassen.`2F4002`.Summe.49 := proc(tt) 
  local s1,s2,s3;
  s1:= nesum(tt,aA=1..q^4-q^2);
  s2:= eesubs(aA=(q^4-q^2+1)/3,tt);  s3:= eesubs(aA=2*(q^4-q^2+1)/3,tt);
  linkomb(1/6,s1,-1/6,s2,-1/6,s3);
end:
Klassen.`2F4002`.Summe.50 := proc(tt)
  local s1;   s1 := nesum(tt,aA=1..q^4-r2*q^3+q^2-r2*q);   linkomb(1/12,s1);
end: 
Klassen.`2F4002`.Summe.51 := proc(tt)
  local s1;   s1 := nesum(tt,aA=1..q^4+r2*q^3+q^2+r2*q);   linkomb(1/12,s1);
end: 

Char.`2F4002`.Summe.1:=proc(tt) tt end:
Char.`2F4002`.Summe.2:=proc(tt) tt end:
Char.`2F4002`.Summe.3:=proc(tt) tt end:
Char.`2F4002`.Summe.4:=proc(tt) tt end:
Char.`2F4002`.Summe.5:=proc(tt) tt end:
Char.`2F4002`.Summe.6:=proc(tt) tt end:
Char.`2F4002`.Summe.7:=proc(tt) tt end:
Char.`2F4002`.Summe.8:=proc(tt) tt end:
Char.`2F4002`.Summe.9:=proc(tt) tt end:
Char.`2F4002`.Summe.10:=proc(tt) tt end:
Char.`2F4002`.Summe.11:=proc(tt) tt end:
Char.`2F4002`.Summe.12:=proc(tt) tt end:
Char.`2F4002`.Summe.13:=proc(tt) tt end:
Char.`2F4002`.Summe.14:=proc(tt) tt end:
Char.`2F4002`.Summe.15:=proc(tt) tt end:
Char.`2F4002`.Summe.16:=proc(tt) tt end:
Char.`2F4002`.Summe.17:=proc(tt) tt end:
Char.`2F4002`.Summe.18:=proc(tt) tt end:
Char.`2F4002`.Summe.19:=proc(tt) tt end:
Char.`2F4002`.Summe.20:=proc(tt) tt end:
Char.`2F4002`.Summe.21:=proc(tt) tt end:
Char.`2F4002`.Summe.22 := proc(tt) 
  local s1;   s1 := nesum(tt,kK=1..q^2-2);   linkomb(1/2,s1);
end:
Char.`2F4002`.Summe.23 := proc(tt) 
  local s1;   s1 := nesum(tt,kK=1..q^2-2);   linkomb(1/2,s1);
end:
Char.`2F4002`.Summe.24 := proc(tt) 
  local s1;   s1 := nesum(tt,kK=1..q^2-2);   linkomb(1/2,s1);
end:
Char.`2F4002`.Summe.25 := proc(tt) 
  local s1;   s1 := nesum(tt,kK=1..q^2-2);   linkomb(1/2,s1);
end:
Char.`2F4002`.Summe.26 := proc(tt) 
  local s1;   s1 := nesum(tt,kK=1..q^2-2);   linkomb(1/2,s1);
end:
Char.`2F4002`.Summe.27 := proc(tt) 
  local s1;   s1 := nesum(tt,kK=1..q^2-2);   linkomb(1/2,s1);
end:
Char.`2F4002`.Summe.28 := proc(tt)
  local s1,s2,s3,s4,s5,s6,s7,s8,tt1;
  s1 := nesum(tt,kK=1..q^2-2);
  s2 := nesum(s1,lL=1..q^2-2);
  tt1 := eesubs(lL=kK,tt);           s3 := nesum(tt1,kK=1..q^2-2);
  tt1 := eesubs(lL=-kK,tt);          s4 := nesum(tt1,kK=1..q^2-2);
  tt1 := eesubs(kK=-(q*r2-1)*lL,tt); s5:= nesum(tt1,lL=1..q^2-2);
  tt1 := eesubs(kK=(q*r2-1)*lL,tt);  s6:= nesum(tt1,lL=1..q^2-2);
  tt1 := eesubs(lL=-(q*r2-1)*kK,tt); s7:= nesum(tt1,kK=1..q^2-2);
  tt1 := eesubs(lL=(q*r2-1)*kK,tt);  s8:= nesum(tt1,kK=1..q^2-2);
  linkomb(1/16,s2,-1/16,s3,-1/16,s4,-1/16,s5,-1/16,s6,-1/16,s7,-1/16,s8);
end:
Char.`2F4002`.Summe.29 := proc(tt) tt end:     # t4
Char.`2F4002`.Summe.30 := proc(tt) tt end: 
Char.`2F4002`.Summe.31 := proc(tt) tt end: 

Char.`2F4002`.Summe.32 := proc(tt)             # t5
  local s1,s2,s3;
  s1:= nesum(tt,kK=1..q^2);
  s2:= eesubs(kK=(q^2+1)/3,tt);  s3:= eesubs(kK=2*(q^2+1)/3,tt);
  linkomb(1/2,s1,-1/2,s2,-1/2,s3);
end: 
Char.`2F4002`.Summe.33 := proc(tt) 
  local s1,s2,s3;
  s1:= nesum(tt,kK=1..q^2);
  s2:= eesubs(kK=(q^2+1)/3,tt);  s3:= eesubs(kK=2*(q^2+1)/3,tt);
  linkomb(1/2,s1,-1/2,s2,-1/2,s3);
end: 
Char.`2F4002`.Summe.34 := proc(tt)             # t6
  local s1,s2,s3,tt1;
  s1 := nesum(tt,kK=1..q^4-2);
  tt1 := eesubs(kK=(q^2-1)*kK,tt);
  s2 := nesum(tt1,kK=1..q^2);
  tt1 := eesubs(kK=(q^2+1)*kK,tt);
  s3 := nesum(tt1,kK=1..q^2-2);
  linkomb(1/4,s1,-1/4,s2,-1/4,s3); 
end: 
Char.`2F4002`.Summe.35 := proc(tt)             # t8
  local s1,s2,s3,tt1;
  s1 := nesum(tt,kK=1..q^4-r2*q^3+r2*q-2);
  tt1 := eesubs(kK=(q^2-1)*kK,tt);
  s2 := nesum(tt1,kK=1..q^2-r2*q);
  tt1 := eesubs(kK=(q^2-r2*q+1)*kK,tt);
  s3 := nesum(tt1,kK=1..q^2-2);
  linkomb(1/8,s1,-1/8,s2,-1/8,s3); 
end:
Char.`2F4002`.Summe.36 := proc(tt)             # t10
  local s1,s2,s3,tt1;
  s1 := nesum(tt,kK=1..q^4+r2*q^3-r2*q-2);
  tt1 := eesubs(kK=(q^2-1)*kK,tt);
  s2 := nesum(tt1,kK=1..q^2+r2*q);
  tt1 := eesubs(kK=(q^2+r2*q+1)*kK,tt);
  s3 := nesum(tt1,kK=1..q^2-2);
  linkomb(1/8,s1,-1/8,s2,-1/8,s3); 
end:
Char.`2F4002`.Summe.37 := proc(tt)             # t11
  local s1,s2;
  s1 := nesum(tt,kK=1..q^2-r2*q);            
  s2 := nesum(s1,lL=1..q^2+r2*q);
  linkomb(1/16,s2); 
end: 
Char.`2F4002`.Summe.38 := proc(tt)             # t14
  local s1,s2,s3,s4,s5,s6,s7,s8,s9,s10,s11,s12,s13,s14,s15,s16,tt1;
  s1 := nesum(tt,kK=1..q^2);
  s2 := nesum(s1,lL=1..q^2);
  tt1 := eesubs(kK=lL,tt);           s3 := nesum(tt1,lL=1..q^2);
  tt1 := eesubs(kK=-lL,tt);          s4 := nesum(tt1,lL=1..q^2);
  tt1 := eesubs(kK=(q*r2-1)*lL,tt);  s5 := nesum(tt1,lL=1..q^2);
  tt1 := eesubs(kK=-(q*r2-1)*lL,tt); s6 := nesum(tt1,lL=1..q^2);
  tt1 := eesubs(kK=(q*r2+1)*lL,tt);  s7 := nesum(tt1,lL=1..q^2);
  tt1 := eesubs(kK=-(q*r2+1)*lL,tt); s8 := nesum(tt1,lL=1..q^2);
  tt1 := eesubs(lL=(q*r2-1)*kK,tt);  s9 := nesum(tt1,kK=1..q^2);
  tt1 := eesubs(lL=-(q*r2-1)*kK,tt); s10:= nesum(tt1,kK=1..q^2);
  tt1 := eesubs(lL=(q*r2+1)*kK,tt);  s11:= nesum(tt1,kK=1..q^2);
  tt1 := eesubs(lL=-(q*r2+1)*kK,tt); s12:= nesum(tt1,kK=1..q^2);
  s13:=eesubs(kK=lL, lL=(q^2+1)/3,tt);  s14 := eesubs(kK=-lL,lL=(q^2+1)/3,tt);
  s15:=eesubs(kK=lL, lL=2*(q^2+1)/3,tt);s16 := eesubs(kK=-lL,lL=2*(q^2+1)/3,tt);
  linkomb(1/48,s2,-1/48,s3,-1/48,s4,-1/48,s5,-1/48,s6,-1/48,s7,-1/48,s8,
    -1/48,s9,-1/48,s10,-1/48,s11,-1/48,s12,1/12,s13,1/12,s14,1/12,s15,1/12,s16);
end:
Char.`2F4002`.Summe.39 := proc(tt)             # t15
  local s1,s2,s3;
  s1:= nesum(tt,kK=1..q^4-q^2);
  s2:= eesubs(kK=(q^4-q^2+1)/3,tt);  s3:= eesubs(kK=2*(q^4-q^2+1)/3,tt);
  linkomb(1/6,s1,-1/6,s2,-1/6,s3);
end:
Char.`2F4002`.Summe.40 := proc(tt)             # t16
  local s1;   s1 := nesum(tt,kK=1..q^4-r2*q^3+q^2-r2*q);   linkomb(1/12,s1);
end: 
Char.`2F4002`.Summe.41 := proc(tt)             # t17
  local s1;   s1 := nesum(tt,kK=1..q^4+r2*q^3+q^2+r2*q);   linkomb(1/12,s1);
end: 


parameter2F4002 := proc(xX)
			xX;
end:

konvert2F4002 := proc(xX)
	subs( EW4 = EE^((Pi*I)/2), xX)
end:

r2 := sqrt(2):
 
setCongruence.`2F4002` := proc()
  qQ := 'qQ';
  q := r2*(3*qQ+DELTA);
  NULL;
end:
 
unsetCongruence.`2F4002` := proc()
  q := 'q';
  qQ := (q/r2-DELTA)/3;
  NULL;
end:
 
# 5) Informationen:
Information.`2F4002`:=TEXT(
`- Information about the generic character table of $^2F_4(q^2)$.`,
``,
`- CHEVIE-name of the table: ``Ree```,
``,
`- The unipotent characters were first computed in:`,
`  {\\sc G. Malle}, Die unipotenten Charaktere von $^2F_4(q^2)$,`, 
`    {\\em Comm. Algebra \\bf18} (1990), 2361--2381.`,
``,
`- The other irreducible characters were added by G. Malle`,
``
):

g := `Ree`:
print(`g := ``Ree`` `);

lprint(`**************************************************************************`);
lprint(`*                                                                        *`);
lprint(`*  This table depends on a parameter "DELTA" which specifies the         *`);
lprint(`*  congruence class of q*sqrt(2) mod 3. Please choose between one of     *`);
lprint(`*  the following two options.                                            *`);
lprint(`*                                                                        *`);
lprint(`*  For q/sqrt(2) congruent to  1 mod 3, type "DELTA :=  1;".             *`);
lprint(`*  For q/sqrt(2) congruent to -1 mod 3, type "DELTA := -1;".             *`);
lprint(`*                                                                        *`);
lprint(`**************************************************************************`);
