$f1z[{5}] = (107 - 350000*z)/(60*z*(-1 + 3125*z))
 
$f1z[{6}] = (-3*(-1 + 12312*z))/(2*z*(-1 + 11664*z))
 
$f1z[{8}] = (19 - 1310720*z)/(12*z*(-1 + 65536*z))
 
$f1z[{10}] = (73 - 62400000*z)/(60*z*(-1 + 800000*z))
 
$f1z[{3, 3}] = (-9*(-1 + 756*z))/(4*z*(-1 + 729*z))
 
$f1z[{4, 2}] = (7 - 7424*z)/(3*z*(-1 + 1024*z))
 
$f1z[{4, 3}] = (41 - 74304*z)/(24*z*(-1 + 1728*z))
 
$f1z[{4, 4}] = (5 - 21504*z)/(3*z*(-1 + 4096*z))
 
$f1z[{6, 2}] = (5 - 35712*z)/(2*z*(-1 + 6912*z))
 
$f1z[{6, 4}] = (-9*(-1 + 29696*z))/(8*z*(-1 + 27648*z))
 
$f1z[{6, 6}] = (11 - 2239488*z)/(12*z*(-1 + 186624*z))
 
$f1z[{3, 2, 2}] = (5 - 2232*z)/(2*z*(-1 + 432*z))
 
$f1z[{2, 2, 2, 2}] = (-8*(-1 + 264*z))/(3*z*(-1 + 256*z))
 
ambf1z[{5}] = -1/12*Log[1 - 3125*z] - (31*Log[z])/12
 
ambf1z[{6}] = -1/12*Log[1 - 11664*z] - (9*Log[z])/4
 
ambf1z[{8}] = -1/12*Log[1 - 65536*z] - (7*Log[z])/3
 
ambf1z[{10}] = -1/12*Log[1 - 800000*z] - (23*Log[z])/12
 
ambf1z[{3, 3}] = -1/12*Log[1 - 729*z] - (11*Log[z])/4
 
ambf1z[{4, 2}] = -1/12*Log[1 - 1024*z] - (17*Log[z])/6
 
ambf1z[{4, 3}] = -1/12*Log[1 - 1728*z] - (5*Log[z])/2
 
ambf1z[{4, 4}] = -1/12*Log[1 - 4096*z] - (13*Log[z])/6
 
ambf1z[{6, 2}] = -1/12*Log[1 - 6912*z] - (8*Log[z])/3
 
ambf1z[{6, 4}] = -1/12*Log[1 - 27648*z] - (11*Log[z])/6
 
ambf1z[{6, 6}] = -1/12*Log[1 - 186624*z] - (17*Log[z])/12
 
ambf1z[{3, 2, 2}] = -1/12*Log[1 - 432*z] - 3*Log[z]
 
ambf1z[{2, 2, 2, 2}] = -1/12*Log[1 - 256*z] - (19*Log[z])/6
 
$propamb[{5}] = {audd -> -8/(5*z), auud -> z/25, aud -> -6/625, 
     add -> 2/(25*z^2), ad -> 2/(3125*z)}
 
$propamb[{6}] = {audd -> -3/(2*z), auud -> (5*z)/108, aud -> -1/108, 
     add -> 1/(18*z^2), ad -> 1/(1944*z)}
 
$propamb[{8}] = {audd -> -3/(2*z), auud -> (5*z)/64, aud -> -3/256, 
     add -> 3/(64*z^2), ad -> 9/(16384*z)}
 
$propamb[{10}] = {audd -> -7/(5*z), auud -> z/10, aud -> -3/250, 
     add -> 3/(100*z^2), ad -> 9/(20000*z)}
 
$propamb[{3, 3}] = {audd -> -z^(-1), auud -> (-4*z)/81, aud -> 0, 
     add -> 2/(9*z^2), ad -> (2/729 - 9*z)/z}
 
$propamb[{4, 2}] = {audd -> -z^(-1), auud -> (-7*z)/128, aud -> 0, 
     add -> 7/(32*z^2), ad -> (49/16384 - (225*z)/16)/z}
 
$propamb[{4, 3}] = {audd -> -19/(12*z), auud -> (25*z)/864, aud -> -7/864, 
     add -> 1/(12*z^2), ad -> 1/(1728*z)}
 
$propamb[{4, 4}] = {audd -> -z^(-1), auud -> (-3*z)/32, aud -> 0, 
     add -> 3/(16*z^2), ad -> (9/2048 - 96*z)/z}
 
$propamb[{6, 2}] = {audd -> -1/3*1/z, auud -> (-19*z)/72, aud -> 1/8, 
     add -> 3/(4*z^2), ad -> (9/128 - 1536*z)/z}
 
$propamb[{6, 4}] = {audd -> -17/(12*z), auud -> (13*z)/288, aud -> -5/576, 
     add -> 1/(24*z^2), ad -> 1/(2304*z)}
 
$propamb[{6, 6}] = {audd -> -z^(-1), auud -> (-5*z)/18, aud -> 0, 
     add -> 5/(36*z^2), ad -> (25/2592 - 12960*z)/z}
 
$propamb[{3, 2, 2}] = {audd -> -z^(-1), auud -> (-17*z)/432, aud -> 0, 
     add -> 17/(72*z^2), ad -> (289/124416 - (1225*z)/288)/z}
 
$propamb[{2, 2, 2, 2}] = {audd -> -z^(-1), auud -> -1/32*z, aud -> 0, 
     add -> 1/(4*z^2), ad -> (1/512 - 2*z)/z}
 
$rallinit[{5}] = {saudd -> -8/5}
 
$rallinit[{6}] = {saudd -> -3/2}
 
$rallinit[{8}] = {saudd -> -3/2}
 
$rallinit[{10}] = {saudd -> -7/5}
 
$rallinit[{3, 3}] = {saudd -> -1}
 
$rallinit[{4, 2}] = {saudd -> -1}
 
$rallinit[{4, 3}] = {saudd -> -19/12}
 
$rallinit[{4, 4}] = {saudd -> -1}
 
$rallinit[{6, 2}] = {saudd -> -1/3}
 
$rallinit[{6, 4}] = {saudd -> -17/12}
 
$rallinit[{6, 6}] = {saudd -> -1}
 
$rallinit[{12, 2}] = {saudd -> -3/2}
 
$rallinit[{3, 2, 2}] = {saudd -> -1}
 
$rallinit[{2, 2, 2, 2}] = {saudd -> -1}
 
orbregulator[{5}] = 5
 
orbregulator[{6}] = 6
 
orbregulator[{8}] = 8
 
orbregulator[{10}] = 10
 
orbregulator[{3, 3}] = 2
 
orbregulator[{4, 2}] = 2
 
orbregulator[{4, 3}] = 3
 
orbregulator[{4, 4}] = 2
 
orbregulator[{6, 2}] = 2
 
orbregulator[{6, 4}] = 4
 
orbregulator[{6, 6}] = 2
 
orbregulator[{12, 2}] = 2
 
orbregulator[{3, 2, 2}] = 2
 
orbregulator[{2, 2, 2, 2}] = 2
 
cshiftmon[{4, 2}, Infinity] = 2
 
cshiftmon[{6, 2}, Infinity] = 1
 
cshiftmon[{3, 2, 2}, Infinity] = 1
 
clensefac[{4, 2}, Infinity] = -4
 
clensefac[{6, 2}, Infinity] = -64
 
clensefac[{3, 2, 2}, Infinity] = -64