クローゼンの公式 $$_{2}F_1\left(a,b;a+b+\frac12;x\right)^2= {}_3F_2\left(2\,a,2\,b,a+b;2\,a+2\,b,a+b+\frac12;x\right)$$ 2次変換公式 $${}_2F_1\left(a,b;\frac{a+b+1}{2};z\right)={}_2F_1\left(\frac{a}{2},\frac{b}{2}; \frac{a+b+1}{2}; 4\,z\,(1-z)\right)$$ から以下の式を導きます。 $$_{2}F_1\left(\frac12,\frac12;1;x\right)^2= {}_3F_2\left(\frac12,\frac12,\frac12;1,1;4\,x\,(1-x)\right)$$
まず、クローゼンの公式にCLという名前をつけます。
CL:hypergeometric([a,b],[a+b+1/2],x)^2=hypergeometric([2*a,2*b,a+b],[2*a+2*b,a+b+1/2],x);
この式で$a=b=\frac{1}{4}, x=4\,z\,(1-z)$とし、その式にCL1と名前をつけます。
CL1:CL,a=1/4,b=1/4,x=4*z*(1-z);
次に2次変換公式にQTという名前をつけます。
QT:hypergeometric([a,b],[(a+b+1)/2],z)=hypergeometric([a/2,b/2],[(a+b+1)/2],4*z*(1-z));
この式で$a=b=\frac12$としてみます。
QT,a=1/2,b=1/2;
両辺を入れ替えます。
rhs(%)=lhs(%);
CL1に上記の式を代入します。
CL1,%;
これで所望の式が得られました。