#ifndef `HARMPOLHFILE'
#define  HARMPOLHFILE "1"
*
*	Note: we have included htables only up to weight 6.
*	If higher weights are needed one should just put the files
*	htable7.prc and htable8.prc in the proper library directory.
*	The htables procedure will find them if needed.
*
*--#[ summer.h :
#ifndef `SUMMER6FILE'
#include summer.h
#endif
*--#] summer.h :
*--#[ basish :
#procedure basish(H,x,par)
*
*   Combines multiple occurrences of H functions into sums over single
*   occurrences. The algorithm is a simple merging algorithm in the
*   0,1,-1 notation.
*   If par < 0 we do one pair at a time and then sort.
*   If par >= 0 we do them all at once.
*   if |par| = 2, we first convert to 0,1,-1 notation 
*   This should not be used if there are symbolic indices!
*
*   J.Vermaseren, 11-aug-1998
*
#if `par' < 0
#if `par' == -2
repeat id `H'(R(?a,n?!{0,1,-1},?b),`x') = `H'(R(?a,0,n-sig_(n),?b),`x');
#endif
#$basish1 = 1;
#do basishi = 1,1
    id,once,`H'(R(?a),`x')*`H'(R(?b),`x') = HH(R(?a),R(?b),R,`x');
    repeat id HH(R(n1?,?a),R(n2?,?b),R(?c),`x') =
                +HH(R(?a),R(n2,?b),R(?c,n1),`x')
                +HH(R(n1,?a),R(?b),R(?c,n2),`x');
    id  HH(R(?a),R,R(?c),`x') = `H'(R(?c,?a),`x');
    id  HH(R,R(?a),R(?c),`x') = `H'(R(?c,?a),`x');
if ( match(`H'(R(?a),`x')) > 1 ) redefine basishi "0";
.sort:basish: `$basish1';
#$basish1 = $basish1+1;
#enddo
#else
#if `par' == 2
    repeat id `H'(R(?a,n?!{0,1,-1},?b),`x') = `H'(R(?a,0,n-sig_(n),?b),`x');
#endif
repeat;
    id,once,`H'(R(?a),`x')*`H'(R(?b),`x') = HH(R(?a),R(?b),R,`x');
    repeat id HH(R(n1?,?a),R(n2?,?b),R(?c),`x') =
                +HH(R(?a),R(n2,?b),R(?c,n1),`x')
                +HH(R(n1,?a),R(?b),R(?c,n2),`x');
    id  HH(R(?a),R,R(?c),`x') = `H'(R(?c,?a),`x');
    id  HH(R,R(?a),R(?c),`x') = `H'(R(?c,?a),`x');
endrepeat;
#endif
#endprocedure

*--#] basish :
*--#[ elimhalf :
#procedure elimhalf
*
*	Just an example of relations that can be derived (and used) based on
*	some of the x transformations. It does result in simplifications and
*	allows the evaluation of the trancendental numbers. Here we have only
*	worked it out to weight 6.
*
$c = count_(ln2,1,z2,2,z3,3,z5,5,li4half,4,li5half,5,li6half,6,li7half,7
		,s6,6,s7a,7,s7b,7);
if ( $c == 2 );
id	ln2^2 = 2*H(R(1,1),1/2);
id	z2 = 2*H(R(0,1),1/2)+2*H(R(1,1),1/2);
elseif ( $c == 3 );
id	ln2^3 = 6*H(R(1,1,1),1/2);
id	z3 = 8*(H(R(0,1,1),1/2)+H(R(1,1,1),1/2));
id	z2*ln2 = 2*(-H(R(0,0,1),1/2)+7*H(R(0,1,1),1/2)+8*H(R(1,1,1),1/2));
elseif ( $c == 4 );
id	ln2^4 = 24*H(R(1,1,1,1),1/2);
id	li4half = H(R(0,0,0,1),1/2);
id	z2^2 = 40/7*H(R(0,0,0,1),1/2) - 200/7*H(R(0,0,1,1),1/2)
	 + 40/7*H(R(0,1,0,1),1/2) + 40/7*H(R(0,1,1,1),1/2)
	 + 240/7*H(R(1,1,1,1),1/2);
id	z2*ln2^2 = 20/7*H(R(0,0,0,1),1/2) - 156/7*H(R(0,0,1,1),1/2)
	 - 8/7*H(R(0,1,0,1),1/2) + 20/7*H(R(0,1,1,1),1/2) + 204/7*H(R(1,1,1,1),1/2);
id	z3*ln2 = 16/7*H(R(0,0,0,1),1/2) - 136/7*H(R(0,0,1,1),1/2)
	 + 16/7*H(R(0,1,0,1),1/2) + 16/7*H(R(0,1,1,1),1/2) + 152/7*H(R(1,1,1,1),1/2);
elseif ( $c == 5 );
id	ln2^5 = 120*H(R(1,1,1,1,1),1/2);
id	li5half = H(R(0,0,0,0,1),1/2);
id	z2^2*ln2 =
      2680/671*H(R(0,0,0,0,1),1/2) - 15560/671*H(R(0,0,0,1,1),1/2) - 134720/
      671*H(R(0,0,1,1,1),1/2) + 7720/671*H(R(0,1,0,0,1),1/2) - 40760/671*H(R(0
      ,1,0,1,1),1/2) + 5040/671*H(R(0,1,1,0,1),1/2) + 7600/671*H(R(0,1,1,1,1),
      1/2) + 167520/671*H(R(1,1,1,1,1),1/2);
id	z2*z3 =
      2768/671*H(R(0,0,0,0,1),1/2) - 11424/671*H(R(0,0,0,1,1),1/2) - 58864/671
      *H(R(0,0,1,1,1),1/2) + 4288/671*H(R(0,1,0,0,1),1/2) - 19024/671*H(R(0,1,
      0,1,1),1/2) + 1520/671*H(R(0,1,1,0,1),1/2) + 1440/671*H(R(0,1,1,1,1),1/2
      ) + 67904/671*H(R(1,1,1,1,1),1/2);
id	z2*ln2^3 =
      1284/671*H(R(0,0,0,0,1),1/2) - 5532/671*H(R(0,0,0,1,1),1/2) - 50484/671*
      H(R(0,0,1,1,1),1/2) + 1896/671*H(R(0,1,0,0,1),1/2) - 24696/671*H(R(0,1,0
      ,1,1),1/2) - 7440/671*H(R(0,1,1,0,1),1/2) + 156/671*H(R(0,1,1,1,1),1/2)
       + 77856/671*H(R(1,1,1,1,1),1/2);
id	z3*ln2^2 =
      96/61*H(R(0,0,0,0,1),1/2) - 368/61*H(R(0,0,0,1,1),1/2) - 5088/61*H(R(0,0
      ,1,1,1),1/2) + 160/61*H(R(0,1,0,0,1),1/2) - 1664/61*H(R(0,1,0,1,1),1/2)
       + 64/61*H(R(0,1,1,0,1),1/2) + 112/61*H(R(0,1,1,1,1),1/2) + 6496/61*H(R(
      1,1,1,1,1),1/2);
id	z5 =
      128/61*H(R(0,0,0,0,1),1/2) - 1472/183*H(R(0,0,0,1,1),1/2) - 2880/61*H(R(
      0,0,1,1,1),1/2) + 640/183*H(R(0,1,0,0,1),1/2) - 2752/183*H(R(0,1,0,1,1),
      1/2) + 256/183*H(R(0,1,1,0,1),1/2) + 448/183*H(R(0,1,1,1,1),1/2) + 3456/
      61*H(R(1,1,1,1,1),1/2);
id	ln2*li4half =
      489/671*H(R(0,0,0,0,1),1/2) - 13645/2013*H(R(0,0,0,1,1),1/2) - 15608/671
      *H(R(0,0,1,1,1),1/2) + 5678/2013*H(R(0,1,0,0,1),1/2) - 18596/2013*H(R(0,
      1,0,1,1),1/2) - 1828/2013*H(R(0,1,1,0,1),1/2) + 1376/2013*H(R(0,1,1,1,1)
      ,1/2) + 16375/671*H(R(1,1,1,1,1),1/2);
elseif ( $c == 6 );
id	ln2^6 = 720*H(R(1,1,1,1,1,1),1/2);
id	li6half = H(R(0,0,0,0,0,1),1/2);
id	z2*ln2^4 =
      178128/52283*H(R(0,0,0,0,0,1),1/2) - 3611940/52283*H(R(0,0,0,0,1,1),1/2)
       - 4439060/156849*H(R(0,0,0,1,0,1),1/2) + 15429136/52283*H(R(0,0,0,1,1,1
      ),1/2) - 643476/52283*H(R(0,0,1,0,0,1),1/2) + 5029792/52283*H(R(0,0,1,0,
      1,1),1/2) - 8455148/52283*H(R(0,0,1,1,1,1),1/2) - 494276/156849*H(R(0,1,
      0,0,0,1),1/2) - 11400812/156849*H(R(0,1,0,1,1,1),1/2) - 357068/14259*H(
      R(0,1,1,0,1,1),1/2) - 130604/156849*H(R(0,1,1,1,0,1),1/2) + 339760/52283
      *H(R(0,1,1,1,1,1),1/2) + 40484880/52283*H(R(1,1,1,1,1,1),1/2);
id	z3*ln2^3 =
      431040/365981*H(R(0,0,0,0,0,1),1/2) + 195072/365981*H(R(0,0,0,0,1,1),1/2
      ) + 213104/1097943*H(R(0,0,0,1,0,1),1/2) - 24632512/365981*H(R(0,0,0,1,1
      ,1),1/2) + 477072/365981*H(R(0,0,1,0,0,1),1/2) - 8026240/365981*H(R(0,0,
      1,0,1,1),1/2) - 141523072/365981*H(R(0,0,1,1,1,1),1/2) + 932336/1097943*
      H(R(0,1,0,0,0,1),1/2) - 214210672/1097943*H(R(0,1,0,1,1,1),1/2) - 
      6546640/99813*H(R(0,1,1,0,1,1),1/2) - 1283536/1097943*H(R(0,1,1,1,0,1),1/
      2) - 553792/365981*H(R(0,1,1,1,1,1),1/2) + 203523360/365981*H(R(1,1,1,1,
      1,1),1/2);
id	z2*z3*ln2 =
      124416/33271*H(R(0,0,0,0,0,1),1/2) + 76224/33271*H(R(0,0,0,0,1,1),1/2)
       + 49136/299439*H(R(0,0,0,1,0,1),1/2) - 33186400/99813*H(R(0,0,0,1,1,1),
      1/2) + 130352/33271*H(R(0,0,1,0,0,1),1/2) - 10921888/99813*H(R(0,0,1,0,1
      ,1),1/2) - 55898848/99813*H(R(0,0,1,1,1,1),1/2) + 841952/299439*H(R(0,1,
      0,0,0,1),1/2) - 85630864/299439*H(R(0,1,0,1,1,1),1/2) - 28974800/299439*
      H(R(0,1,1,0,1,1),1/2) - 944512/299439*H(R(0,1,1,1,0,1),1/2) - 420736/
      99813*H(R(0,1,1,1,1,1),1/2) + 16447680/33271*H(R(1,1,1,1,1,1),1/2);
id	z2*li4half =
      548676/365981*H(R(0,0,0,0,0,1),1/2) + 1411653/731962*H(R(0,0,0,0,1,1),1/
      2) + 5496881/2195886*H(R(0,0,0,1,0,1),1/2) - 3056946/365981*H(R(0,0,0,1,
      1,1),1/2) + 471657/731962*H(R(0,0,1,0,0,1),1/2) - 1358164/365981*H(R(0,0
      ,1,0,1,1),1/2) - 14848021/731962*H(R(0,0,1,1,1,1),1/2) + 977945/2195886*
      H(R(0,1,0,0,0,1),1/2) - 19879225/2195886*H(R(0,1,0,1,1,1),1/2) - 736009/
      199626*H(R(0,1,1,0,1,1),1/2) - 205969/2195886*H(R(0,1,1,1,0,1),1/2) + 
      285584/365981*H(R(0,1,1,1,1,1),1/2) + 6519250/365981*H(R(1,1,1,1,1,1),1/
      2);
id	z2^2*ln2^2 =
      228320/52283*H(R(0,0,0,0,0,1),1/2) + 260760/52283*H(R(0,0,0,0,1,1),1/2)
       + 1832840/470547*H(R(0,0,0,1,0,1),1/2) - 53136880/156849*H(R(0,0,0,1,1,
      1),1/2) + 70120/52283*H(R(0,0,1,0,0,1),1/2) - 17905840/156849*H(R(0,0,1,
      0,1,1),1/2) - 127170520/156849*H(R(0,0,1,1,1,1),1/2) - 87160/470547*H(R(
      0,1,0,0,0,1),1/2) - 190291960/470547*H(R(0,1,0,1,1,1),1/2) - 5783560/
      42777*H(R(0,1,1,0,1,1),1/2) - 321880/470547*H(R(0,1,1,1,0,1),1/2) + 
      580640/156849*H(R(0,1,1,1,1,1),1/2) + 46854400/52283*H(R(1,1,1,1,1,1),1/
      2);
id	s6 =
      157568/52283*H(R(0,0,0,0,0,1),1/2) - 117585/52283*H(R(0,0,0,0,1,1),1/2)
       + 20821/470547*H(R(0,0,0,1,0,1),1/2) - 43271552/156849*H(R(0,0,0,1,1,1)
      ,1/2) + 128959/52283*H(R(0,0,1,0,0,1),1/2) - 14412284/156849*H(R(0,0,1,0
      ,1,1),1/2) - 75972461/156849*H(R(0,0,1,1,1,1),1/2) + 924433/470547*H(R(0
      ,1,0,0,0,1),1/2) - 115065941/470547*H(R(0,1,0,1,1,1),1/2) - 3531257/
      42777*H(R(0,1,1,0,1,1),1/2) - 687773/470547*H(R(0,1,1,1,0,1),1/2) - 
      34700/156849*H(R(0,1,1,1,1,1),1/2) + 23303312/52283*H(R(1,1,1,1,1,1),1/2
      );
id	ln2^2*li4half =
      548676/365981*H(R(0,0,0,0,0,1),1/2) - 10299739/731962*H(R(0,0,0,0,1,1),1/
      2) - 12070207/2195886*H(R(0,0,0,1,0,1),1/2) - 3056946/365981*H(R(0,0,0,1
      ,1,1),1/2) - 2456191/731962*H(R(0,0,1,0,0,1),1/2) - 1358164/365981*H(R(0
      ,0,1,0,1,1),1/2) - 14848021/731962*H(R(0,0,1,1,1,1),1/2) - 3413827/
      2195886*H(R(0,1,0,0,0,1),1/2) - 19879225/2195886*H(R(0,1,0,1,1,1),1/2)
       - 736009/199626*H(R(0,1,1,0,1,1),1/2) - 205969/2195886*H(R(0,1,1,1,0,1)
      ,1/2) + 285584/365981*H(R(0,1,1,1,1,1),1/2) + 6519250/365981*H(R(1,1,1,1
      ,1,1),1/2);
id	ln2*li5half =
      218016/365981*H(R(0,0,0,0,0,1),1/2) - 25393/365981*H(R(0,0,0,0,1,1),1/2)
       + 1484716/3293829*H(R(0,0,0,1,0,1),1/2) - 80129132/1097943*H(R(0,0,0,1,
      1,1),1/2) + 761986/365981*H(R(0,0,1,0,0,1),1/2) - 26505032/1097943*H(R(0
      ,0,1,0,1,1),1/2) - 133288646/1097943*H(R(0,0,1,1,1,1),1/2) + 6470944/
      3293829*H(R(0,1,0,0,0,1),1/2) - 200711642/3293829*H(R(0,1,0,1,1,1),1/2)
       - 5933906/299439*H(R(0,1,1,0,1,1),1/2) + 323926/3293829*H(R(0,1,1,1,0,1
      ),1/2) - 614036/1097943*H(R(0,1,1,1,1,1),1/2) + 38991349/365981*H(R(1,1,
      1,1,1,1),1/2);
id	z2^3 =
      527040/52283*H(R(0,0,0,0,0,1),1/2) - 619785/52283*H(R(0,0,0,0,1,1),1/2)
       - 114475/52283*H(R(0,0,0,1,0,1),1/2) - 24112920/52283*H(R(0,0,0,1,1,1),
      1/2) + 311895/52283*H(R(0,0,1,0,0,1),1/2) - 8053200/52283*H(R(0,0,1,0,1,
      1),1/2) - 40675755/52283*H(R(0,0,1,1,1,1),1/2) + 344945/52283*H(R(0,1,0,
      0,0,1),1/2) - 20442685/52283*H(R(0,1,0,1,1,1),1/2) - 616765/4753*H(R(0,1
      ,1,0,1,1),1/2) - 15325/52283*H(R(0,1,1,1,0,1),1/2) + 46680/52283*H(R(0,1
      ,1,1,1,1),1/2) + 36403200/52283*H(R(1,1,1,1,1,1),1/2);
id	z3^2 =
      1149440/365981*H(R(0,0,0,0,0,1),1/2) + 520192/365981*H(R(0,0,0,0,1,1),1/
      2) + 1704832/3293829*H(R(0,0,0,1,0,1),1/2) - 197060096/1097943*H(R(0,0,0
      ,1,1,1),1/2) + 1272192/365981*H(R(0,0,1,0,0,1),1/2) - 64209920/1097943*
      H(R(0,0,1,0,1,1),1/2) - 288964352/1097943*H(R(0,0,1,1,1,1),1/2) + 
      7458688/3293829*H(R(0,1,0,0,0,1),1/2) - 448855040/3293829*H(R(0,1,0,1,1,
      1),1/2) - 14044928/299439*H(R(0,1,1,0,1,1),1/2) - 10268288/3293829*H(R(0
      ,1,1,1,0,1),1/2) - 4430336/1097943*H(R(0,1,1,1,1,1),1/2) + 74273280/
      365981*H(R(1,1,1,1,1,1),1/2);
id	z5*ln2 =
      749568/365981*H(R(0,0,0,0,0,1),1/2) - 881472/365981*H(R(0,0,0,0,1,1),1/2
      ) - 1465280/3293829*H(R(0,0,0,1,0,1),1/2) - 173150144/1097943*H(R(0,0,0,
      1,1,1),1/2) + 443584/365981*H(R(0,0,1,0,0,1),1/2) - 57783104/1097943*H(
      R(0,0,1,0,1,1),1/2) - 314086592/1097943*H(R(0,0,1,1,1,1),1/2) + 4415296/
      3293829*H(R(0,1,0,0,0,1),1/2) - 472471424/3293829*H(R(0,1,0,1,1,1),1/2)
       - 14282624/299439*H(R(0,1,1,0,1,1),1/2) - 196160/3293829*H(R(0,1,1,1,0,
      1),1/2) + 199168/1097943*H(R(0,1,1,1,1,1),1/2) + 98619008/365981*H(R(1,1
      ,1,1,1,1),1/2);
elseif ( $c == 7 );
id	ln2^7 = 5040*H(R(1,1,1,1,1,1,1),1/2);
id	li7half = H(R(0,0,0,0,0,0,1),1/2);
endif;
*--#[ relations :
id	H(R(1,0,1),1/2) = -H(R(0,0,1),1/2)+5*H(R(0,1,1),1/2)+5*H(R(1,1,1),1/2);
id	H(R(1,1,0,1),1/2) = + 1/7*H(R(0,0,0,1),1/2) - 5/7*H(R(0,0,1,1),1/2)
       - 6/7*H(R(0,1,0,1),1/2) + 22/7*H(R(0,1,1,1),1/2)
       + 27/7*H(R(1,1,1,1),1/2);
id	H(R(1,0,0,1),1/2) = + 4/7*H(R(0,0,0,1),1/2) - 55/7*H(R(0,0,1,1),1/2)
       + 11/7*H(R(0,1,0,1),1/2) + 4/7*H(R(0,1,1,1),1/2)
       + 59/7*H(R(1,1,1,1),1/2);
id	H(R(1,0,1,1),1/2) = 2/7*H(R(0,0,0,1),1/2) - 17/7*H(R(0,0,1,1),1/2)
       +2/7*H(R(0,1,0,1),1/2) - 19/7*H(R(0,1,1,1),1/2) - 9/7*H(R(1,1,1,1),1/2);
id	H(R(1,1,0,0,1),1/2) = + 1/5*H(R(0,0,0,0,1),1/2) - 71/5*H(R(0,0,1,1,1),1/2)
       - 17/5*H(R(0,1,0,1,1),1/2) + 7/5*H(R(0,1,1,0,1),1/2)
       - 3/5*H(R(1,0,0,1,1),1/2) - 3/5*H(R(1,0,1,0,1),1/2)
       + 91/5*H(R(1,1,1,1,1),1/2);
id	H(R(1,1,0,1,1),1/2) = - 2/5*H(R(0,0,0,0,1),1/2) + 749/10*H(R(0,0,1,1,1),1/2)
       + 83/10*H(R(0,1,0,1,1),1/2) - 94/5*H(R(0,1,1,0,1),1/2)
       - 113/10*H(R(1,0,0,1,1),1/2) + 81/5*H(R(1,0,1,0,1),1/2)
       - 3*H(R(1,1,1,0,1),1/2) - 729/10*H(R(1,1,1,1,1),1/2);
id	H(R(1,0,1,1,1),1/2) = + 19/30*H(R(0,0,0,0,1),1/2)
       - 6253/60*H(R(0,0,1,1,1),1/2) - 781/60*H(R(0,1,0,1,1),1/2)
       + 123/5*H(R(0,1,1,0,1),1/2) + 971/60*H(R(1,0,0,1,1),1/2)
       - 667/30*H(R(1,0,1,0,1),1/2) + 3*H(R(1,1,1,0,1),1/2)
       + 2001/20*H(R(1,1,1,1,1),1/2);
id	H(R(1,0,0,0,1),1/2) = + 3/10*H(R(0,0,0,0,1),1/2) - 1/20*H(R(0,0,1,1,1),1/2)
       - 191/60*H(R(0,1,0,1,1),1/2) - 56/15*H(R(0,1,1,0,1),1/2)
       + 581/60*H(R(1,0,0,1,1),1/2) + 43/30*H(R(1,0,1,0,1),1/2)
       - H(R(1,1,1,0,1),1/2) - 129/20*H(R(1,1,1,1,1),1/2);
id	H(R(1,1,1,0,1),1/2) = - 7/30*H(R(0,0,0,0,1),1/2) + 2329/60*H(R(0,0,1,1,1),1/2)
       + 293/60*H(R(0,1,0,1,1),1/2) - 137/15*H(R(0,1,1,0,1),1/2)
       - H(R(0,1,1,1,1),1/2) - 121/20*H(R(1,0,0,1,1),1/2)
       + 251/30*H(R(1,0,1,0,1),1/2) - 773/20*H(R(1,1,1,1,1),1/2);
id	H(R(1,0,0,1,1),1/2) = 10/3*( + 3/3355*H(R(0,0,0,0,1),1/2)
       - 408/3355*H(R(0,0,0,1,1),1/2) - 5259/6710*H(R(0,0,1,1,1),1/2)
       + 249/3355*H(R(0,1,0,0,1),1/2) - 1263/6710*H(R(0,1,0,1,1),1/2)
       + 246/3355*H(R(0,1,1,0,1),1/2) + 339/3355*H(R(0,1,1,1,1),1/2)
       + 8397/6710*H(R(1,1,1,1,1),1/2));
id	H(R(1,0,1,0,1),1/2) = 18/671*( + 5/9*H(R(0,0,0,0,1),1/2)
       - H(R(0,0,0,1,1),1/2) - 4739/18*H(R(0,0,1,1,1),1/2)
       + 53/6*H(R(0,1,0,0,1),1/2) - 763/18*H(R(0,1,0,1,1),1/2)
       + 410/9*H(R(0,1,1,0,1),1/2) + 51/2*H(R(0,1,1,1,1),1/2)
       + 1981/6*H(R(1,1,1,1,1),1/2));
id	H(R(0,0,1,0,1),1/2) = + 169/671*H(R(0,0,0,0,1),1/2)
       - 5207/2013*H(R(0,0,0,1,1),1/2) + 5195/671*H(R(0,0,1,1,1),1/2)
       - 863/2013*H(R(0,1,0,0,1),1/2) + 1643/2013*H(R(0,1,0,1,1),1/2)
       - 3383/2013*H(R(0,1,1,0,1),1/2) - 1757/2013*H(R(0,1,1,1,1),1/2)
       - 8064/671*H(R(1,1,1,1,1),1/2);
*--#] relations :
id	H(R(1,1,0,1,1,1),1/2) =
       + 147260/693077*H(R(0,0,0,0,0,1),1/2)
       + 1899613/1386154*H(R(0,0,0,0,1,1),1/2)
       - 691759/1386154*H(R(0,0,0,1,0,1),1/2)
       - 20573801/1386154*H(R(0,0,1,1,1,1),1/2)
       - 668824/693077*H(R(0,1,0,0,0,1),1/2)
       - 7088533/1386154*H(R(0,1,0,1,1,1),1/2)
       + 496095/126014*H(R(1,0,0,1,1,1),1/2)
       - 6742000/693077*H(R(1,1,0,0,1,1),1/2)
       - 759620/693077*H(R(1,1,0,1,0,1),1/2)
       + 146983/1386154*H(R(1,1,1,0,0,1),1/2)
       - 3*H(R(1,1,1,0,1,1),1/2)
       - 1848092/693077*H(R(1,1,1,1,0,1),1/2)
       + 14122530/693077*H(R(1,1,1,1,1,1),1/2);
id	H(R(1,1,0,0,0,1),1/2) =
       + 798535/5544616*H(R(0,0,0,0,0,1),1/2)
       - 103130451/44356928*H(R(0,0,0,0,1,1),1/2)
       - 55556225/44356928*H(R(0,0,0,1,0,1),1/2)
       + 153098707/44356928*H(R(0,0,1,1,1,1),1/2)
       - 1764383/11089232*H(R(0,1,0,0,0,1),1/2)
       + 47762765/44356928*H(R(0,1,0,1,1,1),1/2)
       + 2948509/4032448*H(R(1,0,0,1,1,1),1/2)
       + 63452847/5544616*H(R(1,1,0,0,1,1),1/2)
       - 278557/1386154*H(R(1,1,0,1,0,1),1/2)
       + 49987349/44356928*H(R(1,1,1,0,0,1),1/2)
       + 256694/693077*H(R(1,1,1,1,0,1),1/2)
       - 159446849/11089232*H(R(1,1,1,1,1,1),1/2);
id	H(R(1,0,1,1,1,1),1/2) =
       - 162930/693077*H(R(0,0,0,0,0,1),1/2)
       - 20822903/11089232*H(R(0,0,0,0,1,1),1/2)
       + 5880571/11089232*H(R(0,0,0,1,0,1),1/2)
       + 215216079/11089232*H(R(0,0,1,1,1,1),1/2)
       + 2994521/2772308*H(R(0,1,0,0,0,1),1/2)
       + 70545873/11089232*H(R(0,1,0,1,1,1),1/2)
       - 4698719/1008112*H(R(1,0,0,1,1,1),1/2)
       + 16012343/1386154*H(R(1,1,0,0,1,1),1/2)
       + 875656/693077*H(R(1,1,0,1,0,1),1/2)
       + 216665/11089232*H(R(1,1,1,0,0,1),1/2)
       + 3*H(R(1,1,1,0,1,1),1/2)
       + 4336587/1386154*H(R(1,1,1,1,0,1),1/2)
       - 79793355/2772308*H(R(1,1,1,1,1,1),1/2);
id	H(R(1,0,1,1,0,1),1/2) =
       - 130467/1386154*H(R(0,0,0,0,0,1),1/2)
       + 1726129/11089232*H(R(0,0,0,0,1,1),1/2)
       + 3805003/11089232*H(R(0,0,0,1,0,1),1/2)
       + 33259623/11089232*H(R(0,0,1,1,1,1),1/2)
       + 956617/2772308*H(R(0,1,0,0,0,1),1/2)
       + 15406393/11089232*H(R(0,1,0,1,1,1),1/2)
       + 1914921/1008112*H(R(1,0,0,1,1,1),1/2)
       + 6509047/1386154*H(R(1,1,0,0,1,1),1/2)
       - 251954/693077*H(R(1,1,0,1,0,1),1/2)
       + 5889497/11089232*H(R(1,1,1,0,0,1),1/2)
       - 34737/693077*H(R(1,1,1,1,0,1),1/2)
       - 30882163/2772308*H(R(1,1,1,1,1,1),1/2);
id	H(R(1,0,1,0,1,1),1/2) =
       - 2757/198022*H(R(0,0,0,0,0,1),1/2)
       - 1496365/1584176*H(R(0,0,0,0,1,1),1/2)
       - 502399/1584176*H(R(0,0,0,1,0,1),1/2)
       + 1392645/1584176*H(R(0,0,1,1,1,1),1/2)
       + 89135/396044*H(R(0,1,0,0,0,1),1/2)
       + 552587/1584176*H(R(0,1,0,1,1,1),1/2)
       - 469845/144016*H(R(1,0,0,1,1,1),1/2)
       + 553317/198022*H(R(1,1,0,0,1,1),1/2)
       + 9538/99011*H(R(1,1,0,1,0,1),1/2)
       - 109397/1584176*H(R(1,1,1,0,0,1),1/2)
       - 5037/99011*H(R(1,1,1,1,0,1),1/2)
       + 469267/396044*H(R(1,1,1,1,1,1),1/2);
id	H(R(1,0,1,0,0,1),1/2) =
       + 956289/11089232*H(R(0,0,0,0,0,1),1/2)
       - 228752141/88713856*H(R(0,0,0,0,1,1),1/2)
       - 114814751/88713856*H(R(0,0,0,1,0,1),1/2)
       - 961617843/88713856*H(R(0,0,1,1,1,1),1/2)
       + 5750879/22178464*H(R(0,1,0,0,0,1),1/2)
       - 467268525/88713856*H(R(0,1,0,1,1,1),1/2)
       + 21686275/8064896*H(R(1,0,0,1,1,1),1/2)
       + 67694457/11089232*H(R(1,1,0,0,1,1),1/2)
       - 909485/2772308*H(R(1,1,0,1,0,1),1/2)
       - 41506357/88713856*H(R(1,1,1,0,0,1),1/2)
       - 635606/693077*H(R(1,1,1,1,0,1),1/2)
       + 219383457/22178464*H(R(1,1,1,1,1,1),1/2);
id	H(R(1,0,0,1,0,1),1/2) =
       + 341731/11089232*H(R(0,0,0,0,0,1),1/2)
       - 237964295/88713856*H(R(0,0,0,0,1,1),1/2)
       - 94401533/88713856*H(R(0,0,0,1,0,1),1/2)
       + 869200391/88713856*H(R(0,0,1,1,1,1),1/2)
       + 5879805/22178464*H(R(0,1,0,0,0,1),1/2)
       + 385119193/88713856*H(R(0,1,0,1,1,1),1/2)
       - 21738519/8064896*H(R(1,0,0,1,1,1),1/2)
       + 58949035/11089232*H(R(1,1,0,0,1,1),1/2)
       + 21837/2772308*H(R(1,1,0,1,0,1),1/2)
       + 25940225/88713856*H(R(1,1,1,0,0,1),1/2)
       + 326068/693077*H(R(1,1,1,1,0,1),1/2)
       - 312205965/22178464*H(R(1,1,1,1,1,1),1/2);
id	H(R(1,0,0,0,1,1),1/2) =
       + 343813/2772308*H(R(0,0,0,0,0,1),1/2)
       + 7616869/22178464*H(R(0,0,0,0,1,1),1/2)
       - 9229289/22178464*H(R(0,0,0,1,0,1),1/2)
       - 320593733/22178464*H(R(0,0,1,1,1,1),1/2)
       - 2323647/5544616*H(R(0,1,0,0,0,1),1/2)
       - 118686619/22178464*H(R(0,1,0,1,1,1),1/2)
       + 6136885/2016224*H(R(1,0,0,1,1,1),1/2)
       - 14764749/2772308*H(R(1,1,0,0,1,1),1/2)
       - 398925/693077*H(R(1,1,0,1,0,1),1/2)
       - 1183747/22178464*H(R(1,1,1,0,0,1),1/2)
       - H(R(1,1,1,0,1,1),1/2)
       - 2201483/1386154*H(R(1,1,1,1,0,1),1/2)
       + 109479703/5544616*H(R(1,1,1,1,1,1),1/2);
id	H(R(1,0,0,0,0,1),1/2) =
       + 189087/693077*H(R(0,0,0,0,0,1),1/2)
       - 108797385/5544616*H(R(0,0,0,0,1,1),1/2)
       - 40085763/5544616*H(R(0,0,0,1,0,1),1/2)
       + 21448209/5544616*H(R(0,0,1,1,1,1),1/2)
       + 4079805/1386154*H(R(0,1,0,0,0,1),1/2)
       + 7667367/5544616*H(R(0,1,0,1,1,1),1/2)
       - 756521/504056*H(R(1,0,0,1,1,1),1/2)
       + 30035050/693077*H(R(1,1,0,0,1,1),1/2)
       + 1310467/693077*H(R(1,1,0,1,0,1),1/2)
       + 17034695/5544616*H(R(1,1,1,0,0,1),1/2)
       - 413178/693077*H(R(1,1,1,1,0,1),1/2)
       - 38069215/1386154*H(R(1,1,1,1,1,1),1/2);
id	H(R(1,1,1,0,1,1),1/2) =
       + 55695/693077*H(R(0,0,0,0,0,1),1/2)
       + 7607697/11089232*H(R(0,0,0,0,1,1),1/2)
       - 2096893/11089232*H(R(0,0,0,1,0,1),1/2)
       - 80611673/11089232*H(R(0,0,1,1,1,1),1/2)
       - 1009655/2772308*H(R(0,1,0,0,0,1),1/2)
       - 25728855/11089232*H(R(0,1,0,1,1,1),1/2)
       - H(R(0,1,1,1,1,1),1/2)
       + 1668185/1008112*H(R(1,0,0,1,1,1),1/2)
       - 5484473/1386154*H(R(1,1,0,0,1,1),1/2)
       - 298308/693077*H(R(1,1,0,1,0,1),1/2)
       - 106031/11089232*H(R(1,1,1,0,0,1),1/2)
       - 1488199/1386154*H(R(1,1,1,1,0,1),1/2)
       + 25520029/2772308*H(R(1,1,1,1,1,1),1/2);
id	H(R(1,1,1,1,0,1),1/2) = 63007/5577*(
       - 5079/126014*H(R(0,0,0,0,0,1),1/2)
       - 400859/1008112*H(R(0,0,0,0,1,1),1/2)
       - 49641/1008112*H(R(0,0,0,1,0,1),1/2)
       + 9230451/1008112*H(R(0,0,1,1,1,1),1/2)
       + 47301/252028*H(R(0,1,0,0,0,1),1/2)
       + 3530157/1008112*H(R(0,1,0,1,1,1),1/2)
       - H(R(0,1,1,1,0,1),1/2)
       - 543681/1008112*H(R(1,0,0,1,1,1),1/2)
       + 301563/126014*H(R(1,1,0,0,1,1),1/2)
       + 35387/63007*H(R(1,1,0,1,0,1),1/2)
       + 172493/1008112*H(R(1,1,1,0,0,1),1/2)
       - 3557143/252028*H(R(1,1,1,1,1,1),1/2));
id	H(R(1,1,0,1,0,1),1/2) = 1859/509*(
       + 255/20449*H(R(0,0,0,0,0,1),1/2)
       + 31517/163592*H(R(0,0,0,0,1,1),1/2)
       + 19343/163592*H(R(0,0,0,1,0,1),1/2)
       - 1676397/163592*H(R(0,0,1,1,1,1),1/2)
       - 25/40898*H(R(0,1,0,0,0,1),1/2)
       - 743755/163592*H(R(0,1,0,1,1,1),1/2)
       - H(R(0,1,1,0,1,1),1/2)
       + 11313/20449*H(R(0,1,1,1,0,1),1/2)
       - 20673/163592*H(R(1,0,0,1,1,1),1/2)
       - 24150/20449*H(R(1,1,0,0,1,1),1/2)
       - 62915/163592*H(R(1,1,1,0,0,1),1/2)
       + 691525/40898*H(R(1,1,1,1,1,1),1/2));
id	H(R(1,1,0,0,1,1),1/2) = 11198/819*(
       - 373/5599*H(R(0,0,0,0,0,1),1/2)
       + 37203/44792*H(R(0,0,0,0,1,1),1/2)
       + 73603/134376*H(R(0,0,0,1,0,1),1/2)
       - H(R(0,0,0,1,1,1),1/2)
       - 1750929/44792*H(R(0,0,1,1,1,1),1/2)
       + 21847/33594*H(R(0,1,0,0,0,1),1/2)
       - 2597393/134376*H(R(0,1,0,1,1,1),1/2)
       - 20099/3054*H(R(0,1,1,0,1,1),1/2)
       + 10364/16797*H(R(0,1,1,1,0,1),1/2)
       - H(R(0,1,1,1,1,1),1/2)
       - 114149/44792*H(R(1,0,0,1,1,1),1/2)
       - 84285/44792*H(R(1,1,1,0,0,1),1/2)
       + 1451075/22396*H(R(1,1,1,1,1,1),1/2));
id	H(R(1,0,0,1,1,1),1/2) = -78/5275*(
       + 488/273*H(R(0,0,0,0,0,1),1/2)
       - 1949/91*H(R(0,0,0,0,1,1),1/2)
       - 11671/819*H(R(0,0,0,1,0,1),1/2)
       + 6455/273*H(R(0,0,0,1,1,1),1/2)
       - H(R(0,0,1,0,1,1),1/2)
       + 188243/182*H(R(0,0,1,1,1,1),1/2)
       - 2032/117*H(R(0,1,0,0,0,1),1/2)
       + 837667/1638*H(R(0,1,0,1,1,1),1/2)
       + 142537/819*H(R(0,1,1,0,1,1),1/2)
       - 13492/819*H(R(0,1,1,1,0,1),1/2)
       + 7274/273*H(R(0,1,1,1,1,1),1/2)
       + 4539/91*H(R(1,1,1,0,0,1),1/2)
       - 937295/546*H(R(1,1,1,1,1,1),1/2));
id	H(R(1,1,1,0,0,1),1/2) = -42200/52283*(
       + 689/5275*H(R(0,0,0,0,0,1),1/2)
       - 151653/42200*H(R(0,0,0,0,1,1),1/2)
       - 468287/379800*H(R(0,0,0,1,0,1),1/2)
       + 224701/12660*H(R(0,0,0,1,1,1),1/2)
       - H(R(0,0,1,0,0,1),1/2)
       + 348497/63300*H(R(0,0,1,0,1,1),1/2)
       + 481793/15825*H(R(0,0,1,1,1,1),1/2)
       - 44657/94950*H(R(0,1,0,0,0,1),1/2)
       + 3363881/189900*H(R(0,1,0,1,1,1),1/2)
       + 1384207/189900*H(R(0,1,1,0,1,1),1/2)
       + 75722/47475*H(R(0,1,1,1,0,1),1/2)
       + 39007/31650*H(R(0,1,1,1,1,1),1/2)
       - 230983/8440*H(R(1,1,1,1,1,1),1/2));
id	H(R(0,1,1,0,0,1),1/2) =
       + 35311/365981*H(R(0,0,0,0,0,1),1/2)
       - 5474647/5855696*H(R(0,0,0,0,1,1),1/2)
       - 1630581/5855696*H(R(0,0,0,1,0,1),1/2)
       + 838553/731962*H(R(0,0,0,1,1,1),1/2)
       - 1900039/5855696*H(R(0,0,1,0,0,1),1/2)
       + 95913/365981*H(R(0,0,1,0,1,1),1/2)
       + 97896251/5855696*H(R(0,0,1,1,1,1),1/2)
       - 1457409/5855696*H(R(0,1,0,0,0,1),1/2)
       + 51017133/5855696*H(R(0,1,0,1,1,1),1/2)
       + 1515965/532336*H(R(0,1,1,0,1,1),1/2)
       - 302691/5855696*H(R(0,1,1,1,0,1),1/2)
       + 263075/731962*H(R(0,1,1,1,1,1),1/2)
       - 9360420/365981*H(R(1,1,1,1,1,1),1/2);
id	H(R(0,1,0,1,0,1),1/2) =
       + 1417/33271*H(R(0,0,0,0,0,1),1/2)
       - 498319/532336*H(R(0,0,0,0,1,1),1/2)
       - 2770133/4791024*H(R(0,0,0,1,0,1),1/2)
       + 536381/199626*H(R(0,0,0,1,1,1),1/2)
       - 64079/532336*H(R(0,0,1,0,0,1),1/2)
       + 98536/99813*H(R(0,0,1,0,1,1),1/2)
       + 12439897/1597008*H(R(0,0,1,1,1,1),1/2)
       - 50033/4791024*H(R(0,1,0,0,0,1),1/2)
       + 17182093/4791024*H(R(0,1,0,1,1,1),1/2)
       + 5060639/4791024*H(R(0,1,1,0,1,1),1/2)
       - 1190099/4791024*H(R(0,1,1,1,0,1),1/2)
       - 54835/199626*H(R(0,1,1,1,1,1),1/2)
       - 269380/33271*H(R(1,1,1,1,1,1),1/2);
id	H(R(0,1,0,0,1,1),1/2) =
       + 21688/365981*H(R(0,0,0,0,0,1),1/2)
       - 4436793/1463924*H(R(0,0,0,0,1,1),1/2)
       + 5481121/13175316*H(R(0,0,0,1,0,1),1/2)
       + 2094955/1097943*H(R(0,0,0,1,1,1),1/2)
       + 44339/1463924*H(R(0,0,1,0,0,1),1/2)
       - 772193/1097943*H(R(0,0,1,0,1,1),1/2)
       + 47247535/4391772*H(R(0,0,1,1,1,1),1/2)
       - 2345843/13175316*H(R(0,1,0,0,0,1),1/2)
       + 69627595/13175316*H(R(0,1,0,1,1,1),1/2)
       + 350155/1197756*H(R(0,1,1,0,1,1),1/2)
       - 2753561/13175316*H(R(0,1,1,1,0,1),1/2)
       + 1117705/1097943*H(R(0,1,1,1,1,1),1/2)
       - 4421680/365981*H(R(1,1,1,1,1,1),1/2);
id	H(R(0,0,1,1,0,1),1/2) =
       - 2031/365981*H(R(0,0,0,0,0,1),1/2)
       + 3105197/2927848*H(R(0,0,0,0,1,1),1/2)
       - 10152635/8783544*H(R(0,0,0,1,0,1),1/2)
       + 3203510/365981*H(R(0,0,0,1,1,1),1/2)
       - 979315/2927848*H(R(0,0,1,0,0,1),1/2)
       + 1163475/365981*H(R(0,0,1,0,1,1),1/2)
       - 7242825/2927848*H(R(0,0,1,1,1,1),1/2)
       + 1399273/8783544*H(R(0,1,0,0,0,1),1/2)
       - 6891125/8783544*H(R(0,1,0,1,1,1),1/2)
       + 1014379/798504*H(R(0,1,1,0,1,1),1/2)
       + 2859019/8783544*H(R(0,1,1,1,0,1),1/2)
       - 286915/365981*H(R(0,1,1,1,1,1),1/2)
       + 4419480/365981*H(R(1,1,1,1,1,1),1/2);
#endprocedure

*--#] elimhalf :
*--#[ h1basis :
#procedure h1basis(H)
*
*	Procdeure combines H-functions in one into the proper basis.
*	The procedure is:
*	1: convert to S(R(..),inf)
*	2: use the shuffle algebra in S-space.
*	3: convert back.
*	The hbasis algorithm for x != 1 uses the triangle relation
*	which is not safe for two divergent objects. The shuffle algebra
*	relations however are safe.
*	J.Vermaseren 27-jul-1998
*
if ( match(`H'(R(?a),1)) > 1 );
	#call onetoinf(`H',Sab)
	#call basisn(Sab,inf)
	#call inftoone(Sab,`H')
endif;
*
#endprocedure
*--#] h1basis :
*--#[ halfs :
#procedure halfs(par)
*
*	Writes the constants in terms of H functions of 1/2
*	When par == 0 the reduction in the basis is done.
*	When par != 0 this step is skipped
*
id	s7b = 2*(+7/16*z2*z3*ln2^2+47/32*z2*z5+1/2*z2*ln2*li4half
       +1/30*z2*ln2^5+1/2*z2*li5half+4/5*z2^2*z3-1/12*z2^2*ln2^3
       -7/80*z2^3*ln2-7/96*z3*ln2^4-7/8*z3*li4half-5/8*z3^2*ln2
       -1683/512*z7-ln2*li6half+1/2*ln2*s6-1/2*ln2^2*li5half
       -1/6*ln2^3*li4half-1/252*ln2^7-2*li7half-1/2*s7a
       -H(R(1,0,0,0,0,0,1),1/2));
id	s7a = -2*(-1/4*z2*z3*ln2^2-31/64*z2*z5-1/120*z2*ln2^5-3/8*z2^2*z3
       -1/120*z2^2*ln2^3+1/5*z2^3*ln2+1/24*z3*ln2^4+5/8*z3^2*ln2
       +63/64*z5*ln2^2-123/256*z7+ln2*li6half-1/2*ln2*s6+1/1680*ln2^7
       +3*li7half-H(R(0,0,0,0,0,1,1),1/2));
id	s6 = -2*(+1/2*z2*z3*ln2+1/24*z2*ln2^4+1/40*z2^2*ln2^2-1/5*z2^3
       -1/6*z3*ln2^3-5/8*z3^2-z5*ln2+ln2*li5half-1/240*ln2^6
       +2*li6half-H(R(0,0,0,0,1,1),1/2));
id	z5 = -32*(-1/2*z2*z3-1/6*z2*ln2^3-1/20*z2^2*ln2+1/2*z3*ln2^2
         +ln2*li4half+1/40*ln2^5+li5half-H(R(0,0,0,1,1),1/2));
id	li6half = H(R(0,0,0,0,0,1),1/2);
id	li5half = H(R(0,0,0,0,1),1/2);
id	li4half = H(R(0,0,0,1),1/2);
id	z3 = 4/3*ln2^3 + 8*H(R(0,1,1),1/2);
id	z2 = ln2^2 - 2*H(R(0,1),1/2);
id	ln2 = H(R(1),1/2);
.sort
#if `par' == 0
#call basish(H,1/2,1)
#endif
#endprocedure
*--#] halfs :
*--#[ hbasis :
#procedure hbasis(H,x)
*
*	Combines general H functions into basis elements
*	The equivalent of basis for the S-sums
*
*	Step one: split off the ln_ functions
*
repeat id `H'(R(?a,0,n?!{0,0},?b),`x') = `H'(R(?a,n+sig_(n),?b),`x');
id	ln_(nn?,`x') = ln(nn,`x');
repeat;
  if ( match(`H'(R(?a,0),`x')) );
	id,once,`H'(R(?a,0),`x') = HH(R(?a,0),`x');
	#call htolog(HH,`x')
	id	ln_(nn?,`x') = ln(nn,`x');
	id	ln(n1?,`x')*ln(n2?,`x') = ln(n1+n2,`x');
	id	HH(?a) = `H'(?a);
  endif;
endrepeat;
id	ln(nn?,`x') = ln_(nn,`x');
id	`H'(R,`x') = 1;
id	`H'(R(?a),`x') = `H'(R(?a),`x')*yy;
#$nmax = 0;
id	yy^n?$n = 1;
if ( $n > $nmax ) $nmax = $n;
.sort: hbasis, ln;
#do ih = `$nmax',2,-1
  if ( match(`H'(R(n1?,?a),`x')) > 1 );
	id,once,`H'(R(?a),`x')*`H'(R(?b),`x') = yy*HH(R(?a),`x')*HH(R(?b),`x');
	#call htos(HH,SaA,`x')
	Multiply replace_(sum,sum1,i,j1,sign,sign1,SaA,S1);
	#call htos(HH,SaA,`x')
	id sum(i,1,inf)*sum1(j1,1,inf)*pow(`x',i)*pow(`x',j1)*
			S1(R(?a),j1)*SaA(R(n1?,?b),i) = sum(i,1,inf)*pow(`x',i)*
				sum1(j1,1,i)*S1(R(?b),j1)*S1(R(?a),i-j1)/
					j1^abs_(n1)*sign1(j1)^theta_(-n1)/[1-`x'];
  endif;
.sort: one;
	#call sumtria(1,SaA)
	id	sign(i)*pow(`x',i) = pow(-`x',i);
.sort: two;
  if ( count(yy,1) );
	id yy = 1;
	#call stoh(SaA,`H',`x')
  endif;
.sort: hbasis `ih';
#enddo
#$nmax = 0;
if ( match(ln_(nn?,`x')) );
	id	ln_(nn?$n,`x') = ln_(nn,`x');
	if ( $n > $nmax ) $nmax = $n;
	if ( match(`H'(R(?a),`x')) == 0 ) Multiply `H'(R,`x');
endif;
.sort: hbasis a;
#do iih = `$nmax',1,-1
 if ( match(ln_(`iih',`x')) );
	id	`H'(R(?a),`x') = HH(R(?a),`x')+SH(R(?a),`x');
	id	HH(R(?a),`x')*ln_(nn?,`x') = HH(R(?a),`x')*ln_(nn,`x')*sign_(nn);
	repeat id HH(R(?a),`x')*ln_(nn?pos_,`x') =
						-HH(R(?a,0),`x')*ln_(nn-1,`x')*nn;
	id	ln_(0,`x') = 1;
	id	HH(?a) = `H'(?a)-HH(?a);
	repeat id HH(R(?a,0,n?!{0,0},?b),`x') = HH(R(?a,n+sig_(n),?b),`x');
	#call htolog(HH,`x')
	id	HH(?a) = `H'(?a);
	id	SH(?a) = `H'(?a);
 endif;
 repeat id `H'(R(?a,n?!{-1,0,1},?b),`x') = `H'(R(?a,0,n-sig_(n),?b),`x');
.sort: delog `iih';
*
#enddo
*
#endprocedure
*--#] hbasis :
*--#[ hexpa :
#procedure hexpa(H,S)
*
*	Procedure expands a general H-function (including trailing
*	zeroes in the indices) into an expansion in x and ln_(x)
*	Method:
*	1: look at highest power of ln_. There we can use htos
*	2: put the proper powers of ln_ with the signs and 1/k!
*	3: determine how many extra weights have to be distributed
*	4: make all excess weight distributions.
*	5: Put the excess weights in with the combinatorics factor
*	   which is just a binomial.
*	6: Clean up.
*
*	Routine by J.Vermaseren 13-jul-1998
*
Multiply ln_(0,x);
repeat id `H'(R(?a,0),x)*ln_(nn?,x) = `H'(R(?a),x)*ln_(nn+1,x);
#call htos(`H',SH,x)
id	SH(R(?a),i)*ln_(nn?,x) = sum_(k,0,nn,sign_(nn-k)*invfac_(k)*
			SH(R(?a),i)*ln_(k,x)*div(nn-k,nargs_(?a)))*addarg;
repeat id addarg(?a)*div(n1?,n2?pos_) =
		sum_(k,0,n1,addarg(?a,k)*div(n1-k,n2-1));
id	div(0,0) = 1;
id	div(?a) = 0;
id	SH(R(?a),i) = SH(R(?a),i)*HS(R,i);
repeat id SH(R(?a,n1?),i)*HS(R(?b),i)*addarg(?c,n2?) =
			SH(R(?a),i)*HS(R(n1+sig_(n1)*n2,?b),i)
					*binom_(abs_(n1)-1+n2,abs_(n1)-1)*addarg(?c);
id	SH(R,i) = 1;
id	addarg = 1;
id	HS(?a) = `S'(?a);
id	ln_(0,x) = 1;
*
#endprocedure
*--#] hexpa :
*--#[ hexpand :
#procedure hexpand(x,fast)
*
*   Procedure takes one H function and makes its power series
*   expansion. This expansion may involve powers of logarithms.
*   ln_(n,x) = ln_(x)^n
*   den(n,y) = 1/y^n
*   The answer will have terms of the type
*   sum(i,1,inf)*pow(x,i)*S(R(....),i)*ln_(k,x)
*   The method is by working out the integrals and sums over harmonic sums.
*   The central relations are:
*   int(y,0,x)*x^i*ln_(m,x) = sum_(k,0,m,fac_(m)*sign_(m)*fac_(k)*invfac_(k)
*           *x^(i+1)*ln_(k,x)*den(m+1-k,i+1))
*   sum(i,1,inf)*sum(j,i,inf) = sum(j,1,inf)*sum(i,1,j)
*   Then we do the sum over j. Because the integral often gives j+1
*   and the resulting harmonic sum goes to j, we convert that sum to j+1
*   and then we convert the j so that we have sum(j,2,inf) and then
*   we subtract the value in 1 (which happens to be zero) to get a proper
*   sum again. Then we rename j into i again.
*   Notation: isign = sign(i)
*
*   If fast == 0 we have a single repat and the routine can be used
*   inside a signle module.
*   If fast != 0 there are .sort instructions. This is for the case that
*   the routine becomes otherwise too slow. For complicated expansions!
*
*   Routine by J.Vermaseren 11-jul-1998
*
if ( match(H(R(?a),`x')) );
*
*   First convert to 0,1,-1 notation for the indices
*
repeat id H(R(?a,n?!{0,1,-1},?b),`x') = H(R(?a,0,n-sig_(n),?b),`x');
*
*   Put in the logs that come from when the last index/indices is/are zero.
*
Multiply ln_(0,`x');
repeat id H(R(?a,0),`x')*ln_(nn?,`x') = H(R(?a),`x')*ln_(nn+1,`x')/(nn+1);
*
*   Do the (now) trailing 1 or -1. This is a special case.
*   Hence we do this only when there is no sum yet.
*    1 ->  int(`x',0,`x')*sum(i,1,inf)*pow(`x',i)/i
*   -1 -> -int(`x',0,`x')*sum(i,1,inf)*pow(`x',i)/i*sign(i)
*   Then the integral is worked out (in combination with the ln_(nn,`x'))
*
if ( match(sum(i,1,inf)) == 0 );
    id  H(R(?a,1),`x')*ln_(nn?,`x') = sum(i,1,inf)*fac_(nn)*sign_(nn)*pow(`x',i)*
            sum_(k,0,nn,ln_(k,`x')*sign_(k)*invfac_(k)*den(nn+1-k,i))*
            H(R(?a),`x')*S(R,i);
endif;
if ( match(sum(i,1,inf)) == 0 );
    id  H(R(?a,-1),`x')*ln_(nn?,`x') = -sum(i,1,inf)*fac_(nn)*sign_(nn)*pow(`x',i)*
            sum_(k,0,nn,ln_(k,`x')*sign_(k)*invfac_(k)*den(nn+1-k,i))*isign*
            H(R(?a),`x')*S(R,i);
endif;
#if `fast' == 0
*
*   Now the main recursion in a single pass. If things are not complicated
*   We used some deltap_ and theta_ functions to keep it all in one.
*   This keeps the patternmatching simpler.
*
repeat;
    id  H(R(?a,n1?),`x')*ln_(nn?,`x')*sum(i,1,inf)
                    *den(n?,i)*S(R(?b),i)*pow(`x',i)*isign^is? =
            +sum(i,1,inf)*pow(`x',i)*fac_(nn)*sign_(nn)*H(R(?a),`x')*
                sum_(k,0,nn,ln_(k,`x')*sign_(k)*invfac_(k)
                    *(+deltap_(n1)*(-isign)^theta_(-n1)*
                            S(R(sig_(n1)*n*sign_(is),?b),i)*den(nn+1-k,i)
                      -sign_(theta_(-n1))*isign^is*
                            S(R(?b),i)*den(n+nn+1-k,i)));
endrepeat;
*
*   Cleanup. We express everything purely in terms of just an S, no
*   denominators. This is obtained by pulling in one 1/[1-x], expand it
*   and exchange the sums. Work out the inner sum. Because this time
*   we do not integrate we get no new denominators.
*
id  H(R,`x') = 1;
id  sum(i,1,inf)*pow(`x',i)*S(R(?a),i)*den(n?,i)*isign^is? =
        [1-`x']*sum(i,1,inf)*pow(`x',i)*S(R(sign_(is)*n,?a),i);
*
endif;
#else
*
*   Now the main recursion for complicated cases.
*   This contains a .sort ! The extra code will loop until we are
*   completely done.
*
endif;
#do iii = 1,1
    id  H(R(?a,n1?),`x')*ln_(nn?,`x')*sum(i,1,inf)
                    *den(n?,i)*S(R(?b),i)*pow(`x',i)*isign^is? =
            +sum(i,1,inf)*pow(`x',i)*fac_(nn)*sign_(nn)*H(R(?a),`x')*
                sum_(k,0,nn,ln_(k,`x')*sign_(k)*invfac_(k)
                    *(+deltap_(n1)*(-isign)^theta_(-n1)*
                            S(R(sig_(n1)*n*sign_(is),?b),i)*den(nn+1-k,i)
                      -sign_(theta_(-n1))*isign^is*
                            S(R(?b),i)*den(n+nn+1-k,i)));
    if ( match(H(R(n1?,?a),`x')) ) redefine iii "0";
    .sort
#enddo
*
*   Cleanup. Same as before.
*
id  H(R,`x') = 1;
id  sum(i,1,inf)*pow(`x',i)*S(R(?a),i)*den(n?,i)*isign^is? =
        [1-`x']*sum(i,1,inf)*pow(`x',i)*S(R(sign_(is)*n,?a),i);
id	ln_(0,`x') = 1;
*
#endif
*
#endprocedure
*--#] hexpand :
*--#[ hlog0 :
#procedure hlog0(H,x,par)
*
*	Pulls out the powers of ln_(x)
*
#if `par' >= 0
repeat id `H'(R(?a,n?!{-1,0,1},?b),`x') = `H'(R(?a,0,n-sig_(n),?b),`x');
#endif
id	`H'(R(?a,0),`x') = `H'(R(?a),1,`x');
repeat id `H'(R(?a,0),n?,`x') = `H'(R(?a),n+1,`x');
id	`H'(R,n?pos_,`x') = ln_(n,`x')*invfac_(n);
id	`H'(R(?a),n?pos_,`x') = sum_(j,0,n,`H'(R(?a),R,j,`x')*
							ln_(n-j,`x')*sign_(j)*invfac_(n-j));
id	ln_(0,`x') = 1;
repeat id `H'(R(n1?,n2?,?a),R(?b),n?pos_,`x') =
			+`H'(R(n1,n2,?a),R(?b,0),n-1,`x')
			+`H'(R(n2,?a),R(?b,n1),n,`x');
repeat id `H'(R(n1?),R(?b),n?pos_,`x') = `H'(R(n1),R(?b,0),n-1,`x');
id `H'(R(?a),R(?b),0,`x') = `H'(R(?b,?a),`x');
#if `par' > 0
repeat id `H'(R(?a,0,n?!{0,0},?b),`x') = `H'(R(?a,n+sig_(n),?b),`x');
#endif
*
#endprocedure
*--#] hlog0 :
*--#[ hlog1 :
#procedure hlog1(H,x,HL,par)
*
*	Procedure splits off enough powers of ln_(1-`x') that the resulting
*	coefficients are finite in `x'=1.
*	We take the leading indices that are 1.
*	The powers of ln_(1-x) are collected in HL.
*	Note that the new algorithm does not use algebraic relations,
*	just the definition of H and partial integration.
*
#if `par' >= 0
repeat id `H'(R(?a,n?!{-1,0,1},?b),`x') = `H'(R(?a,0,n-sig_(n),?b),`x');
#endif
repeat;
	id,once,`H'(R(1,?a),`x') = HHa(R(1),`x')*HHb(R(?a),R,R,`x');
    repeat id HHa(R(?a),`x')*HHb(R(1,?b),R,R,`x') = HHa(R(1,?a),`x')*HHb(R(?b),R,R,`x');
	id	HHb(R,R,R,`x') = 1;
	repeat id HHa(R(1,?a),`x')*HHb(R(?b),R,R(?c),`x') =
				+HLa(R(1,?a),`x')*HHb(R(?b),R,R(?c),`x')
				-HHa(R(?a),`x')*HHb(R(?b),R,R(1,?c),`x');
	id	HHa(R,`x') = 1;
	id	HHa(R(?a),`x') = HLa(R(?a),`x');
	id	HHb(R(n1?,?a),R,R(?c),`x') = HHb(R(?a),R(n1),R(?c),`x');
	repeat id HHb(R(n1?,?a),R(?b),R(1,?c),`x') =
				+HHb(R(n1,?a),R(?b,1),R(?c),`x')
				+HHb(R(?a),R(?b,n1),R(1,?c),`x');
	id	HHb(R(?a),R(?b),R(?c),`x') = `H'(R(?b,?a,?c),`x');
endrepeat;
repeat id HLa(R(?a),`x')*HLa(R(?b),`x') = HLa(R(?a,?b),`x')*
    fac_(nargs_(?a)+nargs_(?b))*invfac_(nargs_(?a))*invfac_(nargs_(?b));
id	HLa(?a) = `HL'(?a);
#if `par' > 0
repeat id `H'(R(?a,0,n?!{0,0},?b),`x') = `H'(R(?a,n+sig_(n),?b),`x');
#endif
*
#endprocedure
*--#] hlog1 :
*--#[ hmellin :
#procedure hmellin(H,x,S,N)
*
*   Procedure does the Mellin transform of H(R(...),x)/[1+-x] by
*   multiplying with int(dx,0,1)*pow(x,N)
*   The result is in terms of H(R(...),1) and S(RR(....),N)
*
*   J.Vermaseren, 22-jul-1998, revised 3-nov-1999
*
*   First pull everything to the h-basis
*
#call hbasis(`H',`x')
.sort:hbasis;
#call hlog1(`H',`x',HL,0)
.sort:hlog1;
*
*   Next do the subtraction.
*	Note that the regularization of the divergencies is in general in the
*	upper limit of the Mellin integral which we do to the parameter `one'.
*	This paremeter is one = 1-ep in which ep goes to zero in the end.
*	Hence the algebra for H-functions in `one' is the algebra of hbasis.
*	This is not clearly mentioned in the paper.
*
if ( match(1/[1-`x']) );
    if ( match(`H'(R(?a),`x')) == 0 ) Multiply `H'(R,`x');
    if ( match(HL(R(?a),`x')) == 0 ) Multiply HL(R,`x');
    id  Mel*`H'(R(?a),`x')*HL(R(?b),`x')*`x'^n?/[1-`x'] =
        +Mel*pow(`x',`N')*`H'(R(?a),`x')*HL(R(?b),`x')*`x'^n/[1-`x']
        -`H'(R(?a),1)*HL(R(1,?b),1);
    id  `H'(R,1) = 1;
else;
    id  Mel = Mel*pow(`x',`N');
endif;
repeat id pow(`x',n1?)*pow(`x',n2?) = pow(`x',n1+n2);
Multiply replace_(HL,`H');
repeat;
if ( match(`H'(R(?a),`x')) > 1 ) id,once,`H'(R,`x') = 1;
endrepeat;
.sort:Subtraction;
#call hbasis(`H',`x')
.sort:Basis;
*
*   Eliminate powers of ln(1)
*
id  `H'(R(?a,n?!{0,0},?b),1) = HR(R(?a,n,?b),1);
id  `H'(R(0,?a),1) = 0;
id  HR(R(?a),1) = `H'(R(?a),1);
if ( count(Mel,1) && ( count([1-`x'],1) == 0 ) && ( count([1+`x'],1) == 0 ) )
    Multiply 1/[1+`x']+`x'/[1+`x'];
id `x'^n1?*pow(`x',n2?) = pow(`x',n1+n2);
*if ( count(Mel,1) && ( count(`H',1) == 0 ) ) Multiply `H'(R,`x');
*
*   Now prepare the recursion
*   isign = sign_(i)
*
id  Mel*pow(`x',n?)/[1-`x'] =
         sum(i,n,inf)*pow(`x',i)*den(0,i+1)*`S'(R,i+1);
id  Mel*pow(`x',n?)/[1+`x'] =
         sum(i,n,inf)*pow(`x',i)*isign*sign_(n)*den(0,i+1)*`S'(R,i+1);
Repeat id `H'(R(?a,n1?!{0,1,-1},?b),`x') = `H'(R(?a,0,n1-sig_(n1),?b),`x');
SplitArg,sign_;
repeat id   sign_(n1?,n2?,?a) = sign_(n1)*sign_(n2,?a);
id  sign_(-N) = sign_(N);
id  sign_(x?)*sign_(x?) = 1;
.sort:First sum;
repeat;
    if ( match(`H'(R(0,?a),`x')) );
    id  `H'(R(0,?a),`x')*pow(`x',i)*sum(i,n?,inf)*den(m?,i+1)*
                                        isign^is?*`S'(R(?b),i+1) =
            sign_(is)*Hone(R(0,?a),one)*(Sone(R(sign_(is)*(m+1),?b),inf)
                -`S'(R(sign_(is)*(m+1),?b),n))
        -`H'(R(?a),`x')*pow(`x',i)*sum(i,n,inf)*den(m+1,i+1)
                                            *isign^is*`S'(R(?b),i+1);
            ;
    elseif ( match(`H'(R(1,?a),`x')) );
    id  `H'(R(1,?a),`x')*pow(`x',i)*sum(i,n?,inf)*den(m?,i+1)*
                                        isign^is?*`S'(R(?b),i+1) =
            sign_(is)*Hone(R(1,?a),one)*(Sone(R(sign_(is)*(m+1),?b),inf)
                -`S'(R(sign_(is)*(m+1),?b),n))
            -`H'(R(?a),`x')*pow(`x',i)*sum(i,n,inf)*(
                +den(0,i+1)*`S'(R(sign_(is)*(m+1),?b),i+1)*sign_(is)
                -den(m+1,i+1)*`S'(R(?b),i+1)*isign^is
                -den(0,i+1)*`S'(R(sign_(is)*(m+1),?b),n)*`S'(R,i+1)*sign_(is) )
            ;
    elseif ( match(`H'(R(-1,?a),`x')) );
    id  `H'(R(-1,?a),`x')*pow(`x',i)*sum(i,n?,inf)*den(m?,i+1)*
                                        isign^is?*`S'(R(?b),i+1) =
            sign_(is)*Hone(R(-1,?a),one)*(Sone(R(sign_(is)*(m+1),?b),inf)
                -`S'(R(sign_(is)*(m+1),?b),n))
            -`H'(R(?a),`x')*pow(`x',i)*sum(i,n,inf)*(
                +den(0,i+1)*`S'(R(-sign_(is)*(m+1),?b),i+1)*isign*sign_(is)
                +den(m+1,i+1)*`S'(R(?b),i+1)*isign^is
                -den(0,i+1)*`S'(R(-sign_(is)*(m+1),?b),n)*
                                                `S'(R,i+1)*isign*sign_(is) )
            ;
    endif;
endrepeat;
.sort:Recursion;
if ( match(`H'(R,`x')) );
id  `H'(R,`x')*pow(`x',i)*sum(i,n?,inf)*`S'(R(?a),i+1)*den(m?,i+1)*isign^is? =
        sign_(is)*(Sone(R(sign_(is)*(m+1),?a),inf)-`S'(R(sign_(is)*(m+1),?a),n));
else;
id  pow(`x',i)*sum(i,n?,inf)*`S'(R(?a),i+1)*den(m?,i+1)*isign^is? =
        sign_(is)*(Sone(R(sign_(is)*(m+1),?a),inf)-`S'(R(sign_(is)*(m+1),?a),n));
endif;
repeat id Hone(R(?a,0,n?!{0,0},?b),one) = Hone(R(?a,n+sig_(n),?b),one);
id  Hone(R(0,?a),one) = 0;
SplitArg,sign_;
repeat id   sign_(n1?,n2?,?a) = sign_(n1)*sign_(n2,?a);
id  sign_(-N) = sign_(N);
id  sign_(x?)*sign_(x?) = 1;
.sort:last;
*
*   Convert the Sone to Hone. We have to use the hbasis algebra to conbine
*	all constants.
*
#call inftoh(Sone,Hone)
id  Hone(R(?a),1) = Hone(R(?a),one);
.sort:to Hone;
#call hbasis(Hone,one)
.sort:to Hone basis;
*
*	Having combined all constants, we can convert to 'traditional' notation.
*
id  Hone(R(?a),one) = `H'(R(?a),1);
.sort:inf -> 1 in `H';
#do i = 1,1
#call basisn(`S',`N')
if ( match(`S'(R(?a),`N')) > 1 ) redefine i "0";
.sort:combine `N';
#enddo
#endprocedure
*--#] hmellin :
*--#[ htable1 :
#procedure htable1
#ifndef `HTABLE1FILL'
#define  HTABLE1FILL "1"
*
*	Values of H(R(..),1) at weight = 1.
*   Constants:
*		Sinf = S(R(1),inf)
*		ln2 = ln_(2)
*
S	Sinf,ln2;
CTable,relax,Htab1(-1:1);
*
Fill Htab1(-1)=ln2;
Fill Htab1(1)=Sinf;
Fill Htab1(0)=0;
#endif
#endprocedure
*--#] htable1 :
*--#[ htable2 :
#procedure htable2
#ifndef `HTABLE2FILL'
#define  HTABLE2FILL "1"
*
*	Values of H(R(..),1) at weight = 2.
*   Constants:
*		Sinf = S(R(1),inf)
*		ln2 = ln_(2)
*		z2 = zeta_2 = pi_^2/6
*
S	Sinf,ln2,z2;
CTable,relax,Htab2(-1:1,-1:1);
*
Fill Htab2(-1,-1)=+ 1/2*ln2^2;
Fill Htab2(-1,1)=+1/2*z2-1/2*ln2^2;
Fill Htab2(-1,0)=-1/2*z2;
Fill Htab2(1,-1)=-1/2*z2+ln2*Sinf+1/2*ln2^2;
Fill Htab2(1,1)=-1/2*z2+1/2*Sinf^2;
Fill Htab2(1,0)=-z2;
Fill Htab2(0,-1)=+1/2*z2;
Fill Htab2(0,1)=+z2;
Fill Htab2(0,0)=0;
#endif
#endprocedure
*--#] htable2 :
*--#[ htable3 :
#procedure htable3
#ifndef `HTABLE3FILL'
#define  HTABLE3FILL "1"
*
*	Values of H(R(..),1) at weight = 3.
*   Constants:
*		Sinf = S(R(1),inf)
*		ln2 = ln_(2)
*		z2 = zeta_2 = pi_^2/6
*		z3 = zeta_3
*
S	Sinf,ln2,z2,z3;
CTable,relax,Htab3(-1:1,-1:1,-1:1);
*
Fill Htab3(-1,-1,-1)=+1/6*ln2^3;
Fill Htab3(-1,-1,1)=+1/8*z3-1/6*ln2^3;
Fill Htab3(-1,-1,0)=-1/2*z2*ln2+1/8*z3;
Fill Htab3(-1,1,-1)=+1/2*z2*ln2-1/4*z3-1/6*ln2^3;
Fill Htab3(-1,1,1)=-1/2*z2*ln2+7/8*z3+1/6*ln2^3;
Fill Htab3(-1,1,0)=+1/2*z2*ln2-z3;
Fill Htab3(-1,0,-1)=+1/2*z2*ln2-1/4*z3;
Fill Htab3(-1,0,1)=+z2*ln2-5/8*z3;
Fill Htab3(-1,0,0)=+3/4*z3;
Fill Htab3(1,-1,-1)=-1/2*z2*ln2+1/8*z3+1/2*ln2^2*Sinf+1/3*ln2^3;
Fill Htab3(1,-1,1)=+z2*ln2+1/2*z2*Sinf-7/4*z3-1/2*ln2^2*Sinf-1/3*ln2^3;
Fill Htab3(1,-1,0)=-3/2*z2*ln2-1/2*z2*Sinf+13/8*z3;
Fill Htab3(1,1,-1)=-z2*ln2-1/2*z2*Sinf+7/8*z3+1/2*ln2*Sinf^2+1/2*ln2^2*Sinf
   +1/6*ln2^3;
Fill Htab3(1,1,1)=-1/2*z2*Sinf+1/3*z3+1/6*Sinf^3;
Fill Htab3(1,1,0)=-z2*Sinf+z3;
Fill Htab3(1,0,-1)=+1/2*z2*Sinf-5/8*z3;
Fill Htab3(1,0,1)=+z2*Sinf-2*z3;
Fill Htab3(1,0,0)=+z3;
Fill Htab3(0,-1,-1)=+1/8*z3;
Fill Htab3(0,-1,1)=-3/2*z2*ln2+13/8*z3;
Fill Htab3(0,-1,0)=-3/2*z3;
Fill Htab3(0,1,-1)=+3/2*z2*ln2-z3;
Fill Htab3(0,1,1)=+z3;
Fill Htab3(0,1,0)=-2*z3;
Fill Htab3(0,0,-1)=+3/4*z3;
Fill Htab3(0,0,1)=+z3;
Fill Htab3(0,0,0)=0;
#endif
*
#endprocedure
*--#] htable3 :
*--#[ htable4 :
#procedure htable4
#ifndef `HTABLE4FILL'
#define  HTABLE4FILL "1"
*
*	Values of H(R(..),1) at weight = 4.
*   Constants:
*		Sinf = S(R(1),inf)
*		ln2 = ln_(2)
*		z2 = zeta_2 = pi_^2/6
*		z3 = zeta_3
*		li4half = Li(4,1/2)
*
S	Sinf,ln2,z2,z3,li4half;
CTable,relax,Htab4(-1:1,-1:1,-1:1,-1:1);
*
Fill Htab4(-1,-1,-1,-1)=1/24*ln2^4;
Fill Htab4(-1,-1,-1,1)=1/4*z2*ln2^2+2/5*z2^2-7/8*z3*ln2-1/12*ln2^4-li4half;
Fill Htab4(-1,-1,-1,0)=-1/2*z2*ln2^2-2/5*z2^2+z3*ln2+1/24*ln2^4+li4half;
Fill Htab4(-1,-1,1,-1)=-3/4*z2*ln2^2-6/5*z2^2+11/4*z3*ln2+1/12*ln2^4
   +3*li4half;
Fill Htab4(-1,-1,1,1)=1/20*z2^2-1/8*z3*ln2+1/24*ln2^4;
Fill Htab4(-1,-1,1,0)=-1/4*z2*ln2^2-7/8*z2^2+13/8*z3*ln2+1/12*ln2^4+2*li4half;
Fill Htab4(-1,-1,0,-1)=z2*ln2^2+6/5*z2^2-23/8*z3*ln2-1/8*ln2^4-3*li4half;
Fill Htab4(-1,-1,0,1)=1/2*z2*ln2^2+3/40*z2^2-5/8*z3*ln2;
Fill Htab4(-1,-1,0,0)=1/2*z2*ln2^2+3/4*z2^2-z3*ln2-1/12*ln2^4-2*li4half;
Fill Htab4(-1,1,-1,-1)=z2*ln2^2+6/5*z2^2-23/8*z3*ln2-1/6*ln2^4-3*li4half;
Fill Htab4(-1,1,-1,1)=-1/4*z2*ln2^2+1/40*z2^2+1/4*z3*ln2+1/24*ln2^4;
Fill Htab4(-1,1,-1,0)=1/4*z2*ln2^2+1/10*z2^2-z3*ln2;
Fill Htab4(-1,1,1,-1)=-1/4*z2*ln2^2-1/8*z2^2+7/8*z3*ln2+1/24*ln2^4;
Fill Htab4(-1,1,1,1)=li4half;
Fill Htab4(-1,1,1,0)=-1/20*z2^2+1/8*z3*ln2-1/24*ln2^4-li4half;
Fill Htab4(-1,1,0,-1)=3/4*z2*ln2^2+33/20*z2^2-13/4*z3*ln2-1/6*ln2^4-4*li4half;
Fill Htab4(-1,1,0,1)=-1/4*z2*ln2^2+19/40*z2^2-1/4*z3*ln2-1/24*ln2^4-li4half;
Fill Htab4(-1,1,0,0)=19/40*z2^2-3/4*z3*ln2;
Fill Htab4(-1,0,-1,-1)=-3/4*z2*ln2^2-6/5*z2^2+11/4*z3*ln2+1/8*ln2^4+3*li4half;
Fill Htab4(-1,0,-1,1)=-1/2*z2*ln2^2+5/4*z2^2-z3*ln2-1/6*ln2^4-4*li4half;
Fill Htab4(-1,0,-1,0)=-z2*ln2^2-11/8*z2^2+2*z3*ln2+1/6*ln2^4+4*li4half;
Fill Htab4(-1,0,1,-1)=1/2*z2*ln2^2-7/5*z2^2+13/8*z3*ln2+1/6*ln2^4+4*li4half;
Fill Htab4(-1,0,1,1)=1/4*z2*ln2^2+1/8*z2^2+1/8*z3*ln2-1/24*ln2^4-li4half;
Fill Htab4(-1,0,1,0)=-z2*ln2^2-51/40*z2^2+3/2*z3*ln2+1/6*ln2^4+4*li4half;
Fill Htab4(-1,0,0,-1)=-1/8*z2^2+3/4*z3*ln2;
Fill Htab4(-1,0,0,1)=1/2*z2*ln2^2+3/5*z2^2-3/4*z3*ln2-1/12*ln2^4-2*li4half;
Fill Htab4(-1,0,0,0)=-7/20*z2^2;
Fill Htab4(1,-1,-1,-1)=-1/2*z2*ln2^2-2/5*z2^2+z3*ln2+1/6*ln2^3*Sinf
   +1/6*ln2^4+li4half;
Fill Htab4(1,-1,-1,1)=1/4*z2*ln2^2-1/8*z2^2+1/8*z3*Sinf-1/6*ln2^3*
   Sinf-1/8*ln2^4;
Fill Htab4(1,-1,-1,0)=-1/2*z2*ln2*Sinf-1/2*z2*ln2^2+7/10*z2^2+1/8*z3*
   Sinf-1/12*ln2^4-2*li4half;
Fill Htab4(1,-1,1,-1)=1/2*z2*ln2*Sinf+3/4*z2*ln2^2+9/40*z2^2-2*z3*
   ln2-1/4*z3*Sinf-1/6*ln2^3*Sinf-1/8*ln2^4;
Fill Htab4(1,-1,1,1)=-1/2*z2*ln2*Sinf+7/8*z3*Sinf+1/6*ln2^3*Sinf-3*li4half;
Fill Htab4(1,-1,1,0)=1/2*z2*ln2*Sinf+1/4*z2*ln2^2-3/8*z2^2-z3*Sinf
   +1/8*ln2^4+3*li4half;
Fill Htab4(1,-1,0,-1)=1/2*z2*ln2*Sinf-3/4*z2*ln2^2-3/2*z2^2+21/8*z3*
   ln2-1/4*z3*Sinf+1/6*ln2^4+4*li4half;
Fill Htab4(1,-1,0,1)=z2*ln2*Sinf-1/4*z2*ln2^2-29/40*z2^2-5/8*z3*Sinf
   +1/8*ln2^4+3*li4half;
Fill Htab4(1,-1,0,0)=1/2*z2*ln2^2+1/5*z2^2+3/4*z3*Sinf-1/12*ln2^4-2*li4half;
Fill Htab4(1,1,-1,-1)=-1/2*z2*ln2*Sinf-3/4*z2*ln2^2-1/20*z2^2+z3*ln2
   +1/8*z3*Sinf+1/4*ln2^2*Sinf^2+1/3*ln2^3*Sinf+1/8*ln2^4;
Fill Htab4(1,1,-1,1)=z2*ln2*Sinf+1/4*z2*ln2^2+1/4*z2*Sinf^2-1/4*z2^2
   -7/4*z3*Sinf-1/4*ln2^2*Sinf^2-1/3*ln2^3*Sinf+3*li4half;
Fill Htab4(1,1,-1,0)=-3/2*z2*ln2*Sinf-1/4*z2*Sinf^2+4/5*z2^2+13/8*z3*
   Sinf-1/8*ln2^4-3*li4half;
Fill Htab4(1,1,1,-1)=-z2*ln2*Sinf-1/4*z2*ln2^2-1/4*z2*Sinf^2+1/4*z2^2
   +1/3*z3*ln2+7/8*z3*Sinf+1/6*ln2*Sinf^3+1/4*ln2^2*Sinf^2+1/6*ln2^3
   *Sinf-li4half;
Fill Htab4(1,1,1,1)=-1/4*z2*Sinf^2+1/40*z2^2+1/3*z3*Sinf+1/24*Sinf^4;
Fill Htab4(1,1,1,0)=-1/2*z2*Sinf^2+1/10*z2^2+z3*Sinf;
Fill Htab4(1,1,0,-1)=-1/4*z2*ln2^2+1/4*z2*Sinf^2-3/8*z2^2+7/8*z3*ln2
   -5/8*z3*Sinf+1/24*ln2^4+li4half;
Fill Htab4(1,1,0,1)=1/2*z2*Sinf^2+7/10*z2^2-2*z3*Sinf;
Fill Htab4(1,1,0,0)=-1/10*z2^2+z3*Sinf;
Fill Htab4(1,0,-1,-1)=-3/40*z2^2+1/8*z3*Sinf;
Fill Htab4(1,0,-1,1)=-3/2*z2*ln2*Sinf+3/4*z2*ln2^2+9/40*z2^2+13/8*z3*
   Sinf-1/8*ln2^4-3*li4half;
Fill Htab4(1,0,-1,0)=17/40*z2^2-3/2*z3*Sinf;
Fill Htab4(1,0,1,-1)=3/2*z2*ln2*Sinf-1/4*z2*ln2^2+1/40*z2^2-7/4*z3*ln2
   -z3*Sinf+1/24*ln2^4+li4half;
Fill Htab4(1,0,1,1)=-6/5*z2^2+z3*Sinf;
Fill Htab4(1,0,1,0)=7/10*z2^2-2*z3*Sinf;
Fill Htab4(1,0,0,-1)=-1/2*z2*ln2^2-11/10*z2^2+7/4*z3*ln2+3/4*z3*Sinf
   +1/12*ln2^4+2*li4half;
Fill Htab4(1,0,0,1)=-1/2*z2^2+z3*Sinf;
Fill Htab4(1,0,0,0)=-2/5*z2^2;
Fill Htab4(0,-1,-1,-1)=1/4*z2*ln2^2+2/5*z2^2-7/8*z3*ln2-1/24*ln2^4-li4half;
Fill Htab4(0,-1,-1,1)=1/4*z2*ln2^2-9/20*z2^2+1/12*ln2^4+2*li4half;
Fill Htab4(0,-1,-1,0)=-1/8*z2^2;
Fill Htab4(0,-1,1,-1)=-3/2*z2*ln2^2-7/20*z2^2+21/8*z3*ln2;
Fill Htab4(0,-1,1,1)=-11/20*z2^2+1/8*ln2^4+3*li4half;
Fill Htab4(0,-1,1,0)=z2*ln2^2+13/40*z2^2-1/6*ln2^4-4*li4half;
Fill Htab4(0,-1,0,-1)=z2*ln2^2+13/8*z2^2-7/2*z3*ln2-1/6*ln2^4-4*li4half;
Fill Htab4(0,-1,0,1)=3/40*z2^2;
Fill Htab4(0,-1,0,0)=21/20*z2^2;
Fill Htab4(0,1,-1,-1)=5/4*z2*ln2^2+7/8*z2^2-21/8*z3*ln2-1/12*ln2^4
   -2*li4half;
Fill Htab4(0,1,-1,1)=-3/4*z2*ln2^2+7/8*z2^2-1/8*ln2^4-3*li4half;
Fill Htab4(0,1,-1,0)=-z2*ln2^2-33/40*z2^2+1/6*ln2^4+4*li4half;
Fill Htab4(0,1,1,-1)=1/2*z2*ln2^2-9/20*z2^2+7/8*z3*ln2+1/24*ln2^4+li4half;
Fill Htab4(0,1,1,1)=2/5*z2^2;
Fill Htab4(0,1,1,0)=-1/2*z2^2;
Fill Htab4(0,1,0,-1)=z2*ln2^2+71/40*z2^2-7/2*z3*ln2-1/6*ln2^4-4*li4half;
Fill Htab4(0,1,0,1)=3/10*z2^2;
Fill Htab4(0,1,0,0)=6/5*z2^2;
Fill Htab4(0,0,-1,-1)=-1/2*z2*ln2^2-3/4*z2^2+7/4*z3*ln2+1/12*ln2^4+2*li4half;
Fill Htab4(0,0,-1,1)=-1/2*z2*ln2^2-1/5*z2^2+1/12*ln2^4+2*li4half;
Fill Htab4(0,0,-1,0)=-21/20*z2^2;
Fill Htab4(0,0,1,-1)=-19/40*z2^2+7/4*z3*ln2;
Fill Htab4(0,0,1,1)=1/10*z2^2;
Fill Htab4(0,0,1,0)=-6/5*z2^2;
Fill Htab4(0,0,0,-1)=7/20*z2^2;
Fill Htab4(0,0,0,1)=2/5*z2^2;
Fill Htab4(0,0,0,0)=0;
#endif
*
#endprocedure

*--#] htable4 :
*--#[ htable5 :
#procedure htable5
#ifndef `HTABLE5FILL'
#define  HTABLE5FILL "1"
*
*	Values of H(R(..),1) at weight = 5.
*   Constants:
*		Sinf = S(R(1),inf)
*		ln2 = ln_(2)
*		z2 = zeta_2 = pi_^2/6
*		z3 = zeta_3
*		z5 = zeta_5
*		li4half = Li(4,1/2)
*		li5half = Li(5,1/2)
*
S	Sinf,ln2,z2,z3,z5,li4half,li5half;
CTable,relax,Htab5(-1:1,-1:1,-1:1,-1:1,-1:1);
*
Fill Htab5(-1,-1,-1,-1,-1)=1/120*ln2^5;
Fill Htab5(-1,-1,-1,-1,1)=1/6*z2*ln2^3-7/16*z3*ln2^2+z5-ln2*li4half
   -1/24*ln2^5-li5half;
Fill Htab5(-1,-1,-1,-1,0)=-1/6*z2*ln2^3-2/5*z2^2*ln2+1/2*z3*ln2^2+z5
   +1/120*ln2^5-li5half;
Fill Htab5(-1,-1,-1,1,-1)=-5/12*z2*ln2^3+2/5*z2^2*ln2+7/8*z3*ln2^2-4*
   z5+3*ln2*li4half+1/12*ln2^5+4*li5half;
Fill Htab5(-1,-1,-1,1,1)=-1/2*z2*z3-1/12*z2*ln2^3-2/5*z2^2*ln2+7/16*
   z3*ln2^2+63/32*z5+1/60*ln2^5-li5half;
Fill Htab5(-1,-1,-1,1,0)=7/16*z2*z3-1/3*z2*ln2^3+2/5*z2^2*ln2+13/16*
   z3*ln2^2-39/8*z5+3*ln2*li4half+11/120*ln2^5+4*li5half;
Fill Htab5(-1,-1,-1,0,-1)=1/6*z2*ln2^3+6/5*z2^2*ln2-z3*ln2^2-4*z5+
   ln2*li4half+1/120*ln2^5+4*li5half;
Fill Htab5(-1,-1,-1,0,1)=7/16*z2*z3+1/3*z2*ln2^3+3/40*z2^2*ln2-3/4*
   z3*ln2^2+1/8*z5-ln2*li4half-1/30*ln2^5-li5half;
Fill Htab5(-1,-1,-1,0,0)=-1/2*z2*z3+1/6*z2*ln2^3+3/4*z2^2*ln2-1/2*z3*
   ln2^2-33/32*z5-1/60*ln2^5+2*li5half;
Fill Htab5(-1,-1,1,-1,-1)=1/4*z2*ln2^3-6/5*z2^2*ln2+1/16*z3*ln2^2+6*
   z5-3*ln2*li4half-1/12*ln2^5-6*li5half;
Fill Htab5(-1,-1,1,-1,1)=3/2*z2*z3+1/4*z2*ln2^3+6/5*z2^2*ln2-11/8*z3
   *ln2^2-375/64*z5-1/60*ln2^5+3*li5half;
Fill Htab5(-1,-1,1,-1,0)=-11/8*z2*z3+5/12*z2*ln2^3-7/8*z2^2*ln2-1/2*
   z3*ln2^2+247/32*z5-3*ln2*li4half-1/12*ln2^5-5*li5half;
Fill Htab5(-1,-1,1,1,-1)=1/20*z2^2*ln2-1/16*z3*ln2^2-3/64*z5+1/120*
   ln2^5;
Fill Htab5(-1,-1,1,1,1)=-1/2*z2*z3-1/6*z2*ln2^3-1/20*z2^2*ln2+1/2*z3*
   ln2^2+1/32*z5+ln2*li4half+1/40*ln2^5+li5half;
Fill Htab5(-1,-1,1,1,0)=1/16*z2*z3-1/4*z2*ln2^3+7/8*z2^2*ln2+1/16*z3
   *ln2^2-277/64*z5+2*ln2*li4half+1/20*ln2^5+4*li5half;
Fill Htab5(-1,-1,1,0,-1)=1/16*z2*z3+1/3*z2*ln2^3-6/5*z2^2*ln2-5/16*
   z3*ln2^2+221/32*z5-4*ln2*li4half-13/120*ln2^5-7*li5half;
Fill Htab5(-1,-1,1,0,1)=23/16*z2*z3+1/2*z2*ln2^3-3/40*z2^2*ln2-23/16
   *z3*ln2^2+85/64*z5-4*ln2*li4half-2/15*ln2^5-4*li5half;
Fill Htab5(-1,-1,1,0,0)=-13/16*z2*z3+1/6*z2*ln2^3-3/4*z2^2*ln2-3/8*z3
   *ln2^2+47/8*z5-2*ln2*li4half-1/20*ln2^5-4*li5half;
Fill Htab5(-1,-1,0,-1,-1)=1/4*z2*ln2^3-6/5*z2^2*ln2+1/16*z3*ln2^2+6*
   z5-3*ln2*li4half-3/40*ln2^5-6*li5half;
Fill Htab5(-1,-1,0,-1,1)=-21/16*z2*z3-1/2*z2*ln2^3-1/40*z2^2*ln2+13/
   16*z3*ln2^2+87/32*z5-ln2*li4half-1/24*ln2^5;
Fill Htab5(-1,-1,0,-1,0)=23/16*z2*z3-1/3*z2*ln2^3-11/8*z2^2*ln2+z3*
   ln2^2+73/64*z5+1/30*ln2^5-4*li5half;
Fill Htab5(-1,-1,0,1,-1)=-1/8*z2^2*ln2+13/16*z3*ln2^2-99/32*z5+4*ln2*
   li4half+17/120*ln2^5+3*li5half;
Fill Htab5(-1,-1,0,1,1)=1/12*z2*ln2^3+1/8*z2^2*ln2+1/16*z3*ln2^2-25/
   32*z5-1/120*ln2^5+li5half;
Fill Htab5(-1,-1,0,1,0)=5/16*z2*z3-1/3*z2*ln2^3-51/40*z2^2*ln2+3/4*
   z3*ln2^2+103/32*z5+1/30*ln2^5-4*li5half;
Fill Htab5(-1,-1,0,0,-1)=1/16*z2*z3+1/3*z2*ln2^3-1/8*z2^2*ln2-1/2*z3
   *ln2^2+125/64*z5-2*ln2*li4half-1/15*ln2^5-2*li5half;
Fill Htab5(-1,-1,0,0,1)=-3/4*z2*z3-1/6*z2*ln2^3+3/5*z2^2*ln2+1/2*z3*
   ln2^2-39/16*z5+2*ln2*li4half+1/20*ln2^5+4*li5half;
Fill Htab5(-1,-1,0,0,0)=1/2*z2*z3-7/20*z2^2*ln2-29/32*z5;
Fill Htab5(-1,1,-1,-1,-1)=1/6*z2*ln2^3+6/5*z2^2*ln2-z3*ln2^2-4*z5+
   ln2*li4half+4*li5half;
Fill Htab5(-1,1,-1,-1,1)=-23/16*z2*z3-1/3*z2*ln2^3-6/5*z2^2*ln2+23/16
   *z3*ln2^2+369/64*z5+1/30*ln2^5-3*li5half;
Fill Htab5(-1,1,-1,-1,0)=3/2*z2*z3-1/12*z2*ln2^3+1/10*z2^2*ln2-1/16*
   z3*ln2^2-125/32*z5+ln2*li4half+1/30*ln2^5+li5half;
Fill Htab5(-1,1,-1,1,-1)=-1/8*z2*z3-1/12*z2*ln2^3+1/40*z2^2*ln2+1/8*
   z3*ln2^2+3/16*z5+1/120*ln2^5;
Fill Htab5(-1,1,-1,1,1)=23/16*z2*z3+7/12*z2*ln2^3-1/40*z2^2*ln2-23/
   16*z3*ln2^2+23/64*z5-3*ln2*li4half-13/120*ln2^5-3*li5half;
Fill Htab5(-1,1,-1,1,0)=-5/8*z2*z3-1/12*z2*ln2^3-1/10*z2^2*ln2+1/2*z3
   *ln2^2+z5;
Fill Htab5(-1,1,-1,0,-1)=-1/4*z2*z3-5/12*z2*ln2^3+33/20*z2^2*ln2+1/8*
   z3*ln2^2-61/8*z5+4*ln2*li4half+1/10*ln2^5+8*li5half;
Fill Htab5(-1,1,-1,0,1)=-15/8*z2*z3-3/4*z2*ln2^3+19/40*z2^2*ln2+13/8*
   z3*ln2^2-101/64*z5+4*ln2*li4half+1/8*ln2^5+5*li5half;
Fill Htab5(-1,1,-1,0,0)=7/8*z2*z3+19/40*z2^2*ln2-3/8*z3*ln2^2-15/8*
   z5;
Fill Htab5(-1,1,1,-1,-1)=1/16*z2*z3-1/12*z2*ln2^3-1/8*z2^2*ln2+7/16*
   z3*ln2^2-3/64*z5+1/120*ln2^5;
Fill Htab5(-1,1,1,-1,1)=-7/8*z2*z3-5/12*z2*ln2^3+1/8*z2^2*ln2+7/8*z3*
   ln2^2-81/64*z5+3*ln2*li4half+11/120*ln2^5+3*li5half;
Fill Htab5(-1,1,1,-1,0)=3/8*z2*z3+1/3*z2*ln2^3-1/20*z2^2*ln2-13/16*
   z3*ln2^2+33/64*z5-2*ln2*li4half-3/40*ln2^5-li5half;
Fill Htab5(-1,1,1,1,-1)=7/16*z2*z3+1/6*z2*ln2^3-7/16*z3*ln2^2+27/32*
   z5-ln2*li4half-1/30*ln2^5-2*li5half;
Fill Htab5(-1,1,1,1,1)=li5half;
Fill Htab5(-1,1,1,1,0)=1/2*z2*z3+1/6*z2*ln2^3+1/20*z2^2*ln2-1/2*z3*
   ln2^2-1/32*z5-ln2*li4half-1/40*ln2^5-2*li5half;
Fill Htab5(-1,1,1,0,-1)=1/8*z2*z3+1/4*z2*ln2^3-33/20*z2^2*ln2+5/16*
   z3*ln2^2+457/64*z5-3*ln2*li4half-1/15*ln2^5-7*li5half;
Fill Htab5(-1,1,1,0,1)=-9/16*z2*z3-5/12*z2*ln2^3-19/40*z2^2*ln2+23/16
   *z3*ln2^2-23/64*z5+3*ln2*li4half+13/120*ln2^5+2*li5half;
Fill Htab5(-1,1,1,0,0)=7/16*z2*z3+1/3*z2*ln2^3-19/40*z2^2*ln2-1/2*z3
   *ln2^2+151/64*z5-2*ln2*li4half-1/15*ln2^5-2*li5half;
Fill Htab5(-1,1,0,-1,-1)=1/16*z2*z3+1/4*z2*ln2^3+6/5*z2^2*ln2-11/8*
   z3*ln2^2-99/32*z5-1/40*ln2^5+3*li5half;
Fill Htab5(-1,1,0,-1,1)=-1/2*z2*z3+2/3*z2*ln2^3-27/8*z2^2*ln2+1/2*z3*
   ln2^2+911/64*z5-4*ln2*li4half-7/120*ln2^5-13*li5half;
Fill Htab5(-1,1,0,-1,0)=7/8*z2*z3-1/3*z2*ln2^3+11/8*z2^2*ln2+3/4*z3*
   ln2^2-331/32*z5+4*ln2*li4half+1/10*ln2^5+8*li5half;
Fill Htab5(-1,1,0,1,-1)=-1/2*z2*z3-7/6*z2*ln2^3+141/40*z2^2*ln2+1/2*
   z3*ln2^2-245/16*z5+7*ln2*li4half+19/120*ln2^5+16*li5half;
Fill Htab5(-1,1,0,1,1)=11/8*z2*z3+5/12*z2*ln2^3-1/8*z2^2*ln2-11/8*z3
   *ln2^2+81/64*z5-3*ln2*li4half-11/120*ln2^5-4*li5half;
Fill Htab5(-1,1,0,1,0)=-7/8*z2*z3-1/3*z2*ln2^3+51/40*z2^2*ln2+z3*
   ln2^2-227/32*z5+4*ln2*li4half+1/10*ln2^5+8*li5half;
Fill Htab5(-1,1,0,0,-1)=-1/8*z2*z3+1/8*z2^2*ln2-3/8*z3*ln2^2+15/32*z5
;
Fill Htab5(-1,1,0,0,1)=-11/8*z2*z3-1/6*z2*ln2^3-3/5*z2^2*ln2+3/8*z3*
   ln2^2+311/64*z5+1/60*ln2^5-2*li5half;
Fill Htab5(-1,1,0,0,0)=3/8*z2*z3+7/20*z2^2*ln2-2*z5;
Fill Htab5(-1,0,-1,-1,-1)=-5/12*z2*ln2^3+2/5*z2^2*ln2+7/8*z3*ln2^2-4*
   z5+3*ln2*li4half+11/120*ln2^5+4*li5half;
Fill Htab5(-1,0,-1,-1,1)=21/16*z2*z3+2/3*z2*ln2^3-1/2*z2^2*ln2-21/16
   *z3*ln2^2+35/32*z5-ln2*li4half-1/120*ln2^5-4*li5half;
Fill Htab5(-1,0,-1,-1,0)=-11/8*z2*z3-1/8*z2^2*ln2+177/64*z5;
Fill Htab5(-1,0,-1,1,-1)=-5/6*z2*ln2^3+23/10*z2^2*ln2-61/8*z5-1/15*
   ln2^5+8*li5half;
Fill Htab5(-1,0,-1,1,1)=-21/16*z2*z3-1/4*z2*ln2^3-77/40*z2^2*ln2+21/
   16*z3*ln2^2+61/8*z5+2*ln2*li4half+2/15*ln2^5-6*li5half;
Fill Htab5(-1,0,-1,1,0)=1/2*z2*z3+1/3*z2*ln2^3+119/40*z2^2*ln2-507/
   32*z5+4*ln2*li4half+1/30*ln2^5+16*li5half;
Fill Htab5(-1,0,-1,0,-1)=-1/8*z2*z3-1/3*z2*ln2^3+13/8*z2^2*ln2-125/16
   *z5+4*ln2*li4half+1/10*ln2^5+8*li5half;
Fill Htab5(-1,0,-1,0,1)=3/2*z2*z3+2/3*z2*ln2^3+3/40*z2^2*ln2-7/4*z3*
   ln2^2+33/32*z5-4*ln2*li4half-2/15*ln2^5-4*li5half;
Fill Htab5(-1,0,-1,0,0)=-z2*z3+21/20*z2^2*ln2+41/32*z5;
Fill Htab5(-1,0,1,-1,-1)=2/3*z2*ln2^3-69/40*z2^2*ln2+221/32*z5-2*ln2
   *li4half-1/40*ln2^5-7*li5half;
Fill Htab5(-1,0,1,-1,1)=21/16*z2*z3-7/12*z2*ln2^3+141/40*z2^2*ln2-21/
   16*z3*ln2^2-845/64*z5-11/120*ln2^5+11*li5half;
Fill Htab5(-1,0,1,-1,0)=-13/16*z2*z3-1/3*z2*ln2^3-139/40*z2^2*ln2+547/
   32*z5-4*ln2*li4half-1/30*ln2^5-16*li5half;
Fill Htab5(-1,0,1,1,-1)=11/12*z2*ln2^3-69/40*z2^2*ln2+457/64*z5-3*
   ln2*li4half-1/15*ln2^5-7*li5half;
Fill Htab5(-1,0,1,1,1)=-7/16*z2*z3-1/6*z2*ln2^3+2/5*z2^2*ln2+7/16*z3*
   ln2^2-27/32*z5+ln2*li4half+1/30*ln2^5+li5half;
Fill Htab5(-1,0,1,1,0)=-1/16*z2*z3-1/2*z2^2*ln2+53/64*z5;
Fill Htab5(-1,0,1,0,-1)=-5/16*z2*z3-1/3*z2*ln2^3+71/40*z2^2*ln2-123/
   16*z5+4*ln2*li4half+1/10*ln2^5+8*li5half;
Fill Htab5(-1,0,1,0,1)=9/8*z2*z3+2/3*z2*ln2^3+3/10*z2^2*ln2-7/4*z3*
   ln2^2+89/64*z5-4*ln2*li4half-2/15*ln2^5-4*li5half;
Fill Htab5(-1,0,1,0,0)=-3/4*z2*z3+6/5*z2^2*ln2+21/32*z5;
Fill Htab5(-1,0,0,-1,-1)=-1/6*z2*ln2^3-3/4*z2^2*ln2+7/8*z3*ln2^2+125/
   64*z5+1/60*ln2^5-2*li5half;
Fill Htab5(-1,0,0,-1,1)=-1/3*z2*ln2^3-27/40*z2^2*ln2+27/8*z5+1/30*
   ln2^5-4*li5half;
Fill Htab5(-1,0,0,-1,0)=-3/8*z2*z3-21/20*z2^2*ln2+51/32*z5;
Fill Htab5(-1,0,0,1,-1)=1/2*z2*ln2^3+15/32*z5-2*ln2*li4half-1/12*
   ln2^5;
Fill Htab5(-1,0,0,1,1)=-7/8*z2*z3-1/3*z2*ln2^3+1/10*z2^2*ln2+7/8*z3*
   ln2^2-15/32*z5+2*ln2*li4half+1/15*ln2^5+2*li5half;
Fill Htab5(-1,0,0,1,0)=3/8*z2*z3-6/5*z2^2*ln2+11/32*z5;
Fill Htab5(-1,0,0,0,-1)=3/8*z2*z3+7/20*z2^2*ln2-17/16*z5;
Fill Htab5(-1,0,0,0,1)=3/4*z2*z3+2/5*z2^2*ln2-59/32*z5;
Fill Htab5(-1,0,0,0,0)=15/16*z5;
Fill Htab5(1,-1,-1,-1,-1)=-1/6*z2*ln2^3-2/5*z2^2*ln2+1/2*z3*ln2^2+z5
   +1/24*ln2^4*Sinf+1/24*ln2^5-li5half;
Fill Htab5(1,-1,-1,-1,1)=15/16*z2*z3+1/4*z2*ln2^2*Sinf+1/4*z2*ln2^3+
   4/5*z2^2*ln2+2/5*z2^2*Sinf-7/8*z3*ln2*Sinf-15/16*z3*ln2^2-123/32*z5
   -1/12*ln2^4*Sinf-1/20*ln2^5-Sinf*li4half+2*li5half;
Fill Htab5(1,-1,-1,-1,0)=-z2*z3-1/2*z2*ln2^2*Sinf-1/3*z2*ln2^3+3/10*
   z2^2*ln2-2/5*z2^2*Sinf+z3*ln2*Sinf+1/2*z3*ln2^2+15/16*z5+1/24*
   ln2^4*Sinf-1/120*ln2^5+Sinf*li4half+li5half;
Fill Htab5(1,-1,-1,1,-1)=-11/8*z2*z3-3/4*z2*ln2^2*Sinf-1/6*z2*ln2^3-
   53/40*z2^2*ln2-6/5*z2^2*Sinf+11/4*z3*ln2*Sinf+11/8*z3*ln2^2+369/64*
   z5+1/12*ln2^4*Sinf-1/120*ln2^5+3*Sinf*li4half-3*li5half;
Fill Htab5(1,-1,-1,1,1)=1/16*z2*z3-1/12*z2*ln2^3+7/40*z2^2*ln2+1/20*
   z2^2*Sinf-1/8*z3*ln2*Sinf-1/16*z3*ln2^2-29/64*z5+1/24*ln2^4*Sinf+
   1/30*ln2^5;
Fill Htab5(1,-1,-1,1,0)=-15/16*z2*z3-1/4*z2*ln2^2*Sinf+1/12*z2*ln2^3-
   63/40*z2^2*ln2-7/8*z2^2*Sinf+13/8*z3*ln2*Sinf+13/16*z3*ln2^2+405/64
   *z5+1/12*ln2^4*Sinf+1/30*ln2^5+2*Sinf*li4half-4*li5half;
Fill Htab5(1,-1,-1,0,-1)=3/2*z2*z3+z2*ln2^2*Sinf+7/12*z2*ln2^3-3/10*
   z2^2*ln2+6/5*z2^2*Sinf-23/8*z3*ln2*Sinf-23/16*z3*ln2^2+35/32*z5-3
   *ln2*li4half-1/8*ln2^4*Sinf-11/120*ln2^5-3*Sinf*li4half-4*li5half;
Fill Htab5(1,-1,-1,0,1)=7/16*z2*z3+1/2*z2*ln2^2*Sinf+1/12*z2*ln2^3-
   13/20*z2^2*ln2+3/40*z2^2*Sinf-5/8*z3*ln2*Sinf-5/16*z3*ln2^2+29/16*
   z5+1/40*ln2^5-3*li5half;
Fill Htab5(1,-1,-1,0,0)=3/8*z2*z3+1/2*z2*ln2^2*Sinf+1/3*z2*ln2^3+19/
   20*z2^2*ln2+3/4*z2^2*Sinf-z3*ln2*Sinf-1/2*z3*ln2^2-153/32*z5-1/12
   *ln2^4*Sinf-1/30*ln2^5-2*Sinf*li4half+4*li5half;
Fill Htab5(1,-1,1,-1,-1)=23/16*z2*z3+z2*ln2^2*Sinf+7/12*z2*ln2^3+57/
   40*z2^2*ln2+6/5*z2^2*Sinf-23/8*z3*ln2*Sinf-39/16*z3*ln2^2-375/64*z5
   -1/6*ln2^4*Sinf-7/120*ln2^5-3*Sinf*li4half+3*li5half;
Fill Htab5(1,-1,1,-1,1)=-9/8*z2*z3-1/4*z2*ln2^2*Sinf-1/3*z2*ln2^3-1/5
   *z2^2*ln2+1/40*z2^2*Sinf+1/4*z3*ln2*Sinf+9/8*z3*ln2^2+29/16*z5+1/
   24*ln2^4*Sinf+1/30*ln2^5;
Fill Htab5(1,-1,1,-1,0)=7/4*z2*z3+1/4*z2*ln2^2*Sinf+1/6*z2*ln2^3-11/
   40*z2^2*ln2+1/10*z2^2*Sinf-z3*ln2*Sinf-1/2*z3*ln2^2-29/64*z5+1/40
   *ln2^5-3*li5half;
Fill Htab5(1,-1,1,1,-1)=-7/16*z2*z3-1/4*z2*ln2^2*Sinf-1/12*z2*ln2^3-1/
   8*z2^2*ln2-1/8*z2^2*Sinf+7/8*z3*ln2*Sinf+7/16*z3*ln2^2-81/64*z5+1/
   24*ln2^4*Sinf+1/120*ln2^5+3*li5half;
Fill Htab5(1,-1,1,1,1)=Sinf*li4half-4*li5half;
Fill Htab5(1,-1,1,1,0)=-15/16*z2*z3-1/12*z2*ln2^3+13/40*z2^2*ln2-1/20
   *z2^2*Sinf+1/8*z3*ln2*Sinf+1/16*z3*ln2^2+29/64*z5-1/24*ln2^4*Sinf
   -1/30*ln2^5-Sinf*li4half+4*li5half;
Fill Htab5(1,-1,1,0,-1)=3/4*z2*z3+3/4*z2*ln2^2*Sinf+63/20*z2^2*ln2+
   33/20*z2^2*Sinf-13/4*z3*ln2*Sinf-13/8*z3*ln2^2-845/64*z5+3*ln2*
   li4half-1/6*ln2^4*Sinf+1/30*ln2^5-4*Sinf*li4half+11*li5half;
Fill Htab5(1,-1,1,0,1)=-13/8*z2*z3-1/4*z2*ln2^2*Sinf+6/5*z2^2*ln2+19/
   40*z2^2*Sinf-1/4*z3*ln2*Sinf-1/8*z3*ln2^2-29/16*z5-1/24*ln2^4*Sinf
   -1/30*ln2^5-Sinf*li4half+4*li5half;
Fill Htab5(1,-1,1,0,0)=11/8*z2*z3-1/6*z2*ln2^3+11/40*z2^2*ln2+19/40*
   z2^2*Sinf-3/4*z3*ln2*Sinf-3/8*z3*ln2^2-159/64*z5+1/60*ln2^5-2*
   li5half;
Fill Htab5(1,-1,0,-1,-1)=-11/8*z2*z3-3/4*z2*ln2^2*Sinf-3/4*z2*ln2^3-
   51/40*z2^2*ln2-6/5*z2^2*Sinf+11/4*z3*ln2*Sinf+43/16*z3*ln2^2+87/32*
   z5+3*ln2*li4half+1/8*ln2^4*Sinf+1/8*ln2^5+3*Sinf*li4half;
Fill Htab5(1,-1,0,-1,1)=29/16*z2*z3-1/2*z2*ln2^2*Sinf+5/12*z2*ln2^3+
   37/10*z2^2*ln2+5/4*z2^2*Sinf-z3*ln2*Sinf-29/16*z3*ln2^2-521/32*z5
   -1/6*ln2^4*Sinf-7/60*ln2^5-4*Sinf*li4half+14*li5half;
Fill Htab5(1,-1,0,-1,0)=-33/16*z2*z3-z2*ln2^2*Sinf-1/3*z2*ln2^3-19/20
   *z2^2*ln2-11/8*z2^2*Sinf+2*z3*ln2*Sinf+z3*ln2^2+129/16*z5+1/6*
   ln2^4*Sinf+1/30*ln2^5+4*Sinf*li4half-4*li5half;
Fill Htab5(1,-1,0,1,-1)=-13/16*z2*z3+1/2*z2*ln2^2*Sinf-1/12*z2*ln2^3-
   18/5*z2^2*ln2-7/5*z2^2*Sinf+13/8*z3*ln2*Sinf+13/16*z3*ln2^2+911/64*
   z5-ln2*li4half+1/6*ln2^4*Sinf+1/15*ln2^5+4*Sinf*li4half-13*
   li5half;
Fill Htab5(1,-1,0,1,1)=-1/16*z2*z3+1/4*z2*ln2^2*Sinf+1/12*z2*ln2^3-43/
   40*z2^2*ln2+1/8*z2^2*Sinf+1/8*z3*ln2*Sinf+1/16*z3*ln2^2+81/64*z5-
   1/24*ln2^4*Sinf-1/120*ln2^5-Sinf*li4half+li5half;
Fill Htab5(1,-1,0,1,0)=-1/8*z2*z3-z2*ln2^2*Sinf-1/3*z2*ln2^3-23/40*
   z2^2*ln2-51/40*z2^2*Sinf+3/2*z3*ln2*Sinf+3/4*z3*ln2^2+259/64*z5+1/
   6*ln2^4*Sinf+1/30*ln2^5+4*Sinf*li4half-4*li5half;
Fill Htab5(1,-1,0,0,-1)=7/16*z2*z3+1/6*z2*ln2^3-49/40*z2^2*ln2-1/8*
   z2^2*Sinf+3/4*z3*ln2*Sinf+3/8*z3*ln2^2+27/8*z5-2*ln2*li4half-1/20
   *ln2^5-4*li5half;
Fill Htab5(1,-1,0,0,1)=2*z2*z3+1/2*z2*ln2^2*Sinf+1/6*z2*ln2^3+1/10*
   z2^2*ln2+3/5*z2^2*Sinf-3/4*z3*ln2*Sinf-3/8*z3*ln2^2-85/16*z5-1/12
   *ln2^4*Sinf-1/60*ln2^5-2*Sinf*li4half+2*li5half;
Fill Htab5(1,-1,0,0,0)=-3/4*z2*z3-3/4*z2^2*ln2-7/20*z2^2*Sinf+91/32*
   z5;
Fill Htab5(1,1,-1,-1,-1)=-1/2*z2*z3-1/2*z2*ln2^2*Sinf-5/12*z2*ln2^3-9/
   20*z2^2*ln2-2/5*z2^2*Sinf+z3*ln2*Sinf+z3*ln2^2+63/32*z5+1/12*
   ln2^3*Sinf^2+1/6*ln2^4*Sinf+7/120*ln2^5+Sinf*li4half-li5half;
Fill Htab5(1,1,-1,-1,1)=7/16*z2*z3+1/4*z2*ln2^2*Sinf+1/3*z2*ln2^3-3/
   40*z2^2*ln2-1/8*z2^2*Sinf-1/2*z3*ln2^2+1/16*z3*Sinf^2-29/64*z5-1/
   12*ln2^3*Sinf^2-1/8*ln2^4*Sinf-1/20*ln2^5;
Fill Htab5(1,1,-1,-1,0)=-11/16*z2*z3-1/4*z2*ln2*Sinf^2-1/2*z2*ln2^2*
   Sinf-1/6*z2*ln2^3+3/2*z2^2*ln2+7/10*z2^2*Sinf+1/16*z3*Sinf^2-123/
   32*z5-1/12*ln2^4*Sinf-1/24*ln2^5-2*Sinf*li4half+5*li5half;
Fill Htab5(1,1,-1,1,-1)=9/8*z2*z3+1/4*z2*ln2*Sinf^2+3/4*z2*ln2^2*Sinf
   +1/3*z2*ln2^3-1/40*z2^2*ln2+9/40*z2^2*Sinf-2*z3*ln2*Sinf-z3*ln2^2
   -1/8*z3*Sinf^2+23/64*z5-1/12*ln2^3*Sinf^2-1/8*ln2^4*Sinf-1/40*
   ln2^5-3*li5half;
Fill Htab5(1,1,-1,1,1)=-7/16*z2*z3-1/4*z2*ln2*Sinf^2-1/12*z2*ln2^3+1/
   4*z2^2*ln2+7/16*z3*Sinf^2+1/12*ln2^3*Sinf^2-3*Sinf*li4half+6*
   li5half;
Fill Htab5(1,1,-1,1,0)=9/4*z2*z3+1/4*z2*ln2*Sinf^2+1/4*z2*ln2^2*Sinf
   +1/12*z2*ln2^3-47/40*z2^2*ln2-3/8*z2^2*Sinf-1/2*z3*Sinf^2+29/64*
   z5+1/8*ln2^4*Sinf+1/20*ln2^5+3*Sinf*li4half-6*li5half;
Fill Htab5(1,1,-1,0,-1)=-3/4*z2*z3+1/4*z2*ln2*Sinf^2-3/4*z2*ln2^2*Sinf
   -1/6*z2*ln2^3-15/8*z2^2*ln2-3/2*z2^2*Sinf+21/8*z3*ln2*Sinf+21/16*
   z3*ln2^2-1/8*z3*Sinf^2+61/8*z5-ln2*li4half+1/6*ln2^4*Sinf+1/120*
   ln2^5+4*Sinf*li4half-6*li5half;
Fill Htab5(1,1,-1,0,1)=19/16*z2*z3+1/2*z2*ln2*Sinf^2-1/4*z2*ln2^2*Sinf
   -1/12*z2*ln2^3-1/40*z2^2*ln2-29/40*z2^2*Sinf-5/16*z3*Sinf^2-23/64
   *z5+1/8*ln2^4*Sinf+1/40*ln2^5+3*Sinf*li4half-3*li5half;
Fill Htab5(1,1,-1,0,0)=-2*z2*z3+1/2*z2*ln2^2*Sinf+1/6*z2*ln2^3+1/10*
   z2^2*ln2+1/5*z2^2*Sinf+3/8*z3*Sinf^2+15/8*z5-1/12*ln2^4*Sinf-1/60
   *ln2^5-2*Sinf*li4half+2*li5half;
Fill Htab5(1,1,1,-1,-1)=-9/16*z2*z3-1/4*z2*ln2*Sinf^2-3/4*z2*ln2^2*Sinf
   -1/3*z2*ln2^3+1/5*z2^2*ln2-1/20*z2^2*Sinf+z3*ln2*Sinf+2/3*z3*
   ln2^2+1/16*z3*Sinf^2+1/32*z5+1/12*ln2^2*Sinf^3+1/6*ln2^3*Sinf^2+1/
   8*ln2^4*Sinf+1/40*ln2^5+li5half;
Fill Htab5(1,1,1,-1,1)=25/24*z2*z3+1/2*z2*ln2*Sinf^2+1/4*z2*ln2^2*Sinf
   +1/6*z2*ln2^3+1/12*z2*Sinf^3-1/2*z2^2*ln2-1/4*z2^2*Sinf-1/6*z3*
   ln2^2-7/8*z3*Sinf^2-1/12*ln2^2*Sinf^3-1/6*ln2^3*Sinf^2+3*Sinf*
   li4half-4*li5half;
Fill Htab5(1,1,1,-1,0)=-89/48*z2*z3-3/4*z2*ln2*Sinf^2-1/12*z2*Sinf^3+
   9/10*z2^2*ln2+4/5*z2^2*Sinf+13/16*z3*Sinf^2-1/32*z5-1/8*ln2^4*Sinf
   -1/40*ln2^5-3*Sinf*li4half+3*li5half;
Fill Htab5(1,1,1,1,-1)=-29/48*z2*z3-1/2*z2*ln2*Sinf^2-1/4*z2*ln2^2*Sinf
   -1/12*z2*ln2^3-1/12*z2*Sinf^3+11/40*z2^2*ln2+1/4*z2^2*Sinf+1/3*z3
   *ln2*Sinf+1/6*z3*ln2^2+7/16*z3*Sinf^2+1/24*ln2*Sinf^4+1/12*ln2^2*
   Sinf^3+1/12*ln2^3*Sinf^2-Sinf*li4half+li5half;
Fill Htab5(1,1,1,1,1)=-1/6*z2*z3-1/12*z2*Sinf^3+1/40*z2^2*Sinf+1/6*z3
   *Sinf^2+1/5*z5+1/120*Sinf^5;
Fill Htab5(1,1,1,1,0)=-5/6*z2*z3-1/6*z2*Sinf^3+1/10*z2^2*Sinf+1/2*z3*
   Sinf^2+z5;
Fill Htab5(1,1,1,0,-1)=1/24*z2*z3-1/4*z2*ln2^2*Sinf-1/6*z2*ln2^3+1/
   12*z2*Sinf^3-3/8*z2^2*Sinf+7/8*z3*ln2*Sinf+7/16*z3*ln2^2-5/16*z3*
   Sinf^2-27/32*z5+ln2*li4half+1/24*ln2^4*Sinf+1/30*ln2^5+Sinf*
   li4half+li5half;
Fill Htab5(1,1,1,0,1)=4/3*z2*z3+1/6*z2*Sinf^3+7/10*z2^2*Sinf-z3*
   Sinf^2-4*z5;
Fill Htab5(1,1,1,0,0)=-3/2*z2*z3-1/10*z2^2*Sinf+1/2*z3*Sinf^2+2*z5;
Fill Htab5(1,1,0,-1,-1)=-1/16*z2*z3-1/6*z2*ln2^3-3/40*z2^2*Sinf+7/16*
   z3*ln2^2+1/16*z3*Sinf^2-25/32*z5+ln2*li4half+1/30*ln2^5+li5half;
Fill Htab5(1,1,0,-1,1)=-3/8*z2*z3-3/4*z2*ln2*Sinf^2+3/4*z2*ln2^2*Sinf
   +1/12*z2*ln2^3-13/40*z2^2*ln2+9/40*z2^2*Sinf-7/16*z3*ln2^2+13/16*
   z3*Sinf^2+81/64*z5-1/8*ln2^4*Sinf-1/120*ln2^5-3*Sinf*li4half+
   li5half;
Fill Htab5(1,1,0,-1,0)=15/16*z2*z3+17/40*z2^2*Sinf-3/4*z3*Sinf^2-41/
   32*z5;
Fill Htab5(1,1,0,1,-1)=11/8*z2*z3+3/4*z2*ln2*Sinf^2-1/4*z2*ln2^2*Sinf
   +5/12*z2*ln2^3+13/40*z2^2*ln2+1/40*z2^2*Sinf-7/4*z3*ln2*Sinf-7/8*
   z3*ln2^2-1/2*z3*Sinf^2+81/64*z5-3*ln2*li4half+1/24*ln2^4*Sinf-11/
   120*ln2^5+Sinf*li4half-4*li5half;
Fill Htab5(1,1,0,1,1)=-1/2*z2*z3-6/5*z2^2*Sinf+1/2*z3*Sinf^2+6*z5;
Fill Htab5(1,1,0,1,0)=3*z2*z3+7/10*z2^2*Sinf-z3*Sinf^2-11/2*z5;
Fill Htab5(1,1,0,0,-1)=-3/4*z2*z3-1/2*z2*ln2^2*Sinf-1/3*z2*ln2^3-11/
   10*z2^2*Sinf+7/4*z3*ln2*Sinf+7/8*z3*ln2^2+3/8*z3*Sinf^2-15/32*z5+
   2*ln2*li4half+1/12*ln2^4*Sinf+1/15*ln2^5+2*Sinf*li4half+2*li5half;
Fill Htab5(1,1,0,0,1)=1/2*z2*z3-1/2*z2^2*Sinf+1/2*z3*Sinf^2-1/2*z5;
Fill Htab5(1,1,0,0,0)=-z2*z3-2/5*z2^2*Sinf+2*z5;
Fill Htab5(1,0,-1,-1,-1)=7/16*z2*z3+1/4*z2*ln2^2*Sinf+1/6*z2*ln2^3+2/
   5*z2^2*Sinf-7/8*z3*ln2*Sinf-7/16*z3*ln2^2+1/8*z5-ln2*li4half-1/24
   *ln2^4*Sinf-1/30*ln2^5-Sinf*li4half-li5half;
Fill Htab5(1,0,-1,-1,1)=1/4*z2*ln2^2*Sinf-1/4*z2*ln2^3-3/20*z2^2*ln2
   -9/20*z2^2*Sinf+29/16*z5+1/12*ln2^4*Sinf+1/40*ln2^5+2*Sinf*
   li4half-3*li5half;
Fill Htab5(1,0,-1,-1,0)=-1/8*z2*z3-1/8*z2^2*Sinf+5/8*z5;
Fill Htab5(1,0,-1,1,-1)=-21/16*z2*z3-3/2*z2*ln2^2*Sinf+1/6*z2*ln2^3+1/
   5*z2^2*ln2-7/20*z2^2*Sinf+21/8*z3*ln2*Sinf+21/16*z3*ln2^2-101/64*z5
   +ln2*li4half+5*li5half;
Fill Htab5(1,0,-1,1,1)=-1/4*z2*ln2^3+39/40*z2^2*ln2-11/20*z2^2*Sinf-
   23/64*z5+1/8*ln2^4*Sinf+1/40*ln2^5+3*Sinf*li4half-3*li5half;
Fill Htab5(1,0,-1,1,0)=-13/8*z2*z3+z2*ln2^2*Sinf-9/8*z2^2*ln2+13/40*
   z2^2*Sinf+363/64*z5-1/6*ln2^4*Sinf-4*Sinf*li4half;
Fill Htab5(1,0,-1,0,-1)=23/16*z2*z3+z2*ln2^2*Sinf+2/3*z2*ln2^3+13/8*
   z2^2*Sinf-7/2*z3*ln2*Sinf-7/4*z3*ln2^2+33/32*z5-4*ln2*li4half-1/6
   *ln2^4*Sinf-2/15*ln2^5-4*Sinf*li4half-4*li5half;
Fill Htab5(1,0,-1,0,1)=-5/8*z2*z3+3/40*z2^2*Sinf+29/32*z5;
Fill Htab5(1,0,-1,0,0)=3/2*z2*z3+21/20*z2^2*Sinf-67/16*z5;
Fill Htab5(1,0,1,-1,-1)=21/16*z2*z3+5/4*z2*ln2^2*Sinf+5/12*z2*ln2^3-
   1/20*z2^2*ln2+7/8*z2^2*Sinf-21/8*z3*ln2*Sinf-35/16*z3*ln2^2+85/64*
   z5-3*ln2*li4half-1/12*ln2^4*Sinf-11/120*ln2^5-2*Sinf*li4half-4*
   li5half;
Fill Htab5(1,0,1,-1,1)=-7/8*z2*z3-3/4*z2*ln2^2*Sinf+1/3*z2*ln2^3+1/5*
   z2^2*ln2+7/8*z2^2*Sinf+7/8*z3*ln2^2-29/16*z5-1/8*ln2^4*Sinf-1/30*
   ln2^5-3*Sinf*li4half+4*li5half;
Fill Htab5(1,0,1,-1,0)=15/8*z2*z3-z2*ln2^2*Sinf+9/8*z2^2*ln2-33/40*
   z2^2*Sinf-257/64*z5+1/6*ln2^4*Sinf+4*Sinf*li4half;
Fill Htab5(1,0,1,1,-1)=-7/16*z2*z3+1/2*z2*ln2^2*Sinf-7/12*z2*ln2^3-47/
   40*z2^2*ln2-9/20*z2^2*Sinf+7/8*z3*ln2*Sinf+7/16*z3*ln2^2-23/64*z5
   +3*ln2*li4half+1/24*ln2^4*Sinf+13/120*ln2^5+Sinf*li4half+2*
   li5half;
Fill Htab5(1,0,1,1,1)=2/5*z2^2*Sinf-4*z5;
Fill Htab5(1,0,1,1,0)=-z2*z3-1/2*z2^2*Sinf+9/2*z5;
Fill Htab5(1,0,1,0,-1)=3/4*z2*z3+z2*ln2^2*Sinf+2/3*z2*ln2^3+71/40*
   z2^2*Sinf-7/2*z3*ln2*Sinf-7/4*z3*ln2^2+89/64*z5-4*ln2*li4half-1/6
   *ln2^4*Sinf-2/15*ln2^5-4*Sinf*li4half-4*li5half;
Fill Htab5(1,0,1,0,1)=-2*z2*z3+3/10*z2^2*Sinf+2*z5;
Fill Htab5(1,0,1,0,0)=2*z2*z3+6/5*z2^2*Sinf-11/2*z5;
Fill Htab5(1,0,0,-1,-1)=-7/8*z2*z3-1/2*z2*ln2^2*Sinf-2/3*z2*ln2^3-3/4
   *z2^2*Sinf+7/4*z3*ln2*Sinf+7/4*z3*ln2^2-39/16*z5+4*ln2*li4half+1/
   12*ln2^4*Sinf+2/15*ln2^5+2*Sinf*li4half+4*li5half;
Fill Htab5(1,0,0,-1,1)=7/8*z2*z3-1/2*z2*ln2^2*Sinf+1/6*z2*ln2^3+8/5*
   z2^2*ln2-1/5*z2^2*Sinf-7/8*z3*ln2^2-85/16*z5+1/12*ln2^4*Sinf-1/60
   *ln2^5+2*Sinf*li4half+2*li5half;
Fill Htab5(1,0,0,-1,0)=-13/8*z2*z3-21/20*z2^2*Sinf+83/16*z5;
Fill Htab5(1,0,0,1,-1)=-7/8*z2*z3-1/6*z2*ln2^3-8/5*z2^2*ln2-19/40*
   z2^2*Sinf+7/4*z3*ln2*Sinf+7/8*z3*ln2^2+311/64*z5+1/60*ln2^5-2*
   li5half;
Fill Htab5(1,0,0,1,1)=1/10*z2^2*Sinf-1/2*z5;
Fill Htab5(1,0,0,1,0)=-z2*z3-6/5*z2^2*Sinf+9/2*z5;
Fill Htab5(1,0,0,0,-1)=1/2*z2*z3+7/20*z2^2*Sinf-59/32*z5;
Fill Htab5(1,0,0,0,1)=z2*z3+2/5*z2^2*Sinf-3*z5;
Fill Htab5(1,0,0,0,0)=z5;
Fill Htab5(0,-1,-1,-1,-1)=1/6*z2*ln2^3-7/16*z3*ln2^2+z5-ln2*li4half
   -1/30*ln2^5-li5half;
Fill Htab5(0,-1,-1,-1,1)=-7/8*z2*z3-1/6*z2*ln2^3+1/20*z2^2*ln2+7/16*
   z3*ln2^2+15/16*z5-1/120*ln2^5+li5half;
Fill Htab5(0,-1,-1,-1,0)=15/16*z2*z3-59/32*z5;
Fill Htab5(0,-1,-1,1,-1)=21/16*z2*z3+1/12*z2*ln2^3-1/10*z2^2*ln2-125/
   32*z5+3*ln2*li4half+7/60*ln2^5+li5half;
Fill Htab5(0,-1,-1,1,1)=-3/16*z2*z3-1/12*z2*ln2^3+z2^2*ln2-123/32*z5
   -1/24*ln2^5+5*li5half;
Fill Htab5(0,-1,-1,1,0)=13/16*z2*z3-1/3*z2*ln2^3-1/5*z2^2*ln2+7/8*z5
   +1/30*ln2^5-4*li5half;
Fill Htab5(0,-1,-1,0,-1)=-23/16*z2*z3+177/64*z5;
Fill Htab5(0,-1,-1,0,1)=-5/16*z2*z3+5/8*z5;
Fill Htab5(0,-1,-1,0,0)=-1/2*z2*z3+23/16*z5;
Fill Htab5(0,-1,1,-1,-1)=-21/16*z2*z3-5/12*z2*ln2^3-49/40*z2^2*ln2+21/
   16*z3*ln2^2+247/32*z5-3*ln2*li4half-1/12*ln2^5-5*li5half;
Fill Htab5(0,-1,1,-1,1)=27/16*z2*z3+3/4*z2*ln2^3-21/40*z2^2*ln2-21/
   16*z3*ln2^2-29/64*z5+1/40*ln2^5-3*li5half;
Fill Htab5(0,-1,1,-1,0)=-29/16*z2*z3+2/3*z2*ln2^3+23/20*z2^2*ln2-3*z5
   -1/15*ln2^5+8*li5half;
Fill Htab5(0,-1,1,1,-1)=-1/3*z2*ln2^3-1/10*z2^2*ln2+33/64*z5+ln2*
   li4half+1/20*ln2^5-li5half;
Fill Htab5(0,-1,1,1,1)=-7/8*z2*z3+3/20*z2^2*ln2-1/32*z5-1/40*ln2^5+
   3*li5half;
Fill Htab5(0,-1,1,1,0)=1/16*z2*z3-1/3*z2*ln2^3+7/40*z2^2*ln2+99/64*
   z5+1/30*ln2^5-4*li5half;
Fill Htab5(0,-1,1,0,-1)=-5/16*z2*z3+2/3*z2*ln2^3-17/5*z2^2*ln2+547/32
   *z5-8*ln2*li4half-1/5*ln2^5-16*li5half;
Fill Htab5(0,-1,1,0,1)=5/2*z2*z3-3/8*z2^2*ln2-257/64*z5;
Fill Htab5(0,-1,1,0,0)=-3/8*z2*z3-9/4*z2^2*ln2+171/32*z5;
Fill Htab5(0,-1,0,-1,-1)=3/2*z2*z3+2/3*z2*ln2^3-7/4*z3*ln2^2+73/64*
   z5-4*ln2*li4half-2/15*ln2^5-4*li5half;
Fill Htab5(0,-1,0,-1,1)=-2*z2*z3-1/3*z2*ln2^3-17/10*z2^2*ln2+7/4*z3*
   ln2^2+129/16*z5+1/30*ln2^5-4*li5half;
Fill Htab5(0,-1,0,-1,0)=11/4*z2*z3-23/4*z5;
Fill Htab5(0,-1,0,1,-1)=9/8*z2*z3-1/3*z2*ln2^3+17/10*z2^2*ln2-331/32
   *z5+4*ln2*li4half+1/10*ln2^5+8*li5half;
Fill Htab5(0,-1,0,1,1)=11/16*z2*z3-41/32*z5;
Fill Htab5(0,-1,0,1,0)=3/4*z2*z3-2*z5;
Fill Htab5(0,-1,0,0,-1)=-3/4*z2*z3+51/32*z5;
Fill Htab5(0,-1,0,0,1)=-21/8*z2*z3+83/16*z5;
Fill Htab5(0,-1,0,0,0)=-15/4*z5;
Fill Htab5(0,1,-1,-1,-1)=7/16*z2*z3+1/3*z2*ln2^3+51/40*z2^2*ln2-21/
   16*z3*ln2^2-39/8*z5+ln2*li4half+1/120*ln2^5+4*li5half;
Fill Htab5(0,1,-1,-1,1)=-21/16*z2*z3-1/3*z2*ln2^3-53/40*z2^2*ln2+21/
   16*z3*ln2^2+405/64*z5+1/30*ln2^5-4*li5half;
Fill Htab5(0,1,-1,-1,0)=23/16*z2*z3-1/3*z2*ln2^3-19/20*z2^2*ln2+7/8*
   z5+1/30*ln2^5-4*li5half;
Fill Htab5(0,1,-1,1,-1)=-3/8*z2*z3-1/4*z2*ln2^3+21/40*z2^2*ln2+z5-3
   *ln2*li4half-1/8*ln2^5;
Fill Htab5(0,1,-1,1,1)=21/8*z2*z3+1/4*z2*ln2^3-57/40*z2^2*ln2+29/64*
   z5+1/20*ln2^5-6*li5half;
Fill Htab5(0,1,-1,1,0)=-z2*z3+2/3*z2*ln2^3+23/20*z2^2*ln2-19/4*z5-1/
   15*ln2^5+8*li5half;
Fill Htab5(0,1,-1,0,-1)=-1/4*z2*z3-2/3*z2*ln2^3+17/5*z2^2*ln2-507/32*
   z5+8*ln2*li4half+1/5*ln2^5+16*li5half;
Fill Htab5(0,1,-1,0,1)=-13/4*z2*z3+3/8*z2^2*ln2+363/64*z5;
Fill Htab5(0,1,-1,0,0)=3/4*z2*z3+9/4*z2^2*ln2-139/32*z5;
Fill Htab5(0,1,1,-1,-1)=3/16*z2*z3+1/12*z2*ln2^3+17/40*z2^2*ln2+7/16
   *z3*ln2^2-277/64*z5+3*ln2*li4half+11/120*ln2^5+4*li5half;
Fill Htab5(0,1,1,-1,1)=-35/16*z2*z3-5/12*z2*ln2^3+53/40*z2^2*ln2-7/16
   *z3*ln2^2+29/64*z5-1/30*ln2^5+4*li5half;
Fill Htab5(0,1,1,-1,0)=19/16*z2*z3-1/3*z2*ln2^3-53/40*z2^2*ln2+99/64
   *z5+1/30*ln2^5-4*li5half;
Fill Htab5(0,1,1,1,-1)=7/8*z2*z3+1/3*z2*ln2^3-1/20*z2^2*ln2-1/32*z5
   -ln2*li4half-1/40*ln2^5-2*li5half;
Fill Htab5(0,1,1,1,1)=z5;
Fill Htab5(0,1,1,1,0)=z2*z3-3*z5;
Fill Htab5(0,1,1,0,-1)=-3/16*z2*z3+53/64*z5;
Fill Htab5(0,1,1,0,1)=-2*z2*z3+9/2*z5;
Fill Htab5(0,1,1,0,0)=z2*z3-1/2*z5;
Fill Htab5(0,1,0,-1,-1)=7/16*z2*z3+2/3*z2*ln2^3-7/4*z3*ln2^2+103/32*
   z5-4*ln2*li4half-2/15*ln2^5-4*li5half;
Fill Htab5(0,1,0,-1,1)=1/2*z2*z3-1/3*z2*ln2^3-83/40*z2^2*ln2+7/4*z3*
   ln2^2+259/64*z5+1/30*ln2^5-4*li5half;
Fill Htab5(0,1,0,-1,0)=1/4*z2*z3-2*z5;
Fill Htab5(0,1,0,1,-1)=-7/8*z2*z3-1/3*z2*ln2^3+83/40*z2^2*ln2-227/32*
   z5+4*ln2*li4half+1/10*ln2^5+8*li5half;
Fill Htab5(0,1,0,1,1)=3*z2*z3-11/2*z5;
Fill Htab5(0,1,0,1,0)=-2*z2*z3+2*z5;
Fill Htab5(0,1,0,0,-1)=1/8*z2*z3+11/32*z5;
Fill Htab5(0,1,0,0,1)=-2*z2*z3+9/2*z5;
Fill Htab5(0,1,0,0,0)=-4*z5;
Fill Htab5(0,0,-1,-1,-1)=-1/2*z2*z3-1/3*z2*ln2^3+7/8*z3*ln2^2-33/32*
   z5+2*ln2*li4half+1/15*ln2^5+2*li5half;
Fill Htab5(0,0,-1,-1,1)=3/4*z2*z3+1/3*z2*ln2^3+19/20*z2^2*ln2-7/8*z3
   *ln2^2-153/32*z5-1/30*ln2^5+4*li5half;
Fill Htab5(0,0,-1,-1,0)=-7/8*z2*z3+23/16*z5;
Fill Htab5(0,0,-1,1,-1)=1/2*z2*z3-1/2*z2*ln2^3+11/40*z2^2*ln2-15/8*
   z5+2*ln2*li4half+1/12*ln2^5;
Fill Htab5(0,0,-1,1,1)=-13/8*z2*z3+1/6*z2*ln2^3+1/10*z2^2*ln2+15/8*z5
   -1/60*ln2^5+2*li5half;
Fill Htab5(0,0,-1,1,0)=9/4*z2^2*ln2-139/32*z5;
Fill Htab5(0,0,-1,0,-1)=-5/8*z2*z3+41/32*z5;
Fill Htab5(0,0,-1,0,1)=9/4*z2*z3-67/16*z5;
Fill Htab5(0,0,-1,0,0)=45/8*z5;
Fill Htab5(0,0,1,-1,-1)=-13/16*z2*z3+1/6*z2*ln2^3-49/40*z2^2*ln2+7/8*
   z3*ln2^2+47/8*z5-2*ln2*li4half-1/20*ln2^5-4*li5half;
Fill Htab5(0,0,1,-1,1)=15/8*z2*z3-1/6*z2*ln2^3+11/40*z2^2*ln2-7/8*z3
   *ln2^2-159/64*z5+1/60*ln2^5-2*li5half;
Fill Htab5(0,0,1,-1,0)=-7/8*z2*z3-9/4*z2^2*ln2+171/32*z5;
Fill Htab5(0,0,1,1,-1)=-1/16*z2*z3+1/3*z2*ln2^3-3/8*z2^2*ln2+151/64*
   z5-2*ln2*li4half-1/15*ln2^5-2*li5half;
Fill Htab5(0,0,1,1,1)=-z2*z3+2*z5;
Fill Htab5(0,0,1,1,0)=-1/2*z5;
Fill Htab5(0,0,1,0,-1)=-1/4*z2*z3+21/32*z5;
Fill Htab5(0,0,1,0,1)=3*z2*z3-11/2*z5;
Fill Htab5(0,0,1,0,0)=6*z5;
Fill Htab5(0,0,0,-1,-1)=1/2*z2*z3-29/32*z5;
Fill Htab5(0,0,0,-1,1)=-3/4*z2*z3-3/4*z2^2*ln2+91/32*z5;
Fill Htab5(0,0,0,-1,0)=-15/4*z5;
Fill Htab5(0,0,0,1,-1)=3/8*z2*z3+3/4*z2^2*ln2-2*z5;
Fill Htab5(0,0,0,1,1)=-z2*z3+2*z5;
Fill Htab5(0,0,0,1,0)=-4*z5;
Fill Htab5(0,0,0,0,-1)=15/16*z5;
Fill Htab5(0,0,0,0,1)=z5;
Fill Htab5(0,0,0,0,0)=0;
#endif
*
#endprocedure
*--#] htable5 :
*--#[ htable6 :
#procedure htable6
#ifndef `HTABLE6FILL'
#define  HTABLE6FILL "1"
*
*	Values of H(R(..),1) at weight = 6.
*   Constants:
*		Sinf = S(R(1),inf)
*		ln2 = ln_(2)
*		z2 = zeta_2 = pi_^2/6
*		z3 = zeta_3
*		z5 = zeta_5
*		li4half = Li(4,1/2)
*		li5half = Li(5,1/2)
*		li6half = Li(6,1/2)
*		s6 = S(R(-5,-1),inf) = 0.98744142640329971377
*
S	Sinf,ln2,z2,z3,z5,li4half,li5half,li6half,s6;
CTable,relax,Htab6(-1:1,-1:1,-1:1,-1:1,-1:1,-1:1);
*
Fill Htab6(-1,-1,-1,-1,-1,-1)=1/720*ln2^6;
Fill Htab6(-1,-1,-1,-1,-1,1)=1/16*z2*ln2^4+8/35*z2^3-7/48*z3*ln2^3-
   ln2*li5half-1/2*ln2^2*li4half-11/720*ln2^6-li6half;
Fill Htab6(-1,-1,-1,-1,-1,0)=-1/24*z2*ln2^4-1/5*z2^2*ln2^2-8/35*z2^3+
   1/6*z3*ln2^3+z5*ln2+1/720*ln2^6+li6half;
Fill Htab6(-1,-1,-1,-1,1,-1)=-7/48*z2*ln2^4-8/7*z2^3+7/24*z3*ln2^3+z5
   *ln2+4*ln2*li5half+3/2*ln2^2*li4half+5/144*ln2^6+5*li6half;
Fill Htab6(-1,-1,-1,-1,1,1)=-1/24*z2*ln2^4+13/35*z2^3+7/48*z3*ln2^3+1/
   8*z3^2-1/32*z5*ln2-ln2*li5half+1/144*ln2^6-2*li6half-1/2*s6;
Fill Htab6(-1,-1,-1,-1,1,0)=7/16*z2*z3*ln2-1/8*z2*ln2^4+1/2*z2*li4half
   +3/40*z2^2*ln2^2-26/35*z2^3+13/48*z3*ln2^3+17/128*z3^2-1/32*z5*
   ln2+3*ln2*li5half+3/2*ln2^2*li4half+29/720*ln2^6+2*li6half-1/2*s6
;
Fill Htab6(-1,-1,-1,-1,0,-1)=1/24*z2*ln2^4+3/5*z2^2*ln2^2+8/7*z2^3-1/
   3*z3*ln2^3-4*z5*ln2-ln2*li5half+1/720*ln2^6-5*li6half;
Fill Htab6(-1,-1,-1,-1,0,1)=1/16*z2*ln2^4-1/2*z2*li4half+13/80*z2^2*
   ln2^2-6/35*z2^3-1/4*z3*ln2^3-17/128*z3^2-27/32*z5*ln2+ln2*li5half
   -1/180*ln2^6+2*li6half+1/2*s6;
Fill Htab6(-1,-1,-1,-1,0,0)=-1/2*z2*z3*ln2+1/24*z2*ln2^4+3/8*z2^2*ln2^2
   +19/35*z2^3-1/6*z3*ln2^3-1/8*z3^2-2*z5*ln2-1/360*ln2^6-2*
   li6half+1/2*s6;
Fill Htab6(-1,-1,-1,1,-1,-1)=1/12*z2*ln2^4+1/5*z2^2*ln2^2+16/7*z2^3-
   7/48*z3*ln2^3-4*z5*ln2-6*ln2*li5half-3/2*ln2^2*li4half-1/36*ln2^6
   -10*li6half;
Fill Htab6(-1,-1,-1,1,-1,1)=5/48*z2*ln2^4-1/5*z2^2*ln2^2-122/105*z2^3
   -7/24*z3*ln2^3-23/32*z3^2-23/64*z5*ln2+3*ln2*li5half-1/72*ln2^6
   +7*li6half+9/4*s6;
Fill Htab6(-1,-1,-1,1,-1,0)=-7/8*z2*z3*ln2+1/24*z2*ln2^4-3/2*z2*li4half
   +23/40*z2^2*ln2^2+79/35*z2^3-1/6*z3*ln2^3+73/64*z3^2+29/64*z5*ln2
   -6*ln2*li5half-3/2*ln2^2*li4half-19/720*ln2^6-10*li6half-11/4*s6;
Fill Htab6(-1,-1,-1,1,1,-1)=-1/2*z2*z3*ln2-1/48*z2*ln2^4-1/5*z2^2*ln2^2
   -34/105*z2^3+7/48*z3*ln2^3+7/32*z3^2+157/64*z5*ln2+1/360*ln2^6+
   li6half-1/4*s6;
Fill Htab6(-1,-1,-1,1,1,1)=1/2*z2*z3*ln2-1/24*z2*ln2^4+1/5*z2^2*ln2^2
   +23/140*z2^3-1/2*z3^2-63/32*z5*ln2+ln2*li5half+1/2*ln2^2*li4half
   +1/90*ln2^6;
Fill Htab6(-1,-1,-1,1,1,0)=-7/16*z2*z3*ln2-1/24*z2*ln2^4-1/5*z2^2*ln2^2
   -71/56*z2^3+1/48*z3*ln2^3-153/128*z3^2-123/32*z5*ln2+5*ln2*
   li5half+ln2^2*li4half+1/80*ln2^6+9*li6half+9/2*s6;
Fill Htab6(-1,-1,-1,1,0,-1)=-7/16*z2*z3*ln2+1/8*z2*ln2^4-1/2*z2*li4half
   -19/40*z2^2*ln2^2+5/7*z2^3-5/48*z3*ln2^3-107/64*z3^2-333/64*z5*
   ln2-2*ln2*li5half-3/2*ln2^2*li4half-31/720*ln2^6+2*li6half+19/4*
   s6;
Fill Htab6(-1,-1,-1,1,0,1)=-7/8*z2*z3*ln2+5/24*z2*ln2^4-1/2*z2*li4half
   +7/80*z2^2*ln2^2+449/560*z2^3-23/48*z3*ln2^3+31/16*z3^2+61/8*z5*
   ln2-6*ln2*li5half-5/2*ln2^2*li4half-23/360*ln2^6-7*li6half-4*s6;
Fill Htab6(-1,-1,-1,1,0,0)=-13/16*z2*z3*ln2+1/48*z2*ln2^4-3/2*z2*
   li4half+279/280*z2^3-1/8*z3*ln2^3-101/128*z3^2-15/8*z5*ln2-2*ln2*
   li5half-ln2^2*li4half-1/40*ln2^6+3/2*s6;
Fill Htab6(-1,-1,-1,0,-1,-1)=-3/5*z2^2*ln2^2-16/7*z2^3+1/6*z3*ln2^3+6
   *z5*ln2+4*ln2*li5half+1/2*ln2^2*li4half+1/720*ln2^6+10*li6half;
Fill Htab6(-1,-1,-1,0,-1,1)=7/48*z2*ln2^4+2*z2*li4half-23/20*z2^2*
   ln2^2+2/35*z2^3+1/8*z3*ln2^3-73/64*z3^2+81/64*z5*ln2-4*ln2*
   li5half-5/2*ln2^2*li4half-13/180*ln2^6-li6half+11/4*s6;
Fill Htab6(-1,-1,-1,0,-1,0)=z2*z3*ln2-5/48*z2*ln2^4-1/2*z2*li4half-9/
   16*z2^2*ln2^2-121/105*z2^3+1/3*z3*ln2^3+23/32*z3^2+11/2*z5*ln2+1/
   180*ln2^6+4*li6half-9/4*s6;
Fill Htab6(-1,-1,-1,0,1,-1)=7/16*z2*z3*ln2-1/16*z2*ln2^4+23/40*z2^2*
   ln2^2+22/35*z2^3+1/8*z3*ln2^3+107/64*z3^2+143/64*z5*ln2-ln2*
   li5half+3/2*ln2^2*li4half+11/180*ln2^6-7*li6half-19/4*s6;
Fill Htab6(-1,-1,-1,0,1,1)=-7/16*z2*z3*ln2-1/16*z2*ln2^4-1/2*z2*li4half
   +3/16*z2^2*ln2^2+17/280*z2^3+1/6*z3*ln2^3+49/128*z3^2-25/32*z5*
   ln2+ln2*li5half+1/2*ln2^2*li4half+1/80*ln2^6;
Fill Htab6(-1,-1,-1,0,1,0)=3/4*z2*z3*ln2-1/16*z2*ln2^4+1/2*z2*li4half
   -61/80*z2^2*ln2^2-247/336*z2^3+1/4*z3*ln2^3-109/128*z3^2+41/32*z5
   *ln2+1/180*ln2^6+4*li6half+s6;
Fill Htab6(-1,-1,-1,0,0,-1)=1/2*z2*z3*ln2+5/48*z2*ln2^4+1/2*z2*li4half
   -3/16*z2^2*ln2^2-107/105*z2^3-1/6*z3*ln2^3-7/32*z3^2+47/32*z5*ln2
   +2*ln2*li5half-1/90*ln2^6+4*li6half+1/4*s6;
Fill Htab6(-1,-1,-1,0,0,1)=z2*z3*ln2+1/24*z2*ln2^4+2*z2*li4half-1/5*
   z2^2*ln2^2+337/840*z2^3+1/6*z3*ln2^3+9/64*z3^2+15/32*z5*ln2-2*ln2
   *li5half+1/120*ln2^6-6*li6half-3/2*s6;
Fill Htab6(-1,-1,-1,0,0,0)=1/2*z2*z3*ln2-7/40*z2^2*ln2^2-59/140*z2^3
   +7/8*z3^2+2*z5*ln2-3/2*s6;
Fill Htab6(-1,-1,1,-1,-1,-1)=-3/5*z2^2*ln2^2-16/7*z2^3+1/6*z3*ln2^3+6
   *z5*ln2+4*ln2*li5half+1/2*ln2^2*li4half+10*li6half;
Fill Htab6(-1,-1,1,-1,-1,1)=-1/16*z2*ln2^4+3/5*z2^2*ln2^2+44/35*z2^3-
   1/48*z3*ln2^3+181/128*z3^2+81/64*z5*ln2-3*ln2*li5half+1/72*ln2^6-
   9*li6half-15/4*s6;
Fill Htab6(-1,-1,1,-1,-1,0)=-1/16*z2*z3*ln2+5/48*z2*ln2^4+3/2*z2*
   li4half-13/16*z2^2*ln2^2-13/7*z2^3-1/48*z3*ln2^3-89/64*z3^2+29/64
   *z5*ln2+4*ln2*li5half+1/2*ln2^2*li4half+9*li6half+15/4*s6;
Fill Htab6(-1,-1,1,-1,1,-1)=3/2*z2*z3*ln2+1/16*z2*ln2^4+3/5*z2^2*ln2^2
   +34/35*z2^3-11/24*z3*ln2^3-43/64*z3^2-117/16*z5*ln2-1/360*ln2^6
   -3*li6half+3/4*s6;
Fill Htab6(-1,-1,1,-1,1,1)=-3/2*z2*z3*ln2+1/8*z2*ln2^4-3/5*z2^2*ln2^2
   -29/60*z2^3+1/48*z3*ln2^3+191/128*z3^2+375/64*z5*ln2-3*ln2*
   li5half-3/2*ln2^2*li4half-7/180*ln2^6;
Fill Htab6(-1,-1,1,-1,1,0)=11/8*z2*z3*ln2-5/48*z2*ln2^4+7/16*z2^2*
   ln2^2+859/560*z2^3+1/6*z3*ln2^3-9/64*z3^2-29/64*z5*ln2-3*ln2*
   li5half+1/72*ln2^6-8*li6half-15/4*s6;
Fill Htab6(-1,-1,1,-1,0,-1)=11/8*z2*z3*ln2+1/12*z2*ln2^4+3/2*z2*
   li4half-39/40*z2^2*ln2^2-107/35*z2^3+1/24*z3*ln2^3-41/64*z3^2+349/
   64*z5*ln2+5*ln2*li5half+1/2*ln2^2*li4half-1/240*ln2^6+12*li6half+
   3/4*s6;
Fill Htab6(-1,-1,1,-1,0,1)=11/4*z2*z3*ln2-1/4*z2*ln2^4+3/2*z2*li4half
   -33/80*z2^2*ln2^2-233/112*z2^3+13/24*z3*ln2^3-31/8*z3^2-845/64*z5
   *ln2+11*ln2*li5half+7/2*ln2^2*li4half+3/40*ln2^6+15*li6half+15/2*
   s6;
Fill Htab6(-1,-1,1,-1,0,0)=1/2*z2*z3*ln2+5/48*z2*ln2^4+3/2*z2*li4half
   -3/4*z2^2*ln2^2-1091/560*z2^3-1/8*z3*ln2^3+23/64*z3^2+159/64*z5*
   ln2+2*ln2*li5half-1/120*ln2^6+6*li6half+7/4*s6;
Fill Htab6(-1,-1,1,1,-1,-1)=1/40*z2^2*ln2^2-1/48*z3*ln2^3+1/128*z3^2
   -3/64*z5*ln2+1/720*ln2^6;
Fill Htab6(-1,-1,1,1,-1,1)=-3/16*z2*ln2^4-1/40*z2^2*ln2^2+1/140*z2^3+
   11/24*z3*ln2^3-83/64*z3^2-369/64*z5*ln2+3*ln2*li5half+3/2*ln2^2*
   li4half+29/720*ln2^6+3*li6half+3*s6;
Fill Htab6(-1,-1,1,1,-1,0)=1/16*z2*z3*ln2+1/16*z2*ln2^4+7/16*z2^2*
   ln2^2+361/560*z2^3-13/48*z3*ln2^3+69/32*z3^2+405/64*z5*ln2-4*ln2*
   li5half-ln2^2*li4half-7/360*ln2^6-8*li6half-11/2*s6;
Fill Htab6(-1,-1,1,1,1,-1)=-1/2*z2*z3*ln2+1/48*z2*ln2^4-1/40*z2^2*ln2^2
   -1/60*z2^3+1/48*z3*ln2^3+167/128*z3^2+187/32*z5*ln2-2*ln2*li5half
   -1/2*ln2^2*li4half-7/720*ln2^6-3*li6half-3*s6;
Fill Htab6(-1,-1,1,1,1,1)=1/2*z2*z3*ln2+1/24*z2*ln2^4+1/40*z2^2*ln2^2
   -1/5*z2^3-1/6*z3*ln2^3-5/8*z3^2-z5*ln2+ln2*li5half-1/240*ln2^6
   +2*li6half+1/2*s6;
Fill Htab6(-1,-1,1,1,1,0)=-1/2*z2*z3*ln2+5/48*z2*ln2^4-1/2*z2*li4half
   -5/16*z2^2*ln2^2-11/14*z2^3-1/6*z3*ln2^3-3/32*z3^2+15/16*z5*ln2
   +ln2*li5half-1/2*ln2^2*li4half-1/45*ln2^6+5*li6half+7/4*s6;
Fill Htab6(-1,-1,1,1,0,-1)=-1/16*z2*z3*ln2-1/12*z2*ln2^4+3/5*z2^2*ln2^2
   +13/8*z2^3+5/48*z3*ln2^3+201/128*z3^2+85/64*z5*ln2-4*ln2*li5half
   +13/720*ln2^6-11*li6half-17/4*s6;
Fill Htab6(-1,-1,1,1,0,1)=-1/8*z2*z3*ln2-1/16*z2*ln2^4+3/2*z2*li4half
   -27/80*z2^2*ln2^2+289/280*z2^3+23/48*z3*ln2^3+21/64*z3^2+35/32*z5
   *ln2-4*ln2*li5half+1/45*ln2^6-8*li6half-5/4*s6;
Fill Htab6(-1,-1,1,1,0,0)=-1/16*z2*z3*ln2+1/24*z2*ln2^4-z2*li4half+5/
   8*z2^2*ln2^2+31/28*z2^3-1/6*z3*ln2^3+267/128*z3^2+153/32*z5*ln2-4
   *ln2*li5half-ln2^2*li4half-7/360*ln2^6-8*li6half-11/2*s6;
Fill Htab6(-1,-1,1,0,-1,-1)=-1/16*z2*ln2^4+3/5*z2^2*ln2^2+16/35*z2^3-
   1/48*z3*ln2^3+181/64*z3^2+273/32*z5*ln2-3*ln2*li5half+1/80*ln2^6-
   9*li6half-15/2*s6;
Fill Htab6(-1,-1,1,0,-1,1)=-3/16*z2*z3*ln2+1/6*z2*ln2^4+13/20*z2^2*
   ln2^2+107/40*z2^3-13/48*z3*ln2^3+325/64*z3^2+911/64*z5*ln2-13*ln2
   *li5half-2*ln2^2*li4half-1/120*ln2^6-24*li6half-13*s6;
Fill Htab6(-1,-1,1,0,-1,0)=5/16*z2*z3*ln2-1/12*z2*ln2^4+2*z2*li4half
   +3/16*z2^2*ln2^2-44/105*z2^3+1/4*z3*ln2^3-101/128*z3^2-259/64*z5*
   ln2+4*ln2*li5half+2*ln2^2*li4half+1/20*ln2^6+3/2*s6;
Fill Htab6(-1,-1,1,0,1,-1)=3/2*z2*z3*ln2-1/24*z2*ln2^4-23/40*z2^2*
   ln2^2-3*z2^3-13/48*z3*ln2^3-449/64*z3^2-1445/64*z5*ln2+16*ln2*
   li5half+2*ln2^2*li4half-1/120*ln2^6+30*li6half+35/2*s6;
Fill Htab6(-1,-1,1,0,1,1)=-21/16*z2*z3*ln2-1/12*z2*ln2^4-3/2*z2*li4half
   +5/16*z2^2*ln2^2-163/560*z2^3-1/48*z3*ln2^3+225/128*z3^2+87/32*z5
   *ln2+1/720*ln2^6+li6half-s6;
Fill Htab6(-1,-1,1,0,1,0)=23/16*z2*z3*ln2-1/12*z2*ln2^4+2*z2*li4half
   +11/80*z2^2*ln2^2+19/84*z2^3+1/3*z3*ln2^3-161/64*z3^2-129/16*z5*
   ln2+4*ln2*li5half+2*ln2^2*li4half+1/20*ln2^6+5/2*s6;
Fill Htab6(-1,-1,1,0,0,-1)=13/16*z2*z3*ln2+1/12*z2*ln2^4+z2*li4half-
   3/16*z2^2*ln2^2-209/336*z2^3-1/8*z3*ln2^3+179/64*z3^2+209/16*z5*ln2
   -4*ln2*li5half-ln2^2*li4half-1/60*ln2^6-6*li6half-31/4*s6;
Fill Htab6(-1,-1,1,0,0,1)=13/8*z2*z3*ln2-1/24*z2*ln2^4+z2*li4half-11/
   20*z2^2*ln2^2-2363/1680*z2^3+1/8*z3*ln2^3-207/128*z3^2-27/8*z5*ln2
   +4*ln2*li5half+ln2^2*li4half+7/360*ln2^6+8*li6half+3*s6;
Fill Htab6(-1,-1,1,0,0,0)=3/8*z2*z3*ln2+1/24*z2*ln2^4+z2*li4half-3/
   40*z2^2*ln2^2-123/140*z2^3+15/16*z3^2+91/32*z5*ln2-s6;
Fill Htab6(-1,-1,0,-1,-1,-1)=1/12*z2*ln2^4+1/5*z2^2*ln2^2+16/7*z2^3-
   7/48*z3*ln2^3-4*z5*ln2-6*ln2*li5half-3/2*ln2^2*li4half-19/720*ln2^6
   -10*li6half;
Fill Htab6(-1,-1,0,-1,-1,1)=-5/24*z2*ln2^4-3*z2*li4half+89/80*z2^2*
   ln2^2+2/5*z2^3+45/32*z3^2-23/64*z5*ln2+2*ln2*li5half+5/2*ln2^2*
   li4half+7/80*ln2^6-15/4*s6;
Fill Htab6(-1,-1,0,-1,-1,0)=-1/16*z2*z3*ln2+1/16*z2*ln2^4+3/2*z2*
   li4half-7/16*z2^2*ln2^2+1/5*z2^3-179/128*z3^2-9/2*z5*ln2+15/4*s6;
Fill Htab6(-1,-1,0,-1,1,-1)=-21/16*z2*z3*ln2-25/48*z2*ln2^4+6/5*z2^2*
   ln2^2-34/35*z2^3+7/16*z3*ln2^3+39/64*z3^2-23/64*z5*ln2+8*ln2*
   li5half+3/2*ln2^2*li4half+3*li6half-3/4*s6;
Fill Htab6(-1,-1,0,-1,1,1)=21/16*z2*z3*ln2+1/6*z2*ln2^4+3/2*z2*li4half
   -111/80*z2^2*ln2^2-173/560*z2^3-69/32*z3^2+85/64*z5*ln2-4*ln2*
   li5half-1/2*ln2^2*li4half+1/60*ln2^6+3*li6half+9/4*s6;
Fill Htab6(-1,-1,0,-1,1,0)=-13/16*z2*z3*ln2+1/48*z2*ln2^4+1/2*z2*
   li4half+43/16*z2^2*ln2^2+1213/560*z2^3+95/16*z3^2+257/64*z5*ln2+2
   *ln2^2*li4half+1/20*ln2^6-24*li6half-25/2*s6;
Fill Htab6(-1,-1,0,-1,0,-1)=-23/16*z2*z3*ln2-7/48*z2*ln2^4-3/2*z2*
   li4half+19/16*z2^2*ln2^2+107/35*z2^3+41/64*z3^2-407/64*z5*ln2-4*
   ln2*li5half+1/60*ln2^6-12*li6half-3/4*s6;
Fill Htab6(-1,-1,0,-1,0,1)=-23/8*z2*z3*ln2-1/24*z2*ln2^4-5*z2*li4half
   +103/80*z2^2*ln2^2+3/80*z2^3-7/12*z3*ln2^3+83/128*z3^2-89/64*z5*
   ln2+4*ln2*li5half-1/45*ln2^6+8*li6half+5/4*s6;
Fill Htab6(-1,-1,0,-1,0,0)=-z2*z3*ln2+21/40*z2^2*ln2^2+13/12*z2^3-145/
   64*z3^2-11/2*z5*ln2+7/2*s6;
Fill Htab6(-1,-1,0,1,-1,-1)=17/48*z2*ln2^4-61/40*z2^2*ln2^2-16/35*z2^3
   -45/16*z3^2-151/32*z5*ln2-ln2*li5half-ln2^2*li4half-1/48*ln2^6+
   9*li6half+15/2*s6;
Fill Htab6(-1,-1,0,1,-1,1)=-13/48*z2*ln2^4+29/16*z2^2*ln2^2-11/560*z2^3
   -7/16*z3*ln2^3+165/128*z3^2-101/64*z5*ln2+5*ln2*li5half-11/240*
   ln2^6-3*li6half-3*s6;
Fill Htab6(-1,-1,0,1,-1,0)=-13/16*z2*z3*ln2-1/12*z2*ln2^4-2*z2*li4half
   -41/16*z2^2*ln2^2-195/112*z2^3-659/128*z3^2-363/64*z5*ln2-2*ln2^2
   *li4half-1/20*ln2^6+24*li6half+14*s6;
Fill Htab6(-1,-1,0,1,1,-1)=3/8*z2*ln2^4-69/80*z2^2*ln2^2+41/280*z2^3
   -9/32*z3^2+29/16*z5*ln2-3*ln2*li5half-ln2^2*li4half-1/60*ln2^6+
   3/4*s6;
Fill Htab6(-1,-1,0,1,1,1)=-1/48*z2*ln2^4+1/2*z2*li4half+3/40*z2^2*ln2^2
   +9/40*z2^3+7/48*z3*ln2^3+17/128*z3^2+1/8*z5*ln2-ln2*li5half+1/
   180*ln2^6-2*li6half-1/2*s6;
Fill Htab6(-1,-1,0,1,1,0)=-1/16*z2*z3*ln2-1/4*z2^2*ln2^2+61/560*z2^3-
   35/128*z3^2-5/8*z5*ln2+3/4*s6;
Fill Htab6(-1,-1,0,1,0,-1)=-5/16*z2*z3*ln2-1/12*z2*ln2^4+71/80*z2^2*
   ln2^2+997/560*z2^3+113/64*z3^2+33/32*z5*ln2-4*ln2*li5half+1/60*
   ln2^6-12*li6half-9/2*s6;
Fill Htab6(-1,-1,0,1,0,1)=-5/8*z2*z3*ln2+1/12*z2*ln2^4-2*z2*li4half+
   13/20*z2^2*ln2^2-247/280*z2^3-7/12*z3*ln2^3-7/128*z3^2-33/32*z5*ln2
   +4*ln2*li5half-1/45*ln2^6+8*li6half+5/4*s6;
Fill Htab6(-1,-1,0,1,0,0)=-3/4*z2*z3*ln2+3/5*z2^2*ln2^2+1033/1680*z2^3
   -69/64*z3^2-67/16*z5*ln2+5/2*s6;
Fill Htab6(-1,-1,0,0,-1,-1)=1/12*z2*ln2^4-3/8*z2^2*ln2^2+1/128*z3^2+
   125/64*z5*ln2-2*ln2*li5half-ln2^2*li4half-1/40*ln2^6;
Fill Htab6(-1,-1,0,0,-1,1)=-3/16*z2*z3*ln2-7/24*z2*ln2^4-z2*li4half-
   13/40*z2^2*ln2^2-247/560*z2^3+7/24*z3*ln2^3-217/128*z3^2-311/64*z5*
   ln2+2*ln2*li5half+ln2^2*li4half+13/360*ln2^6+8*li6half+9/2*s6;
Fill Htab6(-1,-1,0,0,-1,0)=1/2*z2*z3*ln2+1/24*z2*ln2^4+z2*li4half-31/
   40*z2^2*ln2^2-593/840*z2^3+13/32*z3^2+9/2*z5*ln2-3/2*s6;
Fill Htab6(-1,-1,0,0,1,-1)=-11/16*z2*z3*ln2+1/24*z2*ln2^4+19/80*z2^2*
   ln2^2-4/5*z2^3+7/24*z3*ln2^3+5/8*z3^2+77/32*z5*ln2+4*ln2*li5half
   +ln2^2*li4half+1/90*ln2^6+2*li6half-5/4*s6;
Fill Htab6(-1,-1,0,0,1,1)=7/8*z2*z3*ln2+1/8*z2*ln2^4+2*z2*li4half-9/
   20*z2^2*ln2^2+19/35*z2^3-1/4*z3^2+39/16*z5*ln2-4*ln2*li5half-
   ln2^2*li4half-1/60*ln2^6-6*li6half-3/2*s6;
Fill Htab6(-1,-1,0,0,1,0)=-1/2*z2*z3*ln2-1/24*z2*ln2^4-z2*li4half-7/
   20*z2^2*ln2^2-179/420*z2^3+105/64*z3^2+83/16*z5*ln2-5/2*s6;
Fill Htab6(-1,-1,0,0,0,-1)=-1/2*z2*z3*ln2-1/24*z2*ln2^4-z2*li4half+17/
   40*z2^2*ln2^2+149/168*z2^3-49/64*z3^2-189/32*z5*ln2+5/2*s6;
Fill Htab6(-1,-1,0,0,0,1)=-z2*z3*ln2-1/12*z2*ln2^4-2*z2*li4half+7/10*
   z2^2*ln2^2+115/168*z2^3+3/8*z3^2-59/32*z5*ln2;
Fill Htab6(-1,-1,0,0,0,0)=23/70*z2^3-3/4*z3^2-z5*ln2+s6;
Fill Htab6(-1,1,-1,-1,-1,-1)=1/24*z2*ln2^4+3/5*z2^2*ln2^2+8/7*z2^3-1/
   3*z3*ln2^3-4*z5*ln2-ln2*li5half-5*li6half;
Fill Htab6(-1,1,-1,-1,-1,1)=-7/16*z2*z3*ln2-1/8*z2*ln2^4-1/2*z2*li4half
   -19/40*z2^2*ln2^2-67/105*z2^3+23/48*z3*ln2^3-61/64*z3^2-27/32*z5*
   ln2+2*ln2*li5half+1/2*ln2^2*li4half+1/72*ln2^6+6*li6half+5/2*s6;
Fill Htab6(-1,1,-1,-1,-1,0)=3/2*z2*z3*ln2+1/24*z2*ln2^4+1/20*z2^2*
   ln2^2+12/35*z2^3-1/6*z3*ln2^3+1/2*z3^2-1/32*z5*ln2-2*ln2*li5half
   -1/2*ln2^2*li4half-1/120*ln2^6-3*li6half-2*s6;
Fill Htab6(-1,1,-1,-1,1,-1)=-1/8*z2*z3*ln2+1/6*z2*ln2^4+3/2*z2*li4half
   -39/40*z2^2*ln2^2-3/5*z2^3+1/24*z3*ln2^3+1/32*z3^2+369/64*z5*ln2
   -3*ln2*li5half-3/2*ln2^2*li4half-13/360*ln2^6;
Fill Htab6(-1,1,-1,-1,1,1)=23/16*z2*z3*ln2+1/12*z2*ln2^4+3/5*z2^2*
   ln2^2+397/840*z2^3-23/48*z3*ln2^3-11/64*z3^2+3/64*z5*ln2-1/180*
   ln2^6-3*li6half-3*s6;
Fill Htab6(-1,1,-1,-1,1,0)=-5/8*z2*z3*ln2+3/16*z2*ln2^4+z2*li4half-3/
   10*z2^2*ln2^2-121/280*z2^3-13/48*z3*ln2^3+37/64*z3^2+33/64*z5*ln2
   -ln2*li5half-ln2^2*li4half-1/30*ln2^6+7/4*s6;
Fill Htab6(-1,1,-1,-1,0,-1)=-23/8*z2*z3*ln2-5/12*z2*ln2^4-3*z2*li4half
   +63/40*z2^2*ln2^2+94/35*z2^3+23/48*z3*ln2^3+41/32*z3^2-151/32*z5*
   ln2-ln2*li5half+3/2*ln2^2*li4half+7/120*ln2^6-9*li6half-3/2*s6;
Fill Htab6(-1,1,-1,-1,0,1)=-51/16*z2*z3*ln2-1/16*z2*ln2^4-3/2*z2*
   li4half+49/80*z2^2*ln2^2+1157/560*z2^3+5/48*z3*ln2^3+341/128*z3^2
   +457/64*z5*ln2-7*ln2*li5half-3/2*ln2^2*li4half-1/48*ln2^6-12*
   li6half-9/2*s6;
Fill Htab6(-1,1,-1,-1,0,0)=-7/16*z2*z3*ln2-3/16*z2*ln2^4-3/2*z2*li4half
   +49/80*z2^2*ln2^2+73/140*z2^3+1/6*z3*ln2^3-71/64*z3^2-151/64*z5*
   ln2+2*ln2*li5half+ln2^2*li4half+1/36*ln2^6+2*li6half+1/4*s6;
Fill Htab6(-1,1,-1,1,-1,-1)=-23/16*z2*z3*ln2-13/48*z2*ln2^4-3/2*z2*
   li4half+31/80*z2^2*ln2^2-13/35*z2^3+23/48*z3*ln2^3+41/64*z3^2+105/
   64*z5*ln2+3*ln2*li5half+3/2*ln2^2*li4half+31/720*ln2^6+3*li6half-
   3/4*s6;
Fill Htab6(-1,1,-1,1,-1,1)=1/8*z2*z3*ln2+1/48*z2*ln2^4-1/80*z2^2*ln2^2
   +1/112*z2^3-1/24*z3*ln2^3-1/32*z3^2-3/16*z5*ln2-1/720*ln2^6;
Fill Htab6(-1,1,-1,1,-1,0)=-5/8*z2*z3*ln2-1/48*z2*ln2^4-1/20*z2^2*ln2^2
   -33/560*z2^3+1/6*z3*ln2^3+1/4*z3^2+z5*ln2;
Fill Htab6(-1,1,-1,1,1,-1)=23/16*z2*z3*ln2+7/48*z2*ln2^4-1/80*z2^2*
   ln2^2+1/80*z2^3-23/48*z3*ln2^3-167/64*z3^2-721/64*z5*ln2+3*ln2*
   li5half-13/720*ln2^6+6*li6half+6*s6;
Fill Htab6(-1,1,-1,1,1,1)=-z2*z3*ln2-1/16*z2*ln2^4+1/2*z2*li4half-9/
   80*z2^2*ln2^2+23/35*z2^3+1/3*z3*ln2^3+55/32*z3^2+4*z5*ln2-4*ln2*
   li5half-1/2*ln2^2*li4half+1/240*ln2^6-7*li6half-9/4*s6;
Fill Htab6(-1,1,-1,1,1,0)=3/2*z2*z3*ln2+z2*li4half-1/5*z2^2*ln2^2+1/
   8*z2^3-1/48*z3*ln2^3-129/64*z3^2-125/32*z5*ln2+ln2*li5half+1/2*
   ln2^2*li4half+1/72*ln2^6+li6half+3/2*s6;
Fill Htab6(-1,1,-1,1,0,-1)=-3/2*z2*z3*ln2-11/48*z2*ln2^4-2*z2*li4half
   -13/40*z2^2*ln2^2-1201/560*z2^3+13/24*z3*ln2^3-9/8*z3^2-1/8*z5*
   ln2+8*ln2*li5half+2*ln2^2*li4half+7/180*ln2^6+16*li6half+4*s6;
Fill Htab6(-1,1,-1,1,0,1)=1/8*z2*z3*ln2-7/48*z2*ln2^4-2*z2*li4half+
   21/80*z2^2*ln2^2-163/140*z2^3+1/24*z3*ln2^3-117/64*z3^2-61/8*z5*ln2
   +8*ln2*li5half+2*ln2^2*li4half+5/144*ln2^6+13*li6half+19/4*s6;
Fill Htab6(-1,1,-1,1,0,0)=-7/8*z2*z3*ln2-19/80*z2^2*ln2^2-89/560*z2^3
   +1/8*z3*ln2^3+11/16*z3^2+15/8*z5*ln2;
Fill Htab6(-1,1,-1,0,-1,-1)=11/8*z2*z3*ln2+1/8*z2*ln2^4+3/2*z2*li4half
   +9/40*z2^2*ln2^2+13/35*z2^3-11/24*z3*ln2^3-41/64*z3^2-291/64*z5*
   ln2-1/240*ln2^6-3*li6half+3/4*s6;
Fill Htab6(-1,1,-1,0,-1,1)=-1/8*z2*z3*ln2+1/8*z2*ln2^4-2*z2*li4half-9/
   4*z2^2*ln2^2-321/70*z2^3+1/6*z3*ln2^3-485/64*z3^2-245/16*z5*ln2+
   16*ln2*li5half+2*ln2^2*li4half+1/120*ln2^6+42*li6half+20*s6;
Fill Htab6(-1,1,-1,0,-1,0)=7/8*z2*z3*ln2+1/6*z2*ln2^4+11/16*z2^2*ln2^2
   +605/336*z2^3-1/3*z3*ln2^3+55/16*z3^2+227/32*z5*ln2-8*ln2*li5half
   -2*ln2^2*li4half-7/180*ln2^6-16*li6half-9*s6;
Fill Htab6(-1,1,-1,0,1,-1)=-7/8*z2*z3*ln2-1/4*z2*ln2^4+2*z2*li4half+
   93/40*z2^2*ln2^2+323/70*z2^3+1/6*z3*ln2^3+10*z3^2+1655/64*z5*ln2-
   19*ln2*li5half-2*ln2^2*li4half+1/120*ln2^6-48*li6half-26*s6;
Fill Htab6(-1,1,-1,0,1,1)=11/8*z2*z3*ln2+5/48*z2*ln2^4-1/16*z2^2*ln2^2
   -99/140*z2^3-11/24*z3*ln2^3-273/128*z3^2-99/32*z5*ln2+3*ln2*
   li5half-11/720*ln2^6+7*li6half+9/4*s6;
Fill Htab6(-1,1,-1,0,1,0)=-7/8*z2*z3*ln2+1/6*z2*ln2^4+51/80*z2^2*ln2^2
   +433/336*z2^3-1/4*z3*ln2^3+81/16*z3^2+331/32*z5*ln2-8*ln2*li5half
   -2*ln2^2*li4half-7/180*ln2^6-16*li6half-9*s6;
Fill Htab6(-1,1,-1,0,0,-1)=-1/8*z2*z3*ln2+1/16*z2^2*ln2^2+1769/1680*
   z2^3-1/8*z3*ln2^3-31/16*z3^2-295/32*z5*ln2+5*s6;
Fill Htab6(-1,1,-1,0,0,1)=-11/8*z2*z3*ln2-1/24*z2*ln2^4-3/10*z2^2*ln2^2
   +1/1680*z2^3+1/8*z3*ln2^3-3/4*z3^2-15/32*z5*ln2+1/360*ln2^6+2*
   li6half+11/4*s6;
Fill Htab6(-1,1,-1,0,0,0)=3/8*z2*z3*ln2+7/40*z2^2*ln2^2+159/560*z2^3
   -3/4*z3^2-2*z5*ln2;
Fill Htab6(-1,1,1,-1,-1,-1)=1/2*z2*z3*ln2+1/16*z2*ln2^4+1/2*z2*li4half
   -3/16*z2^2*ln2^2+13/105*z2^3-7/32*z3^2-17/32*z5*ln2-ln2*li5half
   -1/2*ln2^2*li4half-1/80*ln2^6-li6half+1/4*s6;
Fill Htab6(-1,1,1,-1,-1,1)=-1/16*z2*z3*ln2+1/48*z2*ln2^4+1/16*z2^2*
   ln2^2-17/560*z2^3-7/48*z3*ln2^3+15/128*z3^2+3/64*z5*ln2-1/720*
   ln2^6;
Fill Htab6(-1,1,1,-1,-1,0)=-1/2*z2*z3*ln2-1/12*z2*ln2^4-z2*li4half+9/
   40*z2^2*ln2^2-69/280*z2^3+1/48*z3*ln2^3-113/128*z3^2-277/64*z5*ln2
   +4*ln2*li5half+ln2^2*li4half+11/720*ln2^6+5*li6half+5/2*s6;
Fill Htab6(-1,1,1,-1,1,-1)=-7/8*z2*z3*ln2-5/48*z2*ln2^4+1/16*z2^2*ln2^2
   +3/80*z2^3+7/24*z3*ln2^3+153/64*z3^2+663/64*z5*ln2-3*ln2*li5half
   +11/720*ln2^6-6*li6half-6*s6;
Fill Htab6(-1,1,1,-1,1,1)=-7/16*z2*z3*ln2-7/48*z2*ln2^4-3/2*z2*li4half
   +5/16*z2^2*ln2^2-27/35*z2^3+7/48*z3*ln2^3-131/128*z3^2-6*z5*ln2
   +6*ln2*li5half+3/2*ln2^2*li4half+19/720*ln2^6+9*li6half+15/4*s6;
Fill Htab6(-1,1,1,-1,1,0)=-3/8*z2*z3*ln2+5/48*z2*ln2^4+1/40*z2^2*ln2^2
   +157/560*z2^3-1/6*z3*ln2^3+65/32*z3^2+247/32*z5*ln2-5*ln2*li5half
   -3/2*ln2^2*li4half-7/240*ln2^6-6*li6half-17/4*s6;
Fill Htab6(-1,1,1,-1,0,-1)=15/8*z2*z3*ln2+19/48*z2*ln2^4+2*z2*li4half
   -53/40*z2^2*ln2^2-59/80*z2^3-23/48*z3*ln2^3-179/64*z3^2-287/64*z5
   *ln2-ln2*li5half-2*ln2^2*li4half-1/15*ln2^6+6*li6half+6*s6;
Fill Htab6(-1,1,1,-1,0,1)=19/16*z2*z3*ln2+11/48*z2*ln2^4+2*z2*li4half
   -59/80*z2^2*ln2^2+167/280*z2^3-5/48*z3*ln2^3+55/64*z3^2+221/32*z5
   *ln2-7*ln2*li5half-2*ln2^2*li4half-3/80*ln2^6-9*li6half-15/4*s6;
Fill Htab6(-1,1,1,-1,0,0)=7/16*z2*z3*ln2-1/24*z2*ln2^4-19/80*z2^2*
   ln2^2-51/112*z2^3+1/8*z3*ln2^3-7/4*z3^2-47/8*z5*ln2+4*ln2*li5half
   +ln2^2*li4half+1/60*ln2^6+6*li6half+17/4*s6;
Fill Htab6(-1,1,1,1,-1,-1)=7/16*z2*z3*ln2+1/24*z2*ln2^4-1/120*z2^3-7/
   48*z3*ln2^3-153/128*z3^2-159/32*z5*ln2+ln2*li5half-1/180*ln2^6+3*
   li6half+3*s6;
Fill Htab6(-1,1,1,1,-1,1)=7/8*z2*z3*ln2+5/24*z2*ln2^4+3/2*z2*li4half
   -3/8*z2^2*ln2^2+18/35*z2^3-7/24*z3*ln2^3+11/64*z3^2+4*z5*ln2-4*
   ln2*li5half-3/2*ln2^2*li4half-13/360*ln2^6-6*li6half-5/2*s6;
Fill Htab6(-1,1,1,1,-1,0)=-3/8*z2*z3*ln2-3/16*z2*ln2^4-z2*li4half+11/
   40*z2^2*ln2^2-137/280*z2^3+13/48*z3*ln2^3-85/128*z3^2-39/8*z5*ln2
   +4*ln2*li5half+3/2*ln2^2*li4half+3/80*ln2^6+6*li6half+5/2*s6;
Fill Htab6(-1,1,1,1,1,-1)=-7/16*z2*z3*ln2-1/12*z2*ln2^4-1/2*z2*li4half
   +1/8*z2^2*ln2^2+7/48*z3*ln2^3+49/128*z3^2+ln2*li5half+1/2*ln2^2*
   li4half+1/72*ln2^6;
Fill Htab6(-1,1,1,1,1,1)=li6half;
Fill Htab6(-1,1,1,1,1,0)=-1/2*z2*z3*ln2-1/24*z2*ln2^4-1/40*z2^2*ln2^2
   +1/5*z2^3+1/6*z3*ln2^3+5/8*z3^2+z5*ln2-ln2*li5half+1/240*ln2^6
   -3*li6half-1/2*s6;
Fill Htab6(-1,1,1,1,0,-1)=3/4*z2*z3*ln2+1/24*z2*ln2^4+z2*li4half+23/
   40*z2^2*ln2^2+927/560*z2^3-1/4*z3*ln2^3+107/128*z3^2-27/32*z5*ln2
   -4*ln2*li5half-1/2*ln2^2*li4half-1/360*ln2^6-11*li6half-13/4*s6;
Fill Htab6(-1,1,1,1,0,1)=z2*z3*ln2+1/16*z2*ln2^4+1/2*z2*li4half+9/80
   *z2^2*ln2^2-23/35*z2^3-1/3*z3*ln2^3-55/32*z3^2-4*z5*ln2+4*ln2*
   li5half+1/2*ln2^2*li4half-1/240*ln2^6+6*li6half+9/4*s6;
Fill Htab6(-1,1,1,1,0,0)=-1/16*z2*ln2^4+1/2*z2*li4half+9/80*z2^2*ln2^2
   +87/140*z2^3+1/6*z3*ln2^3+19/32*z3^2+33/32*z5*ln2-2*ln2*li5half
   +1/90*ln2^6-4*li6half-7/4*s6;
Fill Htab6(-1,1,1,0,-1,-1)=-1/16*z2*z3*ln2+1/8*z2*ln2^4-3/5*z2^2*ln2^2
   -103/560*z2^3+1/48*z3*ln2^3+25/64*z3^2+291/64*z5*ln2-3*ln2*
   li5half-3/2*ln2^2*li4half-3/80*ln2^6-3/4*s6;
Fill Htab6(-1,1,1,0,-1,1)=-17/8*z2*z3*ln2-17/24*z2*ln2^4-7/2*z2*li4half
   +29/8*z2^2*ln2^2+203/80*z2^3+13/48*z3*ln2^3+313/64*z3^2-99/32*z5*
   ln2+3*ln2*li5half+7/2*ln2^2*li4half+1/10*ln2^6-15*li6half-37/4*s6
;
Fill Htab6(-1,1,1,0,-1,0)=7/16*z2*z3*ln2+7/48*z2*ln2^4+3/2*z2*li4half
   -17/16*z2^2*ln2^2-1487/840*z2^3-1/4*z3*ln2^3-29/8*z3^2-103/32*z5*
   ln2+4*ln2*li5half-1/60*ln2^6+12*li6half+7*s6;
Fill Htab6(-1,1,1,0,1,-1)=1/2*z2*z3*ln2+1/3*z2*ln2^4+1/2*z2*li4half-
   59/20*z2^2*ln2^2-2259/560*z2^3+13/48*z3*ln2^3-293/64*z3^2+81/64*z5*
   ln2+6*ln2*li5half-1/2*ln2^2*li4half-1/30*ln2^6+27*li6half+43/4*s6
;
Fill Htab6(-1,1,1,0,1,1)=-1/16*z2*z3*ln2+7/48*z2*ln2^4+3/2*z2*li4half
   -5/16*z2^2*ln2^2+27/35*z2^3+1/48*z3*ln2^3+243/128*z3^2+6*z5*ln2
   -6*ln2*li5half-3/2*ln2^2*li4half-19/720*ln2^6-10*li6half-15/4*s6;
Fill Htab6(-1,1,1,0,1,0)=-7/16*z2*z3*ln2+1/48*z2*ln2^4-3/2*z2*li4half
   -21/80*z2^2*ln2^2-611/420*z2^3-1/3*z3*ln2^3-61/32*z3^2-73/64*z5*
   ln2+4*ln2*li5half-1/60*ln2^6+12*li6half+17/4*s6;
Fill Htab6(-1,1,1,0,0,-1)=9/16*z2*z3*ln2+7/48*z2*ln2^4+1/2*z2*li4half
   -3/16*z2^2*ln2^2+143/840*z2^3-1/6*z3*ln2^3+33/64*z3^2+1/64*z5*ln2
   -2*ln2*li5half-ln2^2*li4half-1/36*ln2^6-2*li6half-1/4*s6;
Fill Htab6(-1,1,1,0,0,1)=-3/8*z2*z3*ln2-1/6*z2*ln2^4-2*z2*li4half+4/5
   *z2^2*ln2^2+37/120*z2^3+1/6*z3*ln2^3+179/128*z3^2-125/64*z5*ln2+2
   *ln2*li5half+ln2^2*li4half+1/40*ln2^6-3/2*s6;
Fill Htab6(-1,1,1,0,0,0)=1/2*z2*z3*ln2+1/24*z2*ln2^4+z2*li4half-17/
   40*z2^2*ln2^2-59/280*z2^3-65/64*z3^2-29/32*z5*ln2+3/2*s6;
Fill Htab6(-1,1,0,-1,-1,-1)=-7/16*z2*z3*ln2+1/12*z2*ln2^4-1/2*z2*
   li4half-3/40*z2^2*ln2^2-3/7*z2^3-7/24*z3*ln2^3-107/64*z3^2-333/64
   *z5*ln2+3*ln2*li5half-11/720*ln2^6+7*li6half+19/4*s6;
Fill Htab6(-1,1,0,-1,-1,1)=-11/48*z2*ln2^4+z2*li4half+87/80*z2^2*ln2^2
   +189/80*z2^3+7/16*z3*ln2^3+459/128*z3^2+457/64*z5*ln2-7*ln2*
   li5half-ln2^2*li4half-1/80*ln2^6-21*li6half-10*s6;
Fill Htab6(-1,1,0,-1,-1,0)=11/8*z2*z3*ln2+1/16*z2^2*ln2^2-17/112*z2^3
   +19/128*z3^2-53/64*z5*ln2-s6;
Fill Htab6(-1,1,0,-1,1,-1)=2/3*z2*ln2^4-23/5*z2^2*ln2^2-1537/280*z2^3
   -39/4*z3^2-845/64*z5*ln2+11*ln2*li5half-1/40*ln2^6+48*li6half+
   26*s6;
Fill Htab6(-1,1,0,-1,1,1)=21/16*z2*z3*ln2-1/24*z2*ln2^4+z2*li4half+
   197/80*z2^2*ln2^2+1987/560*z2^3-7/16*z3*ln2^3+597/128*z3^2+221/32*
   z5*ln2-7*ln2*li5half-ln2^2*li4half-1/40*ln2^6-30*li6half-31/2*s6;
Fill Htab6(-1,1,0,-1,1,0)=-1/2*z2*z3*ln2-1/6*z2*ln2^4-45/16*z2^2*ln2^2
   -3277/560*z2^3-37/4*z3^2-547/32*z5*ln2+16*ln2*li5half+2*ln2^2*
   li4half+1/60*ln2^6+48*li6half+26*s6;
Fill Htab6(-1,1,0,-1,0,-1)=-27/8*z2*z3*ln2-1/3*z2*ln2^4-4*z2*li4half+
   3/16*z2^2*ln2^2-369/560*z2^3+7/12*z3*ln2^3-69/32*z3^2-123/16*z5*ln2
   +8*ln2*li5half+2*ln2^2*li4half+7/180*ln2^6+16*li6half+8*s6;
Fill Htab6(-1,1,0,-1,0,1)=-13/4*z2*z3*ln2-2*z2*li4half+37/80*z2^2*ln2^2
   +251/112*z2^3+173/64*z3^2+123/16*z5*ln2-8*ln2*li5half-2*ln2^2*
   li4half-1/30*ln2^6-12*li6half-9/2*s6;
Fill Htab6(-1,1,0,-1,0,0)=-3/4*z2*z3*ln2-1/12*z2*ln2^4-2*z2*li4half-1/
   40*z2^2*ln2^2+347/336*z2^3-3/32*z3^2+21/32*z5*ln2-s6;
Fill Htab6(-1,1,0,1,-1,-1)=-21/16*z2*z3*ln2-3/4*z2*ln2^4-z2*li4half+
   139/40*z2^2*ln2^2+55/16*z2^3+7/16*z3*ln2^3+441/64*z3^2+275/32*z5*
   ln2-4*ln2*li5half+5/2*ln2^2*li4half+23/240*ln2^6-30*li6half-35/2*
   s6;
Fill Htab6(-1,1,0,1,-1,1)=41/48*z2*ln2^4+3/2*z2*li4half-447/80*z2^2*
   ln2^2-681/112*z2^3-39/4*z3^2-61/8*z5*ln2+8*ln2*li5half-3/2*ln2^2*
   li4half-1/16*ln2^6+48*li6half+26*s6;
Fill Htab6(-1,1,0,1,-1,0)=-1/2*z2*z3*ln2+5/48*z2*ln2^4-3/2*z2*li4half
   +55/16*z2^2*ln2^2+853/140*z2^3+41/4*z3^2+507/32*z5*ln2-16*ln2*
   li5half-2*ln2^2*li4half-1/60*ln2^6-48*li6half-26*s6;
Fill Htab6(-1,1,0,1,1,-1)=21/16*z2*z3*ln2-1/3*z2*ln2^4+1/2*z2*li4half
   +39/16*z2^2*ln2^2+107/28*z2^3-7/16*z3*ln2^3+237/64*z3^2-23/64*z5*
   ln2-8*ln2*li5half-1/2*ln2^2*li4half+1/120*ln2^6-27*li6half-43/4*
   s6;
Fill Htab6(-1,1,0,1,1,1)=-7/8*z2*z3*ln2-5/24*z2*ln2^4-3/2*z2*li4half+
   7/40*z2^2*ln2^2-11/35*z2^3+7/24*z3*ln2^3-11/64*z3^2-4*z5*ln2+4*
   ln2*li5half+3/2*ln2^2*li4half+13/360*ln2^6+5*li6half+5/2*s6;
Fill Htab6(-1,1,0,1,1,0)=11/8*z2*z3*ln2+1/16*z2*ln2^4+3/2*z2*li4half
   -1/8*z2^2*ln2^2+1/14*z2^3-7/4*z3^2-177/64*z5*ln2+s6;
Fill Htab6(-1,1,0,1,0,-1)=-15/8*z2*z3*ln2-13/48*z2*ln2^4-5/2*z2*li4half
   -21/80*z2^2*ln2^2-111/56*z2^3+7/12*z3*ln2^3-33/32*z3^2-1/16*z5*
   ln2+8*ln2*li5half+2*ln2^2*li4half+7/180*ln2^6+16*li6half+4*s6;
Fill Htab6(-1,1,0,1,0,1)=-1/4*z2*z3*ln2+1/8*z2*ln2^4+z2*li4half-2/5*
   z2^2*ln2^2+731/560*z2^3+119/64*z3^2+125/16*z5*ln2-8*ln2*li5half-2
   *ln2^2*li4half-1/30*ln2^6-12*li6half-19/4*s6;
Fill Htab6(-1,1,0,1,0,0)=-z2*z3*ln2-1/12*z2*ln2^4-2*z2*li4half-1/10*
   z2^2*ln2^2+205/336*z2^3+41/32*z3^2+41/32*z5*ln2-s6;
Fill Htab6(-1,1,0,0,-1,-1)=7/8*z2*z3*ln2+1/12*z2*ln2^4+z2*li4half+1/
   8*z2^2*ln2^2+17/40*z2^3-7/24*z3*ln2^3-3/4*z3^2-35/8*z5*ln2-1/360*
   ln2^6-2*li6half+5/4*s6;
Fill Htab6(-1,1,0,0,-1,1)=3/2*z2*z3*ln2+1/8*z2*ln2^4+23/40*z2^2*ln2^2
   +453/560*z2^3+25/32*z3^2-15/32*z5*ln2-1/120*ln2^6-6*li6half-17/
   4*s6;
Fill Htab6(-1,1,0,0,-1,0)=3/8*z2*z3*ln2+21/40*z2^2*ln2^2-187/336*z2^3
   +3/4*z3^2+11/32*z5*ln2-s6;
Fill Htab6(-1,1,0,0,1,-1)=-3/2*z2*z3*ln2-1/6*z2*ln2^4-19/80*z2^2*ln2^2
   -19/80*z2^3+1/2*z3^2+311/64*z5*ln2-2*ln2*li5half+1/60*ln2^6;
Fill Htab6(-1,1,0,0,1,1)=7/8*z2*z3*ln2+1/12*z2*ln2^4-1/20*z2^2*ln2^2
   -19/80*z2^3-7/24*z3*ln2^3-111/64*z3^2-125/64*z5*ln2+2*ln2*li5half
   -1/90*ln2^6+4*li6half+5/4*s6;
Fill Htab6(-1,1,0,0,1,0)=-3/8*z2*z3*ln2+3/5*z2^2*ln2^2-1501/1680*z2^3
   +7/4*z3^2+51/32*z5*ln2-s6;
Fill Htab6(-1,1,0,0,0,-1)=-3/8*z2*z3*ln2-7/40*z2^2*ln2^2+335/336*z2^3
   -57/32*z3^2-107/16*z5*ln2+4*s6;
Fill Htab6(-1,1,0,0,0,1)=-3/4*z2*z3*ln2-1/5*z2^2*ln2^2+97/210*z2^3-53/
   64*z3^2-17/16*z5*ln2+3/2*s6;
Fill Htab6(-1,1,0,0,0,0)=111/280*z2^3-9/32*z3^2-15/16*z5*ln2;
Fill Htab6(-1,0,-1,-1,-1,-1)=-7/48*z2*ln2^4-8/7*z2^3+7/24*z3*ln2^3+z5
   *ln2+4*ln2*li5half+3/2*ln2^2*li4half+13/360*ln2^6+5*li6half;
Fill Htab6(-1,0,-1,-1,-1,1)=-7/16*z2*z3*ln2+11/48*z2*ln2^4+2*z2*li4half
   -17/40*z2^2*ln2^2+8/35*z2^3-7/24*z3*ln2^3-17/32*z3^2-1/32*z5*ln2
   -2*ln2*li5half-2*ln2^2*li4half-17/240*ln2^6-3*li6half+2*s6;
Fill Htab6(-1,0,-1,-1,-1,0)=-3/8*z2*z3*ln2-1/16*z2*ln2^4-3/2*z2*li4half
   +3/8*z2^2*ln2^2+1/15*z2^3+59/64*z3^2+3*z5*ln2-5/2*s6;
Fill Htab6(-1,0,-1,-1,1,-1)=21/8*z2*z3*ln2+19/48*z2*ln2^4-29/20*z2^2*
   ln2^2-52/35*z2^3-7/16*z3*ln2^3-39/32*z3^2+61/32*z5*ln2-2*ln2*
   li5half+7/240*ln2^6+9*li6half+3/2*s6;
Fill Htab6(-1,0,-1,-1,1,1)=-3/2*z2*z3*ln2-3/8*z2*ln2^4-3/2*z2*li4half
   +167/80*z2^2*ln2^2+479/280*z2^3+7/16*z3*ln2^3+179/64*z3^2-277/64*
   z5*ln2+4*ln2*li5half+3/2*ln2^2*li4half+1/72*ln2^6-11*li6half-17/4
   *s6;
Fill Htab6(-1,0,-1,-1,1,0)=17/8*z2*z3*ln2-7/48*z2*ln2^4+1/2*z2*li4half
   -33/20*z2^2*ln2^2-352/105*z2^3-289/64*z3^2-99/64*z5*ln2+4*ln2*
   li5half+24*li6half+8*s6;
Fill Htab6(-1,0,-1,-1,0,-1)=-1/8*z2*z3*ln2+1/16*z2*ln2^4+3/2*z2*li4half
   -3/8*z2^2*ln2^2-3/5*z2^3+1/32*z3^2+177/64*z5*ln2;
Fill Htab6(-1,0,-1,-1,0,1)=37/16*z2*z3*ln2+1/8*z2*ln2^4+3*z2*li4half
   -3/4*z2^2*ln2^2-87/112*z2^3-131/128*z3^2-53/64*z5*ln2+3/4*s6;
Fill Htab6(-1,0,-1,-1,0,0)=-1/2*z2*z3*ln2-22/105*z2^3+25/32*z3^2-1/2*
   z5*ln2+s6;
Fill Htab6(-1,0,-1,1,-1,-1)=-21/16*z2*z3*ln2-7/24*z2*ln2^4+7/5*z2^2*
   ln2^2+86/35*z2^3+39/64*z3^2-343/64*z5*ln2-2*ln2*li5half-3/2*ln2^2
   *li4half-1/16*ln2^6-12*li6half-3/4*s6;
Fill Htab6(-1,0,-1,1,-1,1)=3/8*z2*z3*ln2+13/24*z2*ln2^4-127/40*z2^2*
   ln2^2-799/280*z2^3-247/64*z3^2+z5*ln2+11/360*ln2^6+22*li6half+
   10*s6;
Fill Htab6(-1,0,-1,1,-1,0)=-1/2*z2*z3*ln2+1/3*z2*ln2^4+19/5*z2^2*ln2^2
   +1339/210*z2^3+8*z3^2+19/4*z5*ln2-8*ln2*li5half-48*li6half-21*
   s6;
Fill Htab6(-1,0,-1,1,1,-1)=-21/16*z2*z3*ln2-3/8*z2*ln2^4-3/20*z2^2*
   ln2^2+1/20*z2^3+7/16*z3*ln2^3+165/64*z3^2+101/8*z5*ln2-6*ln2*
   li5half+1/24*ln2^6-6*li6half-6*s6;
Fill Htab6(-1,0,-1,1,1,1)=7/16*z2*z3*ln2+1/48*z2*ln2^4-1/2*z2*li4half
   +77/80*z2^2*ln2^2+559/560*z2^3-7/16*z3*ln2^3-1/2*z3^2-39/8*z5*ln2
   +4*ln2*li5half+1/2*ln2^2*li4half-13/720*ln2^6-4*li6half-s6;
Fill Htab6(-1,0,-1,1,1,0)=-5/4*z2*z3*ln2-5/24*z2*ln2^4-z2*li4half-9/
   10*z2^2*ln2^2-5651/1680*z2^3-133/64*z3^2-7/8*z5*ln2+4*ln2*li5half
   +24*li6half+9*s6;
Fill Htab6(-1,0,-1,1,0,-1)=-13/8*z2*z3*ln2+1/4*z2*ln2^4-2*z2*li4half-
   29/10*z2^2*ln2^2-1121/280*z2^3-347/32*z3^2-817/32*z5*ln2+16*ln2*
   li5half-1/15*ln2^6+48*li6half+30*s6;
Fill Htab6(-1,0,-1,1,0,1)=-1/8*z2*z3*ln2+1/6*z2*ln2^4-3/8*z2^2*ln2^2+
   41/14*z2^3+139/32*z3^2+507/32*z5*ln2-16*ln2*li5half-4*ln2^2*li4half
   -1/15*ln2^6-24*li6half-23/2*s6;
Fill Htab6(-1,0,-1,1,0,0)=-3/8*z2*z3*ln2-1/12*z2*ln2^4-2*z2*li4half-7/
   4*z2^2*ln2^2+485/336*z2^3-57/32*z3^2-139/32*z5*ln2+4*s6;
Fill Htab6(-1,0,-1,0,-1,-1)=3/2*z2*z3*ln2-1/12*z2*ln2^4-86/35*z2^3-
   43/64*z3^2-5/16*z5*ln2+8*ln2*li5half+2*ln2^2*li4half+1/30*ln2^6+
   12*li6half+3/4*s6;
Fill Htab6(-1,0,-1,0,-1,1)=1/8*z2*z3*ln2+1/2*z2*ln2^4+4*z2*li4half-
   27/10*z2^2*ln2^2-97/140*z2^3-53/32*z3^2+227/32*z5*ln2-8*ln2*li5half
   -4*ln2^2*li4half-1/10*ln2^6+4*s6;
Fill Htab6(-1,0,-1,0,-1,0)=z2*z3*ln2-1/12*z2*ln2^4-2*z2*li4half+1/2*
   z2^2*ln2^2+3/560*z2^3+23/16*z3^2+2*z5*ln2-4*s6;
Fill Htab6(-1,0,-1,0,1,-1)=5/2*z2*z3*ln2+17/10*z2^2*ln2^2+76/35*z2^3
   -7/12*z3*ln2^3+77/32*z3^2-13/8*z5*ln2-4*ln2*li5half+1/90*ln2^6-
   16*li6half-8*s6;
Fill Htab6(-1,0,-1,0,1,1)=-17/16*z2*z3*ln2-1/3*z2*ln2^4-2*z2*li4half+
   1/2*z2^2*ln2^2-87/280*z2^3+7/12*z3*ln2^3+105/128*z3^2-103/32*z5*ln2
   +4*ln2*li5half+2*ln2^2*li4half+1/18*ln2^6+4*li6half+s6;
Fill Htab6(-1,0,-1,0,1,0)=5/2*z2*z3*ln2+1/12*z2*ln2^4+2*z2*li4half-1/
   2*z2^2*ln2^2-97/560*z2^3-27/16*z3^2-2*z5*ln2;
Fill Htab6(-1,0,-1,0,0,-1)=z2*z3*ln2+1/12*z2*ln2^4+2*z2*li4half-1/2*
   z2^2*ln2^2-589/336*z2^3+49/32*z3^2+361/32*z5*ln2-5*s6;
Fill Htab6(-1,0,-1,0,0,1)=7/8*z2*z3*ln2+1/6*z2*ln2^4+4*z2*li4half-
   z2^2*ln2^2-11/12*z2^3-87/64*z3^2+11/32*z5*ln2+5/2*s6;
Fill Htab6(-1,0,-1,0,0,0)=-391/420*z2^3+9/4*z3^2+4*z5*ln2-4*s6;
Fill Htab6(-1,0,1,-1,-1,-1)=7/16*z2*z3*ln2+1/12*z2*ln2^4-1/40*z2^2*
   ln2^2-18/35*z2^3+107/64*z3^2+463/64*z5*ln2-ln2*li5half+1/2*ln2^2*
   li4half+19/720*ln2^6-2*li6half-19/4*s6;
Fill Htab6(-1,0,1,-1,-1,1)=-1/12*z2*ln2^4-1/20*z2^2*ln2^2+1/56*z2^3+
   33/64*z5*ln2-ln2*li5half+1/120*ln2^6;
Fill Htab6(-1,0,1,-1,-1,0)=1/8*z2*z3*ln2-1/8*z2*ln2^4+z2*li4half-101/
   40*z2^2*ln2^2-5731/1680*z2^3-557/128*z3^2-99/64*z5*ln2+4*ln2*
   li5half+24*li6half+23/2*s6;
Fill Htab6(-1,0,1,-1,1,-1)=15/16*z2*z3*ln2-5/12*z2*ln2^4+127/40*z2^2*
   ln2^2+20/7*z2^3-7/16*z3*ln2^3+41/32*z3^2-773/64*z5*ln2+3*ln2*
   li5half-17/360*ln2^6-16*li6half-4*s6;
Fill Htab6(-1,0,1,-1,1,1)=21/16*z2*z3*ln2+19/48*z2*ln2^4+3/2*z2*
   li4half-61/16*z2^2*ln2^2-261/80*z2^3+7/16*z3*ln2^3-147/64*z3^2+
   247/32*z5*ln2-5*ln2*li5half-3/2*ln2^2*li4half+1/240*ln2^6+18*
   li6half+7*s6;
Fill Htab6(-1,0,1,-1,1,0)=5/16*z2*z3*ln2+1/3*z2*ln2^4+19/5*z2^2*ln2^2
   +5687/840*z2^3+55/8*z3^2+3*z5*ln2-8*ln2*li5half-48*li6half-21*
   s6;
Fill Htab6(-1,0,1,-1,0,-1)=17/16*z2*z3*ln2-1/4*z2*ln2^4+2*z2*li4half
   +29/10*z2^2*ln2^2+55/14*z2^3+11*z3^2+857/32*z5*ln2-16*ln2*li5half
   +1/15*ln2^6-48*li6half-30*s6;
Fill Htab6(-1,0,1,-1,0,1)=-5/8*z2*z3*ln2-1/6*z2*ln2^4+3/8*z2^2*ln2^2-
   19/7*z2^3-599/128*z3^2-547/32*z5*ln2+16*ln2*li5half+4*ln2^2*li4half
   +1/15*ln2^6+24*li6half+13*s6;
Fill Htab6(-1,0,1,-1,0,0)=3/4*z2*z3*ln2+1/12*z2*ln2^4+2*z2*li4half+7/
   4*z2^2*ln2^2-559/336*z2^3+15/8*z3^2+171/32*z5*ln2-4*s6;
Fill Htab6(-1,0,1,1,-1,-1)=3/16*z2*z3*ln2+23/48*z2*ln2^4-121/80*z2^2*
   ln2^2-8/5*z2^3-211/128*z3^2+95/64*z5*ln2+ln2*li5half-1/2*ln2^2*
   li4half-1/72*ln2^6+11*li6half+17/4*s6;
Fill Htab6(-1,0,1,1,-1,1)=-21/8*z2*z3*ln2-13/16*z2*ln2^4-2*z2*li4half
   +303/80*z2^2*ln2^2+989/280*z2^3+501/128*z3^2-125/32*z5*ln2+ln2*
   li5half+2*ln2^2*li4half+11/240*ln2^6-21*li6half-33/4*s6;
Fill Htab6(-1,0,1,1,-1,0)=13/8*z2*z3*ln2-5/48*z2*ln2^4+3/2*z2*li4half
   -121/40*z2^2*ln2^2-3097/840*z2^3-569/128*z3^2-7/8*z5*ln2+4*ln2*
   li5half+24*li6half+21/2*s6;
Fill Htab6(-1,0,1,1,1,-1)=7/16*z2*z3*ln2+13/48*z2*ln2^4-11/16*z2^2*
   ln2^2-481/280*z2^3+7/48*z3*ln2^3-177/128*z3^2-1/32*z5*ln2+3*ln2*
   li5half-7/720*ln2^6+11*li6half+13/4*s6;
Fill Htab6(-1,0,1,1,1,1)=7/16*z2*z3*ln2+1/12*z2*ln2^4+1/2*z2*li4half
   -1/8*z2^2*ln2^2-7/48*z3*ln2^3-49/128*z3^2+z5*ln2-ln2*li5half-1/
   2*ln2^2*li4half-1/72*ln2^6-li6half;
Fill Htab6(-1,0,1,1,1,0)=9/16*z2*z3*ln2-1/48*z2*ln2^4-1/2*z2*li4half
   +1/8*z2^2*ln2^2-13/60*z2^3+17/16*z3^2+59/32*z5*ln2-5/2*s6;
Fill Htab6(-1,0,1,1,0,-1)=-5/8*z2*z3*ln2-1/48*z2*ln2^4-1/2*z2*li4half
   +1/8*z2^2*ln2^2+1/16*z2^3+25/128*z3^2+53/64*z5*ln2;
Fill Htab6(-1,0,1,1,0,1)=-23/8*z2*z3*ln2-1/24*z2*ln2^4-z2*li4half+1/4
   *z2^2*ln2^2+89/112*z2^3-65/128*z3^2-177/64*z5*ln2+15/4*s6;
Fill Htab6(-1,0,1,1,0,0)=z2*z3*ln2-493/1680*z2^3+7/64*z3^2+23/16*z5*
   ln2-s6;
Fill Htab6(-1,0,1,0,-1,-1)=7/16*z2*z3*ln2-1/12*z2*ln2^4-61/35*z2^3-
   59/32*z3^2-11/2*z5*ln2+8*ln2*li5half+2*ln2^2*li4half+1/30*ln2^6+
   12*li6half+9/2*s6;
Fill Htab6(-1,0,1,0,-1,1)=51/16*z2*z3*ln2+1/2*z2*ln2^4+4*z2*li4half-
   123/40*z2^2*ln2^2-183/140*z2^3-155/128*z3^2+331/32*z5*ln2-8*ln2*
   li5half-4*ln2^2*li4half-1/10*ln2^6;
Fill Htab6(-1,0,1,0,-1,0)=-3/2*z2*z3*ln2-1/12*z2*ln2^4-2*z2*li4half+1/
   2*z2^2*ln2^2+75/112*z2^3+15/16*z3^2-2*z5*ln2;
Fill Htab6(-1,0,1,0,1,-1)=-1/16*z2*z3*ln2+83/40*z2^2*ln2^2+20/7*z2^3-
   7/12*z3*ln2^3+53/32*z3^2-361/64*z5*ln2-4*ln2*li5half+1/90*ln2^6-
   16*li6half-4*s6;
Fill Htab6(-1,0,1,0,1,1)=5/4*z2*z3*ln2-1/3*z2*ln2^4-2*z2*li4half+1/2
   *z2^2*ln2^2-411/560*z2^3+7/12*z3*ln2^3+9/8*z3^2-73/64*z5*ln2+4*
   ln2*li5half+2*ln2^2*li4half+1/18*ln2^6+4*li6half-9/4*s6;
Fill Htab6(-1,0,1,0,1,0)=-1/4*z2*z3*ln2+1/12*z2*ln2^4+2*z2*li4half-1/
   2*z2^2*ln2^2+37/80*z2^3-2*z3^2-23/4*z5*ln2+4*s6;
Fill Htab6(-1,0,1,0,0,-1)=15/8*z2*z3*ln2+1/12*z2*ln2^4+2*z2*li4half-
   1/2*z2^2*ln2^2-403/240*z2^3+9/8*z3^2+321/32*z5*ln2-5*s6;
Fill Htab6(-1,0,1,0,0,1)=3/2*z2*z3*ln2+1/6*z2*ln2^4+4*z2*li4half-
   z2^2*ln2^2-13/12*z2^3-43/32*z3^2+51/32*z5*ln2+3/2*s6;
Fill Htab6(-1,0,1,0,0,0)=-143/168*z2^3+33/16*z3^2+15/4*z5*ln2-4*s6;
Fill Htab6(-1,0,0,-1,-1,-1)=-1/2*z2*z3*ln2-1/12*z2*ln2^4+86/105*z2^3+
   7/24*z3*ln2^3+7/32*z3^2-35/64*z5*ln2-2*ln2*li5half+1/90*ln2^6-4*
   li6half-1/4*s6;
Fill Htab6(-1,0,0,-1,-1,1)=-1/8*z2*z3*ln2+1/24*z2*ln2^4-z2*li4half+23/
   16*z2^2*ln2^2+2113/1680*z2^3-7/24*z3*ln2^3+211/128*z3^2-151/64*z5*
   ln2+2*ln2*li5half+ln2^2*li4half+1/72*ln2^6-8*li6half-4*s6;
Fill Htab6(-1,0,0,-1,-1,0)=-7/8*z2*z3*ln2+113/560*z2^3-17/64*z3^2-1/2
   *z5*ln2+s6;
Fill Htab6(-1,0,0,-1,1,-1)=1/2*z2*z3*ln2-1/3*z2*ln2^4-1/5*z2^2*ln2^2
   -79/84*z2^3+7/4*z3^2+343/32*z5*ln2-4*ln2*li5half+1/30*ln2^6-5*
   s6;
Fill Htab6(-1,0,0,-1,1,1)=-13/8*z2*z3*ln2+1/24*z2*ln2^4-z2*li4half+47/
   80*z2^2*ln2^2+1139/1680*z2^3-55/128*z3^2-47/8*z5*ln2+4*ln2*li5half
   +ln2^2*li4half+1/120*ln2^6+5/2*s6;
Fill Htab6(-1,0,0,-1,1,0)=9/4*z2^2*ln2^2-523/560*z2^3+9/4*z3^2+171/
   32*z5*ln2-6*s6;
Fill Htab6(-1,0,0,-1,0,-1)=-5/8*z2*z3*ln2+337/336*z2^3-55/32*z3^2-269/
   32*z5*ln2+5*s6;
Fill Htab6(-1,0,0,-1,0,1)=9/4*z2*z3*ln2-53/168*z2^3+15/64*z3^2+21/32
   *z5*ln2-5/2*s6;
Fill Htab6(-1,0,0,-1,0,0)=23/28*z2^3-63/32*z3^2-6*z5*ln2+6*s6;
Fill Htab6(-1,0,0,1,-1,-1)=-13/16*z2*z3*ln2+3/8*z2*ln2^4-79/80*z2^2*
   ln2^2+31/168*z2^3-173/64*z3^2-215/32*z5*ln2-2*ln2^2*li4half-3/40*
   ln2^6+6*li6half+31/4*s6;
Fill Htab6(-1,0,0,1,-1,1)=z2*z3*ln2-5/12*z2*ln2^4-z2*li4half+1/20*
   z2^2*ln2^2-1609/1680*z2^3-1/32*z3^2+15/8*z5*ln2+ln2^2*li4half+1/
   20*ln2^6+6*li6half-3/4*s6;
Fill Htab6(-1,0,0,1,-1,0)=1/24*z2*ln2^4+z2*li4half-5/2*z2^2*ln2^2+
   173/280*z2^3-9/4*z3^2-139/32*z5*ln2+6*s6;
Fill Htab6(-1,0,0,1,1,-1)=-15/16*z2*z3*ln2+1/8*z2*ln2^4-11/80*z2^2*
   ln2^2-52/105*z2^3+7/24*z3*ln2^3+9/64*z3^2+15/8*z5*ln2+2*ln2*
   li5half-1/72*ln2^6+2*li6half+1/4*s6;
Fill Htab6(-1,0,0,1,1,1)=-1/8*z2*z3*ln2+1/6*z2*ln2^4+z2*li4half-1/4*
   z2^2*ln2^2+257/840*z2^3-7/24*z3*ln2^3-41/64*z3^2+33/32*z5*ln2-2*
   ln2*li5half-ln2^2*li4half-1/36*ln2^6-2*li6half+1/2*s6;
Fill Htab6(-1,0,0,1,1,0)=-7/8*z2*z3*ln2-1/24*z2*ln2^4-z2*li4half+1/4*
   z2^2*ln2^2-13/280*z2^3+5/4*z3^2+23/16*z5*ln2-s6;
Fill Htab6(-1,0,0,1,0,-1)=-9/8*z2*z3*ln2-1/24*z2*ln2^4-z2*li4half+1/4
   *z2^2*ln2^2+161/120*z2^3-51/32*z3^2-289/32*z5*ln2+5*s6;
Fill Htab6(-1,0,0,1,0,1)=5/4*z2*z3*ln2-1/12*z2*ln2^4-2*z2*li4half+1/
   2*z2^2*ln2^2+23/168*z2^3+59/64*z3^2+41/32*z5*ln2-7/2*s6;
Fill Htab6(-1,0,0,1,0,0)=271/280*z2^3-81/32*z3^2-45/8*z5*ln2+6*s6;
Fill Htab6(-1,0,0,0,-1,-1)=1/2*z2*z3*ln2-43/84*z2^3+55/64*z3^2+63/16
   *z5*ln2-5/2*s6;
Fill Htab6(-1,0,0,0,-1,1)=-15/8*z2*z3*ln2-3/4*z2^2*ln2^2+47/105*z2^3-
   21/32*z3^2-2*z5*ln2+4*s6;
Fill Htab6(-1,0,0,0,-1,0)=-313/840*z2^3+15/16*z3^2+4*z5*ln2-4*s6;
Fill Htab6(-1,0,0,0,1,-1)=3/2*z2*z3*ln2+3/4*z2^2*ln2^2-491/840*z2^3+
   33/32*z3^2+91/32*z5*ln2-4*s6;
Fill Htab6(-1,0,0,0,1,1)=-z2*z3*ln2+71/840*z2^3+1/8*z3^2-29/32*z5*ln2
   +3/2*s6;
Fill Htab6(-1,0,0,0,1,0)=-239/840*z2^3+3/4*z3^2+15/4*z5*ln2-4*s6;
Fill Htab6(-1,0,0,0,0,-1)=-7/40*z2^3+9/32*z3^2+15/16*z5*ln2;
Fill Htab6(-1,0,0,0,0,1)=-15/16*z5*ln2+s6;
Fill Htab6(-1,0,0,0,0,0)=-31/140*z2^3;
Fill Htab6(1,-1,-1,-1,-1,-1)=-1/24*z2*ln2^4-1/5*z2^2*ln2^2-8/35*z2^3+
   1/6*z3*ln2^3+z5*ln2+1/120*ln2^5*Sinf+1/120*ln2^6+li6half;
Fill Htab6(1,-1,-1,-1,-1,1)=7/16*z2*z3*ln2+1/6*z2*ln2^3*Sinf+1/6*z2*
   ln2^4+1/2*z2*li4half+3/40*z2^2*ln2^2-1/5*z2^3-7/16*z3*ln2^2*Sinf-
   11/24*z3*ln2^3+1/128*z3^2+z5*Sinf-ln2*Sinf*li4half-1/2*ln2^2*
   li4half-1/24*ln2^5*Sinf-1/36*ln2^6-Sinf*li5half;
Fill Htab6(1,-1,-1,-1,-1,0)=-z2*z3*ln2-1/6*z2*ln2^3*Sinf-1/8*z2*ln2^4
   -2/5*z2^2*ln2*Sinf-1/20*z2^2*ln2^2+6/35*z2^3+1/2*z3*ln2^2*Sinf+1/
   3*z3*ln2^3-1/4*z3^2+z5*Sinf+1/120*ln2^5*Sinf-Sinf*li5half+s6;
Fill Htab6(1,-1,-1,-1,1,-1)=-3/8*z2*z3*ln2-5/12*z2*ln2^3*Sinf-7/24*z2*
   ln2^4-3/2*z2*li4half+2/5*z2^2*ln2*Sinf+39/40*z2^2*ln2^2+151/105*
   z2^3+7/8*z3*ln2^2*Sinf+5/12*z3*ln2^3+59/64*z3^2-3*z5*ln2-4*z5*
   Sinf+3*ln2*Sinf*li4half+3/2*ln2^2*li4half+1/12*ln2^5*Sinf+17/360*
   ln2^6+4*Sinf*li5half-6*li6half-5/2*s6;
Fill Htab6(1,-1,-1,-1,1,1)=-23/16*z2*z3*ln2-1/2*z2*z3*Sinf-1/12*z2*
   ln2^3*Sinf-1/12*z2*ln2^4-2/5*z2^2*ln2*Sinf-3/5*z2^2*ln2^2-27/56*
   z2^3+7/16*z3*ln2^2*Sinf+11/24*z3*ln2^3+23/128*z3^2+63/32*z5*Sinf+
   1/60*ln2^5*Sinf+1/90*ln2^6-Sinf*li5half+3*li6half+3*s6;
Fill Htab6(1,-1,-1,-1,1,0)=z2*z3*ln2+7/16*z2*z3*Sinf-1/3*z2*ln2^3*Sinf
   -5/24*z2*ln2^4-1/2*z2*li4half+2/5*z2^2*ln2*Sinf+7/40*z2^2*ln2^2+
   177/280*z2^3+13/16*z3*ln2^2*Sinf+13/24*z3*ln2^3+1/64*z3^2-39/8*z5*
   Sinf+3*ln2*Sinf*li4half+3/2*ln2^2*li4half+11/120*ln2^5*Sinf+7/120*
   ln2^6+4*Sinf*li5half-3*li6half-3*s6;
Fill Htab6(1,-1,-1,-1,0,-1)=3/2*z2*z3*ln2+1/6*z2*ln2^3*Sinf+1/8*z2*
   ln2^4+6/5*z2^2*ln2*Sinf+9/20*z2^2*ln2^2-36/35*z2^3-z3*ln2^2*Sinf-
   2/3*z3*ln2^3+1/2*z3^2+31/32*z5*ln2-4*z5*Sinf+ln2*Sinf*li4half+3*
   ln2*li5half+1/2*ln2^2*li4half+1/120*ln2^5*Sinf+4*Sinf*li5half+3*
   li6half-2*s6;
Fill Htab6(1,-1,-1,-1,0,1)=35/16*z2*z3*ln2+7/16*z2*z3*Sinf+1/3*z2*
   ln2^3*Sinf+11/48*z2*ln2^4+3/2*z2*li4half+3/40*z2^2*ln2*Sinf-53/80*
   z2^2*ln2^2-509/560*z2^3-3/4*z3*ln2^2*Sinf-1/2*z3*ln2^3-191/128*z3^2
   +1/8*z5*Sinf-ln2*Sinf*li4half-1/2*ln2^2*li4half-1/30*ln2^5*Sinf-
   11/720*ln2^6-Sinf*li5half+4*li6half+s6;
Fill Htab6(1,-1,-1,-1,0,0)=-z2*z3*ln2-1/2*z2*z3*Sinf+1/6*z2*ln2^3*Sinf
   +1/12*z2*ln2^4-z2*li4half+3/4*z2^2*ln2*Sinf+11/10*z2^2*ln2^2+107/
   140*z2^3-1/2*z3*ln2^2*Sinf-1/3*z3*ln2^3+9/4*z3^2-33/32*z5*Sinf-1/
   60*ln2^5*Sinf-1/120*ln2^6+2*Sinf*li5half-6*li6half-3*s6;
Fill Htab6(1,-1,-1,1,-1,-1)=-1/16*z2*z3*ln2+1/4*z2*ln2^3*Sinf+13/48*z2*
   ln2^4+3/2*z2*li4half-6/5*z2^2*ln2*Sinf-131/80*z2^2*ln2^2-13/7*z2^3
   +1/16*z3*ln2^2*Sinf+1/24*z3*ln2^3-179/128*z3^2+9/2*z5*ln2+6*z5*
   Sinf-3*ln2*Sinf*li4half-3/2*ln2^2*li4half-1/12*ln2^5*Sinf-41/720*
   ln2^6-6*Sinf*li5half+9*li6half+15/4*s6;
Fill Htab6(1,-1,-1,1,-1,1)=23/8*z2*z3*ln2+3/2*z2*z3*Sinf+1/4*z2*ln2^3*
   Sinf+5/48*z2*ln2^4+6/5*z2^2*ln2*Sinf+101/80*z2^2*ln2^2+317/336*z2^3
   -11/8*z3*ln2^2*Sinf-11/12*z3*ln2^3-23/64*z3^2-375/64*z5*Sinf-1/60
   *ln2^5*Sinf-1/720*ln2^6+3*Sinf*li5half-6*li6half-6*s6;
Fill Htab6(1,-1,-1,1,-1,0)=-29/8*z2*z3*ln2-11/8*z2*z3*Sinf+5/12*z2*
   ln2^3*Sinf+1/4*z2*ln2^4-3/2*z2*li4half-7/8*z2^2*ln2*Sinf-17/20*z2^2
   *ln2^2-383/560*z2^3-1/2*z3*ln2^2*Sinf-1/3*z3*ln2^3-35/64*z3^2+247/
   32*z5*Sinf-3*ln2*Sinf*li4half-3/2*ln2^2*li4half-1/12*ln2^5*Sinf-1/
   20*ln2^6-5*Sinf*li5half+9*li6half+29/4*s6;
Fill Htab6(1,-1,-1,1,1,-1)=1/16*z2*z3*ln2-1/48*z2*ln2^4+1/20*z2^2*ln2*
   Sinf+9/80*z2^2*ln2^2+17/560*z2^3-1/16*z3*ln2^2*Sinf-1/24*z3*ln2^3
   -1/128*z3^2-1/2*z5*ln2-3/64*z5*Sinf+1/120*ln2^5*Sinf+1/144*ln2^6;
Fill Htab6(1,-1,-1,1,1,1)=-z2*z3*ln2-1/2*z2*z3*Sinf-1/6*z2*ln2^3*Sinf
   -5/48*z2*ln2^4-1/2*z2*li4half-1/20*z2^2*ln2*Sinf+1/80*z2^2*ln2^2+
   1/7*z2^3+1/2*z3*ln2^2*Sinf+1/3*z3*ln2^3+25/32*z3^2+1/32*z5*Sinf+
   ln2*Sinf*li4half+1/2*ln2^2*li4half+1/40*ln2^5*Sinf+1/80*ln2^6+Sinf*
   li5half-li6half+1/4*s6;
Fill Htab6(1,-1,-1,1,1,0)=1/8*z2*z3*ln2+1/16*z2*z3*Sinf-1/4*z2*ln2^3*
   Sinf-1/4*z2*ln2^4-z2*li4half+7/8*z2^2*ln2*Sinf+59/40*z2^2*ln2^2+6/
   5*z2^3+1/16*z3*ln2^2*Sinf+1/24*z3*ln2^3+63/32*z3^2-277/64*z5*Sinf
   +2*ln2*Sinf*li4half+ln2^2*li4half+1/20*ln2^5*Sinf+11/360*ln2^6+4*
   Sinf*li5half-8*li6half-11/2*s6;
Fill Htab6(1,-1,-1,1,0,-1)=5/16*z2*z3*ln2+1/16*z2*z3*Sinf+1/3*z2*ln2^3
   *Sinf+13/48*z2*ln2^4+2*z2*li4half-6/5*z2^2*ln2*Sinf-19/20*z2^2*
   ln2^2-437/560*z2^3-5/16*z3*ln2^2*Sinf-5/24*z3*ln2^3-5/64*z3^2+93/
   16*z5*ln2+221/32*z5*Sinf-4*ln2*Sinf*li4half-3*ln2*li5half-2*ln2^2*
   li4half-13/120*ln2^5*Sinf-7/120*ln2^6-7*Sinf*li5half;
Fill Htab6(1,-1,-1,1,0,1)=11/4*z2*z3*ln2+23/16*z2*z3*Sinf+1/2*z2*ln2^3
   *Sinf+7/16*z2*ln2^4+2*z2*li4half-3/40*z2^2*ln2*Sinf-17/80*z2^2*
   ln2^2-89/280*z2^3-23/16*z3*ln2^2*Sinf-23/24*z3*ln2^3-75/32*z3^2+
   85/64*z5*Sinf-4*ln2*Sinf*li4half-2*ln2^2*li4half-2/15*ln2^5*Sinf-59/
   720*ln2^6-4*Sinf*li5half+li6half-1/4*s6;
Fill Htab6(1,-1,-1,1,0,0)=-33/16*z2*z3*ln2-13/16*z2*z3*Sinf+1/6*z2*
   ln2^3*Sinf+1/24*z2*ln2^4-z2*li4half-3/4*z2^2*ln2*Sinf-3/5*z2^2*
   ln2^2-7/8*z2^3-3/8*z3*ln2^2*Sinf-1/4*z3*ln2^3-93/128*z3^2+47/8*z5
   *Sinf-2*ln2*Sinf*li4half-ln2^2*li4half-1/20*ln2^5*Sinf-11/360*ln2^6
   -4*Sinf*li5half+8*li6half+11/2*s6;
Fill Htab6(1,-1,-1,0,-1,-1)=-1/16*z2*z3*ln2+1/4*z2*ln2^3*Sinf+5/16*z2*
   ln2^4+3/2*z2*li4half-6/5*z2^2*ln2*Sinf-129/80*z2^2*ln2^2+1/5*z2^3
   +1/16*z3*ln2^2*Sinf+1/24*z3*ln2^3-89/64*z3^2+93/64*z5*ln2+6*z5*
   Sinf-3*ln2*Sinf*li4half-6*ln2*li5half-3*ln2^2*li4half-3/40*ln2^5*
   Sinf-3/40*ln2^6-6*Sinf*li5half+15/4*s6;
Fill Htab6(1,-1,-1,0,-1,1)=-37/16*z2*z3*ln2-21/16*z2*z3*Sinf-1/2*z2*
   ln2^3*Sinf-17/48*z2*ln2^4-z2*li4half-1/40*z2^2*ln2*Sinf+41/16*z2^2*
   ln2^2+1427/560*z2^3+13/16*z3*ln2^2*Sinf+13/24*z3*ln2^3+707/128*z3^2
   +87/32*z5*Sinf-ln2*Sinf*li4half+ln2^2*li4half-1/24*ln2^5*Sinf+1/
   80*ln2^6-21*li6half-17/2*s6;
Fill Htab6(1,-1,-1,0,-1,0)=53/16*z2*z3*ln2+23/16*z2*z3*Sinf-1/3*z2*
   ln2^3*Sinf+1/48*z2*ln2^4+9/2*z2*li4half-11/8*z2^2*ln2*Sinf-183/80*
   z2^2*ln2^2-1549/840*z2^3+z3*ln2^2*Sinf+2/3*z3*ln2^3-523/128*z3^2+
   73/64*z5*Sinf+1/30*ln2^5*Sinf+1/90*ln2^6-4*Sinf*li5half+8*li6half
   +19/4*s6;
Fill Htab6(1,-1,-1,0,1,-1)=-5/8*z2*z3*ln2-3/16*z2*ln2^4-2*z2*li4half-
   1/8*z2^2*ln2*Sinf-147/80*z2^2*ln2^2-151/80*z2^3+13/16*z3*ln2^2*Sinf
   +13/24*z3*ln2^3-475/128*z3^2-341/64*z5*ln2-99/32*z5*Sinf+4*ln2*
   Sinf*li4half+4*ln2*li5half+2*ln2^2*li4half+17/120*ln2^5*Sinf+19/240
   *ln2^6+3*Sinf*li5half+21*li6half+10*s6;
Fill Htab6(1,-1,-1,0,1,1)=-1/16*z2*z3*ln2+1/12*z2*ln2^3*Sinf+1/24*z2*
   ln2^4+1/8*z2^2*ln2*Sinf-19/40*z2^2*ln2^2+181/560*z2^3+1/16*z3*ln2^2
   *Sinf+1/24*z3*ln2^3-3/128*z3^2-25/32*z5*Sinf-1/120*ln2^5*Sinf-1/
   360*ln2^6+Sinf*li5half-2*li6half+1/4*s6;
Fill Htab6(1,-1,-1,0,1,0)=3/16*z2*z3*ln2+5/16*z2*z3*Sinf-1/3*z2*ln2^3*
   Sinf-1/6*z2*ln2^4-51/40*z2^2*ln2*Sinf-37/40*z2^2*ln2^2-1429/1680*
   z2^3+3/4*z3*ln2^2*Sinf+1/2*z3*ln2^3-249/128*z3^2+103/32*z5*Sinf+1/
   30*ln2^5*Sinf+1/90*ln2^6-4*Sinf*li5half+8*li6half+15/4*s6;
Fill Htab6(1,-1,-1,0,0,-1)=1/2*z2*z3*ln2+1/16*z2*z3*Sinf+1/3*z2*ln2^3*
   Sinf+1/4*z2*ln2^4-1/8*z2^2*ln2*Sinf-27/40*z2^2*ln2^2-163/168*z2^3
   -1/2*z3*ln2^2*Sinf-1/3*z3*ln2^3-199/128*z3^2-155/64*z5*ln2+125/64
   *z5*Sinf-2*ln2*Sinf*li4half+2*ln2*li5half-ln2^2*li4half-1/15*ln2^5*
   Sinf-17/360*ln2^6-2*Sinf*li5half+8*li6half+4*s6;
Fill Htab6(1,-1,-1,0,0,1)=-11/8*z2*z3*ln2-3/4*z2*z3*Sinf-1/6*z2*ln2^3*
   Sinf-1/4*z2*ln2^4-3*z2*li4half+3/5*z2^2*ln2*Sinf+11/10*z2^2*ln2^2
   +101/84*z2^3+1/2*z3*ln2^2*Sinf+1/3*z3*ln2^3+187/64*z3^2-39/16*z5*
   Sinf+2*ln2*Sinf*li4half+ln2^2*li4half+1/20*ln2^5*Sinf+1/30*ln2^6+
   4*Sinf*li5half-6*li6half-4*s6;
Fill Htab6(1,-1,-1,0,0,0)=3/2*z2*z3*ln2+1/2*z2*z3*Sinf+1/12*z2*ln2^4
   +2*z2*li4half-7/20*z2^2*ln2*Sinf-21/20*z2^2*ln2^2-39/140*z2^3-9/8
   *z3^2-29/32*z5*Sinf+s6;
Fill Htab6(1,-1,1,-1,-1,-1)=z2*z3*ln2+1/6*z2*ln2^3*Sinf+5/48*z2*ln2^4
   -1/2*z2*li4half+6/5*z2^2*ln2*Sinf+23/16*z2^2*ln2^2+143/105*z2^3-
   z3*ln2^2*Sinf-z3*ln2^3+23/32*z3^2-11/2*z5*ln2-4*z5*Sinf+ln2*Sinf*
   li4half+1/2*ln2^2*li4half+1/240*ln2^6+4*Sinf*li5half-7*li6half-9/
   4*s6;
Fill Htab6(1,-1,1,-1,-1,1)=-23/8*z2*z3*ln2-23/16*z2*z3*Sinf-1/3*z2*
   ln2^3*Sinf-11/48*z2*ln2^4-6/5*z2^2*ln2*Sinf-21/16*z2^2*ln2^2-1501/
   1680*z2^3+23/16*z3*ln2^2*Sinf+31/24*z3*ln2^3+9/64*z3^2+369/64*z5*
   Sinf+1/30*ln2^5*Sinf+11/720*ln2^6-3*Sinf*li5half+6*li6half+6*s6;
Fill Htab6(1,-1,1,-1,-1,0)=87/16*z2*z3*ln2+3/2*z2*z3*Sinf-1/12*z2*
   ln2^3*Sinf+1/16*z2*ln2^4+5/2*z2*li4half+1/10*z2^2*ln2*Sinf-57/80*
   z2^2*ln2^2-303/280*z2^3-1/16*z3*ln2^2*Sinf-1/24*z3*ln2^3-221/128*
   z3^2-125/32*z5*Sinf+ln2*Sinf*li4half+1/2*ln2^2*li4half+1/30*ln2^5*
   Sinf+17/720*ln2^6+Sinf*li5half+2*li6half-9/4*s6;
Fill Htab6(1,-1,1,-1,1,-1)=-5/4*z2*z3*ln2-1/8*z2*z3*Sinf-1/12*z2*ln2^3*
   Sinf-5/48*z2*ln2^4+1/40*z2^2*ln2*Sinf-7/80*z2^2*ln2^2-61/560*z2^3
   +1/8*z3*ln2^2*Sinf+5/12*z3*ln2^3+15/32*z3^2+2*z5*ln2+3/16*z5*Sinf
   +1/120*ln2^5*Sinf+1/144*ln2^6;
Fill Htab6(1,-1,1,-1,1,1)=31/8*z2*z3*ln2+23/16*z2*z3*Sinf+7/12*z2*
   ln2^3*Sinf+23/48*z2*ln2^4+3/2*z2*li4half-1/40*z2^2*ln2*Sinf-23/80*
   z2^2*ln2^2-3/7*z2^3-23/16*z3*ln2^2*Sinf-31/24*z3*ln2^3-199/64*z3^2
   +23/64*z5*Sinf-3*ln2*Sinf*li4half-3/2*ln2^2*li4half-13/120*ln2^5*
   Sinf-47/720*ln2^6-3*Sinf*li5half+3*li6half-3/4*s6;
Fill Htab6(1,-1,1,-1,1,0)=-19/8*z2*z3*ln2-5/8*z2*z3*Sinf-1/12*z2*ln2^3*
   Sinf-1/16*z2*ln2^4-1/10*z2^2*ln2*Sinf+7/80*z2^2*ln2^2+99/280*z2^3
   +1/2*z3*ln2^2*Sinf+1/3*z3*ln2^3+115/64*z3^2+z5*Sinf-1/240*ln2^6
   -3*li6half+3/4*s6;
Fill Htab6(1,-1,1,-1,0,-1)=-5/4*z2*z3*ln2-1/4*z2*z3*Sinf-5/12*z2*ln2^3*
   Sinf-7/16*z2*ln2^4-2*z2*li4half+33/20*z2^2*ln2*Sinf+29/10*z2^2*
   ln2^2+2011/560*z2^3+1/8*z3*ln2^2*Sinf+1/12*z3*ln2^3+275/64*z3^2-
   93/64*z5*ln2-61/8*z5*Sinf+4*ln2*Sinf*li4half-3*ln2*li5half+2*ln2^2*
   li4half+1/10*ln2^5*Sinf+7/90*ln2^6+8*Sinf*li5half-22*li6half-10*
   s6;
Fill Htab6(1,-1,1,-1,0,1)=-21/4*z2*z3*ln2-15/8*z2*z3*Sinf-3/4*z2*ln2^3*
   Sinf-25/48*z2*ln2^4-2*z2*li4half+19/40*z2^2*ln2*Sinf+107/80*z2^2*
   ln2^2+97/70*z2^3+13/8*z3*ln2^2*Sinf+13/12*z3*ln2^3+35/8*z3^2-101/
   64*z5*Sinf+4*ln2*Sinf*li4half+2*ln2^2*li4half+1/8*ln2^5*Sinf+17/240
   *ln2^6+5*Sinf*li5half-9*li6half-7/4*s6;
Fill Htab6(1,-1,1,-1,0,0)=9/4*z2*z3*ln2+7/8*z2*z3*Sinf-1/24*z2*ln2^4
   +19/40*z2^2*ln2*Sinf+3/8*z2^2*ln2^2-123/560*z2^3-3/8*z3*ln2^2*Sinf
   -1/4*z3*ln2^3-3/2*z3^2-15/8*z5*Sinf+1/360*ln2^6+2*li6half-9/4*
   s6;
Fill Htab6(1,-1,1,1,-1,-1)=-3/8*z2*z3*ln2+1/16*z2*z3*Sinf-1/12*z2*ln2^3
   *Sinf-1/24*z2*ln2^4-1/8*z2^2*ln2*Sinf-1/8*z2^2*ln2^2+1/56*z2^3+7/
   16*z3*ln2^2*Sinf+7/24*z3*ln2^3+69/64*z3^2+9/2*z5*ln2-3/64*z5*Sinf
   +1/120*ln2^5*Sinf+1/360*ln2^6-3*li6half-3*s6;
Fill Htab6(1,-1,1,1,-1,1)=-7/4*z2*z3*ln2-7/8*z2*z3*Sinf-5/12*z2*ln2^3*
   Sinf-1/3*z2*ln2^4-3/2*z2*li4half+1/8*z2^2*ln2*Sinf+1/2*z2^2*ln2^2
   +7/8*z3*ln2^2*Sinf+7/12*z3*ln2^3+49/32*z3^2-81/64*z5*Sinf+3*ln2*
   Sinf*li4half+3/2*ln2^2*li4half+11/120*ln2^5*Sinf+1/18*ln2^6+3*Sinf*
   li5half;
Fill Htab6(1,-1,1,1,-1,0)=5/16*z2*z3*ln2+3/8*z2*z3*Sinf+1/3*z2*ln2^3*
   Sinf+11/48*z2*ln2^4+z2*li4half-1/20*z2^2*ln2*Sinf-9/80*z2^2*ln2^2
   +331/560*z2^3-13/16*z3*ln2^2*Sinf-13/24*z3*ln2^3-115/128*z3^2+33/
   64*z5*Sinf-2*ln2*Sinf*li4half-ln2^2*li4half-3/40*ln2^5*Sinf-11/240*
   ln2^6-Sinf*li5half-3*li6half+1/2*s6;
Fill Htab6(1,-1,1,1,1,-1)=7/8*z2*z3*ln2+7/16*z2*z3*Sinf+1/6*z2*ln2^3*
   Sinf+1/8*z2*ln2^4+1/2*z2*li4half-1/8*z2^2*ln2^2-18/35*z2^3-7/16*
   z3*ln2^2*Sinf-7/24*z3*ln2^3-109/64*z3^2-4*z5*ln2+27/32*z5*Sinf-
   ln2*Sinf*li4half-1/2*ln2^2*li4half-1/30*ln2^5*Sinf-7/360*ln2^6-2*
   Sinf*li5half+6*li6half+5/2*s6;
Fill Htab6(1,-1,1,1,1,1)=Sinf*li5half-5*li6half;
Fill Htab6(1,-1,1,1,1,0)=z2*z3*ln2+1/2*z2*z3*Sinf+1/6*z2*ln2^3*Sinf+
   5/48*z2*ln2^4-1/2*z2*li4half+1/20*z2^2*ln2*Sinf-1/80*z2^2*ln2^2-1/7
   *z2^3-1/2*z3*ln2^2*Sinf-1/3*z3*ln2^3-25/32*z3^2-1/32*z5*Sinf-ln2*
   Sinf*li4half-1/2*ln2^2*li4half-1/40*ln2^5*Sinf-1/80*ln2^6-2*Sinf*
   li5half+6*li6half-1/4*s6;
Fill Htab6(1,-1,1,1,0,-1)=-5/8*z2*z3*ln2+1/8*z2*z3*Sinf+1/4*z2*ln2^3*
   Sinf+1/4*z2*ln2^4-33/20*z2^2*ln2*Sinf-12/5*z2^2*ln2^2-1943/560*z2^3
   +5/16*z3*ln2^2*Sinf+5/24*z3*ln2^3-361/128*z3^2+279/64*z5*ln2+457/
   64*z5*Sinf-3*ln2*Sinf*li4half+3*ln2*li5half-3/2*ln2^2*li4half-1/15*
   ln2^5*Sinf-7/120*ln2^6-7*Sinf*li5half+21*li6half+33/4*s6;
Fill Htab6(1,-1,1,1,0,1)=-23/8*z2*z3*ln2-9/16*z2*z3*Sinf-5/12*z2*ln2^3*
   Sinf-23/48*z2*ln2^4-9/2*z2*li4half-19/40*z2^2*ln2*Sinf+23/80*z2^2*
   ln2^2+3/7*z2^3+23/16*z3*ln2^2*Sinf+23/24*z3*ln2^3+87/64*z3^2-23/
   64*z5*Sinf+3*ln2*Sinf*li4half+3/2*ln2^2*li4half+13/120*ln2^5*Sinf+
   47/720*ln2^6+2*Sinf*li5half+2*li6half+3/4*s6;
Fill Htab6(1,-1,1,1,0,0)=13/16*z2*z3*ln2+7/16*z2*z3*Sinf+1/3*z2*ln2^3*
   Sinf+1/3*z2*ln2^4+2*z2*li4half-19/40*z2^2*ln2*Sinf-7/8*z2^2*ln2^2
   -201/280*z2^3-1/2*z3*ln2^2*Sinf-1/3*z3*ln2^3-163/128*z3^2+151/64*
   z5*Sinf-2*ln2*Sinf*li4half-ln2^2*li4half-1/15*ln2^5*Sinf-1/24*ln2^6
   -2*Sinf*li5half+5/2*s6;
Fill Htab6(1,-1,1,0,-1,-1)=23/16*z2*z3*ln2+1/16*z2*z3*Sinf+1/4*z2*
   ln2^3*Sinf+1/16*z2*ln2^4+6/5*z2^2*ln2*Sinf+99/80*z2^2*ln2^2+2/35*
   z2^3-11/8*z3*ln2^2*Sinf-11/12*z3*ln2^3-193/128*z3^2-93/8*z5*ln2-
   99/32*z5*Sinf+6*ln2*li5half+3/2*ln2^2*li4half-1/40*ln2^5*Sinf+1/60*
   ln2^6+3*Sinf*li5half+3*li6half+3*s6;
Fill Htab6(1,-1,1,0,-1,1)=13/8*z2*z3*ln2-1/2*z2*z3*Sinf+2/3*z2*ln2^3*
   Sinf+31/48*z2*ln2^4+7/2*z2*li4half-27/8*z2^2*ln2*Sinf-527/80*z2^2*
   ln2^2-3411/560*z2^3+1/2*z3*ln2^2*Sinf+1/3*z3*ln2^3-599/64*z3^2+
   911/64*z5*Sinf-4*ln2*Sinf*li4half-7/2*ln2^2*li4half-7/120*ln2^5*Sinf
   -7/80*ln2^6-13*Sinf*li5half+42*li6half+47/2*s6;
Fill Htab6(1,-1,1,0,-1,0)=27/8*z2*z3*ln2+7/8*z2*z3*Sinf-1/3*z2*ln2^3*
   Sinf-11/48*z2*ln2^4+1/2*z2*li4half+11/8*z2^2*ln2*Sinf+83/80*z2^2*
   ln2^2+127/120*z2^3+3/4*z3*ln2^2*Sinf+1/2*z3*ln2^3+227/64*z3^2-331/
   32*z5*Sinf+4*ln2*Sinf*li4half+2*ln2^2*li4half+1/10*ln2^5*Sinf+1/15*
   ln2^6+8*Sinf*li5half-12*li6half-19/2*s6;
Fill Htab6(1,-1,1,0,1,-1)=-29/8*z2*z3*ln2-1/2*z2*z3*Sinf-7/6*z2*ln2^3*
   Sinf-41/48*z2*ln2^4-7/2*z2*li4half+141/40*z2^2*ln2*Sinf+529/80*z2^2
   *ln2^2+3643/560*z2^3+1/2*z3*ln2^2*Sinf+1/3*z3*ln2^3+23/2*z3^2+93/
   16*z5*ln2-245/16*z5*Sinf+7*ln2*Sinf*li4half-4*ln2*li5half+7/2*ln2^2
   *li4half+19/120*ln2^5*Sinf+9/80*ln2^6+16*Sinf*li5half-48*li6half-
   26*s6;
Fill Htab6(1,-1,1,0,1,1)=11/4*z2*z3*ln2+11/8*z2*z3*Sinf+5/12*z2*ln2^3*
   Sinf+1/3*z2*ln2^4+3/2*z2*li4half-1/8*z2^2*ln2*Sinf+1/10*z2^2*ln2^2
   -3/5*z2^3-11/8*z3*ln2^2*Sinf-11/12*z3*ln2^3-105/32*z3^2+81/64*z5*
   Sinf-3*ln2*Sinf*li4half-3/2*ln2^2*li4half-11/120*ln2^5*Sinf-1/18*
   ln2^6-4*Sinf*li5half+5*li6half;
Fill Htab6(1,-1,1,0,1,0)=-13/8*z2*z3*ln2-7/8*z2*z3*Sinf-1/3*z2*ln2^3*
   Sinf-7/24*z2*ln2^4-z2*li4half+51/40*z2^2*ln2*Sinf+47/40*z2^2*ln2^2
   +491/336*z2^3+z3*ln2^2*Sinf+2/3*z3*ln2^3+349/64*z3^2-227/32*z5*
   Sinf+4*ln2*Sinf*li4half+2*ln2^2*li4half+1/10*ln2^5*Sinf+1/15*ln2^6
   +8*Sinf*li5half-12*li6half-23/4*s6;
Fill Htab6(1,-1,1,0,0,-1)=3/4*z2*z3*ln2-1/8*z2*z3*Sinf+1/48*z2*ln2^4
   +3/2*z2*li4half+1/8*z2^2*ln2*Sinf+3/10*z2^2*ln2^2+899/840*z2^3-3/
   8*z3*ln2^2*Sinf-1/4*z3*ln2^3-41/32*z3^2-279/64*z5*ln2+15/32*z5*Sinf
   -2*ln2*li5half+1/120*ln2^6-6*li6half+3/4*s6;
Fill Htab6(1,-1,1,0,0,1)=-3/4*z2*z3*ln2-11/8*z2*z3*Sinf-1/6*z2*ln2^3*
   Sinf+1/24*z2*ln2^4+3*z2*li4half-3/5*z2^2*ln2*Sinf-11/10*z2^2*ln2^2
   -2431/1680*z2^3+3/8*z3*ln2^2*Sinf+1/4*z3*ln2^3-19/16*z3^2+311/64*
   z5*Sinf+1/60*ln2^5*Sinf+1/180*ln2^6-2*Sinf*li5half+4*li6half+21/4
   *s6;
Fill Htab6(1,-1,1,0,0,0)=9/8*z2*z3*ln2+3/8*z2*z3*Sinf+7/20*z2^2*ln2*
   Sinf+11/20*z2^2*ln2^2+17/70*z2^3-11/64*z3^2-2*z5*Sinf-5/2*s6;
Fill Htab6(1,-1,0,-1,-1,-1)=-7/8*z2*z3*ln2-5/12*z2*ln2^3*Sinf-1/2*z2*
   ln2^4-3/2*z2*li4half+2/5*z2^2*ln2*Sinf+23/40*z2^2*ln2^2-9/35*z2^3
   +7/8*z3*ln2^2*Sinf+49/48*z3*ln2^3+73/64*z3^2+93/64*z5*ln2-4*z5*
   Sinf+3*ln2*Sinf*li4half+4*ln2*li5half+3*ln2^2*li4half+11/120*ln2^5*
   Sinf+67/720*ln2^6+4*Sinf*li5half+li6half-11/4*s6;
Fill Htab6(1,-1,0,-1,-1,1)=21/8*z2*z3*ln2+21/16*z2*z3*Sinf+2/3*z2*
   ln2^3*Sinf+25/48*z2*ln2^4+2*z2*li4half-1/2*z2^2*ln2*Sinf-163/80*
   z2^2*ln2^2-1651/560*z2^3-21/16*z3*ln2^2*Sinf-21/16*z3*ln2^3-681/128
   *z3^2+35/32*z5*Sinf-ln2*Sinf*li4half-2*ln2^2*li4half-1/120*ln2^5*
   Sinf-13/240*ln2^6-4*Sinf*li5half+21*li6half+17/2*s6;
Fill Htab6(1,-1,0,-1,-1,0)=-87/16*z2*z3*ln2-11/8*z2*z3*Sinf-3/16*z2*
   ln2^4-9/2*z2*li4half-1/8*z2^2*ln2*Sinf+17/16*z2^2*ln2^2+737/560*
   z2^3+223/128*z3^2+177/64*z5*Sinf+7/4*s6;
Fill Htab6(1,-1,0,-1,1,-1)=21/16*z2*z3*ln2-5/6*z2*ln2^3*Sinf-1/24*z2*
   ln2^4+23/10*z2^2*ln2*Sinf+49/10*z2^2*ln2^2+377/70*z2^3-7/16*z3*
   ln2^3+459/64*z3^2-31/32*z5*ln2-61/8*z5*Sinf-2*ln2*li5half-1/15*
   ln2^5*Sinf-1/24*ln2^6+8*Sinf*li5half-42*li6half-20*s6;
Fill Htab6(1,-1,0,-1,1,1)=-63/16*z2*z3*ln2-21/16*z2*z3*Sinf-1/4*z2*
   ln2^3*Sinf-5/12*z2*ln2^4-z2*li4half-77/40*z2^2*ln2*Sinf-123/80*z2^2
   *ln2^2-1837/560*z2^3+21/16*z3*ln2^2*Sinf+21/16*z3*ln2^3-111/128*
   z3^2+61/8*z5*Sinf+2*ln2*Sinf*li4half+ln2^2*li4half+2/15*ln2^5*Sinf
   +3/40*ln2^6-6*Sinf*li5half+24*li6half+23/2*s6;
Fill Htab6(1,-1,0,-1,1,0)=45/16*z2*z3*ln2+1/2*z2*z3*Sinf+1/3*z2*ln2^3*
   Sinf+1/12*z2*ln2^4+2*z2*li4half+119/40*z2^2*ln2*Sinf+19/16*z2^2*
   ln2^2+1613/560*z2^3+35/16*z3^2-507/32*z5*Sinf+4*ln2*Sinf*li4half+
   2*ln2^2*li4half+1/30*ln2^5*Sinf+1/20*ln2^6+16*Sinf*li5half-24*
   li6half-23/2*s6;
Fill Htab6(1,-1,0,-1,0,-1)=21/16*z2*z3*ln2-1/8*z2*z3*Sinf-1/3*z2*ln2^3
   *Sinf-1/6*z2*ln2^4+13/8*z2^2*ln2*Sinf+13/16*z2^2*ln2^2-417/560*z2^3
   +5/4*z3^2+31/32*z5*ln2-125/16*z5*Sinf+4*ln2*Sinf*li4half+4*ln2*
   li5half+2*ln2^2*li4half+1/10*ln2^5*Sinf+1/20*ln2^6+8*Sinf*li5half
   -4*s6;
Fill Htab6(1,-1,0,-1,0,1)=49/8*z2*z3*ln2+3/2*z2*z3*Sinf+2/3*z2*ln2^3*
   Sinf+2/3*z2*ln2^4+6*z2*li4half+3/40*z2^2*ln2*Sinf-117/80*z2^2*ln2^2
   -1027/560*z2^3-7/4*z3*ln2^2*Sinf-7/6*z3*ln2^3-513/128*z3^2+33/32*
   z5*Sinf-4*ln2*Sinf*li4half-2*ln2^2*li4half-2/15*ln2^5*Sinf-7/90*
   ln2^6-4*Sinf*li5half+4*li6half+s6;
Fill Htab6(1,-1,0,-1,0,0)=-3*z2*z3*ln2-z2*z3*Sinf-1/6*z2*ln2^4-4*z2*
   li4half+21/20*z2^2*ln2*Sinf+61/40*z2^2*ln2^2+233/840*z2^3+195/64*
   z3^2+41/32*z5*Sinf-3/2*s6;
Fill Htab6(1,-1,0,1,-1,-1)=2/3*z2*ln2^3*Sinf+7/24*z2*ln2^4+z2*li4half
   -69/40*z2^2*ln2*Sinf-143/40*z2^2*ln2^2-249/80*z2^3-39/8*z3^2+221/
   32*z5*Sinf-2*ln2*Sinf*li4half-3/2*ln2^2*li4half-1/40*ln2^5*Sinf-7/
   240*ln2^6-7*Sinf*li5half+24*li6half+13*s6;
Fill Htab6(1,-1,0,1,-1,1)=21/8*z2*z3*ln2+21/16*z2*z3*Sinf-7/12*z2*
   ln2^3*Sinf-1/48*z2*ln2^4-1/2*z2*li4half+141/40*z2^2*ln2*Sinf+451/80
   *z2^2*ln2^2+3103/560*z2^3-21/16*z3*ln2^2*Sinf-7/8*z3*ln2^3+417/64*
   z3^2-845/64*z5*Sinf+1/2*ln2^2*li4half-11/120*ln2^5*Sinf-3/80*ln2^6
   +11*Sinf*li5half-42*li6half-47/2*s6;
Fill Htab6(1,-1,0,1,-1,0)=-39/16*z2*z3*ln2-13/16*z2*z3*Sinf-1/3*z2*
   ln2^3*Sinf-1/16*z2*ln2^4-3/2*z2*li4half-139/40*z2^2*ln2*Sinf-25/16*
   z2^2*ln2^2-111/40*z2^3-455/128*z3^2+547/32*z5*Sinf-4*ln2*Sinf*
   li4half-2*ln2^2*li4half-1/30*ln2^5*Sinf-1/20*ln2^6-16*Sinf*li5half
   +24*li6half+13*s6;
Fill Htab6(1,-1,0,1,1,-1)=11/12*z2*ln2^3*Sinf+1/3*z2*ln2^4+3/2*z2*
   li4half-69/40*z2^2*ln2*Sinf-333/80*z2^2*ln2^2-11/5*z2^3-111/32*z3^2
   +279/64*z5*ln2+457/64*z5*Sinf-3*ln2*Sinf*li4half-2*ln2*li5half-3/
   2*ln2^2*li4half-1/15*ln2^5*Sinf-1/40*ln2^6-7*Sinf*li5half+15*
   li6half+37/4*s6;
Fill Htab6(1,-1,0,1,1,1)=-7/8*z2*z3*ln2-7/16*z2*z3*Sinf-1/6*z2*ln2^3*
   Sinf-1/8*z2*ln2^4-1/2*z2*li4half+2/5*z2^2*ln2*Sinf+13/40*z2^2*ln2^2
   +11/35*z2^3+7/16*z3*ln2^2*Sinf+7/24*z3*ln2^3+109/64*z3^2-27/32*z5
   *Sinf+ln2*Sinf*li4half+1/2*ln2^2*li4half+1/30*ln2^5*Sinf+7/360*
   ln2^6+Sinf*li5half-li6half-5/2*s6;
Fill Htab6(1,-1,0,1,1,0)=-3/16*z2*z3*ln2-1/16*z2*z3*Sinf+1/24*z2*ln2^4
   +z2*li4half-1/2*z2^2*ln2*Sinf-1/2*z2^2*ln2^2-121/560*z2^3-119/128
   *z3^2+53/64*z5*Sinf+11/4*s6;
Fill Htab6(1,-1,0,1,0,-1)=-5/16*z2*z3*Sinf-1/3*z2*ln2^3*Sinf-3/16*z2*
   ln2^4-1/2*z2*li4half+71/40*z2^2*ln2*Sinf+81/80*z2^2*ln2^2+43/140*
   z2^3+25/128*z3^2-403/64*z5*ln2-123/16*z5*Sinf+4*ln2*Sinf*li4half+
   4*ln2*li5half+2*ln2^2*li4half+1/10*ln2^5*Sinf+1/20*ln2^6+8*Sinf*
   li5half;
Fill Htab6(1,-1,0,1,0,1)=7/2*z2*z3*ln2+9/8*z2*z3*Sinf+2/3*z2*ln2^3*
   Sinf+5/8*z2*ln2^4+5*z2*li4half+3/10*z2^2*ln2*Sinf-11/10*z2^2*ln2^2
   -799/560*z2^3-7/4*z3*ln2^2*Sinf-7/6*z3*ln2^3-99/32*z3^2+89/64*z5*
   Sinf-4*ln2*Sinf*li4half-2*ln2^2*li4half-2/15*ln2^5*Sinf-7/90*ln2^6
   -4*Sinf*li5half+4*li6half+7/4*s6;
Fill Htab6(1,-1,0,1,0,0)=-9/4*z2*z3*ln2-3/4*z2*z3*Sinf-1/6*z2*ln2^4-4
   *z2*li4half+6/5*z2^2*ln2*Sinf+8/5*z2^2*ln2^2+251/420*z2^3+59/32*
   z3^2+21/32*z5*Sinf-5/2*s6;
Fill Htab6(1,-1,0,0,-1,-1)=-7/8*z2*z3*ln2-1/6*z2*ln2^3*Sinf-1/12*z2*
   ln2^4-3/4*z2^2*ln2*Sinf-3/8*z2^2*ln2^2+457/560*z2^3+7/8*z3*ln2^2*
   Sinf+7/12*z3*ln2^3+243/128*z3^2+527/64*z5*ln2+125/64*z5*Sinf-6*
   ln2*li5half-ln2^2*li4half+1/60*ln2^5*Sinf-1/360*ln2^6-2*Sinf*
   li5half-8*li6half-9/2*s6;
Fill Htab6(1,-1,0,0,-1,1)=-39/16*z2*z3*ln2-1/3*z2*ln2^3*Sinf-7/24*z2*
   ln2^4-z2*li4half-27/40*z2^2*ln2*Sinf+51/40*z2^2*ln2^2+1/10*z2^3+
   169/128*z3^2+27/8*z5*Sinf+ln2^2*li4half+1/30*ln2^5*Sinf+1/24*ln2^6
   -4*Sinf*li5half;
Fill Htab6(1,-1,0,0,-1,0)=-9/8*z2*z3*ln2-3/8*z2*z3*Sinf+1/24*z2*ln2^4
   +z2*li4half-21/20*z2^2*ln2*Sinf-31/40*z2^2*ln2^2+871/1680*z2^3-
   123/64*z3^2+51/32*z5*Sinf+7/2*s6;
Fill Htab6(1,-1,0,0,1,-1)=39/16*z2*z3*ln2+1/2*z2*ln2^3*Sinf+1/3*z2*
   ln2^4+z2*li4half-129/80*z2^2*ln2^2-47/70*z2^3-77/32*z3^2-155/32*
   z5*ln2+15/32*z5*Sinf-2*ln2*Sinf*li4half+2*ln2*li5half-ln2^2*li4half
   -1/12*ln2^5*Sinf-1/20*ln2^6+6*li6half+17/4*s6;
Fill Htab6(1,-1,0,0,1,1)=-7/4*z2*z3*ln2-7/8*z2*z3*Sinf-1/3*z2*ln2^3*
   Sinf-1/4*z2*ln2^4-z2*li4half+1/10*z2^2*ln2*Sinf+3/10*z2^2*ln2^2+3/
   56*z2^3+7/8*z3*ln2^2*Sinf+7/12*z3*ln2^3+81/32*z3^2-15/32*z5*Sinf+
   2*ln2*Sinf*li4half+ln2^2*li4half+1/15*ln2^5*Sinf+7/180*ln2^6+2*Sinf
   *li5half-2*li6half-1/2*s6;
Fill Htab6(1,-1,0,0,1,0)=9/8*z2*z3*ln2+3/8*z2*z3*Sinf+1/12*z2*ln2^4+
   2*z2*li4half-6/5*z2^2*ln2*Sinf-11/10*z2^2*ln2^2+65/168*z2^3-203/64*
   z3^2+11/32*z5*Sinf+5/2*s6;
Fill Htab6(1,-1,0,0,0,-1)=3/8*z2*z3*Sinf-1/24*z2*ln2^4-z2*li4half+7/
   20*z2^2*ln2*Sinf+17/40*z2^2*ln2^2-439/840*z2^3+15/8*z3^2+155/32*z5*
   ln2-17/16*z5*Sinf-4*s6;
Fill Htab6(1,-1,0,0,0,1)=3/4*z2*z3*Sinf-1/12*z2*ln2^4-2*z2*li4half+2/
   5*z2^2*ln2*Sinf+7/10*z2^2*ln2^2+53/168*z2^3+z3^2-59/32*z5*Sinf-5/
   2*s6;
Fill Htab6(1,-1,0,0,0,0)=-8/35*z2^3+15/16*z5*Sinf+s6;
Fill Htab6(1,1,-1,-1,-1,-1)=-1/2*z2*z3*ln2-1/6*z2*ln2^3*Sinf-7/48*z2*
   ln2^4-2/5*z2^2*ln2*Sinf-17/40*z2^2*ln2^2-13/35*z2^3+1/2*z3*ln2^2*
   Sinf+1/2*z3*ln2^3-1/8*z3^2+2*z5*ln2+z5*Sinf+1/48*ln2^4*Sinf^2+1/
   24*ln2^5*Sinf+1/60*ln2^6-Sinf*li5half+2*li6half+1/2*s6;
Fill Htab6(1,1,-1,-1,-1,1)=15/8*z2*z3*ln2+15/16*z2*z3*Sinf+1/8*z2*
   ln2^2*Sinf^2+1/4*z2*ln2^3*Sinf+3/16*z2*ln2^4+1/2*z2*li4half+4/5*
   z2^2*ln2*Sinf+1/2*z2^2*ln2^2+1/5*z2^2*Sinf^2+9/35*z2^3-7/16*z3*ln2*
   Sinf^2-15/16*z3*ln2^2*Sinf-31/48*z3*ln2^3-9/128*z3^2-123/32*z5*Sinf
   -1/24*ln2^4*Sinf^2-1/20*ln2^5*Sinf-13/720*ln2^6+2*Sinf*li5half-1/
   2*Sinf^2*li4half-3*li6half-3*s6;
Fill Htab6(1,1,-1,-1,-1,0)=-3*z2*z3*ln2-z2*z3*Sinf-1/4*z2*ln2^2*Sinf^2
   -1/3*z2*ln2^3*Sinf-3/16*z2*ln2^4-3/2*z2*li4half+3/10*z2^2*ln2*Sinf
   +51/40*z2^2*ln2^2-1/5*z2^2*Sinf^2+171/140*z2^3+1/2*z3*ln2*Sinf^2+
   1/2*z3*ln2^2*Sinf+1/6*z3*ln2^3+15/8*z3^2+15/16*z5*Sinf+1/48*ln2^4*
   Sinf^2-1/120*ln2^5*Sinf-1/120*ln2^6+Sinf*li5half+1/2*Sinf^2*li4half
   -6*li6half-3/2*s6;
Fill Htab6(1,1,-1,-1,1,-1)=-9/4*z2*z3*ln2-11/8*z2*z3*Sinf-3/8*z2*ln2^2*
   Sinf^2-1/6*z2*ln2^3*Sinf-1/48*z2*ln2^4-3/2*z2*li4half-53/40*z2^2*
   ln2*Sinf-13/40*z2^2*ln2^2-3/5*z2^2*Sinf^2+16/105*z2^3+11/8*z3*ln2*
   Sinf^2+11/8*z3*ln2^2*Sinf+7/24*z3*ln2^3-3/64*z3^2-1/2*z5*ln2+369/
   64*z5*Sinf+1/24*ln2^4*Sinf^2-1/120*ln2^5*Sinf-7/720*ln2^6-3*Sinf*
   li5half+3/2*Sinf^2*li4half+3*li6half+3*s6;
Fill Htab6(1,1,-1,-1,1,1)=-3/8*z2*z3*ln2+1/16*z2*z3*Sinf-1/12*z2*ln2^3*
   Sinf-5/48*z2*ln2^4+7/40*z2^2*ln2*Sinf+1/8*z2^2*ln2^2+1/40*z2^2*
   Sinf^2-1/40*z2^3-1/16*z3*ln2*Sinf^2-1/16*z3*ln2^2*Sinf+7/48*z3*
   ln2^3+49/128*z3^2-29/64*z5*Sinf+1/48*ln2^4*Sinf^2+1/30*ln2^5*Sinf
   +1/72*ln2^6;
Fill Htab6(1,1,-1,-1,1,0)=-9/8*z2*z3*ln2-15/16*z2*z3*Sinf-1/8*z2*ln2^2*
   Sinf^2+1/12*z2*ln2^3*Sinf+1/48*z2*ln2^4-z2*li4half-63/40*z2^2*ln2*
   Sinf-103/80*z2^2*ln2^2-7/16*z2^2*Sinf^2-437/560*z2^3+13/16*z3*ln2*
   Sinf^2+13/16*z3*ln2^2*Sinf+13/48*z3*ln2^3-217/128*z3^2+405/64*z5*
   Sinf+1/24*ln2^4*Sinf^2+1/30*ln2^5*Sinf+1/80*ln2^6-4*Sinf*li5half+
   Sinf^2*li4half+9*li6half+21/4*s6;
Fill Htab6(1,1,-1,-1,0,-1)=27/8*z2*z3*ln2+3/2*z2*z3*Sinf+1/2*z2*ln2^2*
   Sinf^2+7/12*z2*ln2^3*Sinf+5/12*z2*ln2^4+3*z2*li4half-3/10*z2^2*ln2*
   Sinf-147/80*z2^2*ln2^2+3/5*z2^2*Sinf^2-327/140*z2^3-23/16*z3*ln2*
   Sinf^2-23/16*z3*ln2^2*Sinf-23/48*z3*ln2^3-193/64*z3^2+31/64*z5*ln2
   +35/32*z5*Sinf-3*ln2*Sinf*li4half+ln2*li5half-3/2*ln2^2*li4half-1/
   16*ln2^4*Sinf^2-11/120*ln2^5*Sinf-1/18*ln2^6-4*Sinf*li5half-3/2*
   Sinf^2*li4half+11*li6half+17/4*s6;
Fill Htab6(1,1,-1,-1,0,1)=13/8*z2*z3*ln2+7/16*z2*z3*Sinf+1/4*z2*ln2^2*
   Sinf^2+1/12*z2*ln2^3*Sinf-13/20*z2^2*ln2*Sinf-27/80*z2^2*ln2^2+3/80
   *z2^2*Sinf^2-501/560*z2^3-5/16*z3*ln2*Sinf^2-5/16*z3*ln2^2*Sinf-5/
   48*z3*ln2^3-127/128*z3^2+29/16*z5*Sinf+1/40*ln2^5*Sinf+1/120*ln2^6
   -3*Sinf*li5half+6*li6half+3/4*s6;
Fill Htab6(1,1,-1,-1,0,0)=z2*z3*ln2+3/8*z2*z3*Sinf+1/4*z2*ln2^2*Sinf^2
   +1/3*z2*ln2^3*Sinf+1/4*z2*ln2^4+3*z2*li4half+19/20*z2^2*ln2*Sinf-
   9/40*z2^2*ln2^2+3/8*z2^2*Sinf^2-1/280*z2^3-1/2*z3*ln2*Sinf^2-1/2*z3
   *ln2^2*Sinf-1/6*z3*ln2^3+5/8*z3^2-153/32*z5*Sinf-1/24*ln2^4*Sinf^2
   -1/30*ln2^5*Sinf-1/120*ln2^6+4*Sinf*li5half-Sinf^2*li4half-6*
   li6half-3/2*s6;
Fill Htab6(1,1,-1,1,-1,-1)=31/8*z2*z3*ln2+23/16*z2*z3*Sinf+1/2*z2*
   ln2^2*Sinf^2+7/12*z2*ln2^3*Sinf+7/24*z2*ln2^4+3/2*z2*li4half+57/40*
   z2^2*ln2*Sinf+13/40*z2^2*ln2^2+3/5*z2^2*Sinf^2-7/60*z2^3-23/16*z3*
   ln2*Sinf^2-39/16*z3*ln2^2*Sinf-55/48*z3*ln2^3-177/128*z3^2-11/2*z5*
   ln2-375/64*z5*Sinf-1/12*ln2^4*Sinf^2-7/120*ln2^5*Sinf-1/72*ln2^6+
   3*Sinf*li5half-3/2*Sinf^2*li4half;
Fill Htab6(1,1,-1,1,-1,1)=-9/4*z2*z3*ln2-9/8*z2*z3*Sinf-1/8*z2*ln2^2*
   Sinf^2-1/3*z2*ln2^3*Sinf-1/6*z2*ln2^4-1/5*z2^2*ln2*Sinf-7/80*z2^2*
   ln2^2+1/80*z2^2*Sinf^2+233/560*z2^3+1/8*z3*ln2*Sinf^2+9/8*z3*ln2^2*
   Sinf+17/24*z3*ln2^3+101/64*z3^2+29/16*z5*Sinf+1/48*ln2^4*Sinf^2+1/
   30*ln2^5*Sinf+7/720*ln2^6-3*li6half+3/4*s6;
Fill Htab6(1,1,-1,1,-1,0)=4*z2*z3*ln2+7/4*z2*z3*Sinf+1/8*z2*ln2^2*
   Sinf^2+1/6*z2*ln2^3*Sinf+1/16*z2*ln2^4-11/40*z2^2*ln2*Sinf-29/40*
   z2^2*ln2^2+1/20*z2^2*Sinf^2-423/280*z2^3-1/2*z3*ln2*Sinf^2-1/2*z3*
   ln2^2*Sinf-1/6*z3*ln2^3-35/16*z3^2-29/64*z5*Sinf+1/40*ln2^5*Sinf+
   1/80*ln2^6-3*Sinf*li5half+9*li6half;
Fill Htab6(1,1,-1,1,1,-1)=-7/8*z2*z3*ln2-7/16*z2*z3*Sinf-1/8*z2*ln2^2*
   Sinf^2-1/12*z2*ln2^3*Sinf-1/24*z2*ln2^4-1/8*z2^2*ln2*Sinf+1/16*z2^2
   *ln2^2-1/16*z2^2*Sinf^2+467/560*z2^3+7/16*z3*ln2*Sinf^2+7/16*z3*
   ln2^2*Sinf+7/48*z3*ln2^3+229/128*z3^2+6*z5*ln2-81/64*z5*Sinf+1/48
   *ln2^4*Sinf^2+1/120*ln2^5*Sinf+1/720*ln2^6+3*Sinf*li5half-9*li6half
   -15/4*s6;
Fill Htab6(1,1,-1,1,1,1)=-1/2*z2*li4half-4*Sinf*li5half+1/2*Sinf^2*
   li4half+10*li6half;
Fill Htab6(1,1,-1,1,1,0)=-1/8*z2*z3*ln2-15/16*z2*z3*Sinf-1/12*z2*ln2^3*
   Sinf+5/48*z2*ln2^4+7/2*z2*li4half+13/40*z2^2*ln2*Sinf-1/8*z2^2*
   ln2^2-1/40*z2^2*Sinf^2+1/40*z2^3+1/16*z3*ln2*Sinf^2+1/16*z3*ln2^2*
   Sinf+1/48*z3*ln2^3+63/128*z3^2+29/64*z5*Sinf-1/48*ln2^4*Sinf^2-1/
   30*ln2^5*Sinf-1/72*ln2^6+4*Sinf*li5half-1/2*Sinf^2*li4half-10*
   li6half;
Fill Htab6(1,1,-1,1,0,-1)=13/4*z2*z3*ln2+3/4*z2*z3*Sinf+3/8*z2*ln2^2*
   Sinf^2-1/16*z2*ln2^4+2*z2*li4half+63/20*z2^2*ln2*Sinf+161/80*z2^2*
   ln2^2+33/40*z2^2*Sinf^2+39/16*z2^3-13/8*z3*ln2*Sinf^2-13/8*z3*ln2^2
   *Sinf-13/24*z3*ln2^3+7/4*z3^2-465/64*z5*ln2-845/64*z5*Sinf+3*ln2*
   Sinf*li4half-ln2*li5half+3/2*ln2^2*li4half-1/12*ln2^4*Sinf^2+1/30*
   ln2^5*Sinf+11/240*ln2^6+11*Sinf*li5half-2*Sinf^2*li4half-18*li6half
   -7*s6;
Fill Htab6(1,1,-1,1,0,1)=1/4*z2*z3*ln2-13/8*z2*z3*Sinf-1/8*z2*ln2^2*
   Sinf^2+1/6*z2*ln2^4+7/2*z2*li4half+6/5*z2^2*ln2*Sinf-21/80*z2^2*
   ln2^2+19/80*z2^2*Sinf^2-37/560*z2^3-1/8*z3*ln2*Sinf^2-1/8*z3*ln2^2*
   Sinf-1/24*z3*ln2^3+123/64*z3^2-29/16*z5*Sinf-1/48*ln2^4*Sinf^2-1/
   30*ln2^5*Sinf-7/720*ln2^6+4*Sinf*li5half-1/2*Sinf^2*li4half-7*
   li6half-3/4*s6;
Fill Htab6(1,1,-1,1,0,0)=3/4*z2*z3*ln2+11/8*z2*z3*Sinf-1/6*z2*ln2^3*
   Sinf-5/24*z2*ln2^4-3*z2*li4half+11/40*z2^2*ln2*Sinf+67/80*z2^2*
   ln2^2+19/80*z2^2*Sinf^2+53/112*z2^3-3/8*z3*ln2*Sinf^2-3/8*z3*ln2^2*
   Sinf-1/8*z3*ln2^3-55/64*z3^2-159/64*z5*Sinf+1/60*ln2^5*Sinf+1/180
   *ln2^6-2*Sinf*li5half+4*li6half-9/4*s6;
Fill Htab6(1,1,-1,0,-1,-1)=-65/16*z2*z3*ln2-11/8*z2*z3*Sinf-3/8*z2*
   ln2^2*Sinf^2-3/4*z2*ln2^3*Sinf-23/48*z2*ln2^4-3*z2*li4half-51/40*
   z2^2*ln2*Sinf+9/80*z2^2*ln2^2-3/5*z2^2*Sinf^2+509/560*z2^3+11/8*z3*
   ln2*Sinf^2+43/16*z3*ln2^2*Sinf+4/3*z3*ln2^3+145/64*z3^2+403/64*z5*
   ln2+87/32*z5*Sinf+3*ln2*Sinf*li4half-2*ln2*li5half+ln2^2*li4half+
   1/16*ln2^4*Sinf^2+1/8*ln2^5*Sinf+13/240*ln2^6+3/2*Sinf^2*li4half-3*
   li6half-9/4*s6;
Fill Htab6(1,1,-1,0,-1,1)=37/16*z2*z3*ln2+29/16*z2*z3*Sinf-1/4*z2*
   ln2^2*Sinf^2+5/12*z2*ln2^3*Sinf+3/16*z2*ln2^4+3/2*z2*li4half+37/10*
   z2^2*ln2*Sinf+181/80*z2^2*ln2^2+5/8*z2^2*Sinf^2+1641/560*z2^3-1/2*
   z3*ln2*Sinf^2-29/16*z3*ln2^2*Sinf-25/24*z3*ln2^3+293/128*z3^2-521/
   32*z5*Sinf+1/2*ln2^2*li4half-1/12*ln2^4*Sinf^2-7/60*ln2^5*Sinf-1/80
   *ln2^6+14*Sinf*li5half-2*Sinf^2*li4half-24*li6half-23/2*s6;
Fill Htab6(1,1,-1,0,-1,0)=-95/16*z2*z3*ln2-33/16*z2*z3*Sinf-1/2*z2*
   ln2^2*Sinf^2-1/3*z2*ln2^3*Sinf-5/16*z2*ln2^4-11/2*z2*li4half-19/20*
   z2^2*ln2*Sinf+9/10*z2^2*ln2^2-11/16*z2^2*Sinf^2+859/840*z2^3+z3*ln2
   *Sinf^2+z3*ln2^2*Sinf+1/3*z3*ln2^3+117/128*z3^2+129/16*z5*Sinf+1/
   12*ln2^4*Sinf^2+1/30*ln2^5*Sinf+1/180*ln2^6-4*Sinf*li5half+2*Sinf^2
   *li4half+4*li6half+7/2*s6;
Fill Htab6(1,1,-1,0,1,-1)=-5/16*z2*z3*ln2-13/16*z2*z3*Sinf+1/4*z2*ln2^2
   *Sinf^2-1/12*z2*ln2^3*Sinf+1/48*z2*ln2^4-3/2*z2*li4half-18/5*z2^2*
   ln2*Sinf-177/80*z2^2*ln2^2-7/10*z2^2*Sinf^2-1749/560*z2^3+13/16*z3*
   ln2*Sinf^2+13/16*z3*ln2^2*Sinf+13/48*z3*ln2^3-709/128*z3^2-465/64*
   z5*ln2+911/64*z5*Sinf-ln2*Sinf*li4half+4*ln2*li5half-1/2*ln2^2*
   li4half+1/12*ln2^4*Sinf^2+1/15*ln2^5*Sinf-1/80*ln2^6-13*Sinf*
   li5half+2*Sinf^2*li4half+30*li6half+31/2*s6;
Fill Htab6(1,1,-1,0,1,1)=-1/8*z2*z3*ln2-1/16*z2*z3*Sinf+1/8*z2*ln2^2*
   Sinf^2+1/12*z2*ln2^3*Sinf+1/24*z2*ln2^4+1/2*z2*li4half-43/40*z2^2*
   ln2*Sinf-53/80*z2^2*ln2^2+1/16*z2^2*Sinf^2-131/560*z2^3+1/16*z3*ln2
   *Sinf^2+1/16*z3*ln2^2*Sinf+1/48*z3*ln2^3-117/128*z3^2+81/64*z5*Sinf
   -1/48*ln2^4*Sinf^2-1/120*ln2^5*Sinf-1/720*ln2^6+Sinf*li5half-1/2*
   Sinf^2*li4half-li6half+15/4*s6;
Fill Htab6(1,1,-1,0,1,0)=-3/2*z2*z3*ln2-1/8*z2*z3*Sinf-1/2*z2*ln2^2*
   Sinf^2-1/3*z2*ln2^3*Sinf-7/24*z2*ln2^4-5*z2*li4half-23/40*z2^2*ln2*
   Sinf+77/80*z2^2*ln2^2-51/80*z2^2*Sinf^2+281/336*z2^3+3/4*z3*ln2*
   Sinf^2+3/4*z3*ln2^2*Sinf+1/4*z3*ln2^3-1/4*z3^2+259/64*z5*Sinf+1/
   12*ln2^4*Sinf^2+1/30*ln2^5*Sinf+1/180*ln2^6-4*Sinf*li5half+2*Sinf^2
   *li4half+4*li6half-3/4*s6;
Fill Htab6(1,1,-1,0,0,-1)=-3/4*z2*z3*ln2+7/16*z2*z3*Sinf+1/6*z2*ln2^3*
   Sinf+1/16*z2*ln2^4-1/2*z2*li4half-49/40*z2^2*ln2*Sinf-39/80*z2^2*
   ln2^2-1/16*z2^2*Sinf^2-143/420*z2^3+3/8*z3*ln2*Sinf^2+3/8*z3*ln2^2*
   Sinf+1/8*z3*ln2^3+139/128*z3^2+31/4*z5*ln2+27/8*z5*Sinf-2*ln2*
   Sinf*li4half-2*ln2*li5half-ln2^2*li4half-1/20*ln2^5*Sinf-1/40*ln2^6
   -4*Sinf*li5half-5/2*s6;
Fill Htab6(1,1,-1,0,0,1)=3/4*z2*z3*ln2+2*z2*z3*Sinf+1/4*z2*ln2^2*
   Sinf^2+1/6*z2*ln2^3*Sinf-1/24*z2*ln2^4-2*z2*li4half+1/10*z2^2*ln2*
   Sinf+11/20*z2^2*ln2^2+3/10*z2^2*Sinf^2+13/12*z2^3-3/8*z3*ln2*Sinf^2
   -3/8*z3*ln2^2*Sinf-1/8*z3*ln2^3-25/64*z3^2-85/16*z5*Sinf-1/24*
   ln2^4*Sinf^2-1/60*ln2^5*Sinf-1/360*ln2^6+2*Sinf*li5half-Sinf^2*
   li4half-2*li6half-3*s6;
Fill Htab6(1,1,-1,0,0,0)=-3/4*z2*z3*Sinf+1/12*z2*ln2^4+2*z2*li4half-3/
   4*z2^2*ln2*Sinf-7/8*z2^2*ln2^2-7/40*z2^2*Sinf^2-167/280*z2^3+1/4*
   z3^2+91/32*z5*Sinf+5/2*s6;
Fill Htab6(1,1,1,-1,-1,-1)=-3/2*z2*z3*ln2-1/2*z2*z3*Sinf-1/4*z2*ln2^2*
   Sinf^2-5/12*z2*ln2^3*Sinf-5/24*z2*ln2^4-1/2*z2*li4half-9/20*z2^2*
   ln2*Sinf-1/5*z2^2*Sinf^2+1/28*z2^3+1/2*z3*ln2*Sinf^2+z3*ln2^2*Sinf
   +5/9*z3*ln2^3+1/2*z3^2+2*z5*ln2+63/32*z5*Sinf+1/36*ln2^3*Sinf^3
   +1/12*ln2^4*Sinf^2+7/120*ln2^5*Sinf+1/72*ln2^6-Sinf*li5half+1/2*
   Sinf^2*li4half;
Fill Htab6(1,1,1,-1,-1,1)=z2*z3*ln2+7/16*z2*z3*Sinf+1/8*z2*ln2^2*
   Sinf^2+1/3*z2*ln2^3*Sinf+1/6*z2*ln2^4-3/40*z2^2*ln2*Sinf-11/80*z2^2
   *ln2^2-1/16*z2^2*Sinf^2-9/112*z2^3-1/2*z3*ln2^2*Sinf-7/18*z3*ln2^3
   +1/48*z3*Sinf^3-71/96*z3^2-29/64*z5*Sinf-1/36*ln2^3*Sinf^3-1/16*
   ln2^4*Sinf^2-1/20*ln2^5*Sinf-1/80*ln2^6+li6half-1/4*s6;
Fill Htab6(1,1,1,-1,-1,0)=-5/3*z2*z3*ln2-11/16*z2*z3*Sinf-1/12*z2*ln2*
   Sinf^3-1/4*z2*ln2^2*Sinf^2-1/6*z2*ln2^3*Sinf+z2*li4half+3/2*z2^2*
   ln2*Sinf+19/20*z2^2*ln2^2+7/20*z2^2*Sinf^2+29/35*z2^3+1/48*z3*
   Sinf^3+5/3*z3^2-123/32*z5*Sinf-1/24*ln2^4*Sinf^2-1/24*ln2^5*Sinf-
   1/90*ln2^6+5*Sinf*li5half-Sinf^2*li4half-8*li6half-2*s6;
Fill Htab6(1,1,1,-1,1,-1)=13/6*z2*z3*ln2+9/8*z2*z3*Sinf+1/12*z2*ln2*
   Sinf^3+3/8*z2*ln2^2*Sinf^2+1/3*z2*ln2^3*Sinf+1/8*z2*ln2^4-1/40*z2^2
   *ln2*Sinf-21/80*z2^2*ln2^2+9/80*z2^2*Sinf^2-431/560*z2^3-z3*ln2*
   Sinf^2-z3*ln2^2*Sinf-7/18*z3*ln2^3-1/24*z3*Sinf^3-173/96*z3^2-4*
   z5*ln2+23/64*z5*Sinf-1/36*ln2^3*Sinf^3-1/16*ln2^4*Sinf^2-1/40*ln2^5
   *Sinf-1/240*ln2^6-3*Sinf*li5half+7*li6half+9/4*s6;
Fill Htab6(1,1,1,-1,1,1)=-1/6*z2*z3*ln2-7/16*z2*z3*Sinf-1/12*z2*ln2*
   Sinf^3-1/12*z2*ln2^3*Sinf+3/2*z2*li4half+1/4*z2^2*ln2*Sinf+1/18*z3*
   ln2^3+7/48*z3*Sinf^3+7/24*z3^2+1/36*ln2^3*Sinf^3+6*Sinf*li5half-3/
   2*Sinf^2*li4half-10*li6half;
Fill Htab6(1,1,1,-1,1,0)=1/6*z2*z3*ln2+9/4*z2*z3*Sinf+1/12*z2*ln2*
   Sinf^3+1/8*z2*ln2^2*Sinf^2+1/12*z2*ln2^3*Sinf-1/6*z2*ln2^4-9/2*z2*
   li4half-47/40*z2^2*ln2*Sinf+7/80*z2^2*ln2^2-3/16*z2^2*Sinf^2+73/560
   *z2^3-1/6*z3*Sinf^3-125/96*z3^2+29/64*z5*Sinf+1/16*ln2^4*Sinf^2+1/
   20*ln2^5*Sinf+1/80*ln2^6-6*Sinf*li5half+3/2*Sinf^2*li4half+9*
   li6half+1/4*s6;
Fill Htab6(1,1,1,-1,0,-1)=-59/24*z2*z3*ln2-3/4*z2*z3*Sinf+1/12*z2*ln2*
   Sinf^3-3/8*z2*ln2^2*Sinf^2-1/6*z2*ln2^3*Sinf-5/48*z2*ln2^4-2*z2*
   li4half-15/8*z2^2*ln2*Sinf-7/16*z2^2*ln2^2-3/4*z2^2*Sinf^2-139/560*
   z2^3+21/16*z3*ln2*Sinf^2+21/16*z3*ln2^2*Sinf+7/16*z3*ln2^3-1/24*z3*
   Sinf^3+5/12*z3^2+155/32*z5*ln2+61/8*z5*Sinf-ln2*Sinf*li4half-ln2*
   li5half-1/2*ln2^2*li4half+1/12*ln2^4*Sinf^2+1/120*ln2^5*Sinf-1/144*
   ln2^6-6*Sinf*li5half+2*Sinf^2*li4half+4*li6half+s6;
Fill Htab6(1,1,1,-1,0,1)=1/3*z2*z3*ln2+19/16*z2*z3*Sinf+1/6*z2*ln2*
   Sinf^3-1/8*z2*ln2^2*Sinf^2-1/12*z2*ln2^3*Sinf-1/8*z2*ln2^4-5/2*z2*
   li4half-1/40*z2^2*ln2*Sinf+49/80*z2^2*ln2^2-29/80*z2^2*Sinf^2+47/
   112*z2^3-5/48*z3*Sinf^3-23/96*z3^2-23/64*z5*Sinf+1/16*ln2^4*Sinf^2
   +1/40*ln2^5*Sinf+1/240*ln2^6-3*Sinf*li5half+3/2*Sinf^2*li4half+3*
   li6half-9/4*s6;
Fill Htab6(1,1,1,-1,0,0)=-2*z2*z3*Sinf+1/4*z2*ln2^2*Sinf^2+1/6*z2*ln2^3
   *Sinf+5/24*z2*ln2^4+4*z2*li4half+1/10*z2^2*ln2*Sinf-19/20*z2^2*
   ln2^2+1/10*z2^2*Sinf^2-121/140*z2^3+1/8*z3*Sinf^3+3/4*z3^2+15/8*
   z5*Sinf-1/24*ln2^4*Sinf^2-1/60*ln2^5*Sinf-1/360*ln2^6+2*Sinf*
   li5half-Sinf^2*li4half-2*li6half+2*s6;
Fill Htab6(1,1,1,1,-1,-1)=-7/6*z2*z3*ln2-9/16*z2*z3*Sinf-1/12*z2*ln2*
   Sinf^3-3/8*z2*ln2^2*Sinf^2-1/3*z2*ln2^3*Sinf-5/48*z2*ln2^4+1/5*z2^2
   *ln2*Sinf+19/80*z2^2*ln2^2-1/40*z2^2*Sinf^2+9/40*z2^3+1/2*z3*ln2*
   Sinf^2+2/3*z3*ln2^2*Sinf+5/18*z3*ln2^3+1/48*z3*Sinf^3+2/3*z3^2+z5
   *ln2+1/32*z5*Sinf+1/48*ln2^2*Sinf^4+1/18*ln2^3*Sinf^3+1/16*ln2^4*
   Sinf^2+1/40*ln2^5*Sinf+1/240*ln2^6+Sinf*li5half-2*li6half-1/2*s6;
Fill Htab6(1,1,1,1,-1,1)=1/3*z2*z3*ln2+25/24*z2*z3*Sinf+1/6*z2*ln2*
   Sinf^3+1/8*z2*ln2^2*Sinf^2+1/6*z2*ln2^3*Sinf+1/48*z2*Sinf^4-3/2*z2*
   li4half-1/2*z2^2*ln2*Sinf-1/80*z2^2*ln2^2-1/8*z2^2*Sinf^2+1/80*z2^3
   -1/6*z3*ln2^2*Sinf-1/9*z3*ln2^3-7/24*z3*Sinf^3-7/12*z3^2-1/48*
   ln2^2*Sinf^4-1/18*ln2^3*Sinf^3-4*Sinf*li5half+3/2*Sinf^2*li4half+5*
   li6half;
Fill Htab6(1,1,1,1,-1,0)=-1/2*z2*z3*ln2-89/48*z2*z3*Sinf-1/4*z2*ln2*
   Sinf^3+5/48*z2*ln2^4-1/48*z2*Sinf^4+5/2*z2*li4half+9/10*z2^2*ln2*
   Sinf-7/40*z2^2*ln2^2+2/5*z2^2*Sinf^2-23/80*z2^3+13/48*z3*Sinf^3+
   19/24*z3^2-1/32*z5*Sinf-1/16*ln2^4*Sinf^2-1/40*ln2^5*Sinf-1/240*
   ln2^6+3*Sinf*li5half-3/2*Sinf^2*li4half-3*li6half+1/2*s6;
Fill Htab6(1,1,1,1,1,-1)=-1/3*z2*z3*ln2-29/48*z2*z3*Sinf-1/6*z2*ln2*
   Sinf^3-1/8*z2*ln2^2*Sinf^2-1/12*z2*ln2^3*Sinf-1/48*z2*Sinf^4+1/2*z2
   *li4half+11/40*z2^2*ln2*Sinf+1/80*z2^2*ln2^2+1/8*z2^2*Sinf^2-1/80*
   z2^3+1/6*z3*ln2*Sinf^2+1/6*z3*ln2^2*Sinf+1/18*z3*ln2^3+7/48*z3*
   Sinf^3+7/24*z3^2+1/5*z5*ln2+1/120*ln2*Sinf^5+1/48*ln2^2*Sinf^4+1/
   36*ln2^3*Sinf^3+Sinf*li5half-1/2*Sinf^2*li4half-li6half;
Fill Htab6(1,1,1,1,1,1)=-1/6*z2*z3*Sinf-1/48*z2*Sinf^4+1/80*z2^2*Sinf^2
   -1/112*z2^3+1/18*z3*Sinf^3+1/18*z3^2+1/5*z5*Sinf+1/720*Sinf^6;
Fill Htab6(1,1,1,1,1,0)=-5/6*z2*z3*Sinf-1/24*z2*Sinf^4+1/20*z2^2*Sinf^2
   -3/56*z2^3+1/6*z3*Sinf^3+1/3*z3^2+z5*Sinf;
Fill Htab6(1,1,1,1,0,-1)=-7/8*z2*z3*ln2+1/24*z2*z3*Sinf-1/8*z2*ln2^2*
   Sinf^2-1/6*z2*ln2^3*Sinf-5/48*z2*ln2^4+1/48*z2*Sinf^4-z2*li4half+
   1/4*z2^2*ln2^2-3/16*z2^2*Sinf^2+3/40*z2^3+7/16*z3*ln2*Sinf^2+7/16*
   z3*ln2^2*Sinf+7/48*z3*ln2^3-5/48*z3*Sinf^3+67/384*z3^2-27/32*z5*
   Sinf+ln2*Sinf*li4half+ln2*li5half+1/2*ln2^2*li4half+1/48*ln2^4*
   Sinf^2+1/30*ln2^5*Sinf+1/72*ln2^6+Sinf*li5half+1/2*Sinf^2*li4half
   +li6half;
Fill Htab6(1,1,1,1,0,1)=4/3*z2*z3*Sinf+1/24*z2*Sinf^4+7/20*z2^2*Sinf^2
   +159/280*z2^3-1/3*z3*Sinf^3-2/3*z3^2-4*z5*Sinf;
Fill Htab6(1,1,1,1,0,0)=-3/2*z2*z3*Sinf-1/20*z2^2*Sinf^2-17/140*z2^3+
   1/6*z3*Sinf^3+5/6*z3^2+2*z5*Sinf;
Fill Htab6(1,1,1,0,-1,-1)=-7/16*z2*z3*ln2-1/16*z2*z3*Sinf-1/6*z2*ln2^3*
   Sinf-7/48*z2*ln2^4-1/2*z2*li4half+1/8*z2^2*ln2^2-3/80*z2^2*Sinf^2
   -3/16*z2^3+7/16*z3*ln2^2*Sinf+7/24*z3*ln2^3+1/48*z3*Sinf^3-35/384
   *z3^2-31/32*z5*ln2-25/32*z5*Sinf+ln2*Sinf*li4half+2*ln2*li5half+
   ln2^2*li4half+1/30*ln2^5*Sinf+1/36*ln2^6+Sinf*li5half+2*li6half+1/
   2*s6;
Fill Htab6(1,1,1,0,-1,1)=3/8*z2*z3*ln2-3/8*z2*z3*Sinf-1/4*z2*ln2*
   Sinf^3+3/8*z2*ln2^2*Sinf^2+1/12*z2*ln2^3*Sinf+3/16*z2*ln2^4+2*z2*
   li4half-13/40*z2^2*ln2*Sinf-1/2*z2^2*ln2^2+9/80*z2^2*Sinf^2-351/560
   *z2^3-7/16*z3*ln2^2*Sinf-7/24*z3*ln2^3+13/48*z3*Sinf^3-223/192*z3^2
   +81/64*z5*Sinf-1/2*ln2^2*li4half-1/16*ln2^4*Sinf^2-1/120*ln2^5*Sinf
   -7/360*ln2^6+Sinf*li5half-3/2*Sinf^2*li4half+li6half+5/2*s6;
Fill Htab6(1,1,1,0,-1,0)=-21/16*z2*z3*ln2+15/16*z2*z3*Sinf-1/16*z2*
   ln2^4-3/2*z2*li4half+3/8*z2^2*ln2^2+17/80*z2^2*Sinf^2+149/336*z2^3
   -1/4*z3*Sinf^3-13/128*z3^2-41/32*z5*Sinf;
Fill Htab6(1,1,1,0,1,-1)=9/4*z2*z3*ln2+11/8*z2*z3*Sinf+1/4*z2*ln2*
   Sinf^3-1/8*z2*ln2^2*Sinf^2+5/12*z2*ln2^3*Sinf+3/16*z2*ln2^4+z2*
   li4half+13/40*z2^2*ln2*Sinf-1/4*z2^2*ln2^2+1/80*z2^2*Sinf^2+281/560
   *z2^3-7/8*z3*ln2*Sinf^2-7/8*z3*ln2^2*Sinf-7/24*z3*ln2^3-1/6*z3*
   Sinf^3-31/192*z3^2+81/64*z5*Sinf-3*ln2*Sinf*li4half-4*ln2*li5half
   -3/2*ln2^2*li4half+1/48*ln2^4*Sinf^2-11/120*ln2^5*Sinf-13/360*ln2^6
   -4*Sinf*li5half+1/2*Sinf^2*li4half-5*li6half-5/2*s6;
Fill Htab6(1,1,1,0,1,1)=-1/2*z2*z3*Sinf-3/5*z2^2*Sinf^2-59/35*z2^3+1/
   6*z3*Sinf^3+1/3*z3^2+6*z5*Sinf;
Fill Htab6(1,1,1,0,1,0)=3*z2*z3*Sinf+7/20*z2^2*Sinf^2+149/420*z2^3-1/
   3*z3*Sinf^3-5/3*z3^2-11/2*z5*Sinf;
Fill Htab6(1,1,1,0,0,-1)=-7/4*z2*z3*ln2-3/4*z2*z3*Sinf-1/4*z2*ln2^2*
   Sinf^2-1/3*z2*ln2^3*Sinf-5/24*z2*ln2^4-2*z2*li4half+1/2*z2^2*ln2^2
   -11/20*z2^2*Sinf^2+37/840*z2^3+7/8*z3*ln2*Sinf^2+7/8*z3*ln2^2*Sinf
   +7/24*z3*ln2^3+1/8*z3*Sinf^3+57/64*z3^2+31/32*z5*ln2-15/32*z5*
   Sinf+2*ln2*Sinf*li4half+2*ln2*li5half+ln2^2*li4half+1/24*ln2^4*
   Sinf^2+1/15*ln2^5*Sinf+1/36*ln2^6+2*Sinf*li5half+Sinf^2*li4half+2
   *li6half-1/2*s6;
Fill Htab6(1,1,1,0,0,1)=1/2*z2*z3*Sinf-1/4*z2^2*Sinf^2+97/420*z2^3+1/
   6*z3*Sinf^3-2/3*z3^2-1/2*z5*Sinf;
Fill Htab6(1,1,1,0,0,0)=-z2*z3*Sinf-1/5*z2^2*Sinf^2-9/70*z2^3+z3^2+
   2*z5*Sinf;
Fill Htab6(1,1,0,-1,-1,-1)=7/8*z2*z3*ln2+7/16*z2*z3*Sinf+1/8*z2*ln2^2*
   Sinf^2+1/6*z2*ln2^3*Sinf+1/24*z2*ln2^4+z2*li4half-1/4*z2^2*ln2^2+
   1/5*z2^2*Sinf^2-73/280*z2^3-7/16*z3*ln2*Sinf^2-7/16*z3*ln2^2*Sinf-
   49/128*z3^2+1/8*z5*Sinf-ln2*Sinf*li4half-1/48*ln2^4*Sinf^2-1/30*
   ln2^5*Sinf-Sinf*li5half-1/2*Sinf^2*li4half;
Fill Htab6(1,1,0,-1,-1,1)=1/8*z2*ln2^2*Sinf^2-1/4*z2*ln2^3*Sinf+1/16*
   z2*ln2^4-1/2*z2*li4half-3/20*z2^2*ln2*Sinf+23/80*z2^2*ln2^2-9/40*
   z2^2*Sinf^2-9/56*z2^3-7/48*z3*ln2^3+19/128*z3^2+29/16*z5*Sinf-1/2
   *ln2^2*li4half+1/24*ln2^4*Sinf^2+1/40*ln2^5*Sinf-13/720*ln2^6-3*
   Sinf*li5half+Sinf^2*li4half+2*li6half-1/4*s6;
Fill Htab6(1,1,0,-1,-1,0)=-7/16*z2*z3*ln2-1/8*z2*z3*Sinf-1/48*z2*ln2^4
   -1/2*z2*li4half+1/8*z2^2*ln2^2-1/16*z2^2*Sinf^2+71/560*z2^3+15/
   128*z3^2+5/8*z5*Sinf;
Fill Htab6(1,1,0,-1,1,-1)=-35/16*z2*z3*ln2-21/16*z2*z3*Sinf-3/4*z2*
   ln2^2*Sinf^2+1/6*z2*ln2^3*Sinf-1/6*z2*ln2^4-1/2*z2*li4half+1/5*z2^2
   *ln2*Sinf-1/5*z2^2*ln2^2-7/40*z2^2*Sinf^2+529/560*z2^3+21/16*z3*ln2
   *Sinf^2+21/16*z3*ln2^2*Sinf+7/24*z3*ln2^3+241/128*z3^2+279/64*z5*
   ln2-101/64*z5*Sinf+ln2*Sinf*li4half-2*ln2*li5half+1/2*ln2^2*li4half
   +1/36*ln2^6+5*Sinf*li5half-7*li6half-9/4*s6;
Fill Htab6(1,1,0,-1,1,1)=-7/16*z2*z3*ln2-1/4*z2*ln2^3*Sinf-1/12*z2*
   ln2^4-3/2*z2*li4half+39/40*z2^2*ln2*Sinf+43/80*z2^2*ln2^2-11/40*
   z2^2*Sinf^2+25/56*z2^3+7/48*z3*ln2^3+229/128*z3^2-23/64*z5*Sinf+1/
   16*ln2^4*Sinf^2+1/40*ln2^5*Sinf+1/720*ln2^6-3*Sinf*li5half+3/2*
   Sinf^2*li4half+li6half-15/4*s6;
Fill Htab6(1,1,0,-1,1,0)=7/16*z2*z3*ln2-13/8*z2*z3*Sinf+1/2*z2*ln2^2*
   Sinf^2+5/24*z2*ln2^4+5*z2*li4half-9/8*z2^2*ln2*Sinf-5/4*z2^2*ln2^2
   +13/80*z2^2*Sinf^2-711/560*z2^3-15/16*z3^2+363/64*z5*Sinf-1/12*
   ln2^4*Sinf^2-2*Sinf^2*li4half+7/2*s6;
Fill Htab6(1,1,0,-1,0,-1)=63/16*z2*z3*ln2+23/16*z2*z3*Sinf+1/2*z2*
   ln2^2*Sinf^2+2/3*z2*ln2^3*Sinf+7/16*z2*ln2^4+9/2*z2*li4half-9/8*
   z2^2*ln2^2+13/16*z2^2*Sinf^2-79/140*z2^3-7/4*z3*ln2*Sinf^2-7/4*z3*
   ln2^2*Sinf-7/12*z3*ln2^3-137/128*z3^2+31/16*z5*ln2+33/32*z5*Sinf-
   4*ln2*Sinf*li4half-4*ln2*li5half-2*ln2^2*li4half-1/12*ln2^4*Sinf^2-
   2/15*ln2^5*Sinf-1/18*ln2^6-4*Sinf*li5half-2*Sinf^2*li4half-4*
   li6half-s6;
Fill Htab6(1,1,0,-1,0,1)=7/8*z2*z3*ln2-5/8*z2*z3*Sinf+1/24*z2*ln2^4+
   z2*li4half-1/4*z2^2*ln2^2+3/80*z2^2*Sinf^2-261/560*z2^3+45/128*z3^2
   +29/32*z5*Sinf;
Fill Htab6(1,1,0,-1,0,0)=3/2*z2*z3*Sinf+21/40*z2^2*Sinf^2-19/420*z2^3
   -47/64*z3^2-67/16*z5*Sinf;
Fill Htab6(1,1,0,1,-1,-1)=7/2*z2*z3*ln2+21/16*z2*z3*Sinf+5/8*z2*ln2^2*
   Sinf^2+5/12*z2*ln2^3*Sinf+13/24*z2*ln2^4+5/2*z2*li4half-1/20*z2^2*
   ln2*Sinf-37/80*z2^2*ln2^2+7/16*z2^2*Sinf^2-41/280*z2^3-21/16*z3*ln2
   *Sinf^2-35/16*z3*ln2^2*Sinf-49/48*z3*ln2^3-209/128*z3^2-93/64*z5*
   ln2+85/64*z5*Sinf-3*ln2*Sinf*li4half-4*ln2*li5half-3*ln2^2*li4half
   -1/24*ln2^4*Sinf^2-11/120*ln2^5*Sinf-67/720*ln2^6-4*Sinf*li5half-
   Sinf^2*li4half-li6half+s6;
Fill Htab6(1,1,0,1,-1,1)=-7/4*z2*z3*ln2-7/8*z2*z3*Sinf-3/8*z2*ln2^2*
   Sinf^2+1/3*z2*ln2^3*Sinf-13/48*z2*ln2^4+1/5*z2^2*ln2*Sinf-13/40*
   z2^2*ln2^2+7/16*z2^2*Sinf^2+61/80*z2^3+7/8*z3*ln2^2*Sinf+7/12*z3*
   ln2^3+49/32*z3^2-29/16*z5*Sinf+3/2*ln2^2*li4half-1/16*ln2^4*Sinf^2
   -1/30*ln2^5*Sinf+1/18*ln2^6+4*Sinf*li5half-3/2*Sinf^2*li4half-5*
   li6half;
Fill Htab6(1,1,0,1,-1,0)=21/8*z2*z3*ln2+15/8*z2*z3*Sinf-1/2*z2*ln2^2*
   Sinf^2-1/16*z2*ln2^4-3/2*z2*li4half+9/8*z2^2*ln2*Sinf+3/8*z2^2*
   ln2^2-33/80*z2^2*Sinf^2-11/560*z2^3-39/64*z3^2-257/64*z5*Sinf+1/
   12*ln2^4*Sinf^2+2*Sinf^2*li4half-7/2*s6;
Fill Htab6(1,1,0,1,1,-1)=-7/8*z2*z3*ln2-7/16*z2*z3*Sinf+1/4*z2*ln2^2*
   Sinf^2-7/12*z2*ln2^3*Sinf-1/6*z2*ln2^4-2*z2*li4half-47/40*z2^2*ln2*
   Sinf+53/80*z2^2*ln2^2-9/40*z2^2*Sinf^2-321/280*z2^3+7/16*z3*ln2*
   Sinf^2+7/16*z3*ln2^2*Sinf+7/48*z3*ln2^3-131/128*z3^2-23/64*z5*Sinf
   +3*ln2*Sinf*li4half+6*ln2*li5half+3/2*ln2^2*li4half+1/48*ln2^4*
   Sinf^2+13/120*ln2^5*Sinf+19/720*ln2^6+2*Sinf*li5half+1/2*Sinf^2*
   li4half+10*li6half+15/4*s6;
Fill Htab6(1,1,0,1,1,1)=1/5*z2^2*Sinf^2+73/35*z2^3-4*z5*Sinf;
Fill Htab6(1,1,0,1,1,0)=-z2*z3*Sinf-1/4*z2^2*Sinf^2-117/140*z2^3+1/2*
   z3^2+9/2*z5*Sinf;
Fill Htab6(1,1,0,1,0,-1)=7/2*z2*z3*ln2+3/4*z2*z3*Sinf+1/2*z2*ln2^2*
   Sinf^2+2/3*z2*ln2^3*Sinf+5/12*z2*ln2^4+4*z2*li4half-z2^2*ln2^2+71/
   80*z2^2*Sinf^2+25/56*z2^3-7/4*z3*ln2*Sinf^2-7/4*z3*ln2^2*Sinf-7/12*
   z3*ln2^3-7/4*z3^2-279/64*z5*ln2+89/64*z5*Sinf-4*ln2*Sinf*li4half-
   4*ln2*li5half-2*ln2^2*li4half-1/12*ln2^4*Sinf^2-2/15*ln2^5*Sinf-1/
   18*ln2^6-4*Sinf*li5half-2*Sinf^2*li4half-4*li6half+9/4*s6;
Fill Htab6(1,1,0,1,0,1)=-2*z2*z3*Sinf+3/20*z2^2*Sinf^2-13/140*z2^3+2*
   z3^2+2*z5*Sinf;
Fill Htab6(1,1,0,1,0,0)=2*z2*z3*Sinf+3/5*z2^2*Sinf^2+11/30*z2^3-2*
   z3^2-11/2*z5*Sinf;
Fill Htab6(1,1,0,0,-1,-1)=-21/8*z2*z3*ln2-7/8*z2*z3*Sinf-1/4*z2*ln2^2*
   Sinf^2-2/3*z2*ln2^3*Sinf-1/2*z2*ln2^4-3*z2*li4half+3/4*z2^2*ln2^2
   -3/8*z2^2*Sinf^2-47/280*z2^3+7/8*z3*ln2*Sinf^2+7/4*z3*ln2^2*Sinf+
   7/8*z3*ln2^3+3/8*z3^2-93/32*z5*ln2-39/16*z5*Sinf+4*ln2*Sinf*li4half
   +6*ln2*li5half+3*ln2^2*li4half+1/24*ln2^4*Sinf^2+2/15*ln2^5*Sinf+
   1/12*ln2^6+4*Sinf*li5half+Sinf^2*li4half+6*li6half+3/2*s6;
Fill Htab6(1,1,0,0,-1,1)=1/4*z2*z3*ln2+7/8*z2*z3*Sinf-1/4*z2*ln2^2*
   Sinf^2+1/6*z2*ln2^3*Sinf+5/24*z2*ln2^4+8/5*z2^2*ln2*Sinf-1/10*z2^2*
   Sinf^2-1/280*z2^3-7/8*z3*ln2^2*Sinf-7/12*z3*ln2^3-29/32*z3^2-85/
   16*z5*Sinf-ln2^2*li4half+1/24*ln2^4*Sinf^2-1/60*ln2^5*Sinf-7/180*
   ln2^6+2*Sinf*li5half+Sinf^2*li4half+2*li6half+1/2*s6;
Fill Htab6(1,1,0,0,-1,0)=-21/8*z2*z3*ln2-13/8*z2*z3*Sinf-1/8*z2*ln2^4
   -3*z2*li4half+3/4*z2^2*ln2^2-21/40*z2^2*Sinf^2+193/210*z2^3+67/64
   *z3^2+83/16*z5*Sinf;
Fill Htab6(1,1,0,0,1,-1)=-1/4*z2*z3*ln2-7/8*z2*z3*Sinf-1/6*z2*ln2^3*
   Sinf-1/12*z2*ln2^4-8/5*z2^2*ln2*Sinf-19/80*z2^2*Sinf^2+21/40*z2^3
   +7/8*z3*ln2*Sinf^2+7/8*z3*ln2^2*Sinf+7/24*z3*ln2^3+47/64*z3^2+93/
   64*z5*ln2+311/64*z5*Sinf-2*ln2*li5half+1/60*ln2^5*Sinf+1/90*ln2^6
   -2*Sinf*li5half-4*li6half-5/4*s6;
Fill Htab6(1,1,0,0,1,1)=1/20*z2^2*Sinf^2-1/20*z2^3+1/2*z3^2-1/2*z5*
   Sinf;
Fill Htab6(1,1,0,0,1,0)=-z2*z3*Sinf-3/5*z2^2*Sinf^2+41/210*z2^3-1/2*
   z3^2+9/2*z5*Sinf;
Fill Htab6(1,1,0,0,0,-1)=1/2*z2*z3*Sinf+7/40*z2^2*Sinf^2-13/42*z2^3+
   5/8*z3^2+93/32*z5*ln2-59/32*z5*Sinf-3/2*s6;
Fill Htab6(1,1,0,0,0,1)=z2*z3*Sinf+1/5*z2^2*Sinf^2+47/210*z2^3-1/2*
   z3^2-3*z5*Sinf;
Fill Htab6(1,1,0,0,0,0)=-6/35*z2^3+1/2*z3^2+z5*Sinf;
Fill Htab6(1,0,-1,-1,-1,-1)=7/16*z2*z3*ln2+1/6*z2*ln2^3*Sinf+7/48*z2*
   ln2^4+1/2*z2*li4half-1/8*z2^2*ln2^2+6/35*z2^3-7/16*z3*ln2^2*Sinf-
   7/24*z3*ln2^3+17/128*z3^2+31/32*z5*ln2+z5*Sinf-ln2*Sinf*li4half-2
   *ln2*li5half-ln2^2*li4half-1/30*ln2^5*Sinf-1/36*ln2^6-Sinf*li5half
   -2*li6half-1/2*s6;
Fill Htab6(1,0,-1,-1,-1,1)=-7/8*z2*z3*ln2-7/8*z2*z3*Sinf-1/6*z2*ln2^3*
   Sinf-1/16*z2*ln2^4-1/2*z2*li4half+1/20*z2^2*ln2*Sinf+1/5*z2^2*ln2^2
   +33/70*z2^3+7/16*z3*ln2^2*Sinf+7/24*z3*ln2^3+181/128*z3^2+15/16*
   z5*Sinf+1/2*ln2^2*li4half-1/120*ln2^5*Sinf+11/720*ln2^6+Sinf*
   li5half-4*li6half-s6;
Fill Htab6(1,0,-1,-1,-1,0)=21/16*z2*z3*ln2+15/16*z2*z3*Sinf+1/16*z2*
   ln2^4+3/2*z2*li4half-3/8*z2^2*ln2^2-197/840*z2^3-131/128*z3^2-59/
   32*z5*Sinf;
Fill Htab6(1,0,-1,-1,1,-1)=21/16*z2*z3*Sinf+1/12*z2*ln2^3*Sinf-17/48*
   z2*ln2^4-3/2*z2*li4half-1/10*z2^2*ln2*Sinf+1/5*z2^2*ln2^2-29/35*
   z2^3-321/128*z3^2-341/64*z5*ln2-125/32*z5*Sinf+3*ln2*Sinf*li4half
   +4*ln2*li5half+3/2*ln2^2*li4half+7/60*ln2^5*Sinf+11/240*ln2^6+
   Sinf*li5half+12*li6half+9/2*s6;
Fill Htab6(1,0,-1,-1,1,1)=-3/16*z2*z3*Sinf-1/12*z2*ln2^3*Sinf+1/8*z2*
   ln2^4+z2^2*ln2*Sinf-33/80*z2^2*ln2^2+113/140*z2^3+57/128*z3^2-123/
   32*z5*Sinf-1/24*ln2^5*Sinf-1/120*ln2^6+5*Sinf*li5half-6*li6half-3/
   4*s6;
Fill Htab6(1,0,-1,-1,1,0)=13/16*z2*z3*Sinf-1/3*z2*ln2^3*Sinf-1/12*z2*
   ln2^4-2*z2*li4half-1/5*z2^2*ln2*Sinf+17/16*z2^2*ln2^2+25/42*z2^3+
   91/128*z3^2+7/8*z5*Sinf+1/30*ln2^5*Sinf-4*Sinf*li5half-13/4*s6;
Fill Htab6(1,0,-1,-1,0,-1)=-23/16*z2*z3*Sinf-129/280*z2^3+151/128*z3^2
   +93/64*z5*ln2+177/64*z5*Sinf-3/4*s6;
Fill Htab6(1,0,-1,-1,0,1)=-5/16*z2*z3*Sinf-3/40*z2^3+25/128*z3^2+5/8*
   z5*Sinf;
Fill Htab6(1,0,-1,-1,0,0)=-1/2*z2*z3*Sinf-41/168*z2^3+3/8*z3^2+23/16*
   z5*Sinf;
Fill Htab6(1,0,-1,1,-1,-1)=-21/16*z2*z3*ln2-21/16*z2*z3*Sinf-5/12*z2*
   ln2^3*Sinf+1/8*z2*ln2^4+3/2*z2*li4half-49/40*z2^2*ln2*Sinf-1/4*z2^2
   *ln2^2+493/560*z2^3+21/16*z3*ln2^2*Sinf+7/8*z3*ln2^3+243/64*z3^2+
   93/8*z5*ln2+247/32*z5*Sinf-3*ln2*Sinf*li4half-6*ln2*li5half-ln2^2*
   li4half-1/12*ln2^5*Sinf-1/80*ln2^6-5*Sinf*li5half-15*li6half-15/2
   *s6;
Fill Htab6(1,0,-1,1,-1,1)=21/8*z2*z3*ln2+27/16*z2*z3*Sinf+3/4*z2*ln2^3
   *Sinf-1/24*z2*ln2^4+1/2*z2*li4half-21/40*z2^2*ln2*Sinf-13/40*z2^2*
   ln2^2-587/560*z2^3-21/16*z3*ln2^2*Sinf-7/8*z3*ln2^3-105/32*z3^2-
   29/64*z5*Sinf-1/2*ln2^2*li4half+1/40*ln2^5*Sinf-1/120*ln2^6-3*Sinf*
   li5half+9*li6half+7/4*s6;
Fill Htab6(1,0,-1,1,-1,0)=-63/16*z2*z3*ln2-29/16*z2*z3*Sinf+2/3*z2*
   ln2^3*Sinf-1/48*z2*ln2^4-1/2*z2*li4half+23/20*z2^2*ln2*Sinf-z2^2*
   ln2^2+17/48*z2^3+73/128*z3^2-3*z5*Sinf-1/15*ln2^5*Sinf+8*Sinf*
   li5half+5*s6;
Fill Htab6(1,0,-1,1,1,-1)=-1/3*z2*ln2^3*Sinf-1/2*z2*li4half-1/10*z2^2*
   ln2*Sinf+6/5*z2^2*ln2^2-467/560*z2^3-45/32*z3^2-465/64*z5*ln2+33/
   64*z5*Sinf+ln2*Sinf*li4half+4*ln2*li5half+1/2*ln2^2*li4half+1/20*
   ln2^5*Sinf-Sinf*li5half+9*li6half+15/4*s6;
Fill Htab6(1,0,-1,1,1,1)=-7/8*z2*z3*Sinf+1/16*z2*ln2^4+3/20*z2^2*ln2*
   Sinf-39/80*z2^2*ln2^2-2/35*z2^3+1/32*z3^2-1/32*z5*Sinf-1/40*ln2^5
   *Sinf-1/240*ln2^6+3*Sinf*li5half-3*li6half+9/4*s6;
Fill Htab6(1,0,-1,1,1,0)=1/16*z2*z3*Sinf-1/3*z2*ln2^3*Sinf-1/8*z2*
   ln2^4-3*z2*li4half+7/40*z2^2*ln2*Sinf+21/16*z2^2*ln2^2+169/210*z2^3
   +247/128*z3^2+99/64*z5*Sinf+1/30*ln2^5*Sinf-4*Sinf*li5half-21/4*
   s6;
Fill Htab6(1,0,-1,1,0,-1)=-5/16*z2*z3*Sinf+2/3*z2*ln2^3*Sinf+13/48*z2*
   ln2^4+5/2*z2*li4half-17/5*z2^2*ln2*Sinf-5/8*z2^2*ln2^2+799/560*z2^3
   +649/128*z3^2+1457/64*z5*ln2+547/32*z5*Sinf-8*ln2*Sinf*li4half-16
   *ln2*li5half-4*ln2^2*li4half-1/5*ln2^5*Sinf-1/15*ln2^6-16*Sinf*
   li5half-24*li6half-13*s6;
Fill Htab6(1,0,-1,1,0,1)=5/2*z2*z3*Sinf-1/8*z2*ln2^4-3*z2*li4half-3/
   8*z2^2*ln2*Sinf+3/4*z2^2*ln2^2+183/140*z2^3-127/64*z3^2-257/64*z5*
   Sinf-3/2*s6;
Fill Htab6(1,0,-1,1,0,0)=-3/8*z2*z3*Sinf+1/6*z2*ln2^4+4*z2*li4half-9/
   4*z2^2*ln2*Sinf-z2^2*ln2^2-619/420*z2^3-53/64*z3^2+171/32*z5*Sinf
   +5*s6;
Fill Htab6(1,0,-1,0,-1,-1)=7/4*z2*z3*ln2+3/2*z2*z3*Sinf+2/3*z2*ln2^3*
   Sinf+7/12*z2*ln2^4+2*z2*li4half-1/2*z2^2*ln2^2+93/80*z2^3-7/4*z3*
   ln2^2*Sinf-7/6*z3*ln2^3-93/128*z3^2+155/64*z5*ln2+73/64*z5*Sinf-4
   *ln2*Sinf*li4half-8*ln2*li5half-4*ln2^2*li4half-2/15*ln2^5*Sinf-1/9
   *ln2^6-4*Sinf*li5half-8*li6half-5/4*s6;
Fill Htab6(1,0,-1,0,-1,1)=-41/16*z2*z3*ln2-2*z2*z3*Sinf-1/3*z2*ln2^3*
   Sinf-1/2*z2*ln2^4-2*z2*li4half-17/10*z2^2*ln2*Sinf+1/2*z2^2*ln2^2
   +153/280*z2^3+7/4*z3*ln2^2*Sinf+7/6*z3*ln2^3+383/128*z3^2+129/16*
   z5*Sinf+2*ln2^2*li4half+1/30*ln2^5*Sinf+7/90*ln2^6-4*Sinf*li5half
   -4*li6half-s6;
Fill Htab6(1,0,-1,0,-1,0)=21/4*z2*z3*ln2+11/4*z2*z3*Sinf+1/4*z2*ln2^4
   +6*z2*li4half-3/2*z2^2*ln2^2-49/40*z2^3-3*z3^2-23/4*z5*Sinf;
Fill Htab6(1,0,-1,0,1,-1)=-15/16*z2*z3*ln2+9/8*z2*z3*Sinf-1/3*z2*ln2^3*
   Sinf-1/6*z2*ln2^4-2*z2*li4half+17/10*z2^2*ln2*Sinf+1/2*z2^2*ln2^2
   -45/56*z2^3-133/64*z3^2-217/32*z5*ln2-331/32*z5*Sinf+4*ln2*Sinf*
   li4half+8*ln2*li5half+2*ln2^2*li4half+1/10*ln2^5*Sinf+1/30*ln2^6+
   8*Sinf*li5half+12*li6half+9/2*s6;
Fill Htab6(1,0,-1,0,1,1)=11/16*z2*z3*Sinf+17/56*z2^3-125/128*z3^2-41/
   32*z5*Sinf;
Fill Htab6(1,0,-1,0,1,0)=3/4*z2*z3*Sinf+17/140*z2^3+5/32*z3^2-2*z5*
   Sinf;
Fill Htab6(1,0,-1,0,0,-1)=-3/4*z2*z3*Sinf+677/1680*z2^3-45/64*z3^2-
   155/32*z5*ln2+51/32*z5*Sinf+5/2*s6;
Fill Htab6(1,0,-1,0,0,1)=-21/8*z2*z3*Sinf-643/840*z2^3+139/64*z3^2+83/
   16*z5*Sinf;
Fill Htab6(1,0,-1,0,0,0)=61/105*z2^3-3/4*z3^2-15/4*z5*Sinf;
Fill Htab6(1,0,1,-1,-1,-1)=21/16*z2*z3*ln2+7/16*z2*z3*Sinf+1/3*z2*
   ln2^3*Sinf+1/4*z2*ln2^4-1/2*z2*li4half+51/40*z2^2*ln2*Sinf+1/10*
   z2^2*ln2^2-45/112*z2^3-21/16*z3*ln2^2*Sinf-7/6*z3*ln2^3-31/16*z3^2
   -403/64*z5*ln2-39/8*z5*Sinf+ln2*Sinf*li4half+2*ln2*li5half-ln2^2*
   li4half+1/120*ln2^5*Sinf-7/144*ln2^6+4*Sinf*li5half+7*li6half+4*
   s6;
Fill Htab6(1,0,1,-1,-1,1)=-21/8*z2*z3*ln2-21/16*z2*z3*Sinf-1/3*z2*ln2^3
   *Sinf-5/12*z2*ln2^4-3/2*z2*li4half-53/40*z2^2*ln2*Sinf+13/40*z2^2*
   ln2^2+23/112*z2^3+21/16*z3*ln2^2*Sinf+7/6*z3*ln2^3+67/32*z3^2+405/
   64*z5*Sinf+3/2*ln2^2*li4half+1/30*ln2^5*Sinf+11/180*ln2^6-4*Sinf*
   li5half-li6half+1/4*s6;
Fill Htab6(1,0,1,-1,-1,0)=77/16*z2*z3*ln2+23/16*z2*z3*Sinf-1/3*z2*
   ln2^3*Sinf+7/48*z2*ln2^4+7/2*z2*li4half-19/20*z2^2*ln2*Sinf-5/16*
   z2^2*ln2^2-337/336*z2^3-219/128*z3^2+7/8*z5*Sinf+1/30*ln2^5*Sinf-
   4*Sinf*li5half-7/4*s6;
Fill Htab6(1,0,1,-1,1,-1)=-7/8*z2*z3*ln2-3/8*z2*z3*Sinf-1/4*z2*ln2^3*
   Sinf+3/8*z2*ln2^4+3/2*z2*li4half+21/40*z2^2*ln2*Sinf-7/40*z2^2*
   ln2^2+659/560*z2^3+7/24*z3*ln2^3+149/64*z3^2+93/16*z5*ln2+z5*Sinf
   -3*ln2*Sinf*li4half-4*ln2*li5half-3/2*ln2^2*li4half-1/8*ln2^5*Sinf
   -17/360*ln2^6-13*li6half-19/4*s6;
Fill Htab6(1,0,1,-1,1,1)=7/8*z2*z3*ln2+21/8*z2*z3*Sinf+1/4*z2*ln2^3*
   Sinf-7/48*z2*ln2^4-57/40*z2^2*ln2*Sinf+31/80*z2^2*ln2^2-6/35*z2^3
   -7/24*z3*ln2^3-235/64*z3^2+29/64*z5*Sinf+1/20*ln2^5*Sinf+7/720*
   ln2^6-6*Sinf*li5half+7*li6half+3/4*s6;
Fill Htab6(1,0,1,-1,1,0)=-7/8*z2*z3*ln2-z2*z3*Sinf+2/3*z2*ln2^3*Sinf+
   1/8*z2*ln2^4+3*z2*li4half+23/20*z2^2*ln2*Sinf-15/8*z2^2*ln2^2-59/84
   *z2^3-19/4*z5*Sinf-1/15*ln2^5*Sinf+8*Sinf*li5half+5*s6;
Fill Htab6(1,0,1,-1,0,-1)=-7/8*z2*z3*ln2-1/4*z2*z3*Sinf-2/3*z2*ln2^3*
   Sinf-5/16*z2*ln2^4-7/2*z2*li4half+17/5*z2^2*ln2*Sinf+7/8*z2^2*ln2^2
   -933/560*z2^3-123/32*z3^2-1271/64*z5*ln2-507/32*z5*Sinf+8*ln2*
   Sinf*li4half+16*ln2*li5half+4*ln2^2*li4half+1/5*ln2^5*Sinf+1/15*
   ln2^6+16*Sinf*li5half+24*li6half+23/2*s6;
Fill Htab6(1,0,1,-1,0,1)=-7/4*z2*z3*ln2-13/4*z2*z3*Sinf+1/24*z2*ln2^4
   +z2*li4half+3/8*z2^2*ln2*Sinf-1/4*z2^2*ln2^2-37/35*z2^3+207/64*
   z3^2+363/64*z5*Sinf+3/2*s6;
Fill Htab6(1,0,1,-1,0,0)=3/4*z2*z3*Sinf-1/6*z2*ln2^4-4*z2*li4half+9/
   4*z2^2*ln2*Sinf+z2^2*ln2^2+139/120*z2^3-1/32*z3^2-139/32*z5*Sinf-
   5*s6;
Fill Htab6(1,0,1,1,-1,-1)=-7/16*z2*z3*ln2+3/16*z2*z3*Sinf+1/12*z2*ln2^3
   *Sinf-23/48*z2*ln2^4-3/2*z2*li4half+17/40*z2^2*ln2*Sinf-19/80*z2^2*
   ln2^2-55/56*z2^3+7/16*z3*ln2^2*Sinf+7/24*z3*ln2^3-37/64*z3^2-93/
   64*z5*ln2-277/64*z5*Sinf+3*ln2*Sinf*li4half+6*ln2*li5half+3*ln2^2*
   li4half+11/120*ln2^5*Sinf+31/360*ln2^6+4*Sinf*li5half+8*li6half+5/
   4*s6;
Fill Htab6(1,0,1,1,-1,1)=7/8*z2*z3*ln2-35/16*z2*z3*Sinf-5/12*z2*ln2^3*
   Sinf+23/48*z2*ln2^4+3/2*z2*li4half+53/40*z2^2*ln2*Sinf+5/16*z2^2*
   ln2^2-36/35*z2^3-7/16*z3*ln2^2*Sinf-7/24*z3*ln2^3+137/64*z3^2+29/
   64*z5*Sinf-3/2*ln2^2*li4half-1/30*ln2^5*Sinf-47/720*ln2^6+4*Sinf*
   li5half-2*li6half-3/4*s6;
Fill Htab6(1,0,1,1,-1,0)=-21/16*z2*z3*ln2+19/16*z2*z3*Sinf-1/3*z2*ln2^3
   *Sinf-5/48*z2*ln2^4-5/2*z2*li4half-53/40*z2^2*ln2*Sinf+19/16*z2^2*
   ln2^2+551/420*z2^3-129/128*z3^2+99/64*z5*Sinf+1/30*ln2^5*Sinf-4*
   Sinf*li5half+1/4*s6;
Fill Htab6(1,0,1,1,1,-1)=7/8*z2*z3*Sinf+1/3*z2*ln2^3*Sinf-1/16*z2*
   ln2^4+1/2*z2*li4half-1/20*z2^2*ln2*Sinf-57/80*z2^2*ln2^2+44/35*z2^3
   -1/32*z3^2-1/32*z5*Sinf-ln2*Sinf*li4half-4*ln2*li5half-1/2*ln2^2*
   li4half-1/40*ln2^5*Sinf+1/240*ln2^6-2*Sinf*li5half-6*li6half-9/4*
   s6;
Fill Htab6(1,0,1,1,1,1)=-8/7*z2^3+z5*Sinf;
Fill Htab6(1,0,1,1,1,0)=z2*z3*Sinf+118/105*z2^3-z3^2-3*z5*Sinf;
Fill Htab6(1,0,1,1,0,-1)=-3/16*z2*z3*Sinf-711/560*z2^3+225/128*z3^2+
   465/64*z5*ln2+53/64*z5*Sinf-15/4*s6;
Fill Htab6(1,0,1,1,0,1)=-2*z2*z3*Sinf-6/5*z2^3+2*z3^2+9/2*z5*Sinf;
Fill Htab6(1,0,1,1,0,0)=z2*z3*Sinf-17/42*z2^3-1/2*z3^2-1/2*z5*Sinf;
Fill Htab6(1,0,1,0,-1,-1)=7/4*z2*z3*ln2+7/16*z2*z3*Sinf+2/3*z2*ln2^3*
   Sinf+7/12*z2*ln2^4+2*z2*li4half-1/2*z2^2*ln2^2+67/70*z2^3-7/4*z3*
   ln2^2*Sinf-7/6*z3*ln2^3-25/128*z3^2+155/64*z5*ln2+103/32*z5*Sinf-
   4*ln2*Sinf*li4half-8*ln2*li5half-4*ln2^2*li4half-2/15*ln2^5*Sinf-1/
   9*ln2^6-4*Sinf*li5half-8*li6half-5/4*s6;
Fill Htab6(1,0,1,0,-1,1)=-1/2*z2*z3*ln2+1/2*z2*z3*Sinf-1/3*z2*ln2^3*
   Sinf-1/2*z2*ln2^4-2*z2*li4half-83/40*z2^2*ln2*Sinf+1/2*z2^2*ln2^2
   +589/560*z2^3+7/4*z3*ln2^2*Sinf+7/6*z3*ln2^3-5/32*z3^2+259/64*z5*
   Sinf+2*ln2^2*li4half+1/30*ln2^5*Sinf+7/90*ln2^6-4*Sinf*li5half-4*
   li6half-7/4*s6;
Fill Htab6(1,0,1,0,-1,0)=21/4*z2*z3*ln2+1/4*z2*z3*Sinf+1/4*z2*ln2^4+
   6*z2*li4half-3/2*z2^2*ln2^2-191/112*z2^3+5/32*z3^2-2*z5*Sinf;
Fill Htab6(1,0,1,0,1,-1)=-3*z2*z3*ln2-7/8*z2*z3*Sinf-1/3*z2*ln2^3*Sinf
   -1/6*z2*ln2^4-2*z2*li4half+83/40*z2^2*ln2*Sinf+1/2*z2^2*ln2^2-661/
   560*z2^3+9/64*z3^2-93/16*z5*ln2-227/32*z5*Sinf+4*ln2*Sinf*li4half
   +8*ln2*li5half+2*ln2^2*li4half+1/10*ln2^5*Sinf+1/30*ln2^6+8*Sinf*
   li5half+12*li6half+19/4*s6;
Fill Htab6(1,0,1,0,1,1)=3*z2*z3*Sinf+8/7*z2^3-4*z3^2-11/2*z5*Sinf;
Fill Htab6(1,0,1,0,1,0)=-2*z2*z3*Sinf-31/70*z2^3+4*z3^2+2*z5*Sinf;
Fill Htab6(1,0,1,0,0,-1)=1/8*z2*z3*Sinf+683/840*z2^3-155/64*z3^2-217/
   32*z5*ln2+11/32*z5*Sinf+7/2*s6;
Fill Htab6(1,0,1,0,0,1)=-2*z2*z3*Sinf-143/210*z2^3+z3^2+9/2*z5*Sinf;
Fill Htab6(1,0,1,0,0,0)=74/105*z2^3-z3^2-4*z5*Sinf;
Fill Htab6(1,0,0,-1,-1,-1)=-7/8*z2*z3*ln2-1/2*z2*z3*Sinf-1/3*z2*ln2^3*
   Sinf-5/12*z2*ln2^4-z2*li4half+1/4*z2^2*ln2^2-673/840*z2^3+7/8*z3*
   ln2^2*Sinf+7/8*z3*ln2^3-9/64*z3^2-93/32*z5*ln2-33/32*z5*Sinf+2*
   ln2*Sinf*li4half+6*ln2*li5half+3*ln2^2*li4half+1/15*ln2^5*Sinf+1/12
   *ln2^6+2*Sinf*li5half+6*li6half+3/2*s6;
Fill Htab6(1,0,0,-1,-1,1)=7/4*z2*z3*ln2+3/4*z2*z3*Sinf+1/3*z2*ln2^3*
   Sinf+11/24*z2*ln2^4+2*z2*li4half+19/20*z2^2*ln2*Sinf-13/10*z2^2*
   ln2^2-221/210*z2^3-7/8*z3*ln2^2*Sinf-7/8*z3*ln2^3-179/64*z3^2-153/
   32*z5*Sinf-2*ln2^2*li4half-1/30*ln2^5*Sinf-3/40*ln2^6+4*Sinf*
   li5half+6*li6half+4*s6;
Fill Htab6(1,0,0,-1,-1,0)=-7/2*z2*z3*ln2-7/8*z2*z3*Sinf-1/6*z2*ln2^4-
   4*z2*li4half+z2^2*ln2^2+159/140*z2^3+49/32*z3^2+23/16*z5*Sinf;
Fill Htab6(1,0,0,-1,1,-1)=7/8*z2*z3*ln2+1/2*z2*z3*Sinf-1/2*z2*ln2^3*
   Sinf-1/12*z2*ln2^4-z2*li4half+11/40*z2^2*ln2*Sinf+37/20*z2^2*ln2^2
   +1091/1680*z2^3-7/24*z3*ln2^3+1/2*z3^2-155/32*z5*ln2-15/8*z5*Sinf
   +2*ln2*Sinf*li4half+2*ln2*li5half+ln2^2*li4half+1/12*ln2^5*Sinf+1/
   45*ln2^6-2*li6half-11/4*s6;
Fill Htab6(1,0,0,-1,1,1)=-7/8*z2*z3*ln2-13/8*z2*z3*Sinf+1/6*z2*ln2^3*
   Sinf-1/24*z2*ln2^4+1/10*z2^2*ln2*Sinf-4/5*z2^2*ln2^2-5/6*z2^3+7/
   24*z3*ln2^3+81/64*z3^2+15/8*z5*Sinf-1/60*ln2^5*Sinf+1/360*ln2^6+2
   *Sinf*li5half+2*li6half+3*s6;
Fill Htab6(1,0,0,-1,1,0)=7/8*z2*z3*ln2-1/12*z2*ln2^4-2*z2*li4half+9/
   4*z2^2*ln2*Sinf+1/2*z2^2*ln2^2+59/70*z2^3+z3^2-139/32*z5*Sinf-5*
   s6;
Fill Htab6(1,0,0,-1,0,-1)=7/8*z2*z3*ln2-5/8*z2*z3*Sinf+1/24*z2*ln2^4
   +z2*li4half-1/4*z2^2*ln2^2-121/120*z2^3+71/64*z3^2+155/32*z5*ln2
   +41/32*z5*Sinf-5/2*s6;
Fill Htab6(1,0,0,-1,0,1)=7/4*z2*z3*ln2+9/4*z2*z3*Sinf+1/12*z2*ln2^4+
   2*z2*li4half-1/2*z2^2*ln2^2+19/210*z2^3-179/64*z3^2-67/16*z5*Sinf;
Fill Htab6(1,0,0,-1,0,0)=-163/140*z2^3+33/32*z3^2+45/8*z5*Sinf;
Fill Htab6(1,0,0,1,-1,-1)=-7/8*z2*z3*ln2-13/16*z2*z3*Sinf+1/6*z2*ln2^3*
   Sinf-1/24*z2*ln2^4+z2*li4half-49/40*z2^2*ln2*Sinf-21/20*z2^2*ln2^2
   +893/1680*z2^3+7/8*z3*ln2^2*Sinf+7/12*z3*ln2^3+223/128*z3^2+527/
   64*z5*ln2+47/8*z5*Sinf-2*ln2*Sinf*li4half-6*ln2*li5half-ln2^2*
   li4half-1/20*ln2^5*Sinf-1/360*ln2^6-4*Sinf*li5half-8*li6half-3*s6
;
Fill Htab6(1,0,0,1,-1,1)=7/4*z2*z3*ln2+15/8*z2*z3*Sinf-1/6*z2*ln2^3*
   Sinf+1/12*z2*ln2^4+11/40*z2^2*ln2*Sinf+8/5*z2^2*ln2^2+1381/1680*
   z2^3-7/8*z3*ln2^2*Sinf-7/12*z3*ln2^3-9/16*z3^2-159/64*z5*Sinf+1/
   60*ln2^5*Sinf-1/180*ln2^6-2*Sinf*li5half-4*li6half-21/4*s6;
Fill Htab6(1,0,0,1,-1,0)=-21/8*z2*z3*ln2-7/8*z2*z3*Sinf-9/4*z2^2*ln2*
   Sinf-9/560*z2^3-29/64*z3^2+171/32*z5*Sinf+5*s6;
Fill Htab6(1,0,0,1,1,-1)=-1/16*z2*z3*Sinf+1/3*z2*ln2^3*Sinf+1/8*z2*
   ln2^4+z2*li4half-3/8*z2^2*ln2*Sinf-21/20*z2^2*ln2^2-13/120*z2^3-
   67/128*z3^2+93/64*z5*ln2+151/64*z5*Sinf-2*ln2*Sinf*li4half-2*ln2*
   li5half-ln2^2*li4half-1/15*ln2^5*Sinf-1/40*ln2^6-2*Sinf*li5half+3/
   2*s6;
Fill Htab6(1,0,0,1,1,1)=-z2*z3*Sinf-8/21*z2^3+z3^2+2*z5*Sinf;
Fill Htab6(1,0,0,1,1,0)=13/70*z2^3-1/2*z5*Sinf;
Fill Htab6(1,0,0,1,0,-1)=-1/4*z2*z3*Sinf-53/120*z2^3+23/32*z3^2+93/32
   *z5*ln2+21/32*z5*Sinf-3/2*s6;
Fill Htab6(1,0,0,1,0,1)=3*z2*z3*Sinf+37/42*z2^3-3*z3^2-11/2*z5*Sinf;
Fill Htab6(1,0,0,1,0,0)=-38/35*z2^3+1/2*z3^2+6*z5*Sinf;
Fill Htab6(1,0,0,0,-1,-1)=1/2*z2*z3*Sinf+11/168*z2^3-1/4*z3^2-29/32*
   z5*Sinf;
Fill Htab6(1,0,0,0,-1,1)=-3/2*z2*z3*ln2-3/4*z2*z3*Sinf-3/4*z2^2*ln2*
   Sinf-53/168*z2^3+5/8*z3^2+91/32*z5*Sinf+5/2*s6;
Fill Htab6(1,0,0,0,-1,0)=811/840*z2^3-3/4*z3^2-15/4*z5*Sinf;
Fill Htab6(1,0,0,0,1,-1)=3/2*z2*z3*ln2+3/8*z2*z3*Sinf+3/4*z2^2*ln2*
   Sinf+179/840*z2^3-11/64*z3^2-31/16*z5*ln2-2*z5*Sinf-3/2*s6;
Fill Htab6(1,0,0,0,1,1)=-z2*z3*Sinf-11/21*z2^3+3/2*z3^2+2*z5*Sinf;
Fill Htab6(1,0,0,0,1,0)=118/105*z2^3-z3^2-4*z5*Sinf;
Fill Htab6(1,0,0,0,0,-1)=-11/20*z2^3+3/4*z3^2+31/16*z5*ln2+15/16*z5*
   Sinf-s6;
Fill Htab6(1,0,0,0,0,1)=-2/5*z2^3+1/2*z3^2+z5*Sinf;
Fill Htab6(1,0,0,0,0,0)=-8/35*z2^3;
Fill Htab6(0,-1,-1,-1,-1,-1)=1/16*z2*ln2^4+8/35*z2^3-7/48*z3*ln2^3-
   ln2*li5half-1/2*ln2^2*li4half-1/72*ln2^6-li6half;
Fill Htab6(0,-1,-1,-1,-1,1)=-5/48*z2*ln2^4-z2*li4half+9/40*z2^2*ln2^2
   +8/35*z2^3+7/48*z3*ln2^3+17/64*z3^2+1/2*ln2^2*li4half+1/48*ln2^6
   -s6;
Fill Htab6(0,-1,-1,-1,-1,0)=7/16*z2*z3*ln2+1/48*z2*ln2^4+1/2*z2*
   li4half-1/8*z2^2*ln2^2-1/5*z2^3+1/128*z3^2;
Fill Htab6(0,-1,-1,-1,1,-1)=-7/16*z2*z3*ln2+1/48*z2*ln2^4+2*z2*li4half
   -17/40*z2^2*ln2^2-8/7*z2^3+7/48*z3*ln2^3-17/32*z3^2+31/32*z5*ln2
   +3*ln2*li5half-1/48*ln2^6+3*li6half+2*s6;
Fill Htab6(0,-1,-1,-1,1,1)=31/16*z2*z3*ln2+5/48*z2*ln2^4+z2*li4half-
   31/40*z2^2*ln2^2-279/280*z2^3-7/48*z3*ln2^3-113/64*z3^2+1/120*ln2^6
   +6*li6half+3/2*s6;
Fill Htab6(0,-1,-1,-1,1,0)=-7/16*z2*z3*ln2+7/48*z2*ln2^4+3/2*z2*li4half
   -11/40*z2^2*ln2^2-1/14*z2^3+129/128*z3^2-1/180*ln2^6-4*li6half+
   1/2*s6;
Fill Htab6(0,-1,-1,-1,0,-1)=-7/16*z2*z3*ln2-1/48*z2*ln2^4-1/2*z2*
   li4half+1/8*z2^2*ln2^2+11/15*z2^3-61/64*z3^2-155/32*z5*ln2+5/2*s6
;
Fill Htab6(0,-1,-1,-1,0,1)=-35/16*z2*z3*ln2-5/48*z2*ln2^4-5/2*z2*
   li4half+5/8*z2^2*ln2^2+1129/1680*z2^3+121/128*z3^2;
Fill Htab6(0,-1,-1,-1,0,0)=41/105*z2^3-73/64*z3^2;
Fill Htab6(0,-1,-1,1,-1,-1)=-3/16*z2*ln2^4-3*z2*li4half+21/16*z2^2*
   ln2^2+86/35*z2^3+45/32*z3^2-279/64*z5*ln2-3*ln2*li5half+3/2*ln2^2
   *li4half+3/40*ln2^6-9*li6half-15/4*s6;
Fill Htab6(0,-1,-1,1,-1,1)=-69/16*z2*z3*ln2-1/12*z2*ln2^4-3/2*z2*
   li4half+11/16*z2^2*ln2^2+417/560*z2^3+193/128*z3^2-3/2*ln2^2*
   li4half-47/720*ln2^6-2*li6half+9/4*s6;
Fill Htab6(0,-1,-1,1,-1,0)=-3/8*z2*ln2^4-3*z2*li4half+3/40*z2^2*ln2^2
   -179/560*z2^3-89/32*z3^2+1/60*ln2^6+12*li6half+2*s6;
Fill Htab6(0,-1,-1,1,1,-1)=-3/16*z2*z3*ln2+1/16*z2*ln2^4+11/20*z2^2*
   ln2^2+299/560*z2^3+127/128*z3^2+31/64*z5*ln2+ln2*li5half-11/720*
   ln2^6-5*li6half-5/2*s6;
Fill Htab6(0,-1,-1,1,1,1)=3/2*z2*z3*ln2+1/24*z2*ln2^4+1/2*z2*li4half
   -7/10*z2^2*ln2^2-33/28*z2^3-13/8*z3^2+1/90*ln2^6+8*li6half+2*s6
;
Fill Htab6(0,-1,-1,1,1,0)=5/24*z2*ln2^4+z2*li4half-19/80*z2^2*ln2^2+
   57/70*z2^3+89/128*z3^2-1/90*ln2^6-8*li6half-5/4*s6;
Fill Htab6(0,-1,-1,1,0,-1)=-1/4*z2*ln2^4-2*z2*li4half+11/5*z2^2*ln2^2
   +6529/1680*z2^3+547/128*z3^2+155/64*z5*ln2-8*ln2*li5half+1/30*
   ln2^6-24*li6half-23/2*s6;
Fill Htab6(0,-1,-1,1,0,1)=-63/16*z2*z3*ln2-1/12*z2*ln2^4-2*z2*li4half
   +11/16*z2^2*ln2^2+227/420*z2^3+187/128*z3^2+7/4*s6;
Fill Htab6(0,-1,-1,1,0,0)=-1/24*z2*ln2^4-z2*li4half+11/8*z2^2*ln2^2+
   97/168*z2^3+3/64*z3^2-7/2*s6;
Fill Htab6(0,-1,-1,0,-1,-1)=-4/5*z2^3+181/128*z3^2+465/64*z5*ln2-15/4
   *s6;
Fill Htab6(0,-1,-1,0,-1,1)=63/16*z2*z3*ln2+5/48*z2*ln2^4+5/2*z2*
   li4half-5/8*z2^2*ln2^2-22/35*z2^3-197/128*z3^2-7/4*s6;
Fill Htab6(0,-1,-1,0,-1,0)=-1277/1680*z2^3+73/32*z3^2;
Fill Htab6(0,-1,-1,0,1,-1)=1/12*z2*ln2^4+2*z2*li4half-1/2*z2^2*ln2^2
   -171/280*z2^3-35/128*z3^2+93/64*z5*ln2+s6;
Fill Htab6(0,-1,-1,0,1,1)=-1/560*z2^3+1/128*z3^2;
Fill Htab6(0,-1,-1,0,1,0)=-49/240*z2^3+9/16*z3^2;
Fill Htab6(0,-1,-1,0,0,-1)=-113/560*z2^3+23/64*z3^2+31/16*z5*ln2-s6;
Fill Htab6(0,-1,-1,0,0,1)=21/8*z2*z3*ln2+1/8*z2*ln2^4+3*z2*li4half-3/
   4*z2^2*ln2^2-199/280*z2^3-45/32*z3^2;
Fill Htab6(0,-1,-1,0,0,0)=-23/60*z2^3+3/4*z3^2;
Fill Htab6(0,-1,1,-1,-1,-1)=1/12*z2*ln2^4+2*z2*li4half-7/4*z2^2*ln2^2
   -86/35*z2^3+7/16*z3*ln2^3-73/64*z3^2+465/64*z5*ln2+ln2*li5half-
   3/2*ln2^2*li4half-41/720*ln2^6+10*li6half+11/4*s6;
Fill Htab6(0,-1,1,-1,-1,1)=63/16*z2*z3*ln2+1/16*z2*ln2^4+3/2*z2*
   li4half+9/10*z2^2*ln2^2+4/7*z2^3-7/16*z3*ln2^3+3/4*z3^2+3/2*ln2^2
   *li4half+1/20*ln2^6-9*li6half-29/4*s6;
Fill Htab6(0,-1,1,-1,-1,0)=-3/2*z2*z3*ln2+1/3*z2*ln2^4+2*z2*li4half+
   11/20*z2^2*ln2^2+403/560*z2^3+191/64*z3^2-1/60*ln2^6-12*li6half-2
   *s6;
Fill Htab6(0,-1,1,-1,1,-1)=33/16*z2*z3*ln2+1/4*z2*ln2^4-21/40*z2^2*
   ln2^2+31/140*z2^3-7/16*z3*ln2^3-21/32*z3^2-93/64*z5*ln2-3*ln2*
   li5half+1/40*ln2^6;
Fill Htab6(0,-1,1,-1,1,1)=-45/8*z2*z3*ln2-5/16*z2*ln2^4-3/2*z2*li4half
   +27/20*z2^2*ln2^2+409/280*z2^3+7/16*z3*ln2^3+231/64*z3^2-1/80*
   ln2^6-9*li6half;
Fill Htab6(0,-1,1,-1,1,0)=45/16*z2*z3*ln2-1/3*z2*ln2^4-23/20*z2^2*
   ln2^2-529/280*z2^3-65/16*z3^2+1/45*ln2^6+16*li6half+4*s6;
Fill Htab6(0,-1,1,-1,0,-1)=27/16*z2*z3*ln2+5/12*z2*ln2^4+2*z2*li4half
   -39/10*z2^2*ln2^2-1507/210*z2^3-269/32*z3^2-31/4*z5*ln2+16*ln2*
   li5half-1/15*ln2^6+48*li6half+21*s6;
Fill Htab6(0,-1,1,-1,0,1)=15/2*z2*z3*ln2+1/12*z2*ln2^4+2*z2*li4half-
   7/8*z2^2*ln2^2-49/60*z2^3-203/128*z3^2-5*s6;
Fill Htab6(0,-1,1,-1,0,0)=-9/8*z2*z3*ln2-9/4*z2^2*ln2^2-53/240*z2^3+
   15/32*z3^2+5*s6;
Fill Htab6(0,-1,1,1,-1,-1)=-3/16*z2*z3*ln2-1/6*z2*ln2^4-21/80*z2^2*
   ln2^2-75/112*z2^3-125/64*z3^2-93/16*z5*ln2+3*ln2*li5half+1/2*
   ln2^2*li4half+1/144*ln2^6+8*li6half+11/2*s6;
Fill Htab6(0,-1,1,1,-1,1)=63/16*z2*z3*ln2+1/3*z2*ln2^4+2*z2*li4half-
   89/80*z2^2*ln2^2-97/112*z2^3-249/128*z3^2-1/2*ln2^2*li4half-1/60*
   ln2^6+3*li6half-1/2*s6;
Fill Htab6(0,-1,1,1,-1,0)=-39/16*z2*z3*ln2-1/16*z2*ln2^4-3/2*z2*li4half
   +9/8*z2^2*ln2^2+11/40*z2^3+169/128*z3^2;
Fill Htab6(0,-1,1,1,1,-1)=-21/8*z2*z3*ln2-1/8*z2*ln2^4-z2*li4half+7/
   20*z2^2*ln2^2+107/140*z2^3+267/128*z3^2+155/32*z5*ln2-ln2*li5half
   -6*li6half-5/2*s6;
Fill Htab6(0,-1,1,1,1,1)=-1/24*z2*ln2^4-z2*li4half+7/40*z2^2*ln2^2-1/
   4*z3^2+1/240*ln2^6+3*li6half-1/2*s6;
Fill Htab6(0,-1,1,1,1,0)=-3/2*z2*z3*ln2+1/16*z2*ln2^4-1/2*z2*li4half+
   3/80*z2^2*ln2^2+5/14*z2^3+45/32*z3^2-1/180*ln2^6-4*li6half+3/4*s6
;
Fill Htab6(0,-1,1,1,0,-1)=15/16*z2*z3*ln2-7/48*z2*ln2^4+1/2*z2*li4half
   +63/40*z2^2*ln2^2+5627/1680*z2^3+439/128*z3^2+155/64*z5*ln2-8*ln2
   *li5half+1/30*ln2^6-24*li6half-21/2*s6;
Fill Htab6(0,-1,1,1,0,1)=69/16*z2*z3*ln2+11/48*z2*ln2^4+11/2*z2*
   li4half-19/16*z2^2*ln2^2-53/42*z2^3-287/128*z3^2-1/4*s6;
Fill Htab6(0,-1,1,1,0,0)=-3/2*z2*z3*ln2-1/24*z2*ln2^4-z2*li4half+11/8
   *z2^2*ln2^2+53/168*z2^3+53/32*z3^2-5/2*s6;
Fill Htab6(0,-1,1,0,-1,-1)=-3/16*z2*z3*ln2+1/4*z2*ln2^4+2*z2*li4half-
   1/2*z2^2*ln2^2+477/280*z2^3+685/128*z3^2+1457/64*z5*ln2-16*ln2*
   li5half-4*ln2^2*li4half-1/15*ln2^6-24*li6half-14*s6;
Fill Htab6(0,-1,1,0,-1,1)=-39/16*z2*z3*ln2-7/12*z2*ln2^4-2*z2*li4half
   +171/40*z2^2*ln2^2+33/10*z2^3+793/128*z3^2+4*ln2^2*li4half+2/15*
   ln2^6-24*li6half-13*s6;
Fill Htab6(0,-1,1,0,-1,0)=9/4*z2*z3*ln2+1/4*z2*ln2^4+6*z2*li4half-3/
   2*z2^2*ln2^2-545/336*z2^3-9/4*z3^2+4*s6;
Fill Htab6(0,-1,1,0,1,-1)=87/16*z2*z3*ln2+1/2*z2*ln2^4+4*z2*li4half-
   191/40*z2^2*ln2^2-909/140*z2^3-95/8*z3^2-1271/64*z5*ln2+16*ln2*
   li5half-1/15*ln2^6+48*li6half+26*s6;
Fill Htab6(0,-1,1,0,1,1)=-33/8*z2*z3*ln2-1/48*z2*ln2^4-1/2*z2*li4half
   +1/8*z2^2*ln2^2-47/280*z2^3+143/64*z3^2+7/2*s6;
Fill Htab6(0,-1,1,0,1,0)=3*z2*z3*ln2+1/12*z2*ln2^4+2*z2*li4half-1/2*
   z2^2*ln2^2+5/48*z2^3-65/16*z3^2;
Fill Htab6(0,-1,1,0,0,-1)=-9/8*z2*z3*ln2-1/12*z2*ln2^4-2*z2*li4half+1/
   2*z2^2*ln2^2-423/560*z2^3+111/32*z3^2+155/16*z5*ln2-6*s6;
Fill Htab6(0,-1,1,0,0,1)=9/8*z2*z3*ln2-1/6*z2*ln2^4-4*z2*li4half+
   z2^2*ln2^2+331/560*z2^3+133/64*z3^2-5*s6;
Fill Htab6(0,-1,1,0,0,0)=-617/840*z2^3-15/16*z3^2+4*s6;
Fill Htab6(0,-1,0,-1,-1,-1)=1/4*z2*ln2^4+142/105*z2^3-7/12*z3*ln2^3-
   23/32*z3^2-279/64*z5*ln2-4*ln2*li5half-2*ln2^2*li4half-1/18*ln2^6
   -4*li6half+9/4*s6;
Fill Htab6(0,-1,0,-1,-1,1)=-69/16*z2*z3*ln2-9/16*z2*ln2^4-11/2*z2*
   li4half+89/40*z2^2*ln2^2+775/336*z2^3+7/12*z3*ln2^3+499/128*z3^2+
   2*ln2^2*li4half+13/180*ln2^6-8*li6half-19/4*s6;
Fill Htab6(0,-1,0,-1,-1,0)=7/4*z2*z3*ln2+1/12*z2*ln2^4+2*z2*li4half-
   1/2*z2^2*ln2^2+17/1680*z2^3-79/32*z3^2;
Fill Htab6(0,-1,0,-1,1,-1)=-11/8*z2*z3*ln2+1/12*z2*ln2^4+2*z2*li4half
   -11/5*z2^2*ln2^2-2237/840*z2^3+7/12*z3*ln2^3-49/16*z3^2+31/32*z5*
   ln2+4*ln2*li5half-1/90*ln2^6+16*li6half+9*s6;
Fill Htab6(0,-1,0,-1,1,1)=91/16*z2*z3*ln2+7/24*z2*ln2^4+5*z2*li4half
   -2/5*z2^2*ln2^2-205/336*z2^3-7/12*z3*ln2^3-285/128*z3^2-1/180*
   ln2^6-4*li6half-7/2*s6;
Fill Htab6(0,-1,0,-1,1,0)=-7/4*z2*z3*ln2+1/12*z2*ln2^4+2*z2*li4half-1/
   2*z2^2*ln2^2-203/240*z2^3+3/4*z3^2+4*s6;
Fill Htab6(0,-1,0,-1,0,-1)=-7/4*z2*z3*ln2-1/12*z2*ln2^4-2*z2*li4half+
   1/2*z2^2*ln2^2+837/560*z2^3-17/16*z3^2-31/4*z5*ln2+4*s6;
Fill Htab6(0,-1,0,-1,0,1)=-35/4*z2*z3*ln2-5/12*z2*ln2^4-10*z2*li4half
   +5/2*z2^2*ln2^2+211/80*z2^3+63/16*z3^2;
Fill Htab6(0,-1,0,-1,0,0)=23/20*z2^3-45/16*z3^2;
Fill Htab6(0,-1,0,1,-1,-1)=-7/24*z2*ln2^4-3*z2*li4half+8/5*z2^2*ln2^2
   +1439/1680*z2^3+77/128*z3^2-403/64*z5*ln2+4*ln2*li5half+2*ln2^2*
   li4half+1/20*ln2^6-3/2*s6;
Fill Htab6(0,-1,0,1,-1,1)=-39/8*z2*z3*ln2+1/6*z2*ln2^4-2*z2*li4half-6/
   5*z2^2*ln2^2-5/6*z2^3-59/64*z3^2-2*ln2^2*li4half-1/15*ln2^6+12*
   li6half+19/2*s6;
Fill Htab6(0,-1,0,1,-1,0)=-1/6*z2*ln2^4-4*z2*li4half+z2^2*ln2^2+2389/
   1680*z2^3-3/16*z3^2-4*s6;
Fill Htab6(0,-1,0,1,1,-1)=15/16*z2*z3*ln2-1/8*z2*ln2^4-z2*li4half+11/
   10*z2^2*ln2^2+2953/1680*z2^3+37/16*z3^2+31/16*z5*ln2-4*ln2*li5half
   +1/60*ln2^6-12*li6half-7*s6;
Fill Htab6(0,-1,0,1,1,1)=21/16*z2*z3*ln2+1/16*z2*ln2^4+3/2*z2*li4half
   -3/8*z2^2*ln2^2-383/840*z2^3-51/128*z3^2;
Fill Htab6(0,-1,0,1,1,0)=73/336*z2^3-23/32*z3^2;
Fill Htab6(0,-1,0,1,0,-1)=3/560*z2^3;
Fill Htab6(0,-1,0,1,0,1)=-21/4*z2*z3*ln2-1/4*z2*ln2^4-6*z2*li4half+3/
   2*z2^2*ln2^2+801/560*z2^3+91/32*z3^2;
Fill Htab6(0,-1,0,1,0,0)=173/280*z2^3-9/8*z3^2;
Fill Htab6(0,-1,0,0,-1,-1)=139/420*z2^3-19/32*z3^2-93/32*z5*ln2+3/2*
   s6;
Fill Htab6(0,-1,0,0,-1,1)=27/8*z2*z3*ln2-157/1680*z2^3-33/64*z3^2-7/
   2*s6;
Fill Htab6(0,-1,0,0,-1,0)=-21/40*z2^3+9/8*z3^2;
Fill Htab6(0,-1,0,0,1,-1)=-27/8*z2*z3*ln2-173/840*z2^3+3/4*z3^2+155/
   32*z5*ln2+s6;
Fill Htab6(0,-1,0,0,1,1)=21/8*z2*z3*ln2+1/8*z2*ln2^4+3*z2*li4half-3/
   4*z2^2*ln2^2-289/840*z2^3-163/64*z3^2;
Fill Htab6(0,-1,0,0,1,0)=-303/280*z2^3+45/16*z3^2;
Fill Htab6(0,-1,0,0,0,-1)=901/840*z2^3-33/16*z3^2-31/4*z5*ln2+4*s6;
Fill Htab6(0,-1,0,0,0,1)=239/840*z2^3-3/4*z3^2;
Fill Htab6(0,-1,0,0,0,0)=31/28*z2^3;
Fill Htab6(0,1,-1,-1,-1,-1)=1/24*z2*ln2^4-1/2*z2*li4half+61/80*z2^2*
   ln2^2+26/35*z2^3-7/16*z3*ln2^3-17/128*z3^2-155/32*z5*ln2+ln2*
   li5half+1/2*ln2^2*li4half+7/720*ln2^6-2*li6half+1/2*s6;
Fill Htab6(0,1,-1,-1,-1,1)=-21/8*z2*z3*ln2-1/8*z2*ln2^4-3/2*z2*li4half
   -19/80*z2^2*ln2^2+23/112*z2^3+7/16*z3*ln2^3-9/64*z3^2-1/2*ln2^2*
   li4half-1/60*ln2^6+3*li6half+3*s6;
Fill Htab6(0,1,-1,-1,-1,0)=45/16*z2*z3*ln2-1/16*z2*ln2^4+1/2*z2*
   li4half-3/5*z2^2*ln2^2-429/560*z2^3-145/128*z3^2+1/180*ln2^6+4*
   li6half-1/2*s6;
Fill Htab6(0,1,-1,-1,1,-1)=21/8*z2*z3*ln2+1/16*z2*ln2^4+3*z2*li4half
   -117/80*z2^2*ln2^2-135/112*z2^3+7/16*z3*ln2^3-21/64*z3^2+93/16*z5
   *ln2-3*ln2*li5half+1/40*ln2^6-7/4*s6;
Fill Htab6(0,1,-1,-1,1,1)=9/8*z2*z3*ln2+1/16*z2*ln2^4+93/80*z2^2*ln2^2
   +71/56*z2^3-7/16*z3*ln2^3+105/128*z3^2-1/80*ln2^6-9*li6half-21/
   4*s6;
Fill Htab6(0,1,-1,-1,1,0)=9/8*z2*z3*ln2+1/12*z2*ln2^4+2*z2*li4half-1/
   8*z2^2*ln2^2-7/8*z2^3+1/2*z3^2;
Fill Htab6(0,1,-1,-1,0,-1)=-45/8*z2*z3*ln2-17/48*z2*ln2^4-9/2*z2*
   li4half+113/40*z2^2*ln2^2+8383/1680*z2^3+305/64*z3^2+155/64*z5*ln2
   -8*ln2*li5half+1/30*ln2^6-24*li6half-8*s6;
Fill Htab6(0,1,-1,-1,0,1)=-57/16*z2*z3*ln2+3/16*z2^2*ln2^2+149/420*z2^3
   -11/128*z3^2+13/4*s6;
Fill Htab6(0,1,-1,-1,0,0)=-3/2*z2*z3*ln2-1/12*z2*ln2^4-2*z2*li4half+
   13/8*z2^2*ln2^2+337/420*z2^3-3/64*z3^2-3/2*s6;
Fill Htab6(0,1,-1,1,-1,-1)=-69/16*z2*z3*ln2-5/48*z2*ln2^4-3*z2*li4half
   +2/5*z2^2*ln2^2-187/560*z2^3+1/64*z3^2+93/64*z5*ln2+3*ln2*li5half
   -3/2*ln2^2*li4half-11/144*ln2^6+8*li6half+15/4*s6;
Fill Htab6(0,1,-1,1,-1,1)=3/4*z2*z3*ln2-3/2*z2*li4half-3/20*z2^2*ln2^2
   -79/560*z2^3-3/64*z3^2+3/2*ln2^2*li4half+1/15*ln2^6+3*li6half-3/
   4*s6;
Fill Htab6(0,1,-1,1,-1,0)=-3/2*z2*z3*ln2+19/48*z2*ln2^4+3/2*z2*li4half
   +31/40*z2^2*ln2^2+1009/560*z2^3+39/16*z3^2-1/45*ln2^6-16*li6half
   -4*s6;
Fill Htab6(0,1,-1,1,1,-1)=63/16*z2*z3*ln2+1/24*z2*ln2^4+3/2*z2*li4half
   -91/80*z2^2*ln2^2-83/140*z2^3-93/32*z3^2-465/64*z5*ln2-ln2*
   li5half+1/60*ln2^6+6*li6half+17/4*s6;
Fill Htab6(0,1,-1,1,1,1)=5/48*z2*ln2^4+4*z2*li4half-17/80*z2^2*ln2^2
   +2/35*z2^3+31/32*z3^2-1/80*ln2^6-9*li6half-1/4*s6;
Fill Htab6(0,1,-1,1,1,0)=3/16*z2*z3*ln2-7/24*z2*ln2^4-z2*li4half-19/
   80*z2^2*ln2^2-43/70*z2^3-125/32*z3^2+1/60*ln2^6+12*li6half+13/4*
   s6;
Fill Htab6(0,1,-1,1,0,-1)=-39/8*z2*z3*ln2+5/48*z2*ln2^4-11/2*z2*li4half
   -81/40*z2^2*ln2^2-8287/1680*z2^3-25/4*z3^2-31/4*z5*ln2+16*ln2*
   li5half-1/15*ln2^6+48*li6half+21*s6;
Fill Htab6(0,1,-1,1,0,1)=-3/8*z2*z3*ln2-7/24*z2*ln2^4-7*z2*li4half+11/
   8*z2^2*ln2^2+163/105*z2^3+2*z3^2-5*s6;
Fill Htab6(0,1,-1,1,0,0)=-9/8*z2*z3*ln2-9/4*z2^2*ln2^2+31/210*z2^3-1/
   2*z3^2+5*s6;
Fill Htab6(0,1,-1,0,-1,-1)=33/8*z2*z3*ln2-1/16*z2*ln2^4+5/2*z2*li4half
   -5/8*z2^2*ln2^2-377/112*z2^3-97/16*z3^2-1271/64*z5*ln2+16*ln2*
   li5half+4*ln2^2*li4half+1/15*ln2^6+24*li6half+25/2*s6;
Fill Htab6(0,1,-1,0,-1,1)=-3/2*z2*z3*ln2+1/3*z2*ln2^4-4*z2*li4half-
   111/40*z2^2*ln2^2-251/140*z2^3-61/16*z3^2-4*ln2^2*li4half-2/15*
   ln2^6+24*li6half+23/2*s6;
Fill Htab6(0,1,-1,0,-1,0)=3*z2*z3*ln2-11/30*z2^3+3/4*z3^2-4*s6;
Fill Htab6(0,1,-1,0,1,-1)=-3/2*z2*z3*ln2-1/4*z2*ln2^4+2*z2*li4half+
   131/40*z2^2*ln2^2+323/70*z2^3+41/4*z3^2+1457/64*z5*ln2-16*ln2*
   li5half+1/15*ln2^6-48*li6half-26*s6;
Fill Htab6(0,1,-1,0,1,1)=3/16*z2*z3*ln2-1/6*z2*ln2^4-4*z2*li4half+
   z2^2*ln2^2+69/56*z2^3-1/16*z3^2-7/2*s6;
Fill Htab6(0,1,-1,0,1,0)=9/4*z2*z3*ln2+1/6*z2*ln2^4+4*z2*li4half-
   z2^2*ln2^2-439/210*z2^3+5/2*z3^2;
Fill Htab6(0,1,-1,0,0,-1)=9/8*z2*z3*ln2+1/12*z2*ln2^4+2*z2*li4half-1/
   2*z2^2*ln2^2+181/280*z2^3-3*z3^2-155/16*z5*ln2+6*s6;
Fill Htab6(0,1,-1,0,0,1)=-9/8*z2*z3*ln2+1/6*z2*ln2^4+4*z2*li4half-
   z2^2*ln2^2-159/280*z2^3-2*z3^2+5*s6;
Fill Htab6(0,1,-1,0,0,0)=1/3*z2^3+3/4*z3^2-4*s6;
Fill Htab6(0,1,1,-1,-1,-1)=3/2*z2*z3*ln2-1/24*z2*ln2^4+z2*li4half+3/
   5*z2^2*ln2^2+243/280*z2^3+7/48*z3*ln2^3+153/128*z3^2-31/64*z5*ln2
   -ln2*li5half+3/2*ln2^2*li4half+7/120*ln2^6-9*li6half-9/2*s6;
Fill Htab6(0,1,1,-1,-1,1)=-3/16*z2*z3*ln2+7/48*z2*ln2^4+3/2*z2*li4half
   -5/4*z2^2*ln2^2-13/10*z2^3-7/48*z3*ln2^3-59/32*z3^2-3/2*ln2^2*
   li4half-37/720*ln2^6+8*li6half+11/2*s6;
Fill Htab6(0,1,1,-1,-1,0)=-7/16*z2*z3*ln2-5/16*z2*ln2^4-7/2*z2*li4half
   -21/80*z2^2*ln2^2-39/280*z2^3-73/128*z3^2+1/90*ln2^6+8*li6half+
   5/4*s6;
Fill Htab6(0,1,1,-1,1,-1)=-31/8*z2*z3*ln2-11/48*z2*ln2^4-3/2*z2*li4half
   +13/10*z2^2*ln2^2+3/40*z2^3-7/48*z3*ln2^3+113/64*z3^2+279/64*z5*
   ln2+3*ln2*li5half-19/720*ln2^6-li6half-3/2*s6;
Fill Htab6(0,1,1,-1,1,1)=-7/16*z2*z3*ln2-1/12*z2*ln2^4-6*z2*li4half+1/
   8*z2^2*ln2^2+7/48*z3*ln2^3+49/128*z3^2+1/72*ln2^6+10*li6half;
Fill Htab6(0,1,1,-1,1,0)=7/16*z2*z3*ln2+3/8*z2*ln2^4+3*z2*li4half+39/
   80*z2^2*ln2^2+53/280*z2^3+93/32*z3^2-1/60*ln2^6-12*li6half-13/4*
   s6;
Fill Htab6(0,1,1,-1,0,-1)=35/8*z2*z3*ln2+1/16*z2*ln2^4+11/2*z2*li4half
   +13/40*z2^2*ln2^2+3173/1680*z2^3+117/64*z3^2+155/64*z5*ln2-8*ln2*
   li5half+1/30*ln2^6-24*li6half-9*s6;
Fill Htab6(0,1,1,-1,0,1)=7/8*z2*z3*ln2+7/24*z2*ln2^4+7*z2*li4half-25/
   16*z2^2*ln2^2-1243/840*z2^3-327/128*z3^2+21/4*s6;
Fill Htab6(0,1,1,-1,0,0)=-1/12*z2*ln2^4-2*z2*li4half+13/8*z2^2*ln2^2+
   71/105*z2^3+1/64*z3^2-5/2*s6;
Fill Htab6(0,1,1,1,-1,-1)=3/2*z2*z3*ln2+3/16*z2*ln2^4+1/2*z2*li4half
   +1/16*z2^2*ln2^2+103/140*z2^3+7/32*z3^2-31/32*z5*ln2-3*ln2*
   li5half-1/2*ln2^2*li4half-1/360*ln2^6-5*li6half-7/4*s6;
Fill Htab6(0,1,1,1,-1,1)=-5/48*z2*ln2^4+7/2*z2*li4half-3/16*z2^2*ln2^2
   +12/35*z2^3-31/32*z3^2+1/2*ln2^2*li4half+1/80*ln2^6-6*li6half+1/
   4*s6;
Fill Htab6(0,1,1,1,-1,0)=-3/16*z2*ln2^4-5/2*z2*li4half-3/80*z2^2*ln2^2
   -1/140*z2^3+7/32*z3^2+1/180*ln2^6+4*li6half-3/4*s6;
Fill Htab6(0,1,1,1,1,-1)=1/24*z2*ln2^4-z2*li4half+9/40*z2^2*ln2^2-2/
   5*z2^3+1/4*z3^2+ln2*li5half-1/240*ln2^6+3*li6half+1/2*s6;
Fill Htab6(0,1,1,1,1,1)=8/35*z2^3;
Fill Htab6(0,1,1,1,1,0)=-2/5*z2^3+1/2*z3^2;
Fill Htab6(0,1,1,1,0,-1)=21/16*z2*z3*ln2+1/16*z2*ln2^4+3/2*z2*li4half
   -3/8*z2^2*ln2^2+7/24*z2^3-27/16*z3^2-155/32*z5*ln2+5/2*s6;
Fill Htab6(0,1,1,1,0,1)=10/21*z2^3-z3^2;
Fill Htab6(0,1,1,1,0,0)=89/210*z2^3-1/2*z3^2;
Fill Htab6(0,1,1,0,-1,-1)=-103/560*z2^3+51/128*z3^2+93/64*z5*ln2-3/4*
   s6;
Fill Htab6(0,1,1,0,-1,1)=-21/16*z2*z3*ln2-1/6*z2*ln2^4-4*z2*li4half+
   z2^2*ln2^2+387/560*z2^3+327/128*z3^2-11/4*s6;
Fill Htab6(0,1,1,0,-1,0)=-71/1680*z2^3-25/32*z3^2;
Fill Htab6(0,1,1,0,1,-1)=-21/8*z2*z3*ln2-1/48*z2*ln2^4-1/2*z2*li4half
   +1/8*z2^2*ln2^2-83/280*z2^3+3/4*z3^2+465/64*z5*ln2-s6;
Fill Htab6(0,1,1,0,1,1)=-4/35*z2^3+1/2*z3^2;
Fill Htab6(0,1,1,0,1,0)=-143/210*z2^3+z3^2;
Fill Htab6(0,1,1,0,0,-1)=21/8*z2*z3*ln2+1/8*z2*ln2^4+3*z2*li4half-3/
   4*z2^2*ln2^2-45/56*z2^3-1/2*z3^2-31/16*z5*ln2+s6;
Fill Htab6(0,1,1,0,0,1)=-13/70*z2^3+z3^2;
Fill Htab6(0,1,1,0,0,0)=-2/105*z2^3-z3^2;
Fill Htab6(0,1,0,-1,-1,-1)=-21/16*z2*z3*ln2+3/16*z2*ln2^4-3/2*z2*
   li4half+3/8*z2^2*ln2^2+1907/1680*z2^3-7/12*z3*ln2^3+109/128*z3^2+
   31/16*z5*ln2-4*ln2*li5half-2*ln2^2*li4half-1/18*ln2^6-4*li6half-
   s6;
Fill Htab6(0,1,0,-1,-1,1)=-15/16*z2*z3*ln2-1/3*z2*ln2^4+83/80*z2^2*
   ln2^2+109/105*z2^3+7/12*z3*ln2^3+217/128*z3^2+2*ln2^2*li4half+13/
   180*ln2^6-8*li6half-15/4*s6;
Fill Htab6(0,1,0,-1,-1,0)=7/4*z2*z3*ln2+1/12*z2*ln2^4+2*z2*li4half-1/
   2*z2^2*ln2^2-67/120*z2^3-13/16*z3^2;
Fill Htab6(0,1,0,-1,1,-1)=25/8*z2*z3*ln2+1/12*z2*ln2^4+2*z2*li4half-
   103/40*z2^2*ln2^2-239/105*z2^3+7/12*z3*ln2^3-73/16*z3^2-403/64*z5*
   ln2+4*ln2*li5half-1/90*ln2^6+16*li6half+9*s6;
Fill Htab6(0,1,0,-1,1,1)=7/4*z2*z3*ln2+1/3*z2*ln2^4+6*z2*li4half-37/
   80*z2^2*ln2^2-629/840*z2^3-7/12*z3*ln2^3-3/2*z3^2-1/180*ln2^6-4*
   li6half+3/4*s6;
Fill Htab6(0,1,0,-1,1,0)=-7/4*z2*z3*ln2-1/6*z2*ln2^4-4*z2*li4half+
   z2^2*ln2^2+479/420*z2^3-1/2*z3^2;
Fill Htab6(0,1,0,-1,0,-1)=-7*z2*z3*ln2-1/3*z2*ln2^4-8*z2*li4half+2*
   z2^2*ln2^2+341/140*z2^3+35/16*z3^2;
Fill Htab6(0,1,0,-1,0,1)=-7/2*z2*z3*ln2-1/6*z2*ln2^4-4*z2*li4half+
   z2^2*ln2^2+43/35*z2^3+35/32*z3^2;
Fill Htab6(0,1,0,-1,0,0)=41/70*z2^3+3/16*z3^2;
Fill Htab6(0,1,0,1,-1,-1)=-63/16*z2*z3*ln2-1/3*z2*ln2^4-4*z2*li4half+
   163/80*z2^2*ln2^2+109/168*z2^3+145/64*z3^2+31/32*z5*ln2+4*ln2*
   li5half+2*ln2^2*li4half+1/20*ln2^6-5/2*s6;
Fill Htab6(0,1,0,1,-1,1)=-3/8*z2*z3*ln2+1/6*z2*ln2^4-2*z2*li4half-63/
   40*z2^2*ln2^2-1573/1680*z2^3-125/64*z3^2-2*ln2^2*li4half-1/15*ln2^6
   +12*li6half+23/4*s6;
Fill Htab6(0,1,0,1,-1,0)=1/12*z2*ln2^4+2*z2*li4half-1/2*z2^2*ln2^2-
   139/240*z2^3+13/16*z3^2;
Fill Htab6(0,1,0,1,1,-1)=69/16*z2*z3*ln2+1/48*z2*ln2^4+5/2*z2*li4half
   +33/80*z2^2*ln2^2+569/420*z2^3+5/32*z3^2-279/64*z5*ln2-4*ln2*
   li5half+1/60*ln2^6-12*li6half-17/4*s6;
Fill Htab6(0,1,0,1,1,1)=-32/105*z2^3+z3^2;
Fill Htab6(0,1,0,1,1,0)=37/42*z2^3-3*z3^2;
Fill Htab6(0,1,0,1,0,-1)=-21/4*z2*z3*ln2-1/4*z2*ln2^4-6*z2*li4half+3/
   2*z2^2*ln2^2+77/80*z2^3+13/4*z3^2+31/4*z5*ln2-4*s6;
Fill Htab6(0,1,0,1,0,1)=3/70*z2^3;
Fill Htab6(0,1,0,1,0,0)=2/35*z2^3+2*z3^2;
Fill Htab6(0,1,0,0,-1,-1)=21/8*z2*z3*ln2+1/8*z2*ln2^4+3*z2*li4half-3/
   4*z2^2*ln2^2-34/105*z2^3-121/64*z3^2-155/32*z5*ln2+5/2*s6;
Fill Htab6(0,1,0,0,-1,1)=15/8*z2*z3*ln2+11/840*z2^3-5/64*z3^2-5/2*s6
;
Fill Htab6(0,1,0,0,-1,0)=-159/280*z2^3+3/16*z3^2;
Fill Htab6(0,1,0,0,1,-1)=-15/8*z2*z3*ln2-61/336*z2^3+1/4*z3^2+93/32*
   z5*ln2+s6;
Fill Htab6(0,1,0,0,1,1)=53/105*z2^3-3/2*z3^2;
Fill Htab6(0,1,0,0,1,0)=-6/5*z2^3+2*z3^2;
Fill Htab6(0,1,0,0,0,-1)=1037/840*z2^3-9/4*z3^2-31/4*z5*ln2+4*s6;
Fill Htab6(0,1,0,0,0,1)=10/21*z2^3-z3^2;
Fill Htab6(0,1,0,0,0,0)=8/7*z2^3;
Fill Htab6(0,0,-1,-1,-1,-1)=-1/8*z2*ln2^4-19/35*z2^3+7/24*z3*ln2^3+1/
   8*z3^2+31/32*z5*ln2+2*ln2*li5half+ln2^2*li4half+1/36*ln2^6+2*
   li6half-1/2*s6;
Fill Htab6(0,0,-1,-1,-1,1)=3/2*z2*z3*ln2+5/24*z2*ln2^4+2*z2*li4half-
   39/40*z2^2*ln2^2-319/280*z2^3-7/24*z3*ln2^3-69/32*z3^2-ln2^2*
   li4half-1/30*ln2^6+6*li6half+3*s6;
Fill Htab6(0,0,-1,-1,-1,0)=-7/8*z2*z3*ln2-1/24*z2*ln2^4-z2*li4half+1/
   4*z2^2*ln2^2-13/840*z2^3+79/64*z3^2;
Fill Htab6(0,0,-1,-1,1,-1)=11/16*z2*z3*ln2+11/48*z2*ln2^4+1/2*z2*
   li4half+17/80*z2^2*ln2^2-41/280*z2^3-7/24*z3*ln2^3+59/64*z3^2-155/
   64*z5*ln2+2*ln2*li5half-7/360*ln2^6-2*li6half-1/4*s6;
Fill Htab6(0,0,-1,-1,1,1)=-7/8*z2*z3*ln2-5/24*z2*ln2^4-2*z2*li4half-1/
   40*z2^2*ln2^2-13/35*z2^3+7/24*z3*ln2^3+1/32*z3^2+1/120*ln2^6+6*
   li6half+3/2*s6;
Fill Htab6(0,0,-1,-1,1,0)=7/8*z2*z3*ln2-9/8*z2^2*ln2^2-11/210*z2^3-
   45/64*z3^2+3/2*s6;
Fill Htab6(0,0,-1,-1,0,-1)=7/8*z2*z3*ln2+1/24*z2*ln2^4+z2*li4half-1/
   4*z2^2*ln2^2-139/840*z2^3-31/32*z3^2+31/16*z5*ln2-s6;
Fill Htab6(0,0,-1,-1,0,1)=7/4*z2*z3*ln2+1/12*z2*ln2^4+2*z2*li4half-1/
   2*z2^2*ln2^2-85/168*z2^3-27/32*z3^2;
Fill Htab6(0,0,-1,-1,0,0)=9/32*z3^2;
Fill Htab6(0,0,-1,1,-1,-1)=-17/48*z2*ln2^4-3/2*z2*li4half+9/8*z2^2*
   ln2^2+1091/560*z2^3-17/64*z3^2-279/64*z5*ln2-2*ln2*li5half+ln2^2*
   li4half+1/20*ln2^6-6*li6half-7/4*s6;
Fill Htab6(0,0,-1,1,-1,1)=-3/2*z2*z3*ln2+1/3*z2*ln2^4+z2*li4half-21/
   40*z2^2*ln2^2+67/560*z2^3+3/16*z3^2-ln2^2*li4half-2/45*ln2^6-2*
   li6half+9/4*s6;
Fill Htab6(0,0,-1,1,-1,0)=-1/24*z2*ln2^4-z2*li4half+5/2*z2^2*ln2^2+77/
   240*z2^3+3/4*z3^2-5*s6;
Fill Htab6(0,0,-1,1,1,-1)=-39/16*z2*z3*ln2-1/12*z2*ln2^4-z2*li4half+
   39/80*z2^2*ln2^2+311/560*z2^3+77/32*z3^2+31/4*z5*ln2-2*ln2*li5half
   +1/120*ln2^6-6*li6half-17/4*s6;
Fill Htab6(0,0,-1,1,1,1)=-1/6*z2*ln2^4-3*z2*li4half+7/10*z2^2*ln2^2+
   107/140*z2^3-1/2*z3^2+1/360*ln2^6+2*li6half-2*s6;
Fill Htab6(0,0,-1,1,1,0)=-9/8*z2^2*ln2^2-10/21*z2^3+47/64*z3^2+5/2*s6
;
Fill Htab6(0,0,-1,1,0,-1)=-1/24*z2*ln2^4-z2*li4half+1/4*z2^2*ln2^2+
   2627/1680*z2^3-75/32*z3^2-155/16*z5*ln2+4*s6;
Fill Htab6(0,0,-1,1,0,1)=1/4*z2*ln2^4+6*z2*li4half-3/2*z2^2*ln2^2-
   163/120*z2^3-47/32*z3^2+5*s6;
Fill Htab6(0,0,-1,1,0,0)=111/140*z2^3+63/32*z3^2-6*s6;
Fill Htab6(0,0,-1,0,-1,-1)=-13/12*z2^3+151/64*z3^2+217/32*z5*ln2-7/2*
   s6;
Fill Htab6(0,0,-1,0,-1,1)=15/8*z2*z3*ln2+1/6*z2*ln2^4+4*z2*li4half-
   z2^2*ln2^2-337/420*z2^3-117/64*z3^2+3/2*s6;
Fill Htab6(0,0,-1,0,-1,0)=-5/8*z2^3+27/16*z3^2;
Fill Htab6(0,0,-1,0,1,-1)=27/8*z2*z3*ln2+1/12*z2*ln2^4+2*z2*li4half-
   1/2*z2^2*ln2^2-853/1680*z2^3-21/32*z3^2-155/32*z5*ln2+s6;
Fill Htab6(0,0,-1,0,1,1)=-403/840*z2^3+95/64*z3^2;
Fill Htab6(0,0,-1,0,1,0)=13/28*z2^3-27/16*z3^2;
Fill Htab6(0,0,-1,0,0,-1)=-377/280*z2^3+81/32*z3^2+93/8*z5*ln2-6*s6;
Fill Htab6(0,0,-1,0,0,1)=4/35*z2^3-9/32*z3^2;
Fill Htab6(0,0,-1,0,0,0)=-31/14*z2^3;
Fill Htab6(0,0,1,-1,-1,-1)=7/48*z2*ln2^4+3/2*z2*li4half-79/80*z2^2*
   ln2^2-279/280*z2^3+7/24*z3*ln2^3+101/128*z3^2+31/4*z5*ln2-2*ln2*
   li5half-ln2^2*li4half-1/40*ln2^6-3/2*s6;
Fill Htab6(0,0,1,-1,-1,1)=39/16*z2*z3*ln2-1/24*z2*ln2^4+z2*li4half+
   67/80*z2^2*ln2^2+51/80*z2^3-7/24*z3*ln2^3+109/128*z3^2+ln2^2*
   li4half+11/360*ln2^6-8*li6half-11/2*s6;
Fill Htab6(0,0,1,-1,-1,0)=-7/8*z2*z3*ln2+1/24*z2*ln2^4+z2*li4half-11/
   8*z2^2*ln2^2-571/1680*z2^3+5/64*z3^2+7/2*s6;
Fill Htab6(0,0,1,-1,1,-1)=19/8*z2*z3*ln2-1/6*z2*ln2^4+11/40*z2^2*ln2^2
   +111/280*z2^3-7/24*z3*ln2^3-15/16*z3^2-279/64*z5*ln2-2*ln2*
   li5half+1/60*ln2^6;
Fill Htab6(0,0,1,-1,1,1)=-7/8*z2*z3*ln2+5/24*z2*ln2^4+3*z2*li4half-67/
   80*z2^2*ln2^2-199/280*z2^3+7/24*z3*ln2^3+111/64*z3^2-1/180*ln2^6-
   4*li6half+9/4*s6;
Fill Htab6(0,0,1,-1,1,0)=7/8*z2*z3*ln2+9/4*z2^2*ln2^2+55/168*z2^3-1/
   2*z3^2-5*s6;
Fill Htab6(0,0,1,-1,0,-1)=7/8*z2*z3*ln2+1/12*z2*ln2^4+2*z2*li4half-1/
   2*z2^2*ln2^2-353/210*z2^3+49/32*z3^2+155/16*z5*ln2-4*s6;
Fill Htab6(0,0,1,-1,0,1)=7/4*z2*z3*ln2-1/6*z2*ln2^4-4*z2*li4half+
   z2^2*ln2^2+839/840*z2^3+13/64*z3^2-5*s6;
Fill Htab6(0,0,1,-1,0,0)=-111/140*z2^3-39/32*z3^2+6*s6;
Fill Htab6(0,0,1,1,-1,-1)=7/24*z2*ln2^4+z2*li4half-21/20*z2^2*ln2^2-
   31/28*z2^3-251/128*z3^2-155/64*z5*ln2+2*ln2*li5half-ln2^2*li4half
   -17/360*ln2^6+8*li6half+11/2*s6;
Fill Htab6(0,0,1,1,-1,1)=3/16*z2*z3*ln2-1/3*z2*ln2^4-2*z2*li4half+33/
   40*z2^2*ln2^2+43/56*z2^3-61/128*z3^2+ln2^2*li4half+1/24*ln2^6-5/2
   *s6;
Fill Htab6(0,0,1,1,-1,0)=1/24*z2*ln2^4+z2*li4half-11/8*z2^2*ln2^2-
   307/840*z2^3-1/32*z3^2+5/2*s6;
Fill Htab6(0,0,1,1,1,-1)=-3/2*z2*z3*ln2+1/16*z2*ln2^4-1/2*z2*li4half-
   1/16*z2^2*ln2^2-47/70*z2^3+9/32*z3^2+31/32*z5*ln2+2*ln2*li5half-1/
   90*ln2^6+4*li6half+7/4*s6;
Fill Htab6(0,0,1,1,1,1)=6/35*z2^3-1/2*z3^2;
Fill Htab6(0,0,1,1,1,0)=-11/21*z2^3+3/2*z3^2;
Fill Htab6(0,0,1,1,0,-1)=577/1680*z2^3-47/64*z3^2-31/16*z5*ln2+s6;
Fill Htab6(0,0,1,1,0,1)=53/105*z2^3-3/2*z3^2;
Fill Htab6(0,0,1,1,0,0)=1/2*z3^2;
Fill Htab6(0,0,1,0,-1,-1)=-1033/1680*z2^3+77/64*z3^2+155/32*z5*ln2-5/
   2*s6;
Fill Htab6(0,0,1,0,-1,1)=3/4*z2*z3*ln2+1/6*z2*ln2^4+4*z2*li4half-
   z2^2*ln2^2-503/420*z2^3-7/32*z3^2+5/2*s6;
Fill Htab6(0,0,1,0,-1,0)=-1/56*z2^3-3/8*z3^2;
Fill Htab6(0,0,1,0,1,-1)=9/2*z2*z3*ln2+1/12*z2*ln2^4+2*z2*li4half-1/
   2*z2^2*ln2^2-17/1680*z2^3-73/32*z3^2-217/32*z5*ln2+s6;
Fill Htab6(0,0,1,0,1,1)=-29/30*z2^3+3*z3^2;
Fill Htab6(0,0,1,0,1,0)=8/7*z2^3-4*z3^2;
Fill Htab6(0,0,1,0,0,-1)=-439/280*z2^3+105/32*z3^2+93/8*z5*ln2-6*s6;
Fill Htab6(0,0,1,0,0,1)=-4/35*z2^3+1/2*z3^2;
Fill Htab6(0,0,1,0,0,0)=-16/7*z2^3;
Fill Htab6(0,0,0,-1,-1,-1)=59/140*z2^3-7/8*z3^2-93/32*z5*ln2+3/2*s6;
Fill Htab6(0,0,0,-1,-1,1)=-3/2*z2*z3*ln2-1/12*z2*ln2^4-2*z2*li4half+7/
   8*z2^2*ln2^2+127/280*z2^3+9/8*z3^2-s6;
Fill Htab6(0,0,0,-1,-1,0)=5/24*z2^3-3/4*z3^2;
Fill Htab6(0,0,0,-1,1,-1)=-9/8*z2*z3*ln2-3/4*z2^2*ln2^2-257/560*z2^3+
   3/4*z3^2+155/32*z5*ln2;
Fill Htab6(0,0,0,-1,1,1)=-1/12*z2*ln2^4-2*z2*li4half+7/8*z2^2*ln2^2+
   27/35*z2^3-1/4*z3^2-5/2*s6;
Fill Htab6(0,0,0,-1,1,0)=-41/60*z2^3-3/4*z3^2+4*s6;
Fill Htab6(0,0,0,-1,0,-1)=929/840*z2^3-9/4*z3^2-31/4*z5*ln2+4*s6;
Fill Htab6(0,0,0,-1,0,1)=-97/420*z2^3+3/4*z3^2;
Fill Htab6(0,0,0,-1,0,0)=31/14*z2^3;
Fill Htab6(0,0,0,1,-1,-1)=-1/24*z2*ln2^4-z2*li4half+5/8*z2^2*ln2^2+
   123/140*z2^3-15/16*z3^2-155/32*z5*ln2+s6;
Fill Htab6(0,0,0,1,-1,1)=-9/8*z2*z3*ln2-3/4*z2^2*ln2^2-3/70*z2^3+11/
   64*z3^2+5/2*s6;
Fill Htab6(0,0,0,1,-1,0)=449/840*z2^3+15/16*z3^2-4*s6;
Fill Htab6(0,0,0,1,1,-1)=-3/2*z2*z3*ln2-1/24*z2*ln2^4-z2*li4half+5/8*
   z2^2*ln2^2+3/280*z2^3+65/64*z3^2+93/32*z5*ln2-3/2*s6;
Fill Htab6(0,0,0,1,1,1)=23/70*z2^3-z3^2;
Fill Htab6(0,0,0,1,1,0)=-8/21*z2^3+z3^2;
Fill Htab6(0,0,0,1,0,-1)=883/840*z2^3-33/16*z3^2-31/4*z5*ln2+4*s6;
Fill Htab6(0,0,0,1,0,1)=-32/105*z2^3+z3^2;
Fill Htab6(0,0,0,1,0,0)=16/7*z2^3;
Fill Htab6(0,0,0,0,-1,-1)=-23/70*z2^3+3/4*z3^2+31/16*z5*ln2-s6;
Fill Htab6(0,0,0,0,-1,1)=8/35*z2^3-s6;
Fill Htab6(0,0,0,0,-1,0)=-31/28*z2^3;
Fill Htab6(0,0,0,0,1,-1)=-111/280*z2^3+9/32*z3^2+31/16*z5*ln2;
Fill Htab6(0,0,0,0,1,1)=6/35*z2^3-1/2*z3^2;
Fill Htab6(0,0,0,0,1,0)=-8/7*z2^3;
Fill Htab6(0,0,0,0,0,-1)=31/140*z2^3;
Fill Htab6(0,0,0,0,0,1)=8/35*z2^3;
Fill Htab6(0,0,0,0,0,0)=0;
#endif
*
#endprocedure

*--#] htable6 :
*--#[ htables :
#procedure htables(size)
*
*   Tables of harmonic polylogarithms at one.
*   Note that the definition of these objects is slightly different from
*   what are called Euler/Zagier sums.
*   Notation for the tables:
*   A zero index means that one should be added to the absolute value
*   of the next index. The argument is inf (infinity).
*   Example: Htab6(0,-1,0,0,1,1) = H(R(-2,3,1),1)
*   The various weights are in separate files.
*   This makes that FORM will not even touch the htable7.prc file if
*   size < 7. That saves much time.
*   File by J. Vermaseren, 21-jul-1998
*
#do itabs = 1,`size'
#ifndef `HTABLE`itabs'FILL'
#call htable`itabs'
#endif
#enddo
#endprocedure
*
*--#] htables :
*--#[ htolog :
#procedure htolog(H,x)
*
*   Procedure to expand H_{m,0_K}(`x') into powers of ln_ and H
*   functions without trailing zeroes
*   Algorithm:
*   1: determine maximum number of powers of ln
*   2: write the sum in terms of ln^k(`x')
*   3: determine number of excess weights to be distributed over
*      the other indeces.
*   4: determine all possible distributions
*   5: Add the excess weights and the combinatorics
*   6: Clean up
*
*   Routine by J.Vermaseren, 13-jul-1998
*
id	ln_(n1?,`x') = ln(n1,`x');
repeat;
	id,once,`H'(R(?a,0),`x') = Hac(R(?a,0),`x')*ln_(0,`x');
	repeat id Hac(R(?a,0),`x')*ln_(nn?,`x') = Hac(R(?a),`x')*ln_(nn+1,`x');
	id  Hac(R(?a),`x')*ln_(nn?,`x') = sum_(k,0,nn,sign_(nn-k)*invfac_(k)*
            Hac(R(?a),`x')*ln_(k,`x')*div(nn-k,nargs_(?a)))*addarg;
	repeat id addarg(?a)*div(n1?,n2?pos_) =
    	    sum_(k,0,n1,addarg(?a,k)*div(n1-k,n2-1));
	id  div(0,0) = 1;
	id  div(?a) = 0;
	id  Hac(R(?a),`x') = Hac(R(?a),`x')*HS(R,`x');
	repeat id Hac(R(?a,n1?),`x')*HS(R(?b),`x')*addarg(?c,n2?) =
            Hac(R(?a),`x')*HS(R(n1+sig_(n1)*n2,?b),`x')
                    *binom_(abs_(n1)-1+n2,abs_(n1)-1)*addarg(?c);
	id  Hac(R,`x') = 1;
	id  addarg = 1;
	id  HS(?a) = `H'(?a);
	id  ln_(0,`x') = 1;
	id	ln_(n?pos_,1) = 0;
	id	ln_(n?pos_,`x') = ln(n,`x');
	repeat id ln(n1?,`x')*ln(n2?,`x') = ln(n1+n2,`x');
endrepeat;
id	ln(n1?,`x') = ln_(n1,`x');
*
#endprocedure
*--#] htolog :
*--#[ htos :
#procedure htos(H,S,x)
*
*	Converts H(R(..),`x') to sum(i,1,inf)*pow(`x',i)*S(R(..),i)
*	J.Vermaseren 10-jul-1998
*
repeat id `H'(R(?a,0,n?!{0,0},?b),`x') = `H'(R(?a,n+sig_(n),?b),`x');
id,once,`H'(R(?a),`x') = SS(RR(?a),RR)*RR(?a);
repeat id RR(?a,n1?) = RR(?a)*sig_(n1);
id	RR = 1;
repeat id SS(RR(?a,n1?,n2?),RR(?b)) = SS(RR(?a,n1),RR(n2*sig_(n1),?b));
id	SS(RR(n1?),RR(?b)) = SS(RR,RR(n1,?b));
repeat id SS(RR(?a),RR(?b,n1?,n2?)) = SS(RR(n2,?a),RR(?b,n1))
			-SS(RR(?a),RR(?b,sig_(n2)*n1+sig_(n1)*n2));
id,SS(RR(?a),RR(?b)) = [1-`x']*sum(i,1,inf)*`S'(R(?b,?a),i)*pow(`x',i);
#endprocedure
*--#] htos :
*--#[ htoz :
#procedure htoz(H,Z,x,par)
*
*	Converts H(R(..),`x') to sum(i,1,inf)*pow(`x',i)*Z(R(..),i)
*	J.Vermaseren 10-jul-1998
*
if ( match(`H'(R(?a,0),`x')) );
	#call hlog0(`H',`x',1)
endif;
repeat id `H'(R(?a,0,n?!{0,0},?b),`x') = `H'(R(?a,n+sig_(n),?b),`x');
id,once,`H'(R(?a),`x') = SS(RR(?a),RR)*RR(?a);
repeat id RR(?a,n1?) = RR(?a)*sig_(n1);
id	RR = 1;
repeat id SS(RR(?a,n1?,n2?),RR(?b)) = SS(RR(?a,n1),RR(n2*sig_(n1),?b));
#if `par' > 0
id,SS(RR(n1?),RR(?b)) = [1-`x']*sum(i,1,inf)*`Z'(R(n1,?b),i)*pow(`x',i);
#else
id,SS(RR(n1?),RR(?b)) = sum(i,1,inf)*`Z'(R(?b),i-1)*pow(`x',i)*den(abs_(n1),i)
		*sign(i)^theta_(-n1);
id	`Z'(R,i?) = 1;
#endif
#endprocedure
*--#] htoz :
*--#[ inftoh :
#procedure inftoh(S,H)
*
*	Routine determines the H functions in 1 that come with S(R(..),inf)
*	J.Vermaseren 21-jul-1998
*
id	`S'(R(n1?,?a),inf) = SS(RR(n1,?a),RR(?a),RR(sig_(n1)),1);
repeat id SS(RR(?a),RR(n1?,?b),RR(?c,n2?),1) = 
						SS(RR(?a),RR(?b),RR(?c,n2,n2*sig_(n1)),1);
repeat id SS(RR(?a,n1?),RR(?b),RR(?c,n2?),1) =
						SS(RR(?a),RR(abs_(n1)*n2,?b),RR(?c),1);
id	SS(RR,RR(?a),RR,1) = SS(RR(?a),RR,1);
repeat id SS(RR(?a,n2?,n1?),RR(?b),1) =
		SS(RR(?a,n2),RR(n1,?b),1)+SS(RR(?a,abs_(n2)*sig_(n1)+n1),RR(?b),1);
id	SS(RR(n1?),RR(?b),1) = SS(RR,RR(n1,?b),1);
repeat id SS(RR(?a),RR(n1?,?b),1) = SS(RR(?a,n1),RR(?b),1)*sig_(n1);
id	SS(RR(?a),RR,1) = `H'(R(?a),1);
#endprocedure
*--#] inftoh :
*--#[ inftoone :
#procedure inftoone(S,H)
*
*	Converts S(R(..),inf) into H(R(..),1)
*	J.Vermaseren, 27-jul-1998
*
id	`S'(R(n1?,?a),inf) = Saa(RR(n1,?a),RR(?a),RR(sig_(n1)));
repeat id Saa(RR(?a),RR(n1?,?b),RR(?c,n2?)) = 
						Saa(RR(?a),RR(?b),RR(?c,n2,n2*sig_(n1)));
repeat id Saa(RR(?a,n1?),RR(?b),RR(?c,n2?)) =
						Saa(RR(?a),RR(abs_(n1)*n2,?b),RR(?c));
id	Saa(RR,RR(?a),RR) = Saa(RR(?a),RR);
repeat id Saa(RR(?a,n2?,n1?),RR(?b)) =
		Saa(RR(?a,n2),RR(n1,?b))+Saa(RR(?a,abs_(n2)*sig_(n1)+n1),RR(?b));
id	Saa(RR(n1?),RR(?b)) = Saa(RR,RR(n1,?b));
repeat id Saa(RR(?a),RR(n1?,?b)) = Saa(RR(?a,n1),RR(?b))*sig_(n1);
id	Saa(RR(?a),RR) = `H'(R(?a),1);
*
#endprocedure
*--#] inftoone :
*--#[ invmel :
#procedure invmel(S,N,Ha,x)
*
*   Uses the hmellin routine and an algorithm to find the leading term
*   to construct the inverse mellin transform of S in N.
*   Output is function Ha in x.
*
*   J. Vermaseren, 4-nov-1999
*
#do i=1,1
#$mw = -1;
repeat id `S'(R(?a,n1?!{-1,0,1},?b),`N') = `S'(R(?a,0,n1-sig_(n1),?b),`N');
id  `S'(R(?a),`N') = `S'(R(?a),`N')*x2^nargs_(?a);
if ( count(x2,1) > $mw ) $mw = count_(x2,1);
repeat id `S'(R(?a,0,n?!{0,0},?b),`N') = `S'(R(?a,n+sig_(n),?b),`N');
.sort
if ( count(x2,1) == `$mw' );
    id  x2^n? = x2;
else;
    id  x2 = 1;
endif;
if ( count(x2,1) );
id  x2 = 1;
id  `S'(R(?a),`N') = `S'(R(?a),`N')+SHS(R,R(?a),`N');
repeat id SHS(R,R(?a,n1?!{-1,0,1},?b),`N') = SHS(R,R(?a,0,n1-sig_(n1),?b),`N');
repeat;
    id  SHS(R(?a),R(n1?neg_,?b),`N') = SHS(R(?a,n1),R(?b),`N')*x1;
    id  SHS(R(?a),R(n1?pos0_,?b),`N') = SHS(R(?a,n1),R(?b),`N');
endrepeat;
id  x1^2 = 1;
if ( count(x1,1) == 1 );
    id  x1 = sign_(`N')/[1+x];
    id  sign_(`N')*sign_(`N') = 1;
    id  SHS(R(?a,n1?),R,`N') = SHS(R(?a),R,`N',n1,-1);
    repeat;
        id  SHS(R(1,?a),R(?b),`N',n2?,n3?) = SHS(R(?a),R(?b,n3),`N',n2,n3);
        id  SHS(R(-1,?a),R(?b),`N',n2?,n3?) = SHS(R(?a),R(?b,-n3),`N',n2,-n3);
        id  SHS(R(0,?a),R(?b),`N',n2?,n3?) = SHS(R(?a),R(?b,0),`N',n2,n3);
    endrepeat;
    id  SHS(?a,n1?,n2?) = SHS(?a);
    repeat;
        id  SHS(R(?a),R(1,?b),`N') = SHS(R(?a,1),R(?b),`N');
        id  SHS(R(?a),R(n?neg0_,?b),`N') = -SHS(R(?a,n),R(?b),`N');
    endrepeat;
elseif ( count(SHS,1) );
    Multiply 1/[1-x];
    id  SHS(R(?a,n1?),R,`N') = SHS(R(?a),R,`N',n1,1);
    repeat;
        id  SHS(R(1,?a),R(?b),`N',n2?,n3?) = SHS(R(?a),R(?b,n3),`N',n2,n3);
        id  SHS(R(-1,?a),R(?b),`N',n2?,n3?) = SHS(R(?a),R(?b,-n3),`N',n2,-n3);
        id  SHS(R(0,?a),R(?b),`N',n2?,n3?) = SHS(R(?a),R(?b,0),`N',n2,n3);
    endrepeat;
    id  SHS(?a,n1?,n2?) = -SHS(?a);
    repeat;
        id  SHS(R(?a),R(1,?b),`N') = SHS(R(?a,1),R(?b),`N');
        id  SHS(R(?a),R(n?neg0_,?b),`N') = -SHS(R(?a,n),R(?b),`N');
    endrepeat;
endif;
id  SHS(R(?a),R,`N') = -Mel*Hb(R(?a),`x')+`Ha'(R(?a),`x');
repeat id Hb(R(?a,0,n?!{0,0},?b),`x') = Hb(R(?a,n+sig_(n),?b),`x');
repeat id `Ha'(R(?a,0,n?!{0,0},?b),`x') = `Ha'(R(?a,n+sig_(n),?b),`x');
endif;
id  Even(`N')*sign_(`N') = Even(`N');
id  Odd(`N')*sign_(`N') = -Odd(`N');
.sort:Determine H;
#call hmellin(Hb,`x',`S',`N')
id  Even(`N')*sign_(`N') = Even(`N');
id  Odd(`N')*sign_(`N') = -Odd(`N');
.sort
#$ii = 0;
if ( match(`S'(R(?a),`N')) ) $ii = 1;
.sort
#if `$ii' == 1
    #redefine i "0"
#endif
#enddo
id	`Ha'(R,`x') = 1;
.sort:Preliminary;
id	Hb(x?,1) = Hb(x,one);
#call hbasis(Hb,one)
id	Hb(x?,one) = `Ha'(x,1);
.sort
#ifndef `SKIPVALUES'
Repeat id `Ha'(R(?a,n1?!{0,1,-1},?b),1) = `Ha'(R(?a,0,n1-sig_(n1),?b),1);
#$wcount = 0;
id	`Ha'(R(?a),1) = `Ha'(R(?a),1)*`Ha'(nargs_(?a));
id	`Ha'(n?$n) = 1;
if ( $n > $wcount ) $wcount = $n;
.sort
#if ( `$wcount' > 8 )
	#$wcount = 8;
#endif
#call htables(`$wcount')
#do k = 1,`$wcount'
  id  `Ha'(R(n1?,...,n`k'?),1) = Htab`k'(n1,...,n`k');
  id  HL(R(n1?,...,n`k'?),1) = Htab`k'(n1,...,n`k');
#enddo
#endif
AB	Even,Odd;
.sort
Collect,acc;
Normalize acc;
id	acc(Even(`N')+Odd(`N')) = 1;
id	acc(Even(`N')-Odd(`N')) = sign_(`N');
id	acc(x?number_) = x;
#endprocedure
*--#] invmel :
*--#[ invmellin :
#procedure invmellin(S,N,Ha,x)
*
*	Now find the most complicated weight and depth.
*
id	`S'(R(?a),`N') = `S'(R(?a),`N')*x2^nargs_(?a);
repeat id `S'(R(?a,n?!{-1,0,1},?b),`N') = `S'(R(?a,0,n-sig_(n),?b),`N');
id	`S'(R(?a),`N') = `S'(R(?a),`N')*x1^nargs_(?a);
repeat id `S'(R(?a,0,n?!{0,0},?b),`N') = `S'(R(?a,n+sig_(n),?b),`N');
#$w = 0;
#$d = 0;
id	x1^n1?$ww*x2^n2?$dd = x1^n1*x2^n2;
if ( $ww > $w );
	$w = $ww;
	$d = $dd;
elseif ( $ww == $w );
	if ( $dd > $d ) $d = $dd;
endif;
.sort
id	x1^`$w'*x2^`$d' = x3*x4^`$w'*x5^`$d';
id	x1 = 1;
id	x2 = 1;
if ( count(x3,1) );
	if ( match(sign_(`N')) );
		id	x3*x4^nw?*x5^nd?*`S'(R(?a,n1?),`N')*sign_(`N') = `S'(R(?a,n1),`N')*sign_(`N')*x3
				+HH(R(?a,n1),RR,-1)/[1+`x']*sign_(nd+nw-1)*sig_(n1)*x3;
	else;
		id	x3*x4^nw?*x5^nd?*`S'(R(?a,n1?),`N') = `S'(R(?a,n1),`N')*x3
				-HH(R(?a,n1),RR,1)/[1-`x']*sign_(nd+nw-1)*sig_(n1)*x3;
	endif;
	repeat id HH(R(n1?,?a),RR(?b),n?) = HH(R(?a),RR(?b,n1*n),n*sig_(n1));
	repeat id HH(R,RR(?a,n?!{-1,0,1},?b),`x'?) = HH(R,RR(?a,0,n-sig_(n),?b),`x');
	repeat id HH(R,RR(?a,-1,?b),`x'?) = -HH(R,RR(?a,-2,?b),`x');
	repeat id HH(R,RR(?a,-2,?b),`x'?) =  HH(R,RR(?a,-1,?b),`x');

	id	HH(R,RR(?a,n?),n1?) = Mel*H(R(?a),`x')-`Ha'(R(?a),`x');
	repeat id H(R(?a,0,n?!{0,0},?b),`x') = H(R(?a,n+sig_(n),?b),`x');
	repeat id `Ha'(R(?a,0,n?!{0,0},?b),`x') = `Ha'(R(?a,n+sig_(n),?b),`x');
	id	`Ha'(R,`x') = 1;
endif;
B	x3;
Print +f +s;
.sort
id	x3 = 1;
#call hmellin(H,`x',`S',`N')
id	H(R,x?) = 1;
id	H(R(?a),1) = `Ha'(R(?a),1);
id	`S'(R,`N') = 1;
#endprocedure
*--#] invmellin :
*--#[ onetoinf :
#procedure onetoinf(H,S)
*
*	Converts H(R(..),1) into S(R(..),inf)
*	J.Vermaseren 27-jul-1998
*
repeat id `H'(R(?a,0,n1?,?b),1) = `H'(R(?a,n1+sig_(n1),?b),1);
repeat;
	id,once,`H'(R(?a),1) = Saa(RR(?a),RR)*RR(?a);
	repeat id RR(?a,n1?) = RR(?a)*sig_(n1);
	id	RR = 1;
	repeat id Saa(RR(?a,n1?,n2?),RR(?b)) = Saa(RR(?a,n1),RR(n2*sig_(n1),?b));
	id	Saa(RR(n1?),RR(?b)) = Saa(RR,RR(n1,?b));
	repeat id Saa(RR(?a),RR(?b,n1?,n2?)) = Saa(RR(n2,?a),RR(?b,n1))
			-Saa(RR(?a),RR(?b,sig_(n2)*n1+sig_(n1)*n2));
	id,Saa(RR(?a),RR(?b)) = `S'(R(?b,?a),inf);
endrepeat;
*
#endprocedure
*--#] onetoinf :
*--#[ stoh :
#procedure stoh(S,H,x)
*
*	Routine determines the H functions that come with
*		sum_(i,1,inf,`x'^i*S(R(..),i))
*	J.Vermaseren 10-jul-1998
*
id	sum(i,1,inf)*pow(x?,i)*`S'(R(n1?,?a),i) =
						SS(RR(n1,?a),RR(?a),RR(sig_(n1)),x);
repeat id SS(RR(?a),RR(n1?,?b),RR(?c,n2?),x?) = 
						SS(RR(?a),RR(?b),RR(?c,n2,n2*sig_(n1)),x);
repeat id SS(RR(?a,n1?),RR(?b),RR(?c,n2?),x?) =
						SS(RR(?a),RR(abs_(n1)*n2,?b),RR(?c),x);
id	SS(RR,RR(?a),RR,x?) = SS(RR(?a),RR,x);
repeat id SS(RR(?a,n2?,n1?),RR(?b),x?) =
		SS(RR(?a,n2),RR(n1,?b),x)+SS(RR(?a,abs_(n2)*sig_(n1)+n1),RR(?b),x);
id	SS(RR(n1?),RR(?b),x?) = SS(RR,RR(n1,?b),x);
repeat id SS(RR(?a),RR(n1?,?b),x?) = SS(RR(?a,n1),RR(?b),x)*sig_(n1);
id	SS(RR(?a),RR,`x') = `H'(R(?a),`x')/[1-`x'];
id	SS(RR(?a),RR,-`x') = SS(R(?a),R,`x')/[1+`x'];
repeat id SS(R(n1?,?a),R(?b),`x') = -SS(R(?a),R(?b,-n1),`x');
id	SS(R,R(?a),`x') = `H'(R(?a),`x');
#endprocedure
*--#] stoh :
*--#[ stoz :
#procedure stoz(S,Z)
*
*	Routine converts S-sums into Z-sums
*	Z is the multiple sum in which N >= i1 >  i2 >  i3 >  ... >  ip >= 1
*	S is the multiple sum in which N >= i1 >= i2 >= i3 >= ... >= ip >= 1
*
*	J.Vermaseren 21-jul-1998
*
repeat;
	id,once,`S'(R(n1?,?a),i?) = SS(RR(n1,?a),RR(?a),RR(sig_(n1)),i);
	repeat id SS(RR(?a),RR(n1?,?b),RR(?c,n2?),i?) = 
						SS(RR(?a),RR(?b),RR(?c,n2,n2*sig_(n1)),i);
	repeat id SS(RR(?a,n1?),RR(?b),RR(?c,n2?),i?) =
						SS(RR(?a),RR(abs_(n1)*n2,?b),RR(?c),i);
	id	SS(RR,RR(?a),RR,i?) = SS(RR(?a),RR,i);
	repeat id SS(RR(?a,n2?,n1?),RR(?b),i?) =
			SS(RR(?a,n2),RR(n1,?b),i)+SS(RR(?a,abs_(n2)*sig_(n1)+n1),RR(?b),i);
	id	SS(RR(n1?),RR(?b),i?) = SS(RR,RR(n1,?b),i);
	repeat id SS(RR(?a),RR(n1?,?b),i?) = SS(RR(?a,n1),RR(?b),i)
*sig_(n1)
			;
	id	SS(RR(?a),RR,i?) = `Z'(R(?a),i);
	repeat id SS(R(n1?,?a),R(?b),i?) = -SS(R(?a),R(?b,-n1),i);
	id	SS(R,R(?a),i?) = `Z'(R(?a),i);
endrepeat;
#endprocedure
*--#] stoz :
*--#[ subz :
#procedure subz(Z)
*
*   Procedure evaluates the harmonic Z sums with a numerical last argument
*   into their numerical value. The symbolic ones are untouched of course.
*
*   J.Vermaseren,3-aug-1998
*
*   All operations are done in the arguments to ensure continuous sorting
*   If this would not be done, there would be many terms.
*
id  `Z'(R(?a),n?pos_) = acc1(`Z'(?a,n));
id  `Z'(R(?a),n?neg0_) = 0;
repeat;
    argument acc1;
		id	`Z'(?a,0) = 0;
        id  `Z'(m?pos_,?a,n?) = sum_(jjj,1,n,`Z'(?a,jjj-1)/jjj^m);
		id	`Z'(?a,0) = 0;
        id  `Z'(n?) = 1;
    endargument;
    argument acc1;
		id	`Z'(?a,0) = 0;
        id  `Z'(m?neg_,?a,n?) = sum_(jjj,1,n,`Z'(?a,jjj-1)*sign_(jjj)*jjj^m);
		id	`Z'(?a,0) = 0;
        id  `Z'(n?) = 1;
    endargument;
endrepeat;
id  acc1(x?) = x;
#endprocedure
*--#] subz :
*--#[ sumtria :
#procedure sumtria(i,S)
*
*   Sums objects of the type
*   sum`i'(j`i',1,n-1)*S`i'(R(?a),n-j`i')*S`i'(R(?b),j`i')/j`i'^k
*   for any (integer) values of ?a, ?b and k (k>0)
*
*   Does not do the case k=0.
*
*   J.Vermaseren,30-oct-1997
*
if ( count(j`i',1) < 0 );
    id  1/j`i'^n? = den`i'(n,0,j`i');
    repeat id den`i'(n1?,0,j`i')*den`i'(n2?,0,j`i') = den`i'(n1+n2,0,j`i');
endif;
if ( match(S`i'(R(?a),n?)) );
    SplitArg,(j`i'),S`i';
    id  S`i'(R(?a),j`i') = S`i'(R(?a),0,j`i');
    if ( match(sum`i'(j`i',n1?,n2?)*S`i'(R(?a),n2?,-j`i')) == 0 );
        id  sum`i'(j`i',n1?,n2?) = sum`i'(j`i',n1,n2+1);
        if ( match(sum`i'(j`i',n1?,n2?)*S`i'(R(?a),n2?,-j`i')) == 0 );
            id  sum`i'(j`i',n1?,n2?) = sum`i'(j`i',n1,n2-1);
        endif;
    endif;
endif;
if ( count(den`i',1) == 1 );
    if ( count(S`i',1) == 2 ); 
        id  sum`i'(j`i',1,n?)*S`i'(R(?a),n?,-j`i')*S`i'(R(?b),0,j`i')
                        *sign`i'(j`i')*den`i'(k?,0,j`i') =
                            SS(R(?a),R(?b),-k,n);
        id  sum`i'(j`i',1,n?)*S`i'(R(?a),n?,-j`i')*S`i'(R(?b),0,j`i')
                        *den`i'(k?,0,j`i') = SS(R(?a),R(?b),k,n);
        id  sum`i'(j`i',1,n?)*S`i'(R(?a),x1?,-j`i')*S`i'(R(?b),0,j`i')
                        *sign`i'(j`i')*den`i'(k?,0,j`i') =
                            SS(R(?a),R(?b),-k,n+1,x1);
        id  sum`i'(j`i',1,n?)*S`i'(R(?a),x1?,-j`i')*S`i'(R(?b),0,j`i')
                        *den`i'(k?,0,j`i') = SS(R(?a),R(?b),k,n+1,x1);
    elseif ( count(S`i',1) == 1 );
        id  sum`i'(j`i',1,n?)*S`i'(R(?a),n?,-j`i')
                        *sign`i'(j`i')*den`i'(k?,0,j`i') =
                            SS(R(?a),R,-k,n);
        id  sum`i'(j`i',1,n?)*S`i'(R(?a),n?,-j`i')
                        *den`i'(k?,0,j`i') = SS(R(?a),R,k,n);
        id  sum`i'(j`i',1,n?)*S`i'(R(?a),x1?,-j`i')
                        *sign`i'(j`i')*den`i'(k?,0,j`i') =
                            SS(R(?a),R,-k,n+1,x1);
        id  sum`i'(j`i',1,n?)*S`i'(R(?a),x1?,-j`i')
                        *den`i'(k?,0,j`i') = SS(R(?a),R,k,n+1,x1);
    endif;
    id  SS(?a,n?,n?) = SS(?a,n);
    id  SS(R(?a),R(?b),k?pos_,n?,x1?) = sum`i'(j`i',1,n-1)*
            S`i'(R(?a),x1,-j`i')*S`i'(R(?b),0,j`i')*den`i'(0,j`i')^k;
    id  SS(R(?a),R(?b),k?neg_,n?,x1?) = sum`i'(j`i',1,n-1)*sign`i'(j`i')*
            S`i'(R(?a),x1,-j`i')*S`i'(R(?b),0,j`i')*den`i'(0,j`i')^(abs_(k));
endif;
*
*   The sums that this routine can handle are now in the function SS.
*   Notation in the sequel: we add pairs of k,n if there are new denominators
*   and summations boundaries.
*   Eventually we hit on sums we can do and then we work backwards in a
*   combination of sums and synchronizations.
*
repeat id   SS(R(n1?,?a),R(?b),k?,?c) =
        +sum_(jjj,1,abs_(k),
            SS(R(?a),R(?b),sig_(n1*k)*jjj,sig_(n1)*(abs_(k)+abs_(n1)-jjj),?c)*
            binom_(abs_(k)+abs_(n1)-1-jjj,abs_(n1)-1))
        +sum_(jjj,1,abs_(n1),
            SS(R(?b),R(?a),sig_(n1*k)*jjj,sig_(k)*(abs_(k)+abs_(n1)-jjj),?c)*
            binom_(abs_(k)+abs_(n1)-1-jjj,abs_(k)-1));
id  SS(R,R(?a),k?,m?,?c,n?) = SS(R,R(k,?a),m,?c,n)
        -SS(R,R(?a),sig_(k)*m+sig_(m)*k,?c,n);
id  SS(R,R(?a),?c,n?) = `S'(R(reverse_(?c),?a),n);
#endprocedure
*--#] sumtria :
*--#[ xtot :
#procedure xtot(H,x,t,par)
*
*   Procedure makes conversion of x to t with x=(1-t)/(1+t)
*   The indices in the output H(...,t) are transformed indices.
*   This means that
*       0  -> (1) + (-1)
*       1  -> (0) - (-1)
*      (-1)-> (-1)
*
#if `par' == 2
repeat id `H'(R(?a,n?!{0,1,-1},?b),`x') = `H'(R(?a,0,n-sig_(n),?b),`x');
#endif
*#call htake1(`H',`x',HL)
#call hlog1(`H',`x',HL,-1)
id  HL(R(?a),`x') =
                (-H1(R(-1),1)-``H''(R(1),`t'))^nargs_(?a)*invfac_(nargs_(?a));
.sort
id  `H'(R(?a),`x') = H1(R(?a),1)-HHH(R(?a),R,`t');
repeat id HHH(R(n1?,n2?,?a),R(?b),`t') =
            +`H'(R(?b,n1),`t')*H2(R(n2,?a),1)
            -HHH(R(n2,?a),R(?b,n1),`t');
id  HHH(R(n1?),R(?b),`t') = `H'(R(?b,n1),`t');
*#call htake1(H2,1,HL)
#call hlog1(H2,1,HL,-1)
Multiply replace_(H2,H1);
id  HL(R(?a),1) = (-H1(R(-1),1))^nargs_(?a)*invfac_(nargs_(?a));
#endprocedure
*--#] xtot :
*--#[ ztos :
#procedure ztos(Z,S)
*
*   Converts Z(R(..),i) to S(R(..),i)
*	Z is the multiple sum in which N >= i1 >  i2 >  i3 >  ... >  ip >= 1
*	S is the multiple sum in which N >= i1 >= i2 >= i3 >= ... >= ip >= 1
*	
*   J.Vermaseren 21-jul-1998
*
repeat;
    id,once,`Z'(R(?a),i?) = SS(RR(?a),RR,i)
*RR(?a)
		;
    repeat id RR(?a,n1?) = RR(?a)*sig_(n1);
    id  RR = 1;
    repeat id SS(RR(?a,n1?,n2?),RR(?b),i?) = SS(RR(?a,n1),RR(n2*sig_(n1),?b),i);
    id  SS(RR(n1?),RR(?b),i?) = SS(RR,RR(n1,?b),i);
    repeat id SS(RR(?a),RR(?b,n1?,n2?),i?) = SS(RR(n2,?a),RR(?b,n1),i)
                -SS(RR(?a),RR(?b,sig_(n2)*n1+sig_(n1)*n2),i);
    id,SS(RR(?a),RR(?b),i?) = `S'(R(?b,?a),i);
endrepeat;
#endprocedure
*--#] ztos :
#endif

