If[$VersionNumber>=2.,$Messages=OutputStream["",1],$Messages={}]

BeginPackage["Transfor`mgl`"]

Begin["`Private`"]

(*Belegen von Module durch Block f�r Versionen 1.?*)
If[$VersionNumber<2.,Module=Block]


(*ListTest[Liste_]:=MemberQ[{Head[Liste]},List];
Argument[List[x___]]:=x;*)





Attributes[ClearQ]={HoldAll};
ClearQ[x__]:=Module[{ii,VarList,ArgList={x}},
  Clear[x];Clear[AA];VarList=Table[AA[ii],{ii,1,Length[{x}]}];
  If[!ArgList==={x},
    Switch[Input[StringJoin["Some variables have a value. Should the variables \n",
      ToString[StringForm["``",{x}]]," be cleared? Do you want to set
      \nvalues for the equation (v)? [y|n|yv|nv]: "]],
      Global`y,Release[VarList]={x};,
      Global`n,Release[VarList]={x};Release[{x}]=ArgList;,
      Global`yv,Release[VarList]=
             Table[Input[StringForm["``=",{x}[[ii]]]],{ii,1,Length[{x}]}];,
      Global`nv,Release[VarList]=
             Table[Input[StringForm["``=",{x}[[ii]]]],{ii,1,Length[{x}]}];
         Release[{x}]=ArgList;],
    Switch[Input[StringJoin["Do you want to set values for the equation? [y|n]: "]],
      Global`y,Release[VarList]=
             Table[Input[StringForm["``=",{x}[[ii]]]],{ii,1,Length[{x}]}];,
      Global`n,Release[VarList]={x};]]];




Tgl2103:=(ClearQ[Global`a,Global`b,Global`c,Global`z];
   Hyp`m`LS=Hyp`m`F[{AA[1],AA[2]},{AA[3]},AA[4]];
   Hyp`m`RS=(1-AA[4])^(-AA[1]-AA[2]+AA[3])*Hyp`m`F[{-AA[1]+AA[3],-AA[2]+AA[3]},{AA[3]},AA[4]];
   Hyp`m`Gleichung);
Tgl2104:=(ClearQ[Global`a,Global`b,Global`c,Global`z];
   Hyp`m`LS=Hyp`m`F[{AA[1],AA[2]},{AA[3]},AA[4]];
   Hyp`m`RS=Hyp`m`F[{AA[1],-AA[2]+AA[3]},{AA[3]},-(AA[4]/(1-AA[4]))]/(1-AA[4])^AA[1];
   Hyp`m`Gleichung);
Tgl2106:=(ClearQ[Global`a,Global`n,Global`c,Global`z];
   Hyp`m`LS=Hyp`m`F[{AA[1],-AA[2]},{AA[3]},AA[4]];
   Hyp`m`RS=(AA[4]^AA[2]*Hyp`m`F[{-AA[2],1-AA[3]-AA[2]},{1+AA[1]-AA[3]-AA[2]},-((1-AA[4])/AA[4])]*
     Hyp`m`p[-AA[1]+AA[3],AA[2]])/Hyp`m`p[AA[3],AA[2]];
   Hyp`m`Gleichung);
Tgl2107:=(ClearQ[Global`a,Global`n,Global`c,Global`z];
   Hyp`m`LS=Hyp`m`F[{AA[1],-AA[2]},{AA[3]},AA[4]];
   Hyp`m`RS=(Hyp`m`F[{-AA[2],AA[1]},{1+AA[1]-AA[3]-AA[2]},1-AA[4]]*Hyp`m`p[-AA[1]+AA[3],AA[2]])/
   Hyp`m`p[AA[3],AA[2]];
   Hyp`m`Gleichung);
Tgl2131:=(ClearQ[Global`a,Global`n,Global`c,Global`z];
   Hyp`m`LS=Hyp`m`F[{AA[1],-AA[2]},{AA[3]},AA[4]];
   Hyp`m`RS=((1-AA[4])^AA[2]*Hyp`m`F[{-AA[2],-AA[1]+AA[3]},{1-AA[1]-AA[2]},(1-AA[4])^(-1)]*
     Hyp`m`p[AA[1],AA[2]])/Hyp`m`p[AA[3],AA[2]];
   Hyp`m`Gleichung);
Tgl3204:=(ClearQ[Global`a,Global`b,Global`c,Global`d,Global`e];
   Hyp`m`LS=Hyp`m`F[{AA[1],AA[2],AA[3]},{AA[4],AA[5]},1];
   Hyp`m`RS=Hyp`m`F[{AA[1],-AA[2]+AA[4],-AA[3]+AA[4]},{AA[4],-AA[2]-AA[3]+AA[4]+AA[5]},1]*
   Hyp`m`GAMMA[{AA[5],-AA[1]-AA[2]-AA[3]+AA[4]+AA[5]},{-AA[1]+AA[5],-AA[2]-AA[3]+AA[4]+AA[5]}];
   Hyp`m`Gleichung);
Tgl3205:=(ClearQ[Global`a,Global`b,Global`c,Global`d,Global`e];
   Hyp`m`LS=Hyp`m`F[{AA[1],AA[2],AA[3]},{AA[4],AA[5]},1];
   Hyp`m`RS=Hyp`m`F[{-AA[2]+AA[4],-AA[2]+AA[5],-AA[1]-AA[2]-AA[3]+AA[4]+AA[5]},
    {-AA[1]-AA[2]+AA[4]+AA[5],-AA[2]-AA[3]+AA[4]+AA[5]},1]*
   Hyp`m`GAMMA[{AA[4],AA[5],-AA[1]-AA[2]-AA[3]+AA[4]+AA[5]},{AA[2],-AA[1]-AA[2]+AA[4]+AA[5],-AA[2]-AA[3]+AA[4]+AA[5]}];
   Hyp`m`Gleichung);
Tgl3206:=(ClearQ[Global`a,Global`b,Global`n,Global`d,Global`e];
   Hyp`m`LS=Hyp`m`F[{AA[1],AA[2],-AA[3]},{AA[4],AA[5]},1];
   Hyp`m`RS=(Hyp`m`F[{-AA[3],-AA[1]+AA[4],-AA[2]+AA[4]},{AA[4],-AA[1]-AA[2]+AA[4]+AA[5]},1]*
     Hyp`m`p[-AA[1]-AA[2]+AA[4]+AA[5],AA[3]])/Hyp`m`p[AA[5],AA[3]];
   Hyp`m`Gleichung);
Tgl3207:=(ClearQ[Global`a,Global`b,Global`n,Global`d,Global`e];
   Hyp`m`LS=Hyp`m`F[{AA[1],AA[2],-AA[3]},{AA[4],AA[5]},1];
   Hyp`m`RS=(Hyp`m`F[{-AA[3],AA[2],-AA[1]+AA[4]},{AA[4],1+AA[2]-AA[5]-AA[3]},1]*
     Hyp`m`p[-AA[2]+AA[5],AA[3]])/Hyp`m`p[AA[5],AA[3]];
   Hyp`m`Gleichung);
Tgl4301:=(ClearQ[Global`a,Global`b,Global`c,Global`n,Global`e,Global`f];
   Hyp`m`LS=Hyp`m`F[{AA[1],AA[2],AA[3],-AA[4]},{AA[5],AA[6],1+AA[1]+AA[2]+AA[3]-AA[5]-AA[6]-AA[4]},1];
   Hyp`m`RS=
  Hyp`m`F[{-AA[4],AA[1],1+AA[1]+AA[3]-AA[5]-AA[6]-AA[4],1+AA[1]+AA[2]-AA[5]-AA[6]-AA[4]},
    {1+AA[1]+AA[2]+AA[3]-AA[5]-AA[6]-AA[4],1+AA[1]-AA[5]-AA[4],1+AA[1]-AA[6]-AA[4]},1]*
   Hyp`m`p[{-AA[1]+AA[5],-AA[1]+AA[6]},{AA[5],AA[6]},AA[4]];
   Hyp`m`Gleichung);
Tgl4302:=(ClearQ[Global`a,Global`b,Global`c,Global`n,Global`e,Global`f];
   Hyp`m`LS=Hyp`m`F[{AA[1],AA[2],AA[3],-AA[4]},{AA[5],AA[6],1+AA[1]+AA[2]+AA[3]-AA[5]-AA[6]-AA[4]},1];
   Hyp`m`RS=
  Hyp`m`F[{-AA[4],-AA[1]+AA[5],-AA[1]+AA[6],-AA[1]-AA[2]-AA[3]+AA[5]+AA[6]},
    {-AA[1]-AA[2]+AA[5]+AA[6],-AA[1]-AA[3]+AA[5]+AA[6],1-AA[1]-AA[4]},1]*
   Hyp`m`p[{AA[1],-AA[1]-AA[2]+AA[5]+AA[6],-AA[1]-AA[3]+AA[5]+AA[6]},{AA[5],AA[6],-AA[1]-AA[2]-AA[3]+AA[5]+AA[6]},AA[4]];
   Hyp`m`Gleichung);
Tgl4303:=(ClearQ[Global`a,Global`b,Global`c,Global`n,Global`e,Global`f];
   Hyp`m`LS=Hyp`m`F[{AA[1],AA[2],AA[3],-AA[4]},{AA[5],AA[6],1+AA[1]+AA[2]+AA[3]-AA[5]-AA[6]-AA[4]},1];
   Hyp`m`RS=
  Hyp`m`F[{-1-AA[1]+AA[5]+AA[6],1/2-AA[1]/2+AA[5]/2+AA[6]/2,-AA[1]+AA[6],-AA[1]+AA[5],AA[2],AA[3],-AA[4]},
    {-1/2-AA[1]/2+AA[5]/2+AA[6]/2,AA[5],AA[6],-AA[1]-AA[2]+AA[5]+AA[6],-AA[1]-AA[3]+AA[5]+AA[6],
     -AA[1]+AA[5]+AA[6]+AA[4]},1]*Hyp`m`p[{-AA[1]-AA[2]+AA[5]+AA[6],-AA[1]-AA[3]+AA[5]+AA[6]},
    {-AA[1]+AA[5]+AA[6],-AA[1]-AA[2]-AA[3]+AA[5]+AA[6]},AA[4]];
   Hyp`m`Gleichung);
Tgl4304:=(ClearQ[Global`a,Global`b,Global`c,Global`n,Global`e,Global`f];
   Hyp`m`LS=Hyp`m`F[{AA[1],AA[2],AA[3],-AA[4]},{AA[5],AA[6],1+AA[1]+AA[2]+AA[3]-AA[5]-AA[6]-AA[4]},1];
   Hyp`m`RS=
  Hyp`m`F[{-1+AA[5]+AA[6]+AA[4],1/2+AA[5]/2+AA[6]/2+AA[4]/2,AA[1],AA[2],AA[3],AA[5]+AA[4],AA[6]+AA[4]},
    {-1/2+AA[5]/2+AA[6]/2+AA[4]/2,-AA[1]+AA[5]+AA[6]+AA[4],-AA[2]+AA[5]+AA[6]+AA[4],-AA[3]+AA[5]+AA[6]+AA[4],
     AA[6],AA[5]},1]*Hyp`m`GAMMA[{-AA[2]-AA[3]+AA[5]+AA[6]+AA[4],-AA[1]-AA[3]+AA[5]+AA[6]+AA[4],
     -AA[1]-AA[2]+AA[5]+AA[6]+AA[4],AA[5]+AA[6]+AA[4]},
    {-AA[3]+AA[5]+AA[6]+AA[4],-AA[2]+AA[5]+AA[6]+AA[4],-AA[1]+AA[5]+AA[6]+AA[4],-AA[1]-AA[2]-AA[3]+AA[5]+AA[6]+AA[4]}];
   Hyp`m`Gleichung);
Tgl3231:=(ClearQ[Global`a,Global`b,Global`c,Global`d];
   Hyp`m`LS=Hyp`m`F[{2*AA[1],2*AA[2],AA[3]},{1/2+AA[1]+AA[2],AA[4]},1];
   Hyp`m`RS=
  Hyp`m`F[{AA[1],AA[2],AA[3],-AA[3]+AA[4]},{1/2+AA[1]+AA[2],AA[4]/2,(1+AA[4])/2},1];
   Print[" \nThis equation only holds provided both series terminate!"];
   Hyp`m`Gleichung);
Tgl3232:=(ClearQ[Global`a,Global`b,Global`c,Global`z];
   Hyp`m`LS=Hyp`m`F[{AA[1]/2,(1+AA[1])/2,1+AA[1]-AA[2]-AA[3]},
   {1+AA[1]-AA[2],1+AA[1]-AA[3]},(-4*AA[4])/(1-AA[4])^2];
   Hyp`m`RS=(1-AA[4])^AA[1]*Hyp`m`F[{AA[1],AA[2],AA[3]},{1+AA[1]-AA[2],
   1+AA[1]-AA[3]},AA[4]];
   Hyp`m`Gleichung);
Tgl3233:=(ClearQ[Global`a,Global`b,Global`c,Global`z];
   Hyp`m`LS=Hyp`m`F[{AA[1]/2,(1+AA[1])/2,1+AA[1]-AA[2]-AA[3]},
   {1+AA[1]-AA[2],1+AA[1]-AA[3]},(-4*AA[4])/(1-AA[4])^2];
   Hyp`m`RS=(1-1/AA[4])^AA[1]*Hyp`m`F[{AA[1],AA[2],AA[3]},{1+AA[1]-AA[2],
   1+AA[1]-AA[3]},1/AA[4]];
   Hyp`m`Gleichung);
Tgl3234:=(ClearQ[Global`a,Global`b,Global`z];
   Hyp`m`LS=Hyp`m`F[{2*AA[1],2*AA[2],AA[1]+AA[2]},{2*AA[1]+2*AA[2],
   1/2+AA[1]+AA[2]},AA[3]];
   Hyp`m`RS=Hyp`m`F[{AA[1],AA[2]},{1/2+AA[1]+AA[2]},AA[3]]^2;
   Hyp`m`Gleichung);
Tgl4306:=(ClearQ[Global`a,Global`b,Global`c,Global`d];
   Hyp`m`LS=Hyp`m`F[{AA[1],AA[2],AA[3],AA[4]},{1/2+AA[1]+AA[2],(AA[3]+AA[4])/2,(1+AA[3]+AA[4])/2},1];
   Hyp`m`RS=
  Hyp`m`F[{2*AA[1],2*AA[2],AA[3]},{1/2+AA[1]+AA[2],AA[3]+AA[4]},1];
   Print[" \nThis equation only holds provided both series terminate!"];
   Hyp`m`Gleichung);
Tgl2132:=(ClearQ[Global`a,Global`b,Global`z];
   Hyp`m`LS=Hyp`m`F[{AA[1],AA[2]},{1/2+AA[1]+AA[2]},AA[3]]^2;
   Hyp`m`RS=
  Hyp`m`F[{2*AA[1],2*AA[2],AA[1]+AA[2]},{2*AA[1]+2*AA[2],1/2+AA[1]+AA[2]},AA[3]];
   Hyp`m`Gleichung);
Tgl5401:=(ClearQ[Global`a,Global`b,Global`c,Global`d,Global`n];
   Hyp`m`LS=Hyp`m`F[{AA[1],AA[2],AA[3],AA[4],-AA[5]},{1+AA[1]-AA[2],1+AA[1]-AA[3],1+AA[1]-AA[4],
    -2-2*AA[1]+2*AA[2]+2*AA[3]+2*AA[4]-AA[5]},1];
   Hyp`m`RS=
  Hyp`m`F[{1+2*AA[1]-AA[2]-AA[3]-AA[4],3/2+AA[1]-AA[2]/2-AA[3]/2-AA[4]/2,1+AA[1]-AA[3]-AA[4],
     1+AA[1]-AA[2]-AA[4],1+AA[1]-AA[2]-AA[3],AA[1]/2,1/2+AA[1]/2,
     3+3*AA[1]-2*AA[2]-2*AA[3]-2*AA[4]+AA[5],-AA[5]},
    {1/2+AA[1]-AA[2]/2-AA[3]/2-AA[4]/2,1+AA[1]-AA[2],1+AA[1]-AA[3],1+AA[1]-AA[4],
     2+(3*AA[1])/2-AA[2]-AA[3]-AA[4],3/2+(3*AA[1])/2-AA[2]-AA[3]-AA[4],
     -1-AA[1]+AA[2]+AA[3]+AA[4]-AA[5],2+2*AA[1]-AA[2]-AA[3]-AA[4]+AA[5]},1]*
   Hyp`m`p[{2+AA[1]-AA[2]-AA[3]-AA[4],3+3*AA[1]-2*AA[2]-2*AA[3]-2*AA[4]},
    {2+2*AA[1]-AA[2]-AA[3]-AA[4],3+2*AA[1]-2*AA[2]-2*AA[3]-2*AA[4]},AA[5]];
   Hyp`m`Gleichung);
Tgl5402:=(ClearQ[Global`n,Global`b,Global`c,Global`d,Global`e];
   Hyp`m`LS=Hyp`m`F[{-AA[1],AA[2],AA[3],AA[4],AA[5]},{1-AA[2]-AA[1],1-AA[3]-AA[1],1-AA[4]-AA[1],
    -2+2*AA[2]+2*AA[3]+2*AA[4]+AA[5]+2*AA[1]},1];
   Hyp`m`RS=
  Hyp`m`F[{1-AA[2]-AA[3]-AA[4]-2*AA[1],3/2-AA[2]/2-AA[3]/2-AA[4]/2-AA[1],1-AA[3]-AA[4]-AA[1],
     1-AA[2]-AA[4]-AA[1],1-AA[2]-AA[3]-AA[1],-AA[1]/2,1/2-AA[1]/2,AA[5],
     3-2*AA[2]-2*AA[3]-2*AA[4]-AA[5]-3*AA[1]},
    {1/2-AA[2]/2-AA[3]/2-AA[4]/2-AA[1],1-AA[2]-AA[1],1-AA[3]-AA[1],1-AA[4]-AA[1],
     2-AA[2]-AA[3]-AA[4]-(3*AA[1])/2,3/2-AA[2]-AA[3]-AA[4]-(3*AA[1])/2,
     2-AA[2]-AA[3]-AA[4]-AA[5]-2*AA[1],-1+AA[2]+AA[3]+AA[4]+AA[5]+AA[1]},1]*
   Hyp`m`p[{2-AA[2]-AA[3]-AA[4]-AA[5]-2*AA[1],3-2*AA[2]-2*AA[3]-2*AA[4]-3*AA[1]},
    {2-AA[2]-AA[3]-AA[4]-2*AA[1],3-2*AA[2]-2*AA[3]-2*AA[4]-AA[5]-3*AA[1]},AA[1]];
   Hyp`m`Gleichung);
Tgl6531:=(ClearQ[Global`a,Global`b,Global`c,Global`d,Global`n];
   Hyp`m`LS=Hyp`m`F[{AA[1],1+AA[1]/2,AA[2],AA[3],AA[4],-AA[5]},{AA[1]/2,1+AA[1]-AA[2],1+AA[1]-AA[3],1+AA[1]-AA[4],
    -2*AA[1]+2*AA[2]+2*AA[3]+2*AA[4]-AA[5]},1];
   Hyp`m`RS=
  ((1+3*AA[1]-2*AA[2]-2*AA[3]-2*AA[4]+2*AA[5])*
     Hyp`m`F[{1+2*AA[1]-AA[2]-AA[3]-AA[4],3/2+AA[1]-AA[2]/2-AA[3]/2-AA[4]/2,1+AA[1]-AA[3]-AA[4],
       1+AA[1]-AA[2]-AA[4],1+AA[1]-AA[2]-AA[3],1/2+AA[1]/2,1+AA[1]/2,
       1+3*AA[1]-2*AA[2]-2*AA[3]-2*AA[4]+AA[5],-AA[5]},
      {1/2+AA[1]-AA[2]/2-AA[3]/2-AA[4]/2,1+AA[1]-AA[2],1+AA[1]-AA[3],1+AA[1]-AA[4],
       3/2+(3*AA[1])/2-AA[2]-AA[3]-AA[4],1+(3*AA[1])/2-AA[2]-AA[3]-AA[4],
       1-AA[1]+AA[2]+AA[3]+AA[4]-AA[5],2+2*AA[1]-AA[2]-AA[3]-AA[4]+AA[5]},1]*
     Hyp`m`p[{AA[1]-AA[2]-AA[3]-AA[4],1+3*AA[1]-2*AA[2]-2*AA[3]-2*AA[4]},
      {2+2*AA[1]-AA[2]-AA[3]-AA[4],1+2*AA[1]-2*AA[2]-2*AA[3]-2*AA[4]},AA[5]])/
   (1+3*AA[1]-2*AA[2]-2*AA[3]-2*AA[4]);
   Hyp`m`Gleichung);
Tgl7631:=(ClearQ[Global`a,Global`b,Global`c,Global`d,Global`e,Global`f];
   Hyp`m`LS=Hyp`m`F[{AA[1],1+AA[1]/2,AA[2],AA[3],AA[4],AA[5],AA[6]},{AA[1]/2,1+AA[1]-AA[2],1+AA[1]-AA[3],1+AA[1]-AA[4],
    1+AA[1]-AA[5],1+AA[1]-AA[6]},1];
   Hyp`m`RS=
  Hyp`m`F[{1+AA[1]-AA[2]-AA[3],AA[4],AA[5],AA[6]},{1+AA[1]-AA[2],1+AA[1]-AA[3],-AA[1]+AA[4]+AA[5]+AA[6]},1]*
   Hyp`m`GAMMA[{1+AA[1]-AA[4],1+AA[1]-AA[5],1+AA[1]-AA[6],1+AA[1]-AA[4]-AA[5]-AA[6]},
    {1+AA[1],1+AA[1]-AA[4]-AA[5],1+AA[1]-AA[4]-AA[6],1+AA[1]-AA[5]-AA[6]}];
   Print[" \nThis equation only holds provided the 4F3 terminates!"];
   Hyp`m`Gleichung);
Tgl7632:=(ClearQ[Global`a,Global`b,Global`c,Global`d,Global`e,Global`n];
   Hyp`m`LS=Hyp`m`F[{AA[1],1+AA[1]/2,AA[2],AA[3],AA[4],AA[5],-AA[6]},
   {AA[1]/2,1+AA[1]-AA[2],1+AA[1]-AA[3],1+AA[1]-AA[4],1+AA[1]-AA[5],1+AA[1]+AA[6]},1];
   Hyp`m`RS=
  Hyp`m`F[{1+AA[1]-AA[2]-AA[3],AA[4],AA[5],-AA[6]},{1+AA[1]-AA[2],1+AA[1]-AA[3],-AA[1]+AA[4]+AA[5]-AA[6]},1]*
   Hyp`m`p[{1+AA[1],1+AA[1]-AA[4]-AA[5]},{1+AA[1]-AA[4],1+AA[1]-AA[5]},AA[6]];
   Hyp`m`Gleichung);
Tgl7633:=(ClearQ[Global`a,Global`b,Global`c,Global`d,Global`e,Global`n];
   Hyp`m`LS=Hyp`m`F[{AA[1],1+AA[1]/2,AA[2],AA[3],AA[4],AA[5],1+AA[1]-AA[5]+AA[6]},
   {AA[1]/2,1+AA[1]-AA[2],1+AA[1]-AA[3],1+AA[1]-AA[4],1+AA[1]-AA[5],AA[5]-AA[6]},1];
   Hyp`m`RS=
  Hyp`m`F[{AA[2],AA[3],AA[4],-AA[6]},{1+AA[1]-AA[5],-AA[1]+AA[2]+AA[3]+AA[4],AA[5]-AA[6]},1]*
   Hyp`m`GAMMA[{1+AA[1]-AA[4],1+AA[1]-AA[3],1+AA[1]-AA[2],1+AA[1]-AA[2]-AA[3]-AA[4]},
    {1+AA[1]-AA[3]-AA[4],1+AA[1]-AA[2]-AA[4],1+AA[1]-AA[2]-AA[3],1+AA[1]}];
   Hyp`m`Gleichung);
Tgl7634:=(ClearQ[Global`a,Global`b,Global`c,Global`d,Global`e,Global`f];
   Hyp`m`LS=Hyp`m`F[{AA[1],1+AA[1]/2,AA[2],AA[3],AA[4],AA[5],AA[6]},{AA[1]/2,1+AA[1]-AA[2],1+AA[1]-AA[3],1+AA[1]-AA[4],
    1+AA[1]-AA[5],1+AA[1]-AA[6]},1];
   Hyp`m`RS=
  Hyp`m`F[{1+2*AA[1]-AA[2]-AA[3]-AA[4],3/2+AA[1]-AA[2]/2-AA[3]/2-AA[4]/2,1+AA[1]-AA[3]-AA[4],
     1+AA[1]-AA[2]-AA[4],1+AA[1]-AA[2]-AA[3],AA[5],AA[6]},
    {1/2+AA[1]-AA[2]/2-AA[3]/2-AA[4]/2,1+AA[1]-AA[2],1+AA[1]-AA[3],1+AA[1]-AA[4],
     2+2*AA[1]-AA[2]-AA[3]-AA[4]-AA[5],2+2*AA[1]-AA[2]-AA[3]-AA[4]-AA[6]},1]*
   Hyp`m`GAMMA[{1+AA[1]-AA[5],1+AA[1]-AA[6],2+2*AA[1]-AA[2]-AA[3]-AA[4],
     2+2*AA[1]-AA[2]-AA[3]-AA[4]-AA[5]-AA[6]},
    {1+AA[1],1+AA[1]-AA[5]-AA[6],2+2*AA[1]-AA[2]-AA[3]-AA[4]-AA[5],2+2*AA[1]-AA[2]-AA[3]-AA[4]-AA[6]}];
   Hyp`m`Gleichung);
Tgl7635:=(ClearQ[Global`a,Global`b,Global`c,Global`d,Global`e,Global`f];
   Hyp`m`LS=Hyp`m`F[{AA[1],1+AA[1]/2,AA[2],AA[3],AA[4],AA[5],AA[6]},{AA[1]/2,1+AA[1]-AA[2],1+AA[1]-AA[3],1+AA[1]-AA[4],
    1+AA[1]-AA[5],1+AA[1]-AA[6]},1];
   Hyp`m`RS=
  Hyp`m`F[{2+3*AA[1]-2*AA[2]-AA[3]-AA[4]-AA[5]-AA[6],2+(3*AA[1])/2-AA[2]-AA[3]/2-AA[4]/2-AA[5]/2-AA[6]/2,
     1+AA[1]-AA[2]-AA[3],1+AA[1]-AA[2]-AA[4],1+AA[1]-AA[2]-AA[5],1+AA[1]-AA[2]-AA[6],
     2+2*AA[1]-AA[2]-AA[3]-AA[4]-AA[5]-AA[6]},
    {1+(3*AA[1])/2-AA[2]-AA[3]/2-AA[4]/2-AA[5]/2-AA[6]/2,2+2*AA[1]-AA[2]-AA[4]-AA[5]-AA[6],
     2+2*AA[1]-AA[2]-AA[3]-AA[5]-AA[6],2+2*AA[1]-AA[2]-AA[3]-AA[4]-AA[6],
     2+2*AA[1]-AA[2]-AA[3]-AA[4]-AA[5],1+AA[1]-AA[2]},1]*
   Hyp`m`GAMMA[{1+AA[1]-AA[3],1+AA[1]-AA[4],1+AA[1]-AA[5],1+AA[1]-AA[6],
     3+3*AA[1]-2*AA[2]-AA[3]-AA[4]-AA[5]-AA[6],2+2*AA[1]-AA[2]-AA[3]-AA[4]-AA[5]-AA[6]},
    {1+AA[1],AA[2],2+2*AA[1]-AA[2]-AA[4]-AA[5]-AA[6],2+2*AA[1]-AA[2]-AA[3]-AA[5]-AA[6],
     2+2*AA[1]-AA[2]-AA[3]-AA[4]-AA[6],2+2*AA[1]-AA[2]-AA[3]-AA[4]-AA[5]}];
   Hyp`m`Gleichung);
Tgl9831:=(ClearQ[Global`a,Global`b,Global`c,Global`d,Global`e,Global`f,Global`n];
   Hyp`m`LS=Hyp`m`F[{AA[1],1+AA[1]/2,AA[2],AA[3],AA[4],AA[5],AA[6],2+3*AA[1]-AA[2]-AA[3]-AA[4]-AA[5]-AA[6]+AA[7],-AA[7]},
   {AA[1]/2,1+AA[1]-AA[2],1+AA[1]-AA[3],1+AA[1]-AA[4],1+AA[1]-AA[5],1+AA[1]-AA[6],
    -1-2*AA[1]+AA[2]+AA[3]+AA[4]+AA[5]+AA[6]-AA[7],1+AA[1]+AA[7]},1];
   Hyp`m`RS=
  Hyp`m`F[{1+2*AA[1]-AA[2]-AA[3]-AA[4],3/2+AA[1]-AA[2]/2-AA[3]/2-AA[4]/2,1+AA[1]-AA[3]-AA[4],
     1+AA[1]-AA[2]-AA[4],1+AA[1]-AA[2]-AA[3],AA[5],AA[6],2+3*AA[1]-AA[2]-AA[3]-AA[4]-AA[5]-AA[6]+AA[7],-AA[7]}\
     ,{1/2+AA[1]-AA[2]/2-AA[3]/2-AA[4]/2,1+AA[1]-AA[2],1+AA[1]-AA[3],1+AA[1]-AA[4],
     2+2*AA[1]-AA[2]-AA[3]-AA[4]-AA[5],2+2*AA[1]-AA[2]-AA[3]-AA[4]-AA[6],-AA[1]+AA[5]+AA[6]-AA[7],
     2+2*AA[1]-AA[2]-AA[3]-AA[4]+AA[7]},1]*
   Hyp`m`p[{1+AA[1],1+AA[1]-AA[5]-AA[6],2+2*AA[1]-AA[2]-AA[3]-AA[4]-AA[5],
     2+2*AA[1]-AA[2]-AA[3]-AA[4]-AA[6]},{1+AA[1]-AA[5],1+AA[1]-AA[6],
     2+2*AA[1]-AA[2]-AA[3]-AA[4]-AA[5]-AA[6],2+2*AA[1]-AA[2]-AA[3]-AA[4]},AA[7]];
   Hyp`m`Gleichung);
Tgl9832:=(ClearQ[Global`a,Global`b,Global`c,Global`d,Global`n];
   Hyp`m`LS=Hyp`m`F[{AA[1],1+AA[1]/2,AA[2],AA[3],AA[4],1/2+AA[1]-(AA[2]+AA[3]+AA[4])/2,1+AA[1]-(AA[2]+AA[3]+AA[4])/2,
    AA[2]+AA[3]+AA[4]+AA[5],-AA[5]},{AA[1]/2,1+AA[1]-AA[2],1+AA[1]-AA[3],1+AA[1]-AA[4],
    (1+AA[2]+AA[3]+AA[4])/2,(AA[2]+AA[3]+AA[4])/2,1+AA[1]-AA[2]-AA[3]-AA[4]-AA[5],1+AA[1]+AA[5]},1];
   Hyp`m`RS=Hyp`m`F[{1+2*AA[1]-AA[2]-AA[3]-AA[4],1+AA[1]-AA[3]-AA[4],1+AA[1]-AA[2]-AA[4],1+AA[1]-AA[2]-AA[3],
     -AA[5]},{1+AA[1]-AA[2],1+AA[1]-AA[3],1+AA[1]-AA[4],2+2*AA[1]-2*AA[2]-2*AA[3]-2*AA[4]-AA[5]},1]
    *Hyp`m`p[{1+AA[1],-1-2*AA[1]+2*AA[2]+2*AA[3]+2*AA[4]},{-AA[1]+AA[2]+AA[3]+AA[4],AA[2]+AA[3]+AA[4]},AA[5]];
   Hyp`m`Gleichung);
Tgl9833:=(ClearQ[Global`n,Global`b,Global`c,Global`d,Global`e];
   Hyp`m`LS=Hyp`m`F[{(-1+AA[2]+AA[3]+AA[4]-AA[1])/2,1+(-1+AA[2]+AA[3]+AA[4]-AA[1])/4,AA[2],AA[3],AA[4],-AA[1]/2,
    1/2-AA[1]/2,AA[5],AA[2]+AA[3]+AA[4]-AA[5]},
   {(-1+AA[2]+AA[3]+AA[4]-AA[1])/4,(1-AA[2]+AA[3]+AA[4]-AA[1])/2,(1+AA[2]-AA[3]+AA[4]-AA[1])/2,
    (1+AA[2]+AA[3]-AA[4]-AA[1])/2,(1+AA[2]+AA[3]+AA[4])/2,(AA[2]+AA[3]+AA[4])/2,
    (1+AA[2]+AA[3]+AA[4]-2*AA[5]-AA[1])/2,-(-1+AA[2]+AA[3]+AA[4]-2*AA[5]+AA[1])/2},1];
   Hyp`m`RS=
  Hyp`m`F[{-AA[1],1/2+AA[2]/2-AA[3]/2-AA[4]/2-AA[1]/2,1/2-AA[2]/2+AA[3]/2-AA[4]/2-AA[1]/2,
     1/2-AA[2]/2-AA[3]/2+AA[4]/2-AA[1]/2,AA[5]},
    {1/2-AA[2]/2+AA[3]/2+AA[4]/2-AA[1]/2,1/2+AA[2]/2-AA[3]/2+AA[4]/2-AA[1]/2,
     1/2+AA[2]/2+AA[3]/2-AA[4]/2-AA[1]/2,1-AA[2]-AA[3]-AA[4]+AA[5]-AA[1]},1]*
   Hyp`m`p[{1/2+AA[2]/2+AA[3]/2+AA[4]/2-AA[1]/2,AA[2]+AA[3]+AA[4]-AA[5]},
    {1/2+AA[2]/2+AA[3]/2+AA[4]/2-AA[5]-AA[1]/2,AA[2]+AA[3]+AA[4]},AA[1]];
   Hyp`m`Gleichung);
Tgl9834:=(ClearQ[Global`a,Global`b,Global`c,Global`d,Global`n];
   Hyp`m`LS=Hyp`m`F[{AA[1],1+AA[1]/2,AA[2],AA[3],AA[4],1+AA[1]-(AA[2]+AA[3]+AA[4])/2,3/2+AA[1]-(AA[2]+AA[3]+AA[4])/2,
    -2+AA[2]+AA[3]+AA[4]+AA[5],-AA[5]},{AA[1]/2,1+AA[1]-AA[2],1+AA[1]-AA[3],1+AA[1]-AA[4],
    (AA[2]+AA[3]+AA[4])/2,(-1+AA[2]+AA[3]+AA[4])/2,3+AA[1]-AA[2]-AA[3]-AA[4]-AA[5],1+AA[1]+AA[5]},1];
   Hyp`m`RS=((-2+AA[2]+AA[3]+AA[4])*Hyp`m`F[{1+2*AA[1]-AA[2]-AA[3]-AA[4],3/2+AA[1]-AA[2]/2-AA[3]/2-AA[4]/2,
       1+AA[1]-AA[3]-AA[4],1+AA[1]-AA[2]-AA[4],1+AA[1]-AA[2]-AA[3],-AA[5]},
      {1/2+AA[1]-AA[2]/2-AA[3]/2-AA[4]/2,1+AA[1]-AA[2],1+AA[1]-AA[3],1+AA[1]-AA[4],
       4+2*AA[1]-2*AA[2]-2*AA[3]-2*AA[4]-AA[5]},1]*
     Hyp`m`p[{1+AA[1],-3-2*AA[1]+2*AA[2]+2*AA[3]+2*AA[4]},
      {-2-AA[1]+AA[2]+AA[3]+AA[4],-2+AA[2]+AA[3]+AA[4]},AA[5]])/(-2+AA[2]+AA[3]+AA[4]+2*AA[5]);
   Hyp`m`Gleichung);
Tgl2191:=(ClearQ[Global`a,Global`b,Global`c,Global`z];
   Hyp`m`LS=Hyp`m`F[{AA[1],AA[2]},{AA[3]},AA[4]];
   Hyp`m`RS=(1-AA[4])^(-AA[1]-AA[2]+AA[3])*Hyp`m`F[{-AA[2]+AA[3],-AA[1]+AA[3]},{1-AA[1]-AA[2]+AA[3]},1-AA[4]]*
    Hyp`m`GAMMA[{AA[3],AA[1]+AA[2]-AA[3]},{AA[1],AA[2]}]+
   Hyp`m`F[{AA[1],AA[2]},{1+AA[1]+AA[2]-AA[3]},1-AA[4]]*
    Hyp`m`GAMMA[{AA[3],-AA[1]-AA[2]+AA[3]},{-AA[2]+AA[3],-AA[1]+AA[3]}];
   Hyp`m`Gleichung);
Tgl3261:=(ClearQ[Global`a,Global`b,Global`c,Global`d,Global`e];
   Hyp`m`LS=Hyp`m`F[{AA[1],AA[2],AA[3]},{AA[4],AA[5]},1];
   Hyp`m`RS=Hyp`m`F[{AA[3],-AA[1]+AA[4],1+AA[3]-AA[5]},
     {1-AA[1]+AA[3],1+AA[2]+AA[3]-AA[5]},1]*
    Hyp`m`GAMMA[{AA[3],1+AA[3]-AA[4],1-AA[1],-AA[2]-AA[3]+AA[5]},
     {-AA[2]+AA[5],-AA[3]+AA[5],1-AA[1]+AA[3],1-AA[4]}]-
   Hyp`m`F[{1+AA[1]-AA[4],1+AA[2]-AA[4],1+AA[3]-AA[4]},{2-AA[4],1-AA[4]+AA[5]},1]*
    Hyp`m`GAMMA[{-1+AA[4],AA[5],1+AA[2]-AA[4],1+AA[3]-AA[4],1-AA[1],-AA[2]-AA[3]+AA[5],
      1+AA[2]+AA[3]-AA[5]},{1-AA[4],1-AA[4]+AA[5],AA[2],AA[3],-AA[1]+AA[4],-1-AA[2]-AA[3]+AA[4]+AA[5],
      2+AA[2]+AA[3]-AA[4]-AA[5]}];
   Hyp`m`Gleichung);
Tgl3262:=(ClearQ[Global`a,Global`b,Global`c,Global`d,Global`e];
   Hyp`m`LS=Hyp`m`F[{AA[1],AA[2],AA[3]},{AA[4],AA[5]},1];
   Hyp`m`RS=Hyp`m`F[{-AA[1]+AA[4],AA[2],AA[3]},{AA[4],1+AA[2]+AA[3]-AA[5]},1]*
    Hyp`m`GAMMA[{AA[5],-AA[2]-AA[3]+AA[5]},{-AA[2]+AA[5],-AA[3]+AA[5]}]+
   Hyp`m`F[{-AA[2]+AA[5],-AA[3]+AA[5],-AA[1]-AA[2]-AA[3]+AA[4]+AA[5]},{-AA[2]-AA[3]+AA[4]+AA[5],1-AA[2]-AA[3]+AA[5]},
     1]*Hyp`m`GAMMA[{AA[4],AA[2]+AA[3]-AA[5],-AA[1]-AA[2]-AA[3]+AA[4]+AA[5]},{-AA[1]+AA[4],AA[2],-AA[2]-AA[3]+AA[4]+AA[5]}];
   Hyp`m`Gleichung);
Tgl7691:=(ClearQ[Global`a,Global`b,Global`c,Global`d,Global`e,Global`f];
   Hyp`m`LS=Hyp`m`F[{AA[1],1+AA[1]/2,AA[2],AA[3],AA[4],AA[5],AA[6]},{AA[1]/2,1+AA[1]-AA[2],1+AA[1]-AA[3],1+AA[1]-AA[4],
    1+AA[1]-AA[5],1+AA[1]-AA[6]},1];
   Hyp`m`RS=
    Hyp`m`F[{1+AA[1]-AA[2]-AA[3],AA[4],AA[5],AA[6]},{1+AA[1]-AA[2],1+AA[1]-AA[3],-AA[1]+AA[4]+AA[5]+AA[6]},1]*
    Hyp`m`GAMMA[{1+AA[1]-AA[4],1+AA[1]-AA[5],1+AA[1]-AA[6],1+AA[1]-AA[4]-AA[5]-AA[6]},
     {1+AA[1],1+AA[1]-AA[4]-AA[5],1+AA[1]-AA[4]-AA[6],1+AA[1]-AA[5]-AA[6]}]+
    Hyp`m`F[{1+AA[1]-AA[4]-AA[5],1+AA[1]-AA[4]-AA[6],1+AA[1]-AA[5]-AA[6],
      2+2*AA[1]-AA[2]-AA[3]-AA[4]-AA[5]-AA[6]},
     {2+2*AA[1]-AA[2]-AA[4]-AA[5]-AA[6],2+2*AA[1]-AA[3]-AA[4]-AA[5]-AA[6],2+AA[1]-AA[4]-AA[5]-AA[6]},1]
     *Hyp`m`GAMMA[{1+AA[1]-AA[2],1+AA[1]-AA[3],1+AA[1]-AA[4],1+AA[1]-AA[5],1+AA[1]-AA[6],
      2+2*AA[1]-AA[2]-AA[3]-AA[4]-AA[5]-AA[6],-1-AA[1]+AA[4]+AA[5]+AA[6]},
     {1+AA[1],1+AA[1]-AA[2]-AA[3],AA[4],AA[5],AA[6],2+2*AA[1]-AA[2]-AA[4]-AA[5]-AA[6],
      2+2*AA[1]-AA[3]-AA[4]-AA[5]-AA[6]}];
   Hyp`m`Gleichung);
Tgl7692:=(ClearQ[Global`a,Global`b,Global`c,Global`d,Global`e,Global`f];
   Hyp`m`LS=Hyp`m`F[{AA[1],1+AA[1]/2,AA[2],AA[3],AA[4],AA[5],AA[6]},{AA[1]/2,1+AA[1]-AA[2],1+AA[1]-AA[3],1+AA[1]-AA[4],
    1+AA[1]-AA[5],1+AA[1]-AA[6]},1];
   Hyp`m`RS=-(Hyp`m`F[{-AA[1]+2*AA[2],1+(-AA[1]+2*AA[2])/2,AA[2],-AA[1]+AA[2]+AA[3],-AA[1]+AA[2]+AA[4],-AA[1]+AA[2]+AA[5],
        -AA[1]+AA[2]+AA[6]},{(-AA[1]+2*AA[2])/2,1-AA[1]+AA[2],1+AA[2]-AA[3],1+AA[2]-AA[4],
        1+AA[2]-AA[5],1+AA[2]-AA[6]},1]*
      Hyp`m`GAMMA[{AA[1]-AA[2],1+AA[1]-AA[3],1+AA[1]-AA[4],1+AA[1]-AA[5],1+AA[1]-AA[6],-AA[1]+AA[2]+AA[4],
        -AA[1]+AA[2]+AA[5],AA[2]+AA[6]-AA[1],AA[4]+AA[5]+AA[6]-AA[1],AA[1]+1-(AA[4]+AA[5]+AA[6]),1-AA[3],2*AA[2]+1-AA[1]},
     {1+AA[1],-AA[1]+AA[2],1+AA[2]-AA[3],1+AA[2]-AA[4],1+AA[2]-AA[5],
        1+AA[2]-AA[6],AA[4],AA[5],AA[6],1+AA[1]-AA[2]-AA[3],
        AA[2]+AA[4]+AA[5]+AA[6]-2*AA[1],2*AA[1]+1-(AA[2]+AA[4]+AA[5]+AA[6])}])+
   Hyp`m`F[{-AA[3]+AA[5]+AA[6],1+(-AA[3]+AA[5]+AA[6])/2,1+AA[1]-AA[2]-AA[3],1+AA[1]-AA[3]-AA[4],
      -AA[1]+AA[5]+AA[6],AA[5],AA[6]},{(-AA[3]+AA[5]+AA[6])/2,-AA[1]+AA[2]+AA[5]+AA[6],-AA[1]+AA[4]+AA[5]+AA[6],
      1+AA[1]-AA[3],1-AA[3]+AA[6],1-AA[3]+AA[5]},1]*
    Hyp`m`GAMMA[{1+AA[1]-AA[4],1+AA[1]-AA[5],1+AA[1]-AA[6],1+AA[1]-AA[4]-AA[5]-AA[6],1-AA[3],
      1-AA[3]+AA[5]+AA[6],-AA[1]+AA[2]+AA[5],-AA[1]+AA[2]+AA[6]},
     {1+AA[1],1+AA[1]-AA[4]-AA[5],1+AA[1]-AA[4]-AA[6],1+AA[1]-AA[5]-AA[6],1-AA[3]+AA[5],
      1-AA[3]+AA[6],-AA[1]+AA[2]+AA[5]+AA[6]}];
   Hyp`m`Gleichung);
Tgl9891:=(ClearQ[Global`a,Global`b,Global`c,Global`d,Global`e,Global`f,Global`g];
   Hyp`m`LS=Hyp`m`F[{AA[1],1+AA[1]/2,AA[2],AA[3],AA[4],AA[5],AA[6],AA[7],2+3*AA[1]-AA[2]-AA[3]-AA[4]-AA[5]-AA[6]-AA[7]},
   {AA[1]/2,1+AA[1]-AA[2],1+AA[1]-AA[3],1+AA[1]-AA[4],1+AA[1]-AA[5],1+AA[1]-AA[6],1+AA[1]-AA[7],
    -1-2*AA[1]+AA[2]+AA[3]+AA[4]+AA[5]+AA[6]+AA[7]},1];
   Hyp`m`RS=
  Hyp`m`F[{1+2*AA[1]-AA[3]-AA[4]-AA[5],3/2+AA[1]-AA[3]/2-AA[4]/2-AA[5]/2,AA[2],1+AA[1]-AA[4]-AA[5],
      1+AA[1]-AA[3]-AA[5],1+AA[1]-AA[3]-AA[4],AA[6],AA[7],2+3*AA[1]-AA[2]-AA[3]-AA[4]-AA[5]-AA[6]-AA[7]},
     {1/2+AA[1]-AA[3]/2-AA[4]/2-AA[5]/2,2+2*AA[1]-AA[2]-AA[3]-AA[4]-AA[5],1+AA[1]-AA[3],
      1+AA[1]-AA[4],1+AA[1]-AA[5],2+2*AA[1]-AA[3]-AA[4]-AA[5]-AA[6],2+2*AA[1]-AA[3]-AA[4]-AA[5]-AA[7],
      -AA[1]+AA[2]+AA[6]+AA[7]},1]*Hyp`m`GAMMA[{2+2*AA[1]-AA[3]-AA[4]-AA[5],
      -1-2*AA[1]+AA[2]+AA[3]+AA[4]+AA[5],1+AA[1]-AA[6],1+AA[1]-AA[7],
      -1-2*AA[1]+AA[2]+AA[3]+AA[4]+AA[5]+AA[6]+AA[7],-AA[1]+AA[2]+AA[6],-AA[1]+AA[2]+AA[7],
      2+2*AA[1]-AA[3]-AA[4]-AA[5]-AA[6]-AA[7]},
     {1+AA[1],-AA[1]+AA[2],2+2*AA[1]-AA[3]-AA[4]-AA[5]-AA[6],2+2*AA[1]-AA[3]-AA[4]-AA[5]-AA[7],
      -AA[1]+AA[2]+AA[6]+AA[7],-1-2*AA[1]+AA[2]+AA[3]+AA[4]+AA[5]+AA[6],
      -1-2*AA[1]+AA[2]+AA[3]+AA[4]+AA[5]+AA[7],1+AA[1]-AA[6]-AA[7]}]-
   Hyp`m`F[{-AA[1]+2*AA[2],1-AA[1]/2+AA[2],AA[2],-AA[1]+AA[2]+AA[3],-AA[1]+AA[2]+AA[4],-AA[1]+AA[2]+AA[5],
      -AA[1]+AA[2]+AA[6],-AA[1]+AA[2]+AA[7],2+2*AA[1]-AA[3]-AA[4]-AA[5]-AA[6]-AA[7]},
     {-AA[1]/2+AA[2],1-AA[1]+AA[2],1+AA[2]-AA[3],1+AA[2]-AA[4],1+AA[2]-AA[5],1+AA[2]-AA[6],
      1+AA[2]-AA[7],-1-3*AA[1]+2*AA[2]+AA[3]+AA[4]+AA[5]+AA[6]+AA[7]},1]*
    Hyp`m`GAMMA[{1-AA[1]+2*AA[2],AA[1]-AA[2],1+AA[1]-AA[3],1+AA[1]-AA[4],1+AA[1]-AA[5],1+AA[1]-AA[6],
      1+AA[1]-AA[7],-1-2*AA[1]+AA[2]+AA[3]+AA[4]+AA[5]+AA[6]+AA[7],-AA[1]+AA[2]+AA[3],-AA[1]+AA[2]+AA[4],
      -AA[1]+AA[2]+AA[5],-AA[1]+AA[2]+AA[6],-AA[1]+AA[2]+AA[7],2+2*AA[1]-AA[3]-AA[4]-AA[5]-AA[6]-AA[7]},
     {1+AA[1],-AA[1]+AA[2],AA[3],AA[4],AA[5],AA[6],AA[7],2+3*AA[1]-AA[2]-AA[3]-AA[4]-AA[5]-AA[6]-AA[7],
      1+AA[2]-AA[3],1+AA[2]-AA[4],1+AA[2]-AA[5],1+AA[2]-AA[6],1+AA[2]-AA[7],
      -1-3*AA[1]+2*AA[2]+AA[3]+AA[4]+AA[5]+AA[6]+AA[7]}]+
   Hyp`m`F[{-1-2*AA[1]+2*AA[2]+AA[3]+AA[4]+AA[5],1/2-AA[1]+AA[2]+AA[3]/2+AA[4]/2+AA[5]/2,AA[2],
      -AA[1]+AA[2]+AA[3],-AA[1]+AA[2]+AA[4],-AA[1]+AA[2]+AA[5],-1-2*AA[1]+AA[2]+AA[3]+AA[4]+AA[5]+AA[6],
      -1-2*AA[1]+AA[2]+AA[3]+AA[4]+AA[5]+AA[7],1+AA[1]-AA[6]-AA[7]},
     {-1/2-AA[1]+AA[2]+AA[3]/2+AA[4]/2+AA[5]/2,-2*AA[1]+AA[2]+AA[3]+AA[4]+AA[5],-AA[1]+AA[2]+AA[4]+AA[5],
      -AA[1]+AA[2]+AA[3]+AA[5],-AA[1]+AA[2]+AA[3]+AA[4],1+AA[2]-AA[6],1+AA[2]-AA[7],
      -1-3*AA[1]+2*AA[2]+AA[3]+AA[4]+AA[5]+AA[6]+AA[7]},1]*
    Hyp`m`GAMMA[{-2*AA[1]+2*AA[2]+AA[3]+AA[4]+AA[5],1+2*AA[1]-AA[2]-AA[3]-AA[4]-AA[5],1+AA[1]-AA[3],
      1+AA[1]-AA[4],1+AA[1]-AA[5],1+AA[1]-AA[6],1+AA[1]-AA[7],
      -1-2*AA[1]+AA[2]+AA[3]+AA[4]+AA[5]+AA[6]+AA[7],-AA[1]+AA[2]+AA[3],-AA[1]+AA[2]+AA[4],-AA[1]+AA[2]+AA[5],
      -AA[1]+AA[2]+AA[6],-AA[1]+AA[2]+AA[7],2+2*AA[1]-AA[3]-AA[4]-AA[5]-AA[6]-AA[7]},
     {1+AA[1],-AA[1]+AA[2],AA[6],AA[7],2+3*AA[1]-AA[2]-AA[3]-AA[4]-AA[5]-AA[6]-AA[7],1+AA[2]-AA[6],
      1+AA[2]-AA[7],-1-3*AA[1]+2*AA[2]+AA[3]+AA[4]+AA[5]+AA[6]+AA[7],1+AA[1]-AA[4]-AA[5],
      1+AA[1]-AA[3]-AA[5],1+AA[1]-AA[3]-AA[4],-AA[1]+AA[2]+AA[4]+AA[5],-AA[1]+AA[2]+AA[3]+AA[5],
      -AA[1]+AA[2]+AA[3]+AA[4]}];
   Hyp`m`Gleichung);
   
(*T2110*)
Tgl2110:=(ClearQ[Global`a,Global`b,Global`z];
   Hyp`m`LS=Hyp`m`F[{AA[1],AA[2]},{1+AA[1]-AA[2]},AA[3]];
   Hyp`m`RS=(Hyp`m`F[{AA[1]/2,1/2+AA[1]/2},
   {1+AA[1]-AA[2]},(4*AA[3])/(+1+AA[3])^2])/(1+AA[3])^AA[1];
   Hyp`m`Gleichung);

(*T2112*)
Tgl2112:=(ClearQ[Global`a,Global`b,Global`z];
   Hyp`m`LS=Hyp`m`F[{AA[1],1/2+AA[1]},{1/2+AA[2]},AA[3]^2];
   Hyp`m`RS=Hyp`m`F[{2*AA[1],AA[2]},{2*AA[2]},
   (2*AA[3])/(-1+AA[3])]/(1-AA[3])^(2*AA[1]);
   Hyp`m`Gleichung);
   
(*T2163*)
Tgl2163:=(ClearQ[Global`a,Global`b,Global`c,Global`z];
   Hyp`m`LS=Hyp`m`F[{AA[1],AA[2]},{AA[3]},AA[4]];
   Hyp`m`RS=(Hyp`m`F[{AA[2],-AA[1]+AA[3]},{1-AA[1]+AA[2]},
   -(-1+AA[4])^(-1)]*Hyp`m`GAMMA[{AA[1]-AA[2],AA[3]},{AA[1],
   -AA[2]+AA[3]}])/(1-AA[4])^AA[2]+(Hyp`m`F[{AA[1],
   -AA[2]+AA[3]},{1+AA[1]-AA[2]},
   -(-1+AA[4])^(-1)]*Hyp`m`GAMMA[{-AA[1]+AA[2],AA[3]},{AA[2],
   -AA[1]+AA[3]}])/(1-AA[4])^AA[1];
   Hyp`m`Gleichung);

(*T2202*)
Tgl2133:=(ClearQ[Global`a,Global`b,Global`z];
   Hyp`m`LS=Hyp`m`F[{AA[1],AA[2]},{(1/2+AA[1]+AA[2])},
   AA[3]^2/(-1+AA[3]^2)];
   Hyp`m`RS=(1-AA[3])^(AA[1])*(1+AA[3])^(-AA[1])*Hyp`m`F[{2*
   AA[1],AA[1]+AA[2]},{2*AA[1]+2*AA[2]},(-2*AA[3])/(-1-AA[3])];
   Hyp`m`Gleichung);
   
(*T3211*)
Tgl2134:=(ClearQ[Global`a,Global`b,Global`z];
Hyp`m`LS=Hyp`m`F[{AA[1],AA[2]},{1/2+AA[1]/2+AA[2]/2},AA[3]];
Hyp`m`RS=Hyp`m`F[{AA[1]/2,AA[2]/2},{1/2+AA[1]/2+AA[2]/2},
4*(1-AA[3])*AA[3]];
Hyp`m`Gleichung);
   
(*T3212*)
Tgl2135:=(ClearQ[Global`a,Global`b,Global`z];
Hyp`m`LS=Hyp`m`F[{AA[1],AA[2]},{1/2+AA[1]+AA[2]},AA[3]];
Hyp`m`RS=Hyp`m`F[{2*AA[1],2*AA[2]},{1/2+AA[1]+AA[2]},
(1-(1-AA[3])^(1/2))/2];
Hyp`m`Gleichung);

(*T3213*)
Tgl2136:=(ClearQ[Global`a,Global`b,Global`x];
Hyp`m`LS=Hyp`m`F[{AA[1],AA[2]},{2*AA[2]},AA[3]];
Hyp`m`RS=2^AA[1]*Hyp`m`F[{AA[1]/2,1/2+AA[1]/2},{1/2+AA[2]},
AA[3]^2/(-2+AA[3])^2]/(2-AA[3])^AA[1];
Hyp`m`Gleichung);

(*T3214*)
Tgl2137:=(ClearQ[Global`a,Global`b,Global`x];
Hyp`m`LS=Hyp`m`F[{AA[1],AA[2]},{2*AA[2]},AA[3]];
Hyp`m`RS=Hyp`m`F[{AA[1]/2,(-AA[1]+2*AA[2])/2},{(1+2*AA[2])/2},
AA[3]^2/(4*(-1+AA[3]))]/(1-AA[3])^(AA[1]/2);
Hyp`m`Gleichung);

(*T3267*)
Tgl3267:=(ClearQ[Global`a,Global`b,Global`c,Global`d,Global`e];
   Hyp`m`LS=Hyp`m`F[{AA[1],AA[2],AA[3]},{AA[4],AA[5]},1];
   Hyp`m`RS=Hyp`m`F[{AA[1],1+AA[1]-AA[5],
   1+AA[1]+AA[2]+AA[3]-AA[4]-AA[5]},{1+AA[1]+AA[2]-AA[5],
   1+AA[1]+AA[3]-AA[5]},1]*Hyp`m`GAMMA[{AA[4],1+AA[1]-AA[5],
   1+AA[2]-AA[5],1+AA[3]-AA[5]},{-AA[1]+AA[4],1-AA[5],
   1+AA[1]+AA[2]-AA[5],
   1+AA[1]+AA[3]-AA[5]}]-Hyp`m`F[{1+AA[1]-AA[5],1+AA[2]-AA[5],
   1+AA[3]-AA[5]},{2-AA[5],1+AA[4]-AA[5]},1]*Hyp`m`GAMMA[{AA[4],
   1+AA[1]-AA[5],1+AA[2]-AA[5],1+AA[3]-AA[5],-1+AA[5]},{AA[1],
   AA[2],AA[3],1-AA[5],1+AA[4]-AA[5]}];
   Hyp`m`Gleichung);

(*T3268*)
Tgl3268:=(ClearQ[Global`a,Global`b,Global`c,Global`d,Global`e];
   Hyp`m`LS=Hyp`m`F[{AA[1],AA[2],AA[3]},{AA[4],AA[5]},1];
   Hyp`m`RS=Hyp`m`F[{AA[2],-AA[1]+AA[4],-AA[1]+AA[5]},{1-AA[1]+AA[2],
   -AA[1]-AA[3]+AA[4]+AA[5]},1]*Hyp`m`GAMMA[{AA[1]-AA[2],AA[4],
   AA[5],-AA[1]-AA[2]-AA[3]+AA[4]+AA[5]},{AA[1],-AA[2]+AA[4],
   -AA[2]+AA[5],-AA[1]-AA[3]+AA[4]+AA[5]}]+Hyp`m`F[{AA[1],
   -AA[2]+AA[4],-AA[2]+AA[5]},{-AA[2]-AA[3]+AA[4]+AA[5],
   1+AA[1]-AA[2]},1]*Hyp`m`GAMMA[{-AA[1]+AA[2],AA[4],
   AA[5],-AA[1]-AA[2]-AA[3]+AA[4]+AA[5]},{AA[2],-AA[1]+AA[4],
   -AA[1]+AA[5],-AA[2]-AA[3]+AA[4]+AA[5]}];
   Hyp`m`Gleichung);

(*T3269*)
Tgl2192:=(ClearQ[Global`a,Global`b,Global`c,Global`z];
Hyp`m`LS=Hyp`m`F[{AA[1],AA[2]},{AA[3]},AA[4]];
Hyp`m`RS=(Hyp`m`F[{AA[1],1+AA[1]-AA[3]},{1+AA[1]+AA[2]-AA[3]},
(AA[4]-1)/AA[4]]*Hyp`m`GAMMA[{1+AA[1]-AA[3],1+AA[2]-AA[3]},
{1-AA[3],
1+AA[1]+AA[2]-AA[3]}])/AA[4]^AA[1]-AA[4]^(1-AA[3])*
Hyp`m`F[{1+AA[1]-AA[3],1+AA[2]-AA[3]},{2-AA[3]},
AA[4]]*Hyp`m`GAMMA[{1+AA[1]-AA[3],1+AA[2]-AA[3],-1+AA[3]},
{AA[1],AA[2],1-AA[3]}];
Hyp`m`Gleichung);

(*T4201*)
Tgl3235:=(ClearQ[Global`a,Global`b,Global`n,Global`d];
Hyp`m`LS=Hyp`m`F[{AA[1],AA[2],-AA[3]},{AA[4],2*AA[2]},2];
Hyp`m`RS=(Hyp`m`F[{AA[1]/2,1/2+AA[1]/2,1/2-AA[3]/2,-AA[3]/2},
{1/2+AA[1]/2-AA[4]/2-AA[3]/2,1+AA[1]/2-AA[4]/2-AA[3]/2,
1/2+AA[2]},1]*Hyp`m`p[-AA[1]+AA[4],AA[3]])/Hyp`m`p[AA[4],
AA[3]];
Hyp`m`Gleichung);

(*T4309*)
Tgl4309:=(ClearQ[Global`a,Global`b,Global`c,Global`d];
   Hyp`m`LS=Hyp`m`F[{AA[1],AA[2],AA[3],AA[4]},{1+AA[1]-AA[2],
   1+AA[1]-AA[3],1+AA[1]-AA[4]},1];
   Hyp`m`RS=Hyp`m`F[{1+2*AA[1]-AA[2]-AA[3]-AA[4],
   3/2+AA[1]-AA[2]/2-AA[3]/2-AA[4]/2,AA[1]/2,1/2+AA[1]/2,
   1+AA[1]-AA[3]-AA[4],1+AA[1]-AA[2]-AA[4],1+AA[1]-AA[2]-AA[3]},
   {1/2+AA[1]-AA[2]/2-AA[3]/2-AA[4]/2,
   2+(3*AA[1])/2-AA[2]-AA[3]-AA[4],
   3/2+(3*AA[1])/2-AA[2]-AA[3]-AA[4],1+AA[1]-AA[2],
   1+AA[1]-AA[3],
   1+AA[1]-AA[4]},1]*Hyp`m`GAMMA[{3+2*AA[1]-2*AA[2]-2*AA[3]-2*
   AA[4],2+2*AA[1]-AA[2]-AA[3]-AA[4]},
   {3+3*AA[1]-2*AA[2]-2*AA[3]-2*AA[4],
   2+AA[1]-AA[2]-AA[3]-AA[4]}];
   Hyp`m`Gleichung);
   
(*T4310*)
Tgl4310:=(ClearQ[Global`a,Global`b,Global`c,Global`d];
   Hyp`m`LS=Hyp`m`F[{AA[1],AA[2],AA[3],AA[4]},{1+AA[1]-AA[2],
   1+AA[1]-AA[3],1+AA[1]-AA[4]},-1];
   Hyp`m`RS=Hyp`m`F[{1+2*AA[1]-AA[2]-AA[3]-AA[4],
   3/2+AA[1]-AA[2]/2-AA[3]/2-AA[4]/2,AA[1]/2,
   1+AA[1]-AA[3]-AA[4],1+AA[1]-AA[2]-AA[4],1+AA[1]-AA[2]-AA[3]},
   {1/2+AA[1]-AA[2]/2-AA[3]/2-AA[4]/2,
   2+(3*AA[1])/2-AA[2]-AA[3]-AA[4],1+AA[1]-AA[2],1+AA[1]-AA[3],
   1+AA[1]-AA[4]},-1]*Hyp`m`GAMMA[{2+2*AA[1]-AA[2]-AA[3]-AA[4],
   1+AA[1]/2},{1+AA[1],2+(3*AA[1])/2-AA[2]-AA[3]-AA[4]}];
   Hyp`m`Gleichung);

(*T4311*)
Tgl3236:=(ClearQ[Global`a,Global`b,Global`z];
   Hyp`m`LS=Hyp`m`F[{AA[1],1+AA[1]/2,AA[2]},{AA[1]/2,1+AA[1]-AA[2]},
   AA[3]];
   Hyp`m`RS=(1-AA[3])*(1+AA[3])^(-1-AA[1])*Hyp`m`F[{1/2+AA[1]/2,
   1+AA[1]/2},{1+AA[1]-AA[2]},(4*AA[3])/(1+AA[3])^2];
   Hyp`m`Gleichung);
   
(*T4312*)
Tgl4312:=(ClearQ[Global`a,Global`n,Global`d,Global`b];
   Hyp`m`LS=Hyp`m`F[{AA[1]/2,1/2+AA[1]/2,1/2-AA[2]/2,-AA[2]/2},{AA[3]/2,
   1/2+AA[3]/2,1/2+AA[4]},1];
   Hyp`m`RS=Hyp`m`F[{AA[1],AA[4],-AA[2]},{1+AA[1]-AA[3]-AA[2],
   2*AA[4]},2]*Hyp`m`p[{-AA[1]+AA[3]},{AA[3]},AA[2]];
   Hyp`m`Gleichung);
   
(*T5465*)
Tgl4391:=(ClearQ[Global`a,Global`c,Global`d,Global`e,Global`b];
Hyp`m`LS=Hyp`m`F[{AA[1],AA[2],AA[3],AA[4]},{AA[5],2*AA[1],
1-2*AA[5]+AA[2]+AA[3]+AA[4]},1];
Hyp`m`RS=Hyp`m`F[{-1/2+AA[5],3/4+AA[5]/2,-AA[1]+AA[5],AA[2]/2,
1/2+AA[2]/2,AA[3]/2,1/2+AA[3]/2,AA[4]/2,1/2+AA[4]/2},
{-1/4+AA[5]/2,1/2+AA[1],1/2+AA[5]-AA[2]/2,AA[5]-AA[2]/2,
1/2+AA[5]-AA[3]/2,AA[5]-AA[3]/2,1/2+AA[5]-AA[4]/2,
AA[5]-AA[4]/2},1]*Hyp`m`GAMMA[{AA[5],1/2+AA[5],
AA[5]-AA[2]/2-AA[3]/2,1/2+AA[5]-AA[2]/2-AA[3]/2,
AA[5]-AA[2]/2-AA[4]/2,1/2+AA[5]-AA[2]/2-AA[4]/2,
AA[5]-AA[3]/2-AA[4]/2,1/2+AA[5]-AA[3]/2-AA[4]/2},
{AA[5]-AA[2]/2,1/2+AA[5]-AA[2]/2,AA[5]-AA[3]/2,
1/2+AA[5]-AA[3]/2,AA[5]-AA[4]/2,1/2+AA[5]-AA[4]/2,
AA[5]-AA[2]/2-AA[3]/2-AA[4]/2,
1/2+AA[5]-AA[2]/2-AA[3]/2-AA[4]/2}]-Hyp`m`F[{AA[1]+2*AA[5]-
AA[2]-AA[3]-AA[4],2*AA[5]-AA[2]-AA[3],2*AA[5]-AA[2]-AA[4],
2*AA[5]-AA[3]-AA[4]},{3*AA[5]-AA[2]-AA[3]-AA[4],
2*AA[1]+2*AA[5]-AA[2]-AA[3]-AA[4],
1+2*AA[5]-AA[2]-AA[3]-AA[4]},1]*Hyp`m`GAMMA[{1/2+AA[1],AA[5],
AA[5]-AA[2]/2-AA[3]/2,1/2+AA[5]-AA[2]/2-AA[3]/2,
AA[1]+2*AA[5]-AA[2]-AA[3]-AA[4],AA[5]-AA[2]/2-AA[4]/2,
1/2+AA[5]-AA[2]/2-AA[4]/2,AA[5]-AA[3]/2-AA[4]/2,
1/2+AA[5]-AA[3]/2-AA[4]/2,-AA[5]+AA[2]/2+AA[3]/2+AA[4]/2,
1/2-AA[5]+AA[2]/2+AA[3]/2+AA[4]/2},{AA[2]/2,1/2+AA[2]/2,
AA[3]/2,1/2+AA[3]/2,3*AA[5]-AA[2]-AA[3]-AA[4],
AA[5]-AA[2]/2-AA[3]/2-AA[4]/2,
1/2+AA[5]-AA[2]/2-AA[3]/2-AA[4]/2,
AA[1]+AA[5]-AA[2]/2-AA[3]/2-AA[4]/2,
1/2+AA[1]+AA[5]-AA[2]/2-AA[3]/2-AA[4]/2,AA[4]/2,
1/2+AA[4]/2}];
Hyp`m`Gleichung);

(*T5468*)
Tgl5468:=(ClearQ[Global`a,Global`b,Global`c,Global`d,Global`e];
   Hyp`m`LS=Hyp`m`F[{AA[1],AA[2],AA[3],AA[4],AA[5]},{1+AA[1]-AA[2],
   1+AA[1]-AA[3],1+AA[1]-AA[4],
   -2-2*AA[1]+2*AA[2]+2*AA[3]+2*AA[4]+AA[5]},1]+Hyp`m`F[{3+2*
   AA[1]-2*AA[2]-2*AA[3]-2*AA[4],
   3+3*AA[1]-2*AA[2]-2*AA[3]-2*AA[4]-AA[5],
   3+2*AA[1]-AA[2]-2*AA[3]-2*AA[4]-AA[5],
   3+2*AA[1]-2*AA[2]-AA[3]-2*AA[4]-AA[5],
   3+2*AA[1]-2*AA[2]-2*AA[3]-AA[4]-AA[5]},
   {4+2*AA[1]-2*AA[2]-2*AA[3]-2*AA[4]-AA[5],
   4+3*AA[1]-3*AA[2]-2*AA[3]-2*AA[4]-AA[5],
   4+3*AA[1]-2*AA[2]-3*AA[3]-2*AA[4]-AA[5],
   4+3*AA[1]-2*AA[2]-2*AA[3]-3*AA[4]-AA[5]},1]*
   Hyp`m`GAMMA[{1+AA[1]-AA[2],1+AA[1]-AA[3],3+2*AA[1]-2*
   AA[2]-2*AA[3]-2*AA[4],1+AA[1]-AA[4],
   3+3*AA[1]-2*AA[2]-2*AA[3]-2*AA[4]-AA[5],
   3+2*AA[1]-AA[2]-2*AA[3]-2*AA[4]-AA[5],
   3+2*AA[1]-2*AA[2]-AA[3]-2*AA[4]-AA[5],
   3+2*AA[1]-2*AA[2]-2*AA[3]-AA[4]-AA[5],
   -3-2*AA[1]+2*AA[2]+2*AA[3]+2*AA[4]+AA[5]},
   {AA[1],AA[2],AA[3],AA[4],4+3*AA[1]-2*AA[2]-2*AA[3]-3*
   AA[4]-AA[5],4+3*AA[1]-2*AA[2]-3*AA[3]-2*AA[4]-
   AA[5],4+3*AA[1]-3*AA[2]-2*AA[3]-2*AA[4]-AA[5],
   3+2*AA[1]-2*AA[2]-2*AA[3]-2*AA[4]-AA[5],AA[5]}];
   Hyp`m`RS=Hyp`m`F[{1+2*AA[1]-AA[2]-AA[3]-AA[4],
   3/2+AA[1]-AA[2]/2-AA[3]/2-AA[4]/2,AA[1]/2,1/2+AA[1]/2,
   1+AA[1]-AA[3]-AA[4],1+AA[1]-AA[2]-AA[4],1+AA[1]-AA[2]-AA[3],
   AA[5],3+3*AA[1]-2*AA[2]-2*AA[3]-2*AA[4]-AA[5]},
   {1/2+AA[1]-AA[2]/2-AA[3]/2-AA[4]/2,
   2+(3*AA[1])/2-AA[2]-AA[3]-AA[4],
   3/2+(3*AA[1])/2-AA[2]-AA[3]-AA[4],1+AA[1]-AA[2],
   1+AA[1]-AA[3],1+AA[1]-AA[4],
   2+2*AA[1]-AA[2]-AA[3]-AA[4]-AA[5],
   -1-AA[1]+AA[2]+AA[3]+AA[4]+AA[5]},1]*Hyp`m`GAMMA[{3+2*AA[1]-2*
   AA[2]-2*AA[3]-2*AA[4],2+2*AA[1]-AA[2]-AA[3]-AA[4],
   3+3*AA[1]-2*AA[2]-2*AA[3]-2*AA[4]-AA[5],
   2+AA[1]-AA[2]-AA[3]-AA[4]-AA[5]},
   {3+3*AA[1]-2*AA[2]-2*AA[3]-2*AA[4],2+AA[1]-AA[2]-AA[3]-AA[4],
   3+2*AA[1]-2*AA[2]-2*AA[3]-2*AA[4]-AA[5],
   2+2*AA[1]-AA[2]-AA[3]-AA[4]-AA[5]}]+Hyp`m`F[{5+4*AA[1]-3*
   AA[2]-3*AA[3]-3*AA[4]-2*AA[5],
   7/2+2*AA[1]-(3*AA[2])/2-(3*AA[3])/2-(3*AA[4])/2-AA[5],
   2+(3*AA[1])/2-AA[2]-AA[3]-AA[4]-AA[5],
   5/2+(3*AA[1])/2-AA[2]-AA[3]-AA[4]-AA[5],
   2+AA[1]-AA[2]-AA[3]-AA[4],
   3+3*AA[1]-2*AA[2]-2*AA[3]-2*AA[4]-AA[5],
   3+2*AA[1]-AA[2]-2*AA[3]-2*AA[4]-AA[5],
   3+2*AA[1]-2*AA[2]-AA[3]-2*AA[4]-AA[5],
   3+2*AA[1]-2*AA[2]-2*AA[3]-AA[4]-AA[5]},
   {5/2+2*AA[1]-(3*AA[2])/2-(3*AA[3])/2-(3*AA[4])/2-AA[5],
   4+(5*AA[1])/2-2*AA[2]-2*AA[3]-2*AA[4]-AA[5],
   7/2+(5*AA[1])/2-2*AA[2]-2*AA[3]-2*AA[4]-AA[5],
   4+3*AA[1]-2*AA[2]-2*AA[3]-2*AA[4]-2*AA[5],
   3+AA[1]-AA[2]-AA[3]-AA[4]-AA[5],
   3+2*AA[1]-2*AA[2]-AA[3]-AA[4]-AA[5],
   3+2*AA[1]-AA[2]-2*AA[3]-AA[4]-AA[5],
   3+2*AA[1]-AA[2]-AA[3]-2*AA[4]-AA[5]},1]*
   Hyp`m`GAMMA[{1+AA[1]-AA[2],1+AA[1]-AA[3],
   3+2*AA[1]-2*AA[2]-2*AA[3]-2*AA[4],1+AA[1]-AA[4],
   6+4*AA[1]-3*AA[2]-3*AA[3]-3*AA[4]-2*AA[5],
   3+3*AA[1]-2*AA[2]-2*AA[3]-2*AA[4]-AA[5],
   3+2*AA[1]-AA[2]-2*AA[3]-2*AA[4]-AA[5],
   3+2*AA[1]-2*AA[2]-AA[3]-2*AA[4]-AA[5],
   3+2*AA[1]-2*AA[2]-2*AA[3]-AA[4]-AA[5],
   -2-AA[1]+AA[2]+AA[3]+AA[4]+AA[5]},{AA[1],1+AA[1]-AA[2]-AA[3],
   1+AA[1]-AA[2]-AA[4],1+AA[1]-AA[3]-AA[4],
   7+5*AA[1]-4*AA[2]-4*AA[3]-4*AA[4]-2*AA[5],
   3+2*AA[1]-2*AA[2]-2*AA[3]-2*AA[4]-AA[5],
   3+2*AA[1]-AA[2]-AA[3]-2*AA[4]-AA[5],
   3+2*AA[1]-AA[2]-2*AA[3]-AA[4]-AA[5],
   3+2*AA[1]-2*AA[2]-AA[3]-AA[4]-AA[5],AA[5]}];
   Hyp`m`Gleichung);
   
(*T6501*)
Tgl6501:=(ClearQ[Global`a,Global`b,Global`c,Global`d,Global`n];
   Hyp`m`LS=Hyp`m`F[{AA[1],1+AA[1]/2,AA[2],AA[3],AA[4],-AA[5]},{AA[1]/2,
   1+AA[1]-AA[2],1+AA[1]-AA[3],1+AA[1]-AA[4],
   -1-2*AA[1]+2*AA[2]+2*AA[3]+2*AA[4]-AA[5]},1];
   Hyp`m`RS=Hyp`m`F[{1+2*AA[1]-AA[2]-AA[3]-AA[4],
   3/2+AA[1]-AA[2]/2-AA[3]/2-AA[4]/2,1+AA[1]-AA[3]-AA[4],
   1+AA[1]-AA[2]-AA[4],1+AA[1]-AA[2]-AA[3],1+AA[1]/2,
   1/2+AA[1]/2,2+3*AA[1]-2*AA[2]-2*AA[3]-2*AA[4]+AA[5],-AA[5]},
   {1/2+AA[1]-AA[2]/2-AA[3]/2-AA[4]/2,1+AA[1]-AA[2],
   1+AA[1]-AA[3],1+AA[1]-AA[4],1+(3*AA[1])/2-AA[2]-AA[3]-AA[4],
   3/2+(3*AA[1])/2-AA[2]-AA[3]-AA[4],
   -AA[1]+AA[2]+AA[3]+AA[4]-AA[5],
   2+2*AA[1]-AA[2]-AA[3]-AA[4]+AA[5]},1]*
   Hyp`m`p[{2+3*AA[1]-2*AA[2]-2*AA[3]-2*AA[4],
   1+AA[1]-AA[2]-AA[3]-AA[4]},
   {2+2*AA[1]-2*AA[2]-2*AA[3]-2*AA[4],
   2+2*AA[1]-AA[2]-AA[3]-AA[4]},AA[5]];
   Hyp`m`Gleichung);
   
(*T8706*)
Tgl6532:=(ClearQ[Global`a,Global`b,Global`c,Global`d];
   Hyp`m`LS=Hyp`m`F[{AA[1],1+AA[1]/2,AA[2],AA[3],AA[4],
   1+2*AA[1]-2*AA[2]-AA[3]-AA[4]},{AA[1]/2,1+AA[1]-AA[2],
   1+AA[1]-AA[3],1+AA[1]-AA[4],-AA[1]+2*AA[2]+AA[3]+AA[4]},-1];
   Hyp`m`RS=Hyp`m`F[{2*AA[2],-AA[1]+2*AA[2]+AA[3],-AA[1]+2*AA[2]+AA[4],
   1+AA[1]-AA[3]-AA[4]},{1+AA[1]-AA[3],1+AA[1]-AA[4],
   -AA[1]+2*AA[2]+AA[3]+AA[4]},-1]*Hyp`m`GAMMA[{1+2*AA[2],
   1+AA[1]-AA[2]},{1+AA[2],1+AA[1]}];
   Hyp`m`Gleichung);
   
(*T8710*)
Tgl7636:=(ClearQ[Global`a,Global`b,Global`c,Global`d];
   Hyp`m`LS=Hyp`m`F[{AA[1],1+AA[1]/2,AA[2],AA[3],1/2+AA[3],AA[4],
   1/2+AA[4]},{AA[1]/2,1+AA[1]-AA[2],1+AA[1]-AA[3],
   1/2+AA[1]-AA[3],1+AA[1]-AA[4],1/2+AA[1]-AA[4]},1];
   Hyp`m`RS=Hyp`m`F[{2*AA[3],AA[2],1/2+AA[1]-2*AA[4]},
   {1+2*AA[1]-AA[2]-2*AA[4],
   1/2+AA[1]},1]*Hyp`m`GAMMA[{1+2*AA[1]-2*AA[2],
   1+2*AA[1]-2*AA[3],1+2*AA[1]-2*AA[4],
   1+2*AA[1]-AA[2]-2*AA[3]-2*AA[4]},{1+2*AA[1],
   1+2*AA[1]-2*AA[2]-2*AA[3],1+2*AA[1]-AA[2]-2*AA[4],
   1+2*AA[1]-2*AA[3]-2*AA[4]}];
   Hyp`m`Gleichung);

(*T8764*)
Tgl7693:=(ClearQ[Global`a,Global`b,Global`c,Global`d,Global`e,Global`f];
   Hyp`m`LS=Hyp`m`F[{2*AA[1],1+AA[1],AA[1]+AA[2],AA[1]+AA[3],AA[1]+AA[4],
   AA[1]+AA[5],AA[1]+AA[6]},{AA[1],1+AA[1]-AA[2],1+AA[1]-AA[3],
   1+AA[1]-AA[4],1+AA[1]-AA[5],1+AA[1]-AA[6]},1];
   Hyp`m`RS=-(Hyp`m`F[{2*AA[2],1+AA[2],AA[1]+AA[2],AA[2]+AA[3],
   AA[2]+AA[4],AA[2]+AA[5],AA[2]+AA[6]},{AA[2],1-AA[1]+AA[2],
   1+AA[2]-AA[3],1+AA[2]-AA[4],1+AA[2]-AA[5],
   1+AA[2]-AA[6]},1]*Hyp`m`GAMMA[{AA[1]-AA[2],1+2*AA[2],
   -AA[2]+AA[3],AA[2]+AA[3],1-AA[1]-AA[4],1+AA[1]-AA[4],
   1-AA[1]-AA[5],1+AA[1]-AA[5],1-AA[1]-AA[6],1+AA[1]-AA[6]},
   {1+2*AA[1],-AA[1]+AA[2],-AA[1]+AA[3],AA[1]+AA[3],
   1-AA[2]-AA[4],1+AA[2]-AA[4],1-AA[2]-AA[5],1+AA[2]-AA[5],
   1-AA[2]-AA[6],1+AA[2]-AA[6]}])-Hyp`m`F[{2*AA[3],1+AA[3],
   AA[1]+AA[3],AA[2]+AA[3],AA[3]+AA[4],AA[3]+AA[5],AA[3]+AA[6]},
   {AA[3],1-AA[1]+AA[3],1-AA[2]+AA[3],1+AA[3]-AA[4],
   1+AA[3]-AA[5],1+AA[3]-AA[6]},1]*Hyp`m`GAMMA[{AA[1]-AA[3],AA[2]-AA[3],
   AA[2]+AA[3],1+2*AA[3],1-AA[1]-AA[4],1+AA[1]-AA[4],
   1-AA[1]-AA[5],1+AA[1]-AA[5],1-AA[1]-AA[6],1+AA[1]-AA[6]},
   {1+2*AA[1],-AA[1]+AA[2],AA[1]+AA[2],-AA[1]+AA[3],
   1-AA[3]-AA[4],1+AA[3]-AA[4],1-AA[3]-AA[5],1+AA[3]-AA[5],
   1-AA[3]-AA[6],1+AA[3]-AA[6]}];
   Hyp`m`Gleichung);
   
(*T10902*)
Tgl7637:=(ClearQ[Global`a,Global`b,Global`c,Global`d];
   Hyp`m`LS=Hyp`m`F[{AA[1],1+AA[1]/2,AA[2],1/2+AA[2],AA[3],AA[4],
   1+2*AA[1]-2*AA[2]-AA[3]-AA[4]},{AA[1]/2,1+AA[1]-AA[2],
   1/2+AA[1]-AA[2],1+AA[1]-AA[3],1+AA[1]-AA[4],
   -AA[1]+2*AA[2]+AA[3]+AA[4]},1];
   Hyp`m`RS=Hyp`m`F[{2*AA[2],-AA[1]+2*AA[2]+AA[3],-AA[1]+2*AA[2]+AA[4],
   1+AA[1]-AA[3]-AA[4]},{1+AA[1]-AA[3],1+AA[1]-AA[4],
   -AA[1]+2*AA[2]+AA[3]+AA[4]},1]*Hyp`m`GAMMA[{1+AA[1]-2*AA[2],
   1+2*AA[1]-2*AA[2]},{1+AA[1],1+2*AA[1]-4*AA[2]}];
   Hyp`m`Gleichung);
   
(*T10903*)
Tgl9835:=(ClearQ[Global`a,Global`b,Global`c,Global`d,Global`e,Global`f,Global`n];
Hyp`m`LS=Hyp`m`F[{AA[1],1+AA[1]/2,AA[2],AA[3],AA[4],AA[5],AA[6],
2+3*AA[1]-AA[2]-AA[3]-AA[4]-AA[5]-AA[6]+AA[7],-AA[7]},
{AA[1]/2,1+AA[1]-AA[2],1+AA[1]-AA[3],1+AA[1]-AA[4],
1+AA[1]-AA[5],1+AA[1]-AA[6],
-1-2*AA[1]+AA[2]+AA[3]+AA[4]+AA[5]+AA[6]-AA[7],
1+AA[1]+AA[7]},1];
Hyp`m`RS=Hyp`m`F[{-AA[2]+AA[5]-AA[7],1-AA[2]/2+AA[5]/2-AA[7]/2,AA[5],
1+AA[1]-AA[2]-AA[3],1+AA[1]-AA[2]-AA[4],1+AA[1]-AA[2]-AA[6],
-1-2*AA[1]+AA[3]+AA[4]+AA[5]+AA[6]-AA[7],-AA[1]+AA[5]-AA[7],
-AA[7]},{-AA[2]/2+AA[5]/2-AA[7]/2,1-AA[2]-AA[7],
-AA[1]+AA[3]+AA[5]-AA[7],-AA[1]+AA[4]+AA[5]-AA[7],
-AA[1]+AA[5]+AA[6]-AA[7],2+2*AA[1]-AA[2]-AA[3]-AA[4]-AA[6],
1+AA[1]-AA[2],1-AA[2]+AA[5]},1]*Hyp`m`p[{1+AA[1],AA[2],1+AA[1]-AA[3]-AA[5],
1+AA[1]-AA[4]-AA[5],1+AA[1]-AA[5]-AA[6],
-1-2*AA[1]+AA[2]+AA[3]+AA[4]+AA[6]-AA[7]},{1+AA[1]-AA[3],
1+AA[1]-AA[4],1+AA[1]-AA[5],AA[2]-AA[5],1+AA[1]-AA[6],
-1-2*AA[1]+AA[2]+AA[3]+AA[4]+AA[5]+AA[6]-AA[7]},AA[7]];
Hyp`m`Gleichung);

(*T10905*)
Tgl9836:=(ClearQ[Global`a,Global`b,Global`c,Global`A,System`C,Global`n,Global`B];
   Hyp`m`LS=Hyp`m`F[{AA[1],1+AA[1]/2,AA[2],AA[3],AA[1]-AA[2]-AA[3],
   -AA[4]+AA[5]-AA[6],-AA[7]-AA[5]-AA[6],-AA[4]+AA[7]-AA[6],
   -AA[6]},{AA[1]/2,1+AA[1]-AA[2],1+AA[1]-AA[3],1+AA[2]+AA[3],
   -AA[5]-AA[6],-AA[4]+AA[7]+AA[5]-AA[6],-AA[7]-AA[6],
   -AA[4]-AA[6]},1];
   Hyp`m`RS=Hyp`m`F[{AA[4],1+AA[4]/2,AA[7],AA[5],AA[4]-AA[7]-AA[5],
   -AA[1]+AA[3]-AA[6],-AA[2]-AA[3]-AA[6],-AA[1]+AA[2]-AA[6],
   -AA[6]},{AA[4]/2,1+AA[4]-AA[7],1+AA[4]-AA[5],1+AA[7]+AA[5],
   -AA[3]-AA[6],-AA[1]+AA[2]+AA[3]-AA[6],-AA[2]-AA[6],
   -AA[1]-AA[6]},1]*Hyp`m`p[{1+AA[3],1+AA[4]-AA[7],1+AA[4]-AA[5],
   1+AA[7]+AA[5],1+AA[1],1+AA[2],1+AA[1]-AA[2]-AA[3]},
   {1+AA[2]+AA[3],1+AA[4],1+AA[7],1+AA[4]-AA[7]-AA[5],1+AA[5],
   1+AA[1]-AA[2],1+AA[1]-AA[3]},AA[6]];
   Hyp`m`Gleichung);

(*T10906*)
Tgl8731:=(ClearQ[Global`a,Global`n,Global`c,Global`d,Global`e];
   Hyp`m`LS=Hyp`m`F[{2*AA[1]+AA[2],1+AA[1]+AA[2]/2,AA[3],AA[4],AA[5],
   1/2+AA[1]+AA[2],1+4*AA[1]-AA[3]-AA[4]-AA[5]+AA[2],-AA[2]},
   {AA[1]+AA[2]/2,1+2*AA[1]-AA[3]+AA[2],1+2*AA[1]-AA[4]+AA[2],
   1+2*AA[1]-AA[5]+AA[2],1/2+AA[1],-2*AA[1]+AA[3]+AA[4]+AA[5],
   1+2*AA[1]+2*AA[2]},-1];
   Hyp`m`RS=Hyp`m`F[{AA[1],1+AA[1]/2,-AA[2],AA[3]/2,1/2+AA[3]/2,AA[4]/2,
   1/2+AA[4]/2,AA[5]/2,1/2+AA[5]/2,
   1/2+2*AA[1]-AA[3]/2-AA[4]/2-AA[5]/2+AA[2]/2,
   1+2*AA[1]-AA[3]/2-AA[4]/2-AA[5]/2+AA[2]/2},{AA[1]/2,
   1+AA[1]+AA[2],1+AA[1]-AA[3]/2,1/2+AA[1]-AA[3]/2,
   1+AA[1]-AA[4]/2,1/2+AA[1]-AA[4]/2,1+AA[1]-AA[5]/2,
   1/2+AA[1]-AA[5]/2,1/2-AA[1]+AA[3]/2+AA[4]/2+AA[5]/2-AA[2]/2,
   -AA[1]+AA[3]/2+AA[4]/2+AA[5]/2-AA[2]/2},1]*Hyp`m`p[{1+2*AA[1]-
   AA[3],1+2*AA[1]-AA[4],1+2*AA[1]-AA[5],
   1+2*AA[1]-AA[3]-AA[4]-AA[5]},{1+2*AA[1],
   1+2*AA[1]-AA[3]-AA[4],1+2*AA[1]-AA[3]-AA[5],
   1+2*AA[1]-AA[4]-AA[5]},AA[2]];
   Hyp`m`Gleichung);
   
(*T10907*)
Tgl8732:=(ClearQ[Global`a,Global`e,Global`c,Global`d,Global`n];
   Hyp`m`LS=Hyp`m`F[{2*AA[1]-AA[2],1+AA[1]-AA[2]/2,1/2+AA[1]-AA[2],AA[3],
   AA[4],AA[2],1+4*AA[1]-AA[3]-AA[4]-AA[2]+AA[5],-AA[5]},
   {AA[1]-AA[2]/2,1/2+AA[1],1+2*AA[1]-AA[3]-AA[2],
   1+2*AA[1]-AA[4]-AA[2],1+2*AA[1]-2*AA[2],
   -2*AA[1]+AA[3]+AA[4]-AA[5],1+2*AA[1]-AA[2]+AA[5]},-1];
   Hyp`m`RS=Hyp`m`F[{AA[1],1+AA[1]/2,AA[2],AA[3]/2,1/2+AA[3]/2,AA[4]/2,
   1/2+AA[4]/2,1/2+2*AA[1]-AA[3]/2-AA[4]/2-AA[2]/2+AA[5]/2,
   1+2*AA[1]-AA[3]/2-AA[4]/2-AA[2]/2+AA[5]/2,1/2-AA[5]/2,
   -AA[5]/2},{AA[1]/2,1+AA[1]-AA[2],1+AA[1]-AA[3]/2,
   1/2+AA[1]-AA[3]/2,1+AA[1]-AA[4]/2,1/2+AA[1]-AA[4]/2,
   1/2-AA[1]+AA[3]/2+AA[4]/2+AA[2]/2-AA[5]/2,
   -AA[1]+AA[3]/2+AA[4]/2+AA[2]/2-AA[5]/2,1/2+AA[1]+AA[5]/2,
   1+AA[1]+AA[5]/2},1]*Hyp`m`p[{1+2*AA[1]-AA[3],1+2*AA[1]-AA[4],
   1+2*AA[1]-AA[2],1+2*AA[1]-AA[3]-AA[4]-AA[2]},{1+2*AA[1],
   1+2*AA[1]-AA[3]-AA[4],1+2*AA[1]-AA[3]-AA[2],
   1+2*AA[1]-AA[4]-AA[2]},AA[5]];
   Hyp`m`Gleichung);

(*T10962*)
Tgl9892:=(ClearQ[Global`a,Global`b,Global`c,Global`d,Global`e];
   Hyp`m`LS=Hyp`m`F[{AA[1],1+AA[1]/2,AA[2],AA[3],1/2+AA[3],AA[4],
   1/2+AA[4],AA[5],1/2+AA[5]},{AA[1]/2,1+AA[1]-AA[2],
   1+AA[1]-AA[3],1/2+AA[1]-AA[3],1+AA[1]-AA[4],1/2+AA[1]-AA[4],
   1+AA[1]-AA[5],1/2+AA[1]-AA[5]},1];
   Hyp`m`RS=Hyp`m`F[{1/2+AA[1]-AA[2],2*AA[3],2*AA[4],2*AA[5]},{1/2+AA[1],
   1+2*AA[1]-2*AA[2],
   -2*AA[1]+2*AA[3]+2*AA[4]+2*AA[5]},1]*Hyp`m`GAMMA[{1/2+AA[1]-
   AA[3],1+AA[1]-AA[3],1/2+AA[1]-AA[4],1+AA[1]-AA[4],
   1/2+AA[1]-AA[5],1+AA[1]-AA[5],1/2+AA[1]-AA[3]-AA[4]-AA[5],
   1+AA[1]-AA[3]-AA[4]-AA[5]},{1/2+AA[1],1+AA[1],
   1/2+AA[1]-AA[3]-AA[4],1+AA[1]-AA[3]-AA[4],
   1/2+AA[1]-AA[3]-AA[5],1+AA[1]-AA[3]-AA[5],
   1/2+AA[1]-AA[4]-AA[5],
   1+AA[1]-AA[4]-AA[5]}]+Hyp`m`F[{3/2+3*AA[1]-AA[2]-2*AA[3]-2*
   AA[4]-2*AA[5],1+2*AA[1]-2*AA[3]-2*AA[4],
   1+2*AA[1]-2*AA[3]-2*AA[5],1+2*AA[1]-2*AA[4]-2*AA[5]},
   {3/2+3*AA[1]-2*AA[3]-2*AA[4]-2*AA[5],
   2+4*AA[1]-2*AA[2]-2*AA[3]-2*AA[4]-2*AA[5],
   2+2*AA[1]-2*AA[3]-2*AA[4]-2*AA[5]},1]*Hyp`m`GAMMA[{1+AA[1]-AA[2],1/2+AA[1]-AA[3],
   1+AA[1]-AA[3],1/2+AA[1]-AA[4],1+AA[1]-AA[4],
   3/2+3*AA[1]-AA[2]-2*AA[3]-2*AA[4]-2*AA[5],1/2+AA[1]-AA[5],
   1+AA[1]-AA[5],-1/2-AA[1]+AA[3]+AA[4]+AA[5],
   -AA[1]+AA[3]+AA[4]+AA[5]},{1+AA[1],AA[3],1/2+AA[3],AA[4],
   1/2+AA[4],3/2+3*AA[1]-2*AA[3]-2*AA[4]-2*AA[5],
   1+2*AA[1]-AA[2]-AA[3]-AA[4]-AA[5],
   3/2+2*AA[1]-AA[2]-AA[3]-AA[4]-AA[5],AA[5],1/2+AA[5]}];
   Hyp`m`Gleichung);
   
(*T10963*)
Tgl9893:=(ClearQ[Global`a,Global`b,Global`c,Global`d,Global`e,Global`f,Global`g];
   Hyp`m`LS=Hyp`m`F[{AA[1],1+AA[1]/2,AA[2],AA[3],AA[4],AA[5],AA[6],AA[7],2+3*AA[1]-AA[2]-AA[3]-AA[4]-AA[5]-AA[6]-AA[7]},
       {AA[1]/2,1+AA[1]-AA[2],1+AA[1]-AA[3],1+AA[1]-AA[4],1+AA[1]-AA[5],1+AA[1]-AA[6],
        1+AA[1]-AA[7],-1-2*AA[1]+AA[2]+AA[3]+AA[4]+AA[5]+AA[6]+AA[7]},1]+
      Hyp`m`F[{-AA[1]+2*AA[2],1-AA[1]/2+AA[2],AA[2],-AA[1]+AA[2]+AA[3],-AA[1]+AA[2]+AA[4],-AA[1]+AA[2]+AA[5],
         -AA[1]+AA[2]+AA[6],-AA[1]+AA[2]+AA[7],2+2*AA[1]-AA[3]-AA[4]-AA[5]-AA[6]-AA[7]},
     {-AA[1]/2+AA[2],1-AA[1]+AA[2],1+AA[2]-AA[3],1+AA[2]-AA[4],1+AA[2]-AA[5],1+AA[2]-AA[6],
      1+AA[2]-AA[7],-1-3*AA[1]+2*AA[2]+AA[3]+AA[4]+AA[5]+AA[6]+AA[7]},1]*
    Hyp`m`GAMMA[{AA[1]-AA[2],1-AA[1]+2*AA[2],1+AA[1]-AA[3],-AA[1]+AA[2]+AA[3],1+AA[1]-AA[4],
      -AA[1]+AA[2]+AA[4],1+AA[1]-AA[5],-AA[1]+AA[2]+AA[5],1+AA[1]-AA[6],-AA[1]+AA[2]+AA[6],1+AA[1]-AA[7],
      2+2*AA[1]-AA[3]-AA[4]-AA[5]-AA[6]-AA[7],-AA[1]+AA[2]+AA[7],
      -1-2*AA[1]+AA[2]+AA[3]+AA[4]+AA[5]+AA[6]+AA[7]},
     {1+AA[1],-AA[1]+AA[2],1+AA[2]-AA[3],AA[3],1+AA[2]-AA[4],AA[4],1+AA[2]-AA[5],AA[5],1+AA[2]-AA[6],AA[6],
      1+AA[2]-AA[7],2+3*AA[1]-AA[2]-AA[3]-AA[4]-AA[5]-AA[6]-AA[7],AA[7],
      -1-3*AA[1]+2*AA[2]+AA[3]+AA[4]+AA[5]+AA[6]+AA[7]}];
   Hyp`m`RS=Hyp`m`F[{2+3*AA[1]-AA[3]-AA[4]-AA[5]-AA[6]-2*AA[7],
      2+(3*AA[1])/2-AA[3]/2-AA[4]/2-AA[5]/2-AA[6]/2-AA[7],AA[2],1+AA[1]-AA[3]-AA[7],
      1+AA[1]-AA[4]-AA[7],1+AA[1]-AA[5]-AA[7],1+AA[1]-AA[6]-AA[7],
      2+2*AA[1]-AA[3]-AA[4]-AA[5]-AA[6]-AA[7],2+3*AA[1]-AA[2]-AA[3]-AA[4]-AA[5]-AA[6]-AA[7]},
     {1+(3*AA[1])/2-AA[3]/2-AA[4]/2-AA[5]/2-AA[6]/2-AA[7],
      3+3*AA[1]-AA[2]-AA[3]-AA[4]-AA[5]-AA[6]-2*AA[7],2+2*AA[1]-AA[4]-AA[5]-AA[6]-AA[7],
      2+2*AA[1]-AA[3]-AA[5]-AA[6]-AA[7],2+2*AA[1]-AA[3]-AA[4]-AA[6]-AA[7],
      2+2*AA[1]-AA[3]-AA[4]-AA[5]-AA[7],1+AA[1]-AA[7],1+AA[2]-AA[7]},1]*
    Hyp`m`GAMMA[{1+AA[1]-AA[3],-AA[1]+AA[2]+AA[3],1+AA[1]-AA[4],-AA[1]+AA[2]+AA[4],1+AA[1]-AA[5],
      -AA[1]+AA[2]+AA[5],1+AA[1]-AA[6],-AA[1]+AA[2]+AA[6],3+3*AA[1]-AA[3]-AA[4]-AA[5]-AA[6]-2*AA[7],
      2+2*AA[1]-AA[3]-AA[4]-AA[5]-AA[6]-AA[7],-1-2*AA[1]+AA[2]+AA[3]+AA[4]+AA[5]+AA[6]+AA[7],
      -2-3*AA[1]+AA[2]+AA[3]+AA[4]+AA[5]+AA[6]+2*AA[7]},
     {1+AA[1],-AA[1]+AA[2],1+AA[2]-AA[7],2+2*AA[1]-AA[3]-AA[4]-AA[5]-AA[7],
      2+2*AA[1]-AA[3]-AA[4]-AA[6]-AA[7],2+2*AA[1]-AA[3]-AA[5]-AA[6]-AA[7],
      2+2*AA[1]-AA[4]-AA[5]-AA[6]-AA[7],AA[7],-1-2*AA[1]+AA[2]+AA[3]+AA[4]+AA[5]+AA[7],
      -1-2*AA[1]+AA[2]+AA[3]+AA[4]+AA[6]+AA[7],-1-2*AA[1]+AA[2]+AA[3]+AA[5]+AA[6]+AA[7],
      -1-2*AA[1]+AA[2]+AA[4]+AA[5]+AA[6]+AA[7]}]+
   Hyp`m`F[{-2-3*AA[1]+2*AA[2]+AA[3]+AA[4]+AA[5]+AA[6]+2*AA[7],
      (-3*AA[1])/2+AA[2]+AA[3]/2+AA[4]/2+AA[5]/2+AA[6]/2+AA[7],AA[2],
      -1-2*AA[1]+AA[2]+AA[4]+AA[5]+AA[6]+AA[7],-1-2*AA[1]+AA[2]+AA[3]+AA[5]+AA[6]+AA[7],
      -1-2*AA[1]+AA[2]+AA[3]+AA[4]+AA[6]+AA[7],-1-2*AA[1]+AA[2]+AA[3]+AA[4]+AA[5]+AA[7],
      -AA[1]+AA[2]+AA[7],AA[7]},{-1-(3*AA[1])/2+AA[2]+AA[3]/2+AA[4]/2+AA[5]/2+AA[6]/2+AA[7],
      -1-3*AA[1]+AA[2]+AA[3]+AA[4]+AA[5]+AA[6]+2*AA[7],-AA[1]+AA[2]+AA[3]+AA[7],-AA[1]+AA[2]+AA[4]+AA[7],
      -AA[1]+AA[2]+AA[5]+AA[7],-AA[1]+AA[2]+AA[6]+AA[7],-1-2*AA[1]+AA[2]+AA[3]+AA[4]+AA[5]+AA[6]+AA[7],
      -1-3*AA[1]+2*AA[2]+AA[3]+AA[4]+AA[5]+AA[6]+AA[7]},1]*
    Hyp`m`GAMMA[{1+AA[1]-AA[3],-AA[1]+AA[2]+AA[3],1+AA[1]-AA[4],-AA[1]+AA[2]+AA[4],1+AA[1]-AA[5],
      -AA[1]+AA[2]+AA[5],1+AA[1]-AA[6],-AA[1]+AA[2]+AA[6],2+3*AA[1]-AA[2]-AA[3]-AA[4]-AA[5]-AA[6]-2*AA[7],
      1+AA[1]-AA[7],-AA[1]+AA[2]+AA[7],-1-3*AA[1]+2*AA[2]+AA[3]+AA[4]+AA[5]+AA[6]+2*AA[7]},
     {1+AA[1],-AA[1]+AA[2],1+AA[1]-AA[3]-AA[7],1+AA[1]-AA[4]-AA[7],1+AA[1]-AA[5]-AA[7],
      1+AA[1]-AA[6]-AA[7],2+3*AA[1]-AA[2]-AA[3]-AA[4]-AA[5]-AA[6]-AA[7],-AA[1]+AA[2]+AA[3]+AA[7],
      -AA[1]+AA[2]+AA[4]+AA[7],-AA[1]+AA[2]+AA[5]+AA[7],-AA[1]+AA[2]+AA[6]+AA[7],
      -1-3*AA[1]+2*AA[2]+AA[3]+AA[4]+AA[5]+AA[6]+AA[7]}];
Hyp`m`Gleichung);


(*T121104*)
Tgl9837:=(ClearQ[Global`a,Global`c,Global`d,Global`b,Global`n];
   Hyp`m`LS=Hyp`m`F[{AA[1],1+AA[1]/2,AA[2],AA[3],
   1+2*AA[1]-AA[4]-AA[2]-AA[3],1+AA[4]/2,1/2+AA[4]/2,
   2*AA[1]-AA[4]+AA[5],-AA[5]},{AA[1]/2,1+AA[1]-AA[2],
   1+AA[1]-AA[3],-AA[1]+AA[4]+AA[2]+AA[3],AA[1]-AA[4]/2,
   1/2+AA[1]-AA[4]/2,1-AA[1]+AA[4]-AA[5],1+AA[1]+AA[5]},1];
   Hyp`m`RS=Hyp`m`F[{AA[4],1+AA[4]/2,-AA[1]+AA[4]+AA[2],
   -AA[1]+AA[4]+AA[3],1+AA[1]-AA[2]-AA[3],-AA[5]},{AA[4]/2,
   1+AA[1]-AA[2],1+AA[1]-AA[3],-AA[1]+AA[4]+AA[2]+AA[3],
   1-2*AA[1]+2*AA[4]-AA[5]},1]*Hyp`m`p[{1+AA[1],
   2*AA[1]-2*AA[4]},{AA[1]-AA[4],2*AA[1]-AA[4]},AA[5]];
   Hyp`m`Gleichung);
   
(*T121105*)
Tgl111031:=(ClearQ[Global`a,Global`c,Global`d,Global`e,Global`n];
   Hyp`m`LS=Hyp`m`F[{AA[1],1+AA[1]/2,AA[2],1/2+AA[2],AA[3],1/2+AA[3],
   AA[4],1/2+AA[4],1/2+2*AA[1]-AA[2]-AA[3]-AA[4]+AA[5]/2,
   1+2*AA[1]-AA[2]-AA[3]-AA[4]+AA[5]/2,-AA[5]},{AA[1]/2,
   1+AA[1]-AA[2],1/2+AA[1]-AA[2],1+AA[1]-AA[3],1/2+AA[1]-AA[3],
   1+AA[1]-AA[4],1/2+AA[1]-AA[4],
   1/2-AA[1]+AA[2]+AA[3]+AA[4]-AA[5]/2,
   -AA[1]+AA[2]+AA[3]+AA[4]-AA[5]/2,1+AA[1]+AA[5]},1];
   Hyp`m`RS=Hyp`m`F[{2*AA[1]+AA[5],1+AA[1]+AA[5]/2,2*AA[2],2*AA[3],
   2*AA[4],1/2+AA[1]+AA[5],
   1+4*AA[1]-2*AA[2]-2*AA[3]-2*AA[4]+AA[5],-AA[5]},
   {AA[1]+AA[5]/2,1+2*AA[1]-2*AA[2]+AA[5],
   1+2*AA[1]-2*AA[3]+AA[5],1+2*AA[1]-2*AA[4]+AA[5],1/2+AA[1],
   -2*AA[1]+2*AA[2]+2*AA[3]+2*AA[4],1+2*AA[1]+2*AA[5]},-1]*
   Hyp`m`p[{1+2*AA[1],1+2*AA[1]-2*AA[2]-2*AA[3],
   1+2*AA[1]-2*AA[2]-2*AA[4],1+2*AA[1]-2*AA[3]-2*AA[4]},
   {1+2*AA[1]-2*AA[2],1+2*AA[1]-2*AA[3],1+2*AA[1]-2*AA[4],
   1+2*AA[1]-2*AA[2]-2*AA[3]-2*AA[4]},AA[5]];
   Hyp`m`Gleichung);

(*T121106*)
Tgl111032:=(ClearQ[Global`a,Global`e,Global`c,Global`d,Global`n];
   Hyp`m`LS=Hyp`m`F[{AA[1],1+AA[1]/2,2*AA[2],AA[3],1/2+AA[3],AA[4],
   1/2+AA[4],1/2+2*AA[1]-AA[3]-AA[4]-AA[2]+AA[5]/2,
   1+2*AA[1]-AA[3]-AA[4]-AA[2]+AA[5]/2,1/2-AA[5]/2,-AA[5]/2},
   {AA[1]/2,1+AA[1]-2*AA[2],1+AA[1]-AA[3],1/2+AA[1]-AA[3],
   1+AA[1]-AA[4],1/2+AA[1]-AA[4],
   1/2-AA[1]+AA[3]+AA[4]+AA[2]-AA[5]/2,
   -AA[1]+AA[3]+AA[4]+AA[2]-AA[5]/2,1/2+AA[1]+AA[5]/2,
   1+AA[1]+AA[5]/2},1];
   Hyp`m`RS=Hyp`m`F[{2*AA[1]-2*AA[2],1+AA[1]-AA[2],1/2+AA[1]-2*AA[2],
   2*AA[3],2*AA[4],2*AA[2],
   1+4*AA[1]-2*AA[3]-2*AA[4]-2*AA[2]+AA[5],-AA[5]},{AA[1]-AA[2],
   1/2+AA[1],1+2*AA[1]-2*AA[3]-2*AA[2],
   1+2*AA[1]-2*AA[4]-2*AA[2],1+2*AA[1]-4*AA[2],
   -2*AA[1]+2*AA[3]+2*AA[4]-AA[5],1+2*AA[1]-2*AA[2]+AA[5]},-1]*
   Hyp`m`p[{1+2*AA[1],1+2*AA[1]-2*AA[3]-2*AA[4],
   1+2*AA[1]-2*AA[3]-2*AA[2],1+2*AA[1]-2*AA[4]-2*AA[2]},
   {1+2*AA[1]-2*AA[3],1+2*AA[1]-2*AA[4],1+2*AA[1]-2*AA[2],
   1+2*AA[1]-2*AA[3]-2*AA[4]-2*AA[2]},AA[5]];
   Hyp`m`Gleichung);

(*T121161*)
Tgl9894:=(ClearQ[Global`a,Global`b,Global`c,Global`d,Global`e];
   Hyp`m`LS=Hyp`m`F[{AA[1],1+AA[1]/2,AA[2],1/2+AA[2],AA[3],AA[4],
   1+2*AA[1]-2*AA[2]-AA[3]-AA[4],AA[5],1+2*AA[1]-2*AA[2]-AA[5]},
   {AA[1]/2,1+AA[1]-AA[2],1/2+AA[1]-AA[2],1+AA[1]-AA[3],
   1+AA[1]-AA[4],-AA[1]+2*AA[2]+AA[3]+AA[4],1+AA[1]-AA[5],
   -AA[1]+2*AA[2]+AA[5]},1]+(Hyp`m`F[{2+3*AA[1]-4*AA[2]-2*AA[5],
   2+(3*AA[1])/2-2*AA[2]-AA[5],1+AA[1]-AA[2]-AA[5],
   3/2+AA[1]-AA[2]-AA[5],1+AA[1]-2*AA[2],
   1+2*AA[1]-2*AA[2]-AA[5],1+AA[1]-2*AA[2]+AA[3]-AA[5],
   1+AA[1]-2*AA[2]+AA[4]-AA[5],
   2+3*AA[1]-4*AA[2]-AA[3]-AA[4]-AA[5]},
   {1+(3*AA[1])/2-2*AA[2]-AA[5],2+2*AA[1]-3*AA[2]-AA[5],
   3/2+2*AA[1]-3*AA[2]-AA[5],2+2*AA[1]-2*AA[2]-2*AA[5],
   2+AA[1]-2*AA[2]-AA[5],2+2*AA[1]-2*AA[2]-AA[3]-AA[5],
   2+2*AA[1]-2*AA[2]-AA[4]-AA[5],
   1+AA[3]+AA[4]-AA[5]},1]*
   Hyp`m`GAMMA[{1+AA[1]-2*AA[2],1+2*AA[1]-2*AA[2],1+AA[1]-AA[3],
   1+AA[1]-AA[4],-AA[1]+2*AA[2]+AA[3]+
   AA[4],3+3*AA[1]-4*AA[2]-2*AA[5],1+
   AA[1]-AA[5],1+AA[1]-2*AA[2]+AA[3]-AA[5],
   2+3*AA[1]-4*AA[2]-AA[3]-AA[4]-AA[5],
   1+AA[1]-2*AA[2]+AA[4]-AA[5],-1-
   AA[1]+2*AA[2]+AA[5]},{1+AA[1],2*
   AA[2],AA[3],1+2*AA[1]-2*AA[2]-
   AA[3]-AA[4],AA[4],3+4*AA[1]-6*
   AA[2]-2*AA[5],1+AA[1]-2*AA[2]-AA[5],2+2*AA[1]-2*AA[2]-AA[3]-AA[5],
   2+2*AA[1]-2*AA[2]-AA[4]-AA[5],1+AA[3]+AA[4]-AA[5],AA[5]}]);
   Hyp`m`RS=Hyp`m`F[{2*AA[2],-AA[1]+2*AA[2]+AA[3],-AA[1]+2*AA[2]+AA[4],
   1+AA[1]-AA[3]-AA[4],AA[5]},{1+AA[1]-AA[3],1+AA[1]-AA[4],
   -AA[1]+2*AA[2]+AA[3]+AA[4],
   -2*AA[1]+4*AA[2]+AA[5]},1]*Hyp`m`GAMMA[{1+AA[1]-2*AA[2],
   1+2*AA[1]-2*AA[2],1+AA[1]-AA[5],1+2*AA[1]-4*AA[2]-AA[5]},
   {1+AA[1],1+2*AA[1]-4*AA[2],1+AA[1]-2*AA[2]-AA[5],
   1+2*AA[1]-2*AA[2]-AA[5]}]+Hyp`m`F[{1+2*AA[1]-4*AA[2],
   1+2*AA[1]-2*AA[2]-AA[5],1+AA[1]-2*AA[2]+AA[3]-AA[5],
   1+AA[1]-2*AA[2]+AA[4]-AA[5],
   2+3*AA[1]-4*AA[2]-AA[3]-AA[4]-AA[5]},
   {2+2*AA[1]-4*AA[2]-AA[5],2+3*AA[1]-4*AA[2]-AA[3]-AA[5],
   2+3*AA[1]-4*AA[2]-AA[4]-AA[5],
   1+AA[1]-2*AA[2]+AA[3]+AA[4]-AA[5]},1]*Hyp`m`GAMMA[{1+AA[1]-2*
   AA[2],1+2*AA[1]-2*AA[2],1+AA[1]-AA[3],1+AA[1]-AA[4],
   -AA[1]+2*AA[2]+AA[3]+AA[4],1+AA[1]-AA[5],
   1+AA[1]-2*AA[2]+AA[3]-AA[5],
   2+3*AA[1]-4*AA[2]-AA[3]-AA[4]-AA[5],
   1+AA[1]-2*AA[2]+AA[4]-AA[5],-1-2*AA[1]+4*AA[2]+AA[5]},
   {1+AA[1],2*AA[2],-AA[1]+2*AA[2]+AA[3],1+AA[1]-AA[3]-AA[4],
   -AA[1]+2*AA[2]+AA[4],1+AA[1]-2*AA[2]-AA[5],
   2+3*AA[1]-4*AA[2]-AA[3]-AA[5],2+3*AA[1]-4*AA[2]-AA[4]-AA[5],
   1+AA[1]-2*AA[2]+AA[3]+AA[4]-AA[5],AA[5]}];
   Hyp`m`Gleichung);

(*T5403xy*)
Tgl5403:=(ClearQ[Global`x,Global`y,Global`a,Global`n,Global`b];
Hyp`m`LS=Hyp`m`F[{AA[1],AA[2],AA[3],1/2+AA[3],-AA[4]},{2*AA[3],AA[5],
1/2+AA[5],1-2*AA[5]-AA[4]+AA[1]+AA[2]},1];
Hyp`m`RS=Hyp`m`F[{-2*AA[3]+2*AA[5],AA[1],AA[2],-AA[4]},{2*AA[5]-AA[1],
2*AA[5]-AA[2],2*AA[5]+AA[4]},1]*Hyp`m`p[{2*AA[5]-AA[1],
2*AA[5]-AA[2]},{2*AA[5],2*AA[5]-AA[1]-AA[2]},
AA[4]];
Hyp`m`Gleichung);

(*T10904xy*)
Tgl6533:=(ClearQ[Global`a,Global`b,Global`x,Global`y,Global`n];
   Hyp`m`LS=Hyp`m`F[{AA[1],1+AA[1]/2,AA[2],AA[3],AA[4],-AA[5]},{AA[1]/2,
   1+AA[1]-AA[2],1+AA[1]-AA[3],1+AA[1]-AA[4],1+AA[1]+AA[5]},-1];
   Hyp`m`RS=Hyp`m`F[{-AA[5],AA[3],AA[4]},{-AA[1]-AA[5]+AA[3]+AA[4],
   1+AA[1]-AA[2]},1]*Hyp`m`p[{1+AA[1],
   1+AA[1]-AA[3]-AA[4]},{1+AA[1]-AA[3],1+AA[1]-AA[4]},AA[5]];
   Hyp`m`Gleichung);

Tgl3217:=(ClearQ[Global`a,Global`b,Global`c,Global`d,Global`e];
Hyp`m`LS=Hyp`m`F[{AA[1],AA[2],AA[3]},{AA[4],AA[5]},1];
Hyp`m`RS=Hyp`m`F[{-1-AA[1]+AA[4]+AA[5],1/2-AA[1]/2+AA[4]/2+AA[5]/2,
-AA[1]+AA[5],-AA[1]+AA[4],AA[2],AA[3]},
{-1/2-AA[1]/2+AA[4]/2+AA[5]/2,AA[4],AA[5],
-AA[1]-AA[2]+AA[4]+AA[5],-AA[1]-AA[3]+AA[4]+AA[5]},-1]*
Hyp`m`GAMMA[{-AA[1]+AA[4]+AA[5],
-AA[1]-AA[2]-AA[3]+AA[4]+AA[5]},{-AA[1]-AA[2]+AA[4]+AA[5],
-AA[1]-AA[3]+AA[4]+AA[5]}];
Hyp`m`Gleichung);


Tgl6534:=(ClearQ[Global`a,Global`b,Global`c,Global`d,Global`e];
Hyp`m`LS=Hyp`m`F[{AA[1],1+AA[1]/2,AA[2],AA[3],AA[4],AA[5]},{AA[1]/2,
1+AA[1]-AA[2],1+AA[1]-AA[3],1+AA[1]-AA[4],1+AA[1]-AA[5]},-1];
Hyp`m`RS=Hyp`m`F[{1+AA[1]-AA[2]-AA[3],AA[4],AA[5]},{1+AA[1]-AA[2],
1+AA[1]-AA[3]},1]*Hyp`m`GAMMA[{1+AA[1]-AA[4],1+AA[1]-AA[5]},
{1+AA[1],1+AA[1]-AA[4]-AA[5]}];
Hyp`m`Gleichung);

(*T3263*)
Tgl3263:=(ClearQ[Global`a,Global`b,Global`c,Global`d,Global`e];
Hyp`m`LS=Hyp`m`F[{AA[1],AA[2],AA[3]},{AA[4],AA[5]},1];
Hyp`m`RS=Hyp`m`F[{1+AA[1]-AA[4],-AA[3]+AA[5],AA[1]},
{1+AA[1]+AA[2]-AA[4],1+AA[1]-AA[3]},1]*Hyp`m`GAMMA[{1-AA[3],
AA[4],-AA[1]-AA[2]+AA[4],1+AA[1]-AA[5]},{1+AA[1]-AA[3],
-AA[1]+AA[4],-AA[2]+AA[4],1-AA[5]}]+Hyp`m`F[{1-AA[2],
-AA[1]-AA[2]-AA[3]+AA[4]+AA[5],-AA[2]+AA[4]},
{1-AA[1]-AA[2]+AA[4],
1-AA[2]-AA[3]+AA[4]},1]*Hyp`m`GAMMA[{1-AA[3],
AA[1]+AA[2]-AA[4],AA[4],1+AA[1]-AA[5],AA[5],
-AA[1]-AA[2]-AA[3]+AA[4]+AA[5]},{AA[1],AA[2],
1-AA[2]-AA[3]+AA[4],1+AA[1]+AA[2]-AA[4]-AA[5],-AA[3]+AA[5],
-AA[1]-AA[2]+AA[4]+AA[5]}];
Hyp`m`Gleichung);

(*T3264*)
Tgl3264:=(ClearQ[Global`a,Global`b,Global`c,Global`d,Global`e];
Hyp`m`LS=Hyp`m`F[{AA[1],AA[2],AA[3]},{AA[4],AA[5]},1];
Hyp`m`RS=Hyp`m`F[{-AA[1]+AA[4],AA[2],AA[3]},{AA[4],
1+AA[2]+AA[3]-AA[5]},1]*Hyp`m`GAMMA[{1+AA[2]-AA[5],
1+AA[3]-AA[5]},{1-AA[5],
1+AA[2]+AA[3]-AA[5]}]-Hyp`m`F[{1+AA[3]-AA[5],1+AA[2]-AA[5],
1+AA[1]-AA[5]},{1+AA[4]-AA[5],2-AA[5]},1]*Hyp`m`GAMMA[{AA[4],
1+AA[1]-AA[5],1+AA[2]-AA[5],1+AA[3]-AA[5],-1+AA[5]},{AA[1],
AA[2],AA[3],1-AA[5],1+AA[4]-AA[5]}];
Hyp`m`Gleichung);

(*T4362*)
Tgl4362:=(ClearQ[Global`a,Global`b,Global`c,Global`d,Global`e,Global`f];
Hyp`m`LS=Hyp`m`F[{AA[1],AA[2],AA[3],AA[4]},{AA[5],AA[6],
1+AA[1]+AA[2]+AA[3]+AA[4]-AA[5]-AA[6]},1];
Hyp`m`RS=Hyp`m`F[{-1-AA[1]+AA[5]+AA[6],1/2-AA[1]/2+AA[5]/2+AA[6]/2,
-AA[1]+AA[6],-AA[1]+AA[5],AA[2],AA[3],AA[4]},
{-1/2-AA[1]/2+AA[5]/2+AA[6]/2,AA[5],AA[6],
-AA[1]-AA[2]+AA[5]+AA[6],-AA[1]-AA[3]+AA[5]+AA[6],
-AA[1]-AA[4]+AA[5]+AA[6]},1]*Hyp`m`GAMMA[{-AA[1]+AA[5]+AA[6],
-AA[1]-AA[2]-AA[3]+AA[5]+AA[6],
-AA[1]-AA[2]-AA[4]+AA[5]+AA[6],
-AA[1]-AA[3]-AA[4]+AA[5]+AA[6]},{-AA[1]-AA[2]+AA[5]+AA[6],
-AA[1]-AA[3]+AA[5]+AA[6],-AA[1]-AA[4]+AA[5]+AA[6],
-AA[1]-AA[2]-AA[3]-AA[4]+AA[5]+AA[6]}]-Hyp`m`F[{-AA[1]-AA[2]-
AA[3]+AA[5]+AA[6],-AA[1]-AA[2]-AA[4]+AA[5]+AA[6],
-AA[1]-AA[3]-AA[4]+AA[5]+AA[6],
-AA[2]-AA[3]-AA[4]+AA[5]+AA[6]},
{-AA[1]-AA[2]-AA[3]-AA[4]+2*AA[5]+AA[6],
-AA[1]-AA[2]-AA[3]-AA[4]+AA[5]+2*AA[6],
1-AA[1]-AA[2]-AA[3]-AA[4]+AA[5]+AA[6]},1]*Hyp`m`GAMMA[{AA[5],
AA[1]+AA[2]+AA[3]+AA[4]-AA[5]-AA[6],AA[6],
-AA[1]-AA[2]-AA[3]+AA[5]+AA[6],
-AA[1]-AA[2]-AA[4]+AA[5]+AA[6],
-AA[1]-AA[3]-AA[4]+AA[5]+AA[6],
-AA[2]-AA[3]-AA[4]+AA[5]+AA[6]},{AA[1],AA[2],AA[3],AA[4],
-AA[1]-AA[2]-AA[3]-AA[4]+AA[5]+AA[6],
-AA[1]-AA[2]-AA[3]-AA[4]+2*AA[5]+AA[6],
-AA[1]-AA[2]-AA[3]-AA[4]+AA[5]+2*AA[6]}];
Hyp`m`Gleichung);

(*T8763*)
Tgl7694:=(ClearQ[Global`a,Global`b,Global`c,Global`d,Global`e,Global`f];
Hyp`m`LS=Hyp`m`F[{AA[1],1+AA[1]/2,AA[2],AA[3],AA[4],AA[5],AA[6]},
{AA[1]/2,1+AA[1]-AA[2],1+AA[1]-AA[3],1+AA[1]-AA[4],
1+AA[1]-AA[5],1+AA[1]-AA[6]},1];
Hyp`m`RS=Hyp`m`F[{-AA[4]+AA[5]+AA[6],1-AA[4]/2+AA[5]/2+AA[6]/2,
1+AA[1]-AA[2]-AA[4],-AA[1]+AA[5]+AA[6],1+AA[1]-AA[3]-AA[4],
AA[5],AA[6]},{-AA[4]/2+AA[5]/2+AA[6]/2,
-AA[1]+AA[2]+AA[5]+AA[6],1+AA[1]-AA[4],
-AA[1]+AA[3]+AA[5]+AA[6],1-AA[4]+AA[6],
1-AA[4]+AA[5]},1]*Hyp`m`GAMMA[{1+AA[1]-AA[2],1-AA[4],
1+AA[1]-AA[5],-AA[1]+AA[3]+AA[5],1+AA[1]-AA[6],
1+AA[1]-AA[2]-AA[5]-AA[6],-AA[1]+AA[3]+AA[6],
1-AA[4]+AA[5]+AA[6]},{1+AA[1],-AA[1]+AA[3],
1+AA[1]-AA[2]-AA[5],1-AA[4]+AA[5],1+AA[1]-AA[2]-AA[6],
1+AA[1]-AA[5]-AA[6],1-AA[4]+AA[6],
-AA[1]+AA[3]+AA[5]+AA[6]}]+Hyp`m`F[{2+2*AA[1]-2*AA[2]-AA[4]-
AA[5]-AA[6],2+AA[1]-AA[2]-AA[4]/2-AA[5]/2-AA[6]/2,
1+AA[1]-AA[2]-AA[4],1-AA[2],
2+2*AA[1]-AA[2]-AA[3]-AA[4]-AA[5]-AA[6],1+AA[1]-AA[2]-AA[6],
1+AA[1]-AA[2]-AA[5]},{1+AA[1]-AA[2]-AA[4]/2-AA[5]/2-AA[6]/2,
2+AA[1]-AA[2]-AA[5]-AA[6],2+2*AA[1]-AA[2]-AA[4]-AA[5]-AA[6],
1-AA[2]+AA[3],2+AA[1]-AA[2]-AA[4]-AA[5],
2+AA[1]-AA[2]-AA[4]-AA[6]},1]*Hyp`m`GAMMA[{1+AA[1]-
AA[2],1+AA[1]-AA[3],1-AA[4],1+AA[1]-AA[4],1+AA[1]-AA[5],
-AA[1]+AA[3]+AA[5],1+AA[1]-AA[6],
3+2*AA[1]-2*AA[2]-AA[4]-AA[5]-AA[6],
2+2*AA[1]-AA[2]-AA[3]-AA[4]-AA[5]-AA[6],-AA[1]+AA[3]+AA[6],
-1-AA[1]+AA[2]+AA[5]+AA[6]},{1+AA[1],AA[2],1-AA[2]+AA[3],
1+AA[1]-AA[3]-AA[4],2+AA[1]-AA[2]-AA[4]-AA[5],AA[5],
2+AA[1]-AA[2]-AA[4]-AA[6],2+2*AA[1]-AA[2]-AA[3]-AA[5]-AA[6],
2+2*AA[1]-AA[2]-AA[4]-AA[5]-AA[6],AA[6],
-1-2*AA[1]+AA[2]+AA[3]+AA[5]+AA[6]}];
Hyp`m`Gleichung);

(*T3215*)
Tgl2138:=(ClearQ[Global`a,Global`c,Global`z];
Hyp`m`LS=Hyp`m`F[{AA[1],1-AA[1]},{AA[2]},AA[3]];
Hyp`m`RS=(1-AA[3])^(-1+AA[2])*Hyp`m`F[{(-AA[1]+AA[2])/2,
(-1+AA[1]+AA[2])/2},{AA[2]},4*(1-AA[3])*AA[3]];
Hyp`m`Gleichung);

(*T3216*)
Tgl2139:=(ClearQ[Global`c,Global`a,Global`z];
Hyp`m`LS=Hyp`m`F[{AA[1],-1/2+AA[2]-AA[1]},{AA[2]},AA[3]];
Hyp`m`RS=(1/2)^(1-AA[2])*(1+(1-AA[3])^(1/2))^(1-AA[2])*Hyp`m`F[{AA[2]-
2*AA[1],1-AA[2]+2*AA[1]},{AA[2]},(1-(1-AA[3])^(1/2))/2];
Hyp`m`Gleichung);

(*T5461*)
Tgl4331:=(ClearQ[Global`a,Global`b,Global`c,Global`z];
Hyp`m`LS=Hyp`m`F[{AA[1],1+AA[1]/2,AA[2],AA[3]},{AA[1]/2,1+AA[1]-AA[2],
1+AA[1]-AA[3]},AA[4]];
Hyp`m`RS=(1-AA[4])^(-1-AA[1])*(1+AA[4])*Hyp`m`F[{1/2+AA[1]/2,
1+AA[1]/2,1+AA[1]-AA[2]-AA[3]},{1+AA[1]-AA[2],1+AA[1]-AA[3]},
(-4*AA[4])/(-1+AA[4])^2];
Hyp`m`Gleichung);

(*T5462*)
Tgl3238:=(ClearQ[Global`a,Global`b,Global`c,Global`z];
Hyp`m`LS=Hyp`m`F[{1/2+AA[1]/2,1+AA[1]/2,-1-AA[1]+AA[2]+AA[3]},{AA[2],
AA[3]},(-4*AA[4])/(-1+AA[4])^2];
Hyp`m`RS=((1-AA[4])^(1+AA[1])*Hyp`m`F[{AA[1],1+AA[1]/2,1+AA[1]-AA[2],
1+AA[1]-AA[3]},{AA[1]/2,AA[2],AA[3]},AA[4]])/(1+AA[4]);
Hyp`m`Gleichung);

(*T3265*)
Tgl3239:=(ClearQ[Global`a,Global`b,Global`c,Global`z];
Hyp`m`LS=Hyp`m`F[{AA[1],AA[2],AA[3]},{1+AA[1]-AA[2],1+AA[1]-AA[3]},
AA[4]];
Hyp`m`RS=Hyp`m`F[{AA[1]/2,1/2+AA[1]/2,1+AA[1]-AA[2]-AA[3]},
{1+AA[1]-AA[2],1+AA[1]-AA[3]},
(-4*AA[4])/(-1+AA[4])^2]/(1-AA[4])^AA[1];
Hyp`m`Gleichung);

Tgl2140:=(ClearQ[Global`a,Global`b,Global`z];
Hyp`m`LS=Hyp`m`F[{AA[1],1/2+AA[1]},{AA[2]},(4*AA[3])/(1+AA[3])^2];
Hyp`m`RS=(1+AA[3])^(2*AA[1])*Hyp`m`F[{2*AA[1],1+2*AA[1]-AA[2]},
{AA[2]},AA[3]];
Hyp`m`Gleichung);

Tgl2141:=(ClearQ[Global`a,Global`b,Global`z];
Hyp`m`LS=Hyp`m`F[{AA[1],1/2+AA[1]},{AA[2]},(4*AA[3])/(1+AA[3])^2];
Hyp`m`RS=((1+AA[3])^(2*AA[1])*Hyp`m`F[{-1+2*AA[1],1/2+AA[1],
2*AA[1]-AA[2]},{-1/2+AA[1],AA[2]},AA[3]])/(1-AA[3]);
Hyp`m`Gleichung);

Tgl4332:=(ClearQ[Global`b,Global`x,Global`y,Global`n,Global`a];
Hyp`m`LS=Hyp`m`F[{AA[1],AA[2],AA[3],-AA[4]},{AA[5]-AA[2],AA[5]-AA[3],
AA[5]+AA[4]},1];
Hyp`m`RS=Hyp`m`F[{AA[2],AA[3],AA[5]/2-AA[1]/2,1/2+AA[5]/2-AA[1]/2,
-AA[4]},{AA[5]-AA[1],AA[5]/2,1/2+AA[5]/2,
1-AA[5]-AA[4]+AA[2]+AA[3]},1]*Hyp`m`p[{AA[5],AA[5]-AA[2]-AA[3]},
{AA[5]-AA[2],AA[5]-AA[3]},AA[4]];
Hyp`m`Gleichung);

Tgl3237:=(ClearQ[Global`x,Global`y,Global`n,Global`b,Global`a];
Hyp`m`LS=Hyp`m`F[{AA[1],AA[2],-AA[3]},{AA[4],AA[5]},1];
Hyp`m`RS=Hyp`m`F[{-AA[5]-AA[3]+AA[1]+AA[2],
1-AA[5]/2-AA[3]/2+AA[1]/2+AA[2]/2,
1-AA[5]-AA[4]-AA[3]+AA[1]+AA[2],AA[1],AA[2],-AA[3]},
{-AA[5]/2-AA[3]/2+AA[1]/2+AA[2]/2,AA[4],1-AA[5]-AA[3]+AA[2],
1-AA[5]-AA[3]+AA[1],1-AA[5]+AA[1]+AA[2]},-1]*
Hyp`m`p[{AA[5]-AA[1],AA[5]-AA[2]},{AA[5],
AA[5]-AA[1]-AA[2]},AA[3]];
Hyp`m`Gleichung);

Tgl3240:=(ClearQ[Global`c,Global`b,Global`d,Global`a];
Hyp`m`LS=Hyp`m`F[{AA[1],AA[2],AA[3]},{AA[4],AA[4]-AA[2]+AA[3]},1];
Hyp`m`RS=Hyp`m`F[{-1/2+AA[4],3/4+AA[4]/2,AA[2],AA[1]/2,1/2+AA[1]/2,
AA[4]/2-AA[3]/2,1/2+AA[4]/2-AA[3]/2},{-1/4+AA[4]/2,
1/2+AA[4]-AA[2],1/2+AA[4]-AA[1]/2,AA[4]-AA[1]/2,
1/2+AA[4]/2+AA[3]/2,AA[4]/2+AA[3]/2},1]*Hyp`m`GAMMA[{2*AA[4],
2*AA[4]-2*AA[2]-AA[1],AA[4]-AA[2]+AA[3],AA[4]-AA[1]+AA[3]},
{2*AA[4]-2*AA[2],2*AA[4]-AA[1],AA[4]+AA[3],
AA[4]-AA[2]-AA[1]+AA[3]}];
Hyp`m`Gleichung);



End[]

Protect[
Tgl2103,
Tgl2104,
Tgl2106,
Tgl2107,
Tgl3101,
Tgl2131,
Tgl3204,
Tgl3205,
Tgl3206,
Tgl3207,
Tgl3217,
Tgl3239,
Tgl4301,
Tgl4302,
Tgl7631,
Tgl7632,
Tgl4303,
Tgl4304,
Tgl7633,
Tgl3231,
Tgl3232,
Tgl3233,
Tgl3234,
Tgl4306,
Tgl7634,
Tgl7635,
Tgl5401,
Tgl9832,
Tgl5402,
Tgl9833,
Tgl6531,
Tgl9834,
Tgl9831,
Tgl2191,
Tgl3261,
Tgl3262,
Tgl7691,
Tgl7692,
Tgl9891,
Tgl2110,
Tgl2112,
Tgl2133,
Tgl2134,
Tgl2135,
Tgl2136,
Tgl2137,
Tgl2138,
Tgl2139,
Tgl2140,
Tgl2141,
Tgl2163,
Tgl3235,
Tgl3236,
Tgl3237,
Tgl3240,
Tgl3263,
Tgl3264,
Tgl3267,
Tgl3268,
Tgl2192,
Tgl3238,
Tgl4309,
Tgl4310,
Tgl4312,
Tgl4362,
Tgl4391,
Tgl4331,
Tgl4332,
Tgl5403,
Tgl5468,
Tgl6501,
Tgl6532,
Tgl6533,
Tgl6534,
Tgl7636,
Tgl7637,
Tgl7693,
Tgl7694,
Tgl8731,
Tgl8732,
Tgl9835,
Tgl9836,
Tgl9837,
Tgl9892,
Tgl9893,
Tgl9894,
Tgl111031,
Tgl111032,
TransListe$gl
]

EndPackage[]


If[$VersionNumber>=2.,$Messages=OutputStream["stdout",1],$Messages={"stdout"}];