(* ::Package:: *)

(* Version 2021-11-26 *)


funcF1[m_,n_]:=(Pochhammer[\[Alpha],m+n]Pochhammer[\[Beta],m]Pochhammer[\[Beta]1,n])/(m! n! Pochhammer[\[Gamma],m+n])
funcF2[m_,n_]:=Pochhammer[\[Alpha],m+n]Pochhammer[\[Beta],m]Pochhammer[\[Beta]1,n]/(m!n!Pochhammer[\[Gamma],m]Pochhammer[\[Gamma]1,n])
funcF3[m_,n_]:=Pochhammer[\[Alpha],m]Pochhammer[\[Alpha]1,n]Pochhammer[\[Beta],m]Pochhammer[\[Beta]1,n]/(Pochhammer[\[Gamma],m+n]n!m!)
funcF4[m_,n_]:=Pochhammer[\[Alpha],m+n]Pochhammer[\[Beta],m+n]/(m!n!Pochhammer[\[Gamma],m]Pochhammer[\[Gamma]1,n])
funcG1[m_,n_]:=Pochhammer[\[Alpha],m+n]Pochhammer[\[Beta],n-m]Pochhammer[\[Beta]1,m-n]/(m!n!)
funcG2[m_,n_]:=Pochhammer[\[Alpha],m]Pochhammer[\[Alpha]1,n]Pochhammer[\[Beta],n-m]Pochhammer[\[Beta]1,m-n]/(m!n!)
funcG3[m_,n_]:=Pochhammer[\[Alpha],2n-m]Pochhammer[\[Alpha]1,2m-n]/(m!n!)
funcH1[m_,n_]:=Pochhammer[\[Alpha],m-n]Pochhammer[\[Beta],m+n]Pochhammer[\[Gamma],n]/(Pochhammer[\[Delta],m]m!n!)
funcH2[m_,n_]:=Pochhammer[\[Alpha],m-n]Pochhammer[\[Beta],m]Pochhammer[\[Gamma],n]Pochhammer[\[Delta],n]/(m!n!Pochhammer[\[Epsilon],m])
funcH3[m_,n_]:=Pochhammer[\[Alpha],2m+n]Pochhammer[\[Beta],n]/(m!n!Pochhammer[\[Gamma],m+n])
funcH4[m_,n_]:=Pochhammer[\[Alpha],2m+n]Pochhammer[\[Beta],n]/(Pochhammer[\[Gamma],m]Pochhammer[\[Delta],n]m!n!)
funcH5[m_,n_]:=Pochhammer[\[Alpha],2m+n]Pochhammer[\[Beta],n-m]/(Pochhammer[\[Gamma],n]m!n!)
funcH6[m_,n_]:=Pochhammer[\[Alpha],2m-n]Pochhammer[\[Beta],n-m]Pochhammer[\[Gamma],n]/(m!n!)
funcH7[m_,n_]:=Pochhammer[\[Alpha],2m-n]Pochhammer[\[Beta],n]Pochhammer[\[Gamma],n]/(Pochhammer[\[Delta],m]m!n!)


funcS1[m_,n_]:=Pochhammer[\[Alpha],m+n]Pochhammer[\[Alpha]1,m+n]Pochhammer[\[Beta],m]/(Pochhammer[\[Gamma],m+n]Pochhammer[\[Delta],m]m!n!)


funcS2[m_,n_]:=Pochhammer[\[Alpha],m-n]Pochhammer[\[Alpha]1,m-n]Pochhammer[\[Beta],n]Pochhammer[\[Beta]1,m]/(Pochhammer[\[Gamma],m-n]m!n!)


func1b[m_,n_,p_]:=Pochhammer[a1,n]Pochhammer[a2,n]Pochhammer[a3,p]Pochhammer[a4,p]Pochhammer[b1,m-n]Pochhammer[b2,m-p]/(Pochhammer[c,m]m!n!p!);
func1c[m_,n_,p_]:=Pochhammer[a1,m]Pochhammer[a2,n]Pochhammer[a3,p]Pochhammer[a4,p]Pochhammer[b1,m-n]Pochhammer[b2,n-p]/(Pochhammer[c,m]m!n!p!);
func1d[m_,n_,p_]:=Pochhammer[a1,m]Pochhammer[a2,n]Pochhammer[a3,p]Pochhammer[b1,m-n]Pochhammer[b2,n-p]Pochhammer[b3,p-m]/(m!n!p!);
func1e[m_,n_,p_]:=Pochhammer[a1,m]Pochhammer[a2,p]Pochhammer[a3,p]Pochhammer[b1,m-n]Pochhammer[b2,n-p]Pochhammer[b3,n-m]/(m!n!p!);
func2b[m_,n_,p_]:=Pochhammer[a1,m]Pochhammer[a2,n]Pochhammer[a3,n]Pochhammer[a4,p]Pochhammer[a5,p]Pochhammer[b,m-p]/(Pochhammer[c,m+n]m!n!p!);
func2c[m_,n_,p_]:=Pochhammer[a1,m]Pochhammer[a2,m]Pochhammer[a3,n]Pochhammer[a4,n]Pochhammer[a5,p]Pochhammer[b,p-m-n]/(Pochhammer[c,p]m!n!p!);
func2d[m_,n_,p_]:=Pochhammer[a1,m]Pochhammer[a2,n]Pochhammer[a3,n]Pochhammer[a4,p]Pochhammer[b1,p-m-n]Pochhammer[b2,m-p]/(m!n!p!);
func3a[m_,n_,p_]:=Pochhammer[a1,m]Pochhammer[a2,m]Pochhammer[a3,n]Pochhammer[a4,n]Pochhammer[a5,p]Pochhammer[a6,p]/(Pochhammer[c,m+n+p]m!n!p!);
func4b[m_,n_,p_]:=Pochhammer[a1,m]Pochhammer[a2,n]Pochhammer[a3,p]Pochhammer[a4,p]Pochhammer[b,m+n-p]/(Pochhammer[c1,m]Pochhammer[c2,n]m!n!p!);
func4c[m_,n_,p_]:=Pochhammer[a1,m+n]Pochhammer[a2,n]Pochhammer[a3,p]Pochhammer[a4,p]Pochhammer[b,m-p]/(Pochhammer[c1,m]Pochhammer[c2,n]m!n!p!);
func4d[m_,n_,p_]:=Pochhammer[a1,m+n]Pochhammer[a2,m]Pochhammer[a3,n]Pochhammer[a4,p]Pochhammer[b,p-m]/(Pochhammer[c1,n]Pochhammer[c2,p]m!n!p!);
func4e[m_,n_,p_]:=Pochhammer[a1,n]Pochhammer[a2,p]Pochhammer[a3,p]Pochhammer[b1,m+n-p]Pochhammer[b2,m-n]/(Pochhammer[c,m]m!n!p!);
func4f[m_,n_,p_]:=Pochhammer[a1,m]Pochhammer[a2,n]Pochhammer[a3,p]Pochhammer[b1,m+n-p]Pochhammer[b2,p-n]/(Pochhammer[c,m]m!n!p!);
func4g[m_,n_,p_]:=Pochhammer[a1,m+n]Pochhammer[a2,p]Pochhammer[a3,p]Pochhammer[b1,m-p]Pochhammer[b2,n-m]/(Pochhammer[c,n]m!n!p!);
func4h[m_,n_,p_]:=Pochhammer[a1,m+n]Pochhammer[a2,n]Pochhammer[a3,p]Pochhammer[b1,m-p]Pochhammer[b2,p-m]/(Pochhammer[c,n]m!n!p!);
func4i[m_,n_,p_]:=Pochhammer[a1,m+n]Pochhammer[a2,n]Pochhammer[a3,p]Pochhammer[b1,p-m]Pochhammer[b2,m-n]/(Pochhammer[c,p]m!n!p!);
func4j[m_,n_,p_]:=Pochhammer[a1,m+n]Pochhammer[a2,m]Pochhammer[a3,n]Pochhammer[b1,p-m]Pochhammer[b2,p-n]/(Pochhammer[c,p]m!n!p!);
func4k[m_,n_,p_]:=Pochhammer[a1,p]Pochhammer[a2,p]Pochhammer[b1,m+n-p]Pochhammer[b2,m-n]Pochhammer[b3,n-m]/(m!n!p!);func4l[m_,n_,p_]:=Pochhammer[a1,n]Pochhammer[a2,p]Pochhammer[b1,m+n-p]Pochhammer[b2,m-n]Pochhammer[b3,p-m]/(m!n!p!);
func4m[m_,n_,p_]:=Pochhammer[a1,m]Pochhammer[a2,n]Pochhammer[b1,m+n-p]Pochhammer[b2,p-m]Pochhammer[b3,p-n]/(m!n!p!);
func4n[m_,n_,p_]:=Pochhammer[a1,m+n]Pochhammer[a2,n]Pochhammer[a3,p]Pochhammer[b1,m-p]Pochhammer[b2,p-n]/(Pochhammer[c,m]m!n!p!);
func4o[m_,n_,p_]:=Pochhammer[a1,m+n]Pochhammer[a2,m]Pochhammer[b1,n-p]Pochhammer[b2,p-n]Pochhammer[b3,p-m]/(m!n!p!);func4p[m_,n_,p_]:=Pochhammer[a1,m+n]Pochhammer[a2,p]Pochhammer[b1,m-n]Pochhammer[b2,n-p]Pochhammer[b3,p-m]/(m!n!p!);
func5b[m_,n_,p_]:=Pochhammer[a1,m]Pochhammer[a2,n]Pochhammer[a3,p]Pochhammer[a4,p]Pochhammer[b,m+n-p]/(Pochhammer[c,m+n]m!n!p!);
func5c[m_,n_,p_]:=Pochhammer[a1,m+n]Pochhammer[a2,m]Pochhammer[a3,p]Pochhammer[a4,p]Pochhammer[b,n-p]/(Pochhammer[c,m+n]m!n!p!);
func5d[m_,n_,p_]:=Pochhammer[a1,m+n]Pochhammer[a2,m]Pochhammer[a3,n]Pochhammer[a4,p]Pochhammer[b,p-m-n]/(Pochhammer[c,p]m!n!p!);
func5e[m_,n_,p_]:=Pochhammer[a1,m]Pochhammer[a2,n]Pochhammer[a3,p]Pochhammer[b1,m+n-p]Pochhammer[b2,p-m-n]/(m!n!p!);
func5f[m_,n_,p_]:=Pochhammer[a1,m+n]Pochhammer[a2,m]Pochhammer[a3,p]Pochhammer[b1,n-p]Pochhammer[b2,p-m-n]/(m!n!p!);
func6a[m_,n_,p_]:=Pochhammer[a1,m+n]Pochhammer[a2,m]Pochhammer[a3,n]Pochhammer[a4,p]Pochhammer[a5,p]/(Pochhammer[c1,m]Pochhammer[c2,n+p]m!n!p!);
func6b[m_,n_,p_]:=Pochhammer[a1,m+n]Pochhammer[a2,n]Pochhammer[a3,p]Pochhammer[a4,p]Pochhammer[b,m-n-p]/(Pochhammer[c,m]m!n!p!);
func6c[m_,n_,p_]:=Pochhammer[a1,m+n]Pochhammer[a2,m]Pochhammer[a3,p]Pochhammer[a4,p]Pochhammer[b,n-m]/(Pochhammer[c,n+p]m!n!p!);
func6d[m_,n_,p_]:=Pochhammer[a1,m+n]Pochhammer[a2,m]Pochhammer[a3,n]Pochhammer[a4,p]Pochhammer[b,p-m]/(Pochhammer[c,n+p]m!n!p!);
func6e[m_,n_,p_]:=Pochhammer[a1,m+n]Pochhammer[a2,p]Pochhammer[a3,p]Pochhammer[b1,n-m]Pochhammer[b2,m-n-p]/(m!n!p!);
func6f[m_,n_,p_]:=Pochhammer[a1,m+n]Pochhammer[a2,n]Pochhammer[a3,p]Pochhammer[b1,p-m]Pochhammer[b2,m-n-p]/(m!n!p!);func7a[m_,n_,p_]:=Pochhammer[a1,m+n]Pochhammer[a2,m]Pochhammer[a3,n]Pochhammer[a4,p]Pochhammer[a5,p]/(Pochhammer[c,m+n+p]m!n!p!);
func8b[m_,n_,p_]:=Pochhammer[a1,m+n]Pochhammer[a2,p]Pochhammer[a3,p]Pochhammer[b,m+n-p]/(Pochhammer[c1,m]Pochhammer[c2,n]m!n!p!);
func8c[m_,n_,p_]:=Pochhammer[a1,m+n]Pochhammer[a2,m+n]Pochhammer[a3,p]Pochhammer[b,p-m]/(Pochhammer[c1,n]Pochhammer[c2,p]m!n!p!);
func8d[m_,n_,p_]:=Pochhammer[a1,m+n]Pochhammer[a2,p]Pochhammer[b1,m+n-p]Pochhammer[b2,p-m]/(Pochhammer[c,n]m!n!p!);
func8e[m_,n_,p_]:=Pochhammer[a1,m+n]Pochhammer[a2,m+n]Pochhammer[b1,p-m]Pochhammer[b2,p-n]/(Pochhammer[c,p]m!n!p!);
func8f[m_,n_,p_]:=Pochhammer[a,m+n]Pochhammer[b1,m+n-p]Pochhammer[b2,p-m]Pochhammer[b3,p-n]/(m!n!p!);func9a[m_,n_,p_]:=Pochhammer[a1,m+n]Pochhammer[a2,m+n]Pochhammer[a3,p]Pochhammer[a4,p]/(Pochhammer[c1,m]Pochhammer[c2,n+p]m!n!p!);
func9b[m_,n_,p_]:=Pochhammer[a1,m+n]Pochhammer[a2,m+n]Pochhammer[a3,p]Pochhammer[b,p-m]/(Pochhammer[c,n+p]m!n!p!);
func10a[m_,n_,p_]:=Pochhammer[a1,m+n]Pochhammer[a2,n+p]Pochhammer[a3,m]Pochhammer[a4,p]/(Pochhammer[c1,m]Pochhammer[c2,n]Pochhammer[c3,p]m!n!p!);
func10b[m_,n_,p_]:=Pochhammer[a1,n+p]Pochhammer[a2,m]Pochhammer[a3,p]Pochhammer[b,m+n-p]/(Pochhammer[c1,m]Pochhammer[c2,n]m!n!p!);
func10c[m_,n_,p_]:=Pochhammer[a1,m+n]Pochhammer[a2,n+p]Pochhammer[a3,p]Pochhammer[b,m-p]/(Pochhammer[c1,m]Pochhammer[c2,n]m!n!p!);
func10d[m_,n_,p_]:=Pochhammer[a1,m+n]Pochhammer[a2,n+p]Pochhammer[a3,p]Pochhammer[b,m-n]/(Pochhammer[c1,m]Pochhammer[c2,p]m!n!p!);
func10e[m_,n_,p_]:=Pochhammer[a1,m]Pochhammer[a2,p]Pochhammer[b1,m+n-p]Pochhammer[b2,n+p-m]/(Pochhammer[c,n]m!n!p!);
func10f[m_,n_,p_]:=Pochhammer[a1,n+p]Pochhammer[a2,m]Pochhammer[b1,m+n-p]Pochhammer[b2,p-m]/(Pochhammer[c,n]m!n!p!);
func10g[m_,n_,p_]:=Pochhammer[a1,n+p]Pochhammer[a2,p]Pochhammer[b1,m+n-p]Pochhammer[b2,m-n]/(Pochhammer[c,m]m!n!p!);
func10h[m_,n_,p_]:=Pochhammer[a1,m+n]Pochhammer[a2,n+p]Pochhammer[b1,m-p]Pochhammer[b2,p-m]/(Pochhammer[c,n]m!n!p!);
func10i[m_,n_,p_]:=Pochhammer[a1,m+n]Pochhammer[a2,n+p]Pochhammer[b1,m-p]Pochhammer[b2,p-n]/(Pochhammer[c,m]m!n!p!);
func10j[m_,n_,p_]:=Pochhammer[a,p]Pochhammer[b1,m+n-p]Pochhammer[b2,n+p-m]Pochhammer[b3,m-n]/(m!n!p!);
func10k[m_,n_,p_]:=Pochhammer[a,n+p]Pochhammer[b1,m+n-p]Pochhammer[b2,m-n]Pochhammer[b3,p-m]/(m!n!p!);
func10l[m_,n_,p_]:=Pochhammer[a1,n+p]Pochhammer[a2,m]Pochhammer[b1,m+n-p]Pochhammer[b2,p-n]/(Pochhammer[c,m]m!n!p!);
func11a[m_,n_,p_]:=Pochhammer[a1,m+n]Pochhammer[a2,n+p]Pochhammer[a3,m]Pochhammer[a4,p]/(Pochhammer[c1,m+n]Pochhammer[c2,p]m!n!p!);
func11b[m_,n_,p_]:=Pochhammer[a1,n+p]Pochhammer[a2,m]Pochhammer[a3,p]Pochhammer[b,m+n-p]/(Pochhammer[c,m+n]m!n!p!);
func11c[m_,n_,p_]:=Pochhammer[a1,m+n]Pochhammer[a2,n+p]Pochhammer[a3,p]Pochhammer[b,m-p]/(Pochhammer[c,m+n]m!n!p!);func11d[m_,n_,p_]:=Pochhammer[a1,m+n]Pochhammer[a2,n+p]Pochhammer[a3,m]Pochhammer[b,p-m-n]/(Pochhammer[c,p]m!n!p!);
func11e[m_,n_,p_]:=Pochhammer[a1,n+p]Pochhammer[a2,m]Pochhammer[b1,m+n-p]Pochhammer[b2,p-m-n]/(m!n!p!);
func11f[m_,n_,p_]:=Pochhammer[a1,m+n]Pochhammer[a2,n+p]Pochhammer[b1,p-m-n]Pochhammer[b2,m-p]/(m!n!p!);
func12a[m_,n_,p_]:=Pochhammer[a1,m+n]Pochhammer[a2,n+p]Pochhammer[a3,m]Pochhammer[a4,p]/(Pochhammer[c1,m+p]Pochhammer[c2,n]m!n!p!);
func12b[m_,n_,p_]:=Pochhammer[a1,m+n]Pochhammer[a2,n+p]Pochhammer[a3,p]Pochhammer[b,m-n]/(Pochhammer[c,m+p]m!n!p!);
func13a[m_,n_,p_]:=Pochhammer[a1,m+n]Pochhammer[a2,n+p]Pochhammer[a3,m]Pochhammer[a4,p]/(Pochhammer[c,m+n+p]m!n!p!);
func14a[m_,n_,p_]:=Pochhammer[a1,m+n]Pochhammer[a2,n+p]Pochhammer[a3,p+m]/(Pochhammer[c1,m]Pochhammer[c2,n]Pochhammer[c3,p]m!n!p!);
func14b[m_,n_,p_]:=Pochhammer[a1,n+p]Pochhammer[a2,m+p]Pochhammer[b,m+n-p]/(Pochhammer[c1,m]Pochhammer[c2,n]m!n!p!);
func14c[m_,n_,p_]:=Pochhammer[a,m+p]Pochhammer[b1,m+n-p]Pochhammer[b2,n+p-m]/(Pochhammer[c,n]m!n!p!);
func14d[m_,n_,p_]:=Pochhammer[b1,m+n]Pochhammer[b2,n+p]Pochhammer[b3,m]/(m!n!p!);
func15a[m_,n_,p_]:=Pochhammer[a1,m+n]Pochhammer[a2,n+p]Pochhammer[a3,p+m]/(Pochhammer[c1,m+n]Pochhammer[c2,p]m!n!p!);
func15b[m_,n_,p_]:=Pochhammer[a1,n+p]Pochhammer[a2,m+p]Pochhammer[b,m+n-p]/(Pochhammer[c,m+n]m!n!p!);
func16a[m_,n_,p_]:=Pochhammer[a1,m+n]Pochhammer[a2,n+p]Pochhammer[a3,p+m]/(Pochhammer[c,m+n+p]m!n!p!);
func17a[m_,n_,p_]:=Pochhammer[a0,m+n+p]Pochhammer[a1,m]Pochhammer[a2,n]Pochhammer[a3,p]/(Pochhammer[c1,m]Pochhammer[c2,n]Pochhammer[c3,p]m!n!p!);
func17b[m_,n_,p_]:=Pochhammer[a1,m+n+p]Pochhammer[a2,n]Pochhammer[a3,p]Pochhammer[b,m-n]/(Pochhammer[c1,m]Pochhammer[c2,p]m!n!p!);
func17c[m_,n_,p_]:=Pochhammer[a1,m+n+p]Pochhammer[a2,p]Pochhammer[b1,m-n]Pochhammer[b2,n-m]/(Pochhammer[c,p]m!n!p!);
func17d[m_,n_,p_]:=Pochhammer[a1,m+n+p]Pochhammer[a2,p]Pochhammer[b1,m-n]Pochhammer[b2,n-p]/(Pochhammer[c,m]m!n!p!);
func17e[m_,n_,p_]:=Pochhammer[a,m+n+p]Pochhammer[b1,m-n]Pochhammer[b2,n-p]Pochhammer[b3,p-m]/(m!n!p!);
func18a[m_,n_,p_]:=Pochhammer[a1,m+n+p]Pochhammer[a2,m]Pochhammer[a3,n]Pochhammer[a4,p]/(Pochhammer[c1,m+n]Pochhammer[c2,p]m!n!p!);
func18b[m_,n_,p_]:=Pochhammer[a1,m+n+p]Pochhammer[a2,n]Pochhammer[a3,p]Pochhammer[a4,m-p]/(Pochhammer[c,m+n]m!n!p!);
func18c[m_,n_,p_]:=Pochhammer[a1,m+n+p]Pochhammer[a2,m]Pochhammer[a3,n]Pochhammer[b,p-m-n]/(Pochhammer[c,p]m!n!p!);
func18d[m_,n_,p_]:=Pochhammer[a1,m+n+p]Pochhammer[a2,n]Pochhammer[b1,m-p]Pochhammer[b2,p-m-n]/(m!n!p!);
func19a[m_,n_,p_]:=Pochhammer[a0,m+n+p]Pochhammer[a1,m]Pochhammer[a2,n]Pochhammer[a3,p]/(Pochhammer[c,m+n+p]m!n!p!);
func20a[m_,n_,p_]:=Pochhammer[a1,m+n+p]Pochhammer[a2,m+n]Pochhammer[a3,p]/(Pochhammer[c1,m]Pochhammer[c2,n]Pochhammer[c3,p]m!n!p!);
func20b[m_,n_,p_]:=Pochhammer[a1,m+n+p]Pochhammer[a2,p]Pochhammer[b,m+n-p]/(Pochhammer[c1,m]Pochhammer[c2,n]m!n!p!);
func20c[m_,n_,p_]:=Pochhammer[a1,m+n+p]Pochhammer[a2,m+n]Pochhammer[b,p-m]/(Pochhammer[c1,n]Pochhammer[c2,p]m!n!p!);
func20d[m_,n_,p_]:=Pochhammer[a,m+n+p]Pochhammer[b1,m+n-p]Pochhammer[b2,p-m]/(Pochhammer[c,n]m!n!p!);
func21a[m_,n_,p_]:=Pochhammer[a1,m+n+p]Pochhammer[a2,m+n]Pochhammer[a3,p]/(Pochhammer[c1,m]Pochhammer[c2,n+p]m!n!p!);
func21b[m_,n_,p_]:=Pochhammer[a1,m+n+p]Pochhammer[a2,m+n]Pochhammer[b,p-m]/(Pochhammer[c,n+p]m!n!p!);
func22a[m_,n_,p_]:=Pochhammer[a1,m+n+p]Pochhammer[a2,m+n+p]/(Pochhammer[c1,m]Pochhammer[c2,n]Pochhammer[c3,p]m!n!p!);
func23b[m_,n_,p_]:=Pochhammer[a1,m]Pochhammer[a2,n]Pochhammer[a3,n]Pochhammer[b1,m-n]Pochhammer[b2,2p-m]/(Pochhammer[c,p]m!n!p!);
func23c[m_,n_,p_]:=Pochhammer[a1,m]Pochhammer[a2,m]Pochhammer[a3,n]Pochhammer[b1,n-p]Pochhammer[b2,2p-m]/(Pochhammer[c,n]m!n!p!);
func23d[m_,n_,p_]:=Pochhammer[a1,n]Pochhammer[a2,n]Pochhammer[b1,m-n]Pochhammer[b2,m-p]Pochhammer[b3,2p-m]/(m!n!p!);
func23e[m_,n_,p_]:=Pochhammer[a1,m]Pochhammer[a2,n]Pochhammer[b1,m-n]Pochhammer[b2,n-p]Pochhammer[b3,2p-m]/(m!n!p!);
func24b[m_,n_,p_]:=Pochhammer[a1,m]Pochhammer[a2,m]Pochhammer[a3,n]Pochhammer[a4,n]Pochhammer[b,2p-m-n]/(Pochhammer[c,p]m!n!p!);
func24c[m_,n_,p_]:=Pochhammer[a1,m]Pochhammer[a2,n]Pochhammer[a3,n]Pochhammer[b1,m-p]Pochhammer[b,2p-m-n]/(m!n!p!);
func25b[m_,n_,p_]:=Pochhammer[a1,m]Pochhammer[a2,m]Pochhammer[a3,n]Pochhammer[a4,n]Pochhammer[b,2p-m]/(Pochhammer[c,n+p]m!n!p!);
func25c[m_,n_,p_]:=Pochhammer[a1,m]Pochhammer[a2,n]Pochhammer[a3,n]Pochhammer[b1,2p-m]Pochhammer[b2,m-n-p]/(m!n!p!);
func26b[m_,n_,p_]:=Pochhammer[a1,m+n]Pochhammer[a2,m]Pochhammer[a3,n]Pochhammer[b,2p-m]/(Pochhammer[c1,n]Pochhammer[c2,p]m!n!p!);
func26c[m_,n_,p_]:=Pochhammer[a1,m]Pochhammer[a2,n]Pochhammer[b1,2p-m]Pochhammer[b2,m+n-p]/(Pochhammer[c,n]m!n!p!);
func26d[m_,n_,p_]:=Pochhammer[a1,m+n]Pochhammer[a2,n]Pochhammer[b1,2p-m]Pochhammer[b2,m-p]/(Pochhammer[c,n]m!n!p!);
func26e[m_,n_,p_]:=Pochhammer[a1,m+n]Pochhammer[a2,m]Pochhammer[b1,2p-m]Pochhammer[b2,n-p]/(Pochhammer[c,n]m!n!p!);
func26f[m_,n_,p_]:=Pochhammer[a1,m+n]Pochhammer[a2,n]Pochhammer[b1,2p-m]Pochhammer[b2,m-n]/(Pochhammer[c,p]m!n!p!);
func26g[m_,n_,p_]:=Pochhammer[a,n]Pochhammer[b1,2p-m]Pochhammer[b2,m-n]Pochhammer[b3,m+n-p]/(m!n!p!);
func26h[m_,n_,p_]:=Pochhammer[a,m+n]Pochhammer[b1,2p-m]Pochhammer[b2,m-n]Pochhammer[b3,n-p]/(m!n!p!);
func27b[m_,n_,p_]:=Pochhammer[a1,m+n]Pochhammer[a2,m]Pochhammer[a3,n]Pochhammer[b,2p-m-n]/(Pochhammer[c,p]m!n!p!);
func27c[m_,n_,p_]:=Pochhammer[a1,m]Pochhammer[a2,n]Pochhammer[b1,2p-m-n]Pochhammer[b2,m+n-p]/(m!n!p!);
func27d[m_,n_,p_]:=Pochhammer[a1,m+n]Pochhammer[a2,n]Pochhammer[b1,2p-m-n]Pochhammer[b2,m-p]/(m!n!p!);
func28b[m_,n_,p_]:=Pochhammer[a1,m+n]Pochhammer[a2,m]Pochhammer[a3,n]Pochhammer[b,2p-m]/(Pochhammer[c,n+p]m!n!p!);
func28c[m_,n_,p_]:=Pochhammer[a1,m+n]Pochhammer[a2,n]Pochhammer[b1,2p-m]Pochhammer[b2,m-n-p]/(m!n!p!);
func29b[m_,n_,p_]:=Pochhammer[a1,n]Pochhammer[a2,p]Pochhammer[a3,p]Pochhammer[b,2m+n-p]/(Pochhammer[c1,m]Pochhammer[c2,n]m!n!p!);
func29c[m_,n_,p_]:=Pochhammer[a1,2m+n]Pochhammer[a2,p]Pochhammer[a3,p]Pochhammer[b,n-p]/(Pochhammer[c1,m]Pochhammer[c2,n]m!n!p!);
func29d[m_,n_,p_]:=Pochhammer[a1,2m+n]Pochhammer[a2,n]Pochhammer[a3,p]Pochhammer[b,p-n]/(Pochhammer[c1,m]Pochhammer[c2,p]m!n!p!);
func29e[m_,n_,p_]:=Pochhammer[a1,2m+n]Pochhammer[a2,n]Pochhammer[a3,p]Pochhammer[b,p-n]/(Pochhammer[c1,m]Pochhammer[c2,p]m!n!p!);
func29f[m_,n_,p_]:=Pochhammer[a1,p]Pochhammer[a2,p]Pochhammer[b1,2m+n-p]Pochhammer[b2,n-m]/(Pochhammer[c,n]m!n!p!);
func29g[m_,n_,p_]:=Pochhammer[a1,n]Pochhammer[a2,p]Pochhammer[b1,2m+n-p]Pochhammer[b2,p-m]/(Pochhammer[c,n]m!n!p!);
func29h[m_,n_,p_]:=Pochhammer[a1,n]Pochhammer[a2,p]Pochhammer[b1,2m+n-p]Pochhammer[b2,p-n]/(Pochhammer[c,m]m!n!p!);
func29i[m_,n_,p_]:=Pochhammer[a1,2m+n]Pochhammer[a2,p]Pochhammer[b1,n-p]Pochhammer[b2,p-m]/(Pochhammer[c,n]m!n!p!);
func29j[m_,n_,p_]:=Pochhammer[a1,2m+n]Pochhammer[a2,p]Pochhammer[b1,n-p]Pochhammer[b2,p-n]/(Pochhammer[c,m]m!n!p!);
func29k[m_,n_,p_]:=Pochhammer[a1,2m+n]Pochhammer[a2,p]Pochhammer[b1,n-m]Pochhammer[b2,p-n]/(Pochhammer[c,p]m!n!p!);
func29l[m_,n_,p_]:=Pochhammer[a1,2m+n]Pochhammer[a2,n]Pochhammer[b1,p-n]Pochhammer[b2,p-m]/(Pochhammer[c,p]m!n!p!);
func29m[m_,n_,p_]:=Pochhammer[a,p]Pochhammer[b1,2m+n-p]Pochhammer[b2,n-m]Pochhammer[b3,p-n]/(m!n!p!);
func29n[m_,n_,p_]:=Pochhammer[a,n]Pochhammer[b1,2m+n-p]Pochhammer[b2,p-m]Pochhammer[b3,p-n]/(m!n!p!);
func29o[m_,n_,p_]:=Pochhammer[a,2m+n]Pochhammer[b1,n-p]Pochhammer[b2,p-m]Pochhammer[b3,p-n]/(m!n!p!);
func30b[m_,n_,p_]:=Pochhammer[a1,n]Pochhammer[a2,p]Pochhammer[a3,p]Pochhammer[b,2m+n-p]/(Pochhammer[c,m+n]m!n!p!);
func30c[m_,n_,p_]:=Pochhammer[a1,2m+n]Pochhammer[a2,p]Pochhammer[a3,p]Pochhammer[b,n-p]/(Pochhammer[c,m+n]m!n!p!);
func30d[m_,n_,p_]:=Pochhammer[a1,2m+n]Pochhammer[a2,n]Pochhammer[a3,p]Pochhammer[b,p-m-n]/(Pochhammer[c,p]m!n!p!);
func30e[m_,n_,p_]:=Pochhammer[a1,n]Pochhammer[a2,p]Pochhammer[b1,p-m-n]Pochhammer[b2,2m+n-p]/(m!n!p!);
func30f[m_,n_,p_]:=Pochhammer[a1,2m+n]Pochhammer[a2,p]Pochhammer[b1,p-m-n]Pochhammer[b2,n-p]/(m!n!p!);
func31a[m_,n_,p_]:=Pochhammer[a1,2m+n]Pochhammer[a2,n]Pochhammer[a3,p]Pochhammer[a4,p]/(Pochhammer[c1,m+p]Pochhammer[c2,n]m!n!p!);
func31b[m_,n_,p_]:=Pochhammer[a1,2m+n]Pochhammer[a2,n]Pochhammer[a3,p]Pochhammer[b,p-n]/(Pochhammer[c,m+p]m!n!p!);
func31c[m_,n_,p_]:=Pochhammer[a1,2m+n]Pochhammer[a2,p]Pochhammer[a3,p]Pochhammer[b,n-m-p]/(Pochhammer[c,n]m!n!p!);
func31d[m_,n_,p_]:=Pochhammer[a1,2m+n]Pochhammer[a2,p]Pochhammer[b1,n-m-p]Pochhammer[b2,p-n]/(m!n!p!);
func32a[m_,n_,p_]:=Pochhammer[a1,2m+n]Pochhammer[a2,n]Pochhammer[a3,p]Pochhammer[a4,p]/(Pochhammer[c1,n+p]Pochhammer[c2,m]m!n!p!);
func32b[m_,n_,p_]:=Pochhammer[a1,2m+n]Pochhammer[a2,p]Pochhammer[a3,p]Pochhammer[b,n-m]/(Pochhammer[c,n+p]m!n!p!);
func32c[m_,n_,p_]:=Pochhammer[a1,2m+n]Pochhammer[a2,n]Pochhammer[a3,p]Pochhammer[b,p-m]/(Pochhammer[c,n+p]m!n!p!);
func33a[m_,n_,p_]:=Pochhammer[a1,2m+n]Pochhammer[a2,n]Pochhammer[a3,p]Pochhammer[b,p]/(Pochhammer[c,m+n+p]m!n!p!);
func34b[m_,n_,p_]:=Pochhammer[a1,m+n]Pochhammer[a2,m+n]Pochhammer[b,2p-m]/(Pochhammer[c1,n]Pochhammer[c2,p]m!n!p!);
func34c[m_,n_,p_]:=Pochhammer[a,m+n]Pochhammer[b1,2p-m]Pochhammer[b,m+n-p]/(Pochhammer[c,n]m!n!p!);
func35b[m_,n_,p_]:=Pochhammer[a1,m+n]Pochhammer[a2,m+n]Pochhammer[b,2p-m]/(Pochhammer[c,n+p]m!n!p!);
func36a[m_,n_,p_]:=Pochhammer[a1,2m+n]Pochhammer[a2,n+p]Pochhammer[a3,p]/(Pochhammer[c1,m]Pochhammer[c2,n]Pochhammer[c3,p]m!n!p!);
func36b[m_,n_,p_]:=Pochhammer[a1,n+p]Pochhammer[a2,p]Pochhammer[b,2m+n-p]/(Pochhammer[c1,m]Pochhammer[c2,n]m!n!p!);
func36c[m_,n_,p_]:=Pochhammer[a1,2m+n]Pochhammer[a2,p]Pochhammer[b,n+p-m]/(Pochhammer[c1,n]Pochhammer[c2,p]m!n!p!);
func36d[m_,n_,p_]:=Pochhammer[a1,2m+n]Pochhammer[a2,n+p]Pochhammer[b,p-m]/(Pochhammer[c1,n]Pochhammer[c2,p]m!n!p!);
func36e[m_,n_,p_]:=Pochhammer[a1,2m+n]Pochhammer[a2,n+p]Pochhammer[b,p-n]/(Pochhammer[c1,m]Pochhammer[c2,p]m!n!p!);
func36f[m_,n_,p_]:=Pochhammer[a,p]Pochhammer[b1,2m+n-p]Pochhammer[b2,n+p-m]/(Pochhammer[c,n]m!n!p!);
func36g[m_,n_,p_]:=Pochhammer[a,n+p]Pochhammer[b1,2m+n-p]Pochhammer[b2,p-m]/(Pochhammer[c,n]m!n!p!);
func36h[m_,n_,p_]:=Pochhammer[a,n+p]Pochhammer[b1,2m+n-p]Pochhammer[b2,p-n]/(Pochhammer[c,m]m!n!p!);
func36i[m_,n_,p_]:=Pochhammer[a,2m+n]Pochhammer[b1,n+p-m]Pochhammer[b2,p-n]/(Pochhammer[c,p]m!n!p!);
func36j[m_,n_,p_]:=Pochhammer[b1,2m+n-p]Pochhammer[b2,n+p-m]Pochhammer[b3,p-n]/(m!n!p!);
func37a[m_,n_,p_]:=Pochhammer[a1,2m+n]Pochhammer[a2,n+p]Pochhammer[a3,p]/(Pochhammer[c1,m+n]Pochhammer[c2,p]m!n!p!);
func37b[m_,n_,p_]:=Pochhammer[a1,n+p]Pochhammer[a2,p]Pochhammer[b,2m+n-p]/(Pochhammer[c,m+n]m!n!p!);
func37c[m_,n_,p_]:=Pochhammer[a1,2m+n]Pochhammer[a2,n+p]Pochhammer[b,p-m-n]/(Pochhammer[c,p]m!n!p!);
func37d[m_,n_,p_]:=Pochhammer[a1,2m+n]Pochhammer[a2,n+p]Pochhammer[b,p-m-n]/(Pochhammer[c,p]m!n!p!);
func38a[m_,n_,p_]:=Pochhammer[a1,2m+n]Pochhammer[a2,n+p]Pochhammer[a3,p]/(Pochhammer[c1,m+p]Pochhammer[c2,n]m!n!p!);
func38b[m_,n_,p_]:=Pochhammer[a1,2m+n]Pochhammer[a2,n+p]Pochhammer[b,p-n]/(Pochhammer[c,m+p]m!n!p!);
func39a[m_,n_,p_]:=Pochhammer[a1,2m+n]Pochhammer[a2,n+p]Pochhammer[a3,p]/(Pochhammer[c1,n+p]Pochhammer[c2,m]m!n!p!);func39b[m_,n_,p_]:=Pochhammer[a1,2m+n]Pochhammer[a2,p]Pochhammer[b,n+p-m]/(Pochhammer[c,n+p]m!n!p!);
func39c[m_,n_,p_]:=Pochhammer[a1,2m+n]Pochhammer[a2,n+p]Pochhammer[b,p-m]/(Pochhammer[c,n+p]m!n!p!);func40a[m_,n_,p_]:=Pochhammer[a1,2m+n]Pochhammer[a2,n+p]Pochhammer[a3,p]/(Pochhammer[c,m+n+p]m!n!p!);func41a[m_,n_,p_]:=Pochhammer[a1,2m+n+p]Pochhammer[a2,n]Pochhammer[a3,p]/(Pochhammer[c1,m]Pochhammer[c2,n]Pochhammer[c3,p]m!n!p!);
func41b[m_,n_,p_]:=Pochhammer[a1,2m+n+p]Pochhammer[a2,p]Pochhammer[b,n-m]/(Pochhammer[c1,n]Pochhammer[c2,p]m!n!p!);
func41c[m_,n_,p_]:=Pochhammer[a1,2m+n+p]Pochhammer[a2,p]Pochhammer[b,n-p]/(Pochhammer[c1,m]Pochhammer[c2,n]m!n!p!);
func41d[m_,n_,p_]:=Pochhammer[a,2m+n+p]Pochhammer[b1,n-m]Pochhammer[b2,p-n]/(Pochhammer[c,p]m!n!p!);func41e[m_,n_,p_]:=Pochhammer[a,2m+n+p]Pochhammer[b1,n-p]Pochhammer[b2,p-n]/(Pochhammer[c,m]m!n!p!);
func42a[m_,n_,p_]:=Pochhammer[a1,2m+n+p]Pochhammer[a2,n]Pochhammer[a3,p]/(Pochhammer[c1,m+n]Pochhammer[c2,p]m!n!p!);
func42b[m_,n_,p_]:=Pochhammer[a1,2m+n+p]Pochhammer[a2,p]Pochhammer[b,n-p]/(Pochhammer[c,m+n]m!n!p!);
func42c[m_,n_,p_]:=Pochhammer[a1,2m+n+p]Pochhammer[a2,n]Pochhammer[b,p-m-n]/(Pochhammer[c,p]m!n!p!);
func42d[m_,n_,p_]:=Pochhammer[a,2m+n+p]Pochhammer[b1,p-m-n]Pochhammer[b2,n-p]/(m!n!p!);
func43a[m_,n_,p_]:=Pochhammer[a1,2m+n+p]Pochhammer[a2,n]Pochhammer[a3,p]/(Pochhammer[c1,n+p]Pochhammer[c2,m]m!n!p!);
func43b[m_,n_,p_]:=Pochhammer[a1,2m+n+p]Pochhammer[a2,p]Pochhammer[b,n-m]/(Pochhammer[c,n+p]m!n!p!);func44a[m_,n_,p_]:=Pochhammer[a1,2m+n+p]Pochhammer[a2,n]Pochhammer[a3,p]/(Pochhammer[c,m+n+p]m!n!p!);func45a[m_,n_,p_]:=Pochhammer[a1,2m+n+p]Pochhammer[a2,n+p]/(Pochhammer[c1,m]Pochhammer[c2,n]Pochhammer[c3,p]m!n!p!);func45b[m_,n_,p_]:=Pochhammer[a,2m+n+p]Pochhammer[b,n+p-m]/(Pochhammer[c1,n]Pochhammer[c2,p]m!n!p!);
func46a[m_,n_,p_]:=Pochhammer[a1,2m+n+p]Pochhammer[a2,n+p]/(Pochhammer[c1,m+n]Pochhammer[c2,p]m!n!p!);func47b[m_,n_,p_]:=Pochhammer[a1,m]Pochhammer[a2,m]Pochhammer[b1,2n-m]Pochhammer[b2,2p-n]/(Pochhammer[c,p]m!n!p!);
func47c[m_,n_,p_]:=Pochhammer[a,m]Pochhammer[b1,2n-m]Pochhammer[b2,2p-n]Pochhammer[b3,m-p]/(m!n!p!);
func48b[m_,n_,p_]:=Pochhammer[a1,m]Pochhammer[a2,m]Pochhammer[b1,2n-p]Pochhammer[b2,2p-m-n]/(m!n!p!);
func49b[m_,n_,p_]:=Pochhammer[a1,2m+n]Pochhammer[a2,n]Pochhammer[b,2p-m]/(Pochhammer[c1,n]Pochhammer[c2,p]m!n!p!);
func49c[m_,n_,p_]:=Pochhammer[a1,2m+n]Pochhammer[a2,n]Pochhammer[b,2p-n]/(Pochhammer[c1,m]Pochhammer[c2,p]m!n!p!);func49d[m_,n_,p_]:=Pochhammer[a,n]Pochhammer[b1,2m+n-p]Pochhammer[b2,2p-m]/(Pochhammer[c,n]m!n!p!);
func49e[m_,n_,p_]:=Pochhammer[a,2m+n]Pochhammer[b1,n-p]Pochhammer[b2,2p-m]/(Pochhammer[c,n]m!n!p!);func49f[m_,n_,p_]:=Pochhammer[a,n]Pochhammer[b1,2m+n-p]Pochhammer[b2,2p-n]/(Pochhammer[c,m]m!n!p!);func49g[m_,n_,p_]:=Pochhammer[a,2m+n]Pochhammer[b1,2p-n]Pochhammer[b2,n-m]/(Pochhammer[c,p]m!n!p!);func49h[m_,n_,p_]:=Pochhammer[a,2m+n]Pochhammer[b1,2p-n]Pochhammer[b2,n-p]/(Pochhammer[c,m]m!n!p!);func49i[m_,n_,p_]:=Pochhammer[b1,2m+n-p]Pochhammer[b2,2p-n]Pochhammer[b3,n-m]/(m!n!p!);func50b[m_,n_,p_]:=Pochhammer[a1,2m+n]Pochhammer[a2,n]Pochhammer[b,2p-m-n]/(Pochhammer[c,p]m!n!p!);
func50c[m_,n_,p_]:=Pochhammer[a,n]Pochhammer[b1,2m+n-p]Pochhammer[b2,2p-m-n]/(m!n!p!);
func50d[m_,n_,p_]:=Pochhammer[a,2m+n]Pochhammer[b1,2p-m-n]Pochhammer[b2,n-p]/(m!n!p!);func51b[m_,n_,p_]:=Pochhammer[a1,2m+n]Pochhammer[a2,n]Pochhammer[b,2p-n]/(Pochhammer[c,m+p]m!n!p!);func51c[m_,n_,p_]:=Pochhammer[a,2m+n]Pochhammer[b1,2p-n]Pochhammer[b2,n-m-p]/(m!n!p!);func52b[m_,n_,p_]:=Pochhammer[a1,2m+n]Pochhammer[a2,n]Pochhammer[b,2p-m]/(Pochhammer[c,n+p]m!n!p!);func53b[m_,n_,p_]:=Pochhammer[a1,p]Pochhammer[a2,p]Pochhammer[b,2m+2n-p]/(Pochhammer[c1,m]Pochhammer[c2,n]m!n!p!);
func53c[m_,n_,p_]:=Pochhammer[a,p]Pochhammer[b1,2m+2n-p]Pochhammer[b2,p-m]/(Pochhammer[c,n]m!n!p!);
func53d[m_,n_,p_]:=Pochhammer[b1,2m+2n-p]Pochhammer[b2,p-m]Pochhammer[b3,p-n]/(m!n!p!);
func54a[m_,n_,p_]:=Pochhammer[a1,2m+n]Pochhammer[a2,n+2p]/(Pochhammer[c1,m]Pochhammer[c2,n]Pochhammer[c3,p]m!n!p!);
func54b[m_,n_,p_]:=Pochhammer[a,n+2p]Pochhammer[b,2m+n-p]/(Pochhammer[c1,m]Pochhammer[c2,n]m!n!p!);
func54c[m_,n_,p_]:=Pochhammer[b1,2m+n-p]Pochhammer[b2,n+2p-m]/(Pochhammer[c,n]m!n!p!);
func55a[m_,n_,p_]:=Pochhammer[a1,2m+n]Pochhammer[a2,n+2p]/(Pochhammer[c1,m+n]Pochhammer[c2,p]m!n!p!);func55b[m_,n_,p_]:=Pochhammer[a,n+2p]Pochhammer[b,2m+n-p]/(Pochhammer[c,m+n]m!n!p!);
func56a[m_,n_,p_]:=Pochhammer[a1,2m+n]Pochhammer[a2,n+2p]/(Pochhammer[c1,m+p]Pochhammer[c2,n]m!n!p!);func57a[m_,n_,p_]:=Pochhammer[a1,2m+n]Pochhammer[a2,n+2p]/(Pochhammer[c,m+n+p]m!n!p!);func58a[m_,n_,p_]:=Pochhammer[a1,2m+2n+p]Pochhammer[a2,p]/(Pochhammer[c1,m]Pochhammer[c2,n]Pochhammer[c3,p]m!n!p!);
func58b[m_,n_,p_]:=Pochhammer[a,2m+2n+p]Pochhammer[b,p-m]/(Pochhammer[c1,n]Pochhammer[c2,p]m!n!p!);
func59a[m_,n_,p_]:=Pochhammer[a1,2m+2n+p]Pochhammer[a2,p]/(Pochhammer[c1,n+p]Pochhammer[c2,m]m!n!p!);
func59b[m_,n_,p_]:=Pochhammer[a,2m+2n+p]Pochhammer[b,p-m]/(Pochhammer[c,n+p]m!n!p!);func60b[m_,n_,p_]:=Pochhammer[b1,2m+-n]Pochhammer[b2,2n-p]Pochhammer[b3,2p-m]/(m!n!p!);
func61b[m_,n_,p_]:=Pochhammer[b1,2m+2n-p]Pochhammer[b2,2p-m]/(Pochhammer[c,n]m!n!p!);


funcK1[m_,n_,p_,q_]:=Pochhammer[a,m+n+p+q]Pochhammer[b1,m+n+p]Pochhammer[b2,q]/(Pochhammer[c1,m+q]Pochhammer[c2,n]Pochhammer[c3,p]m!n!p!q!)
funcK2[m_,n_,p_,q_]:=Pochhammer[a,m+n+p+q]Pochhammer[b1,m+n+p]Pochhammer[b2,q]/(Pochhammer[c1,m]Pochhammer[c2,n]Pochhammer[c3,p]Pochhammer[c4,q]m!n!p!q!)
funcK3[m_,n_,p_,q_]:=Pochhammer[a,m+n+p+q]Pochhammer[b1,m+n]Pochhammer[b2,p+q]/(Pochhammer[c1,m+q]Pochhammer[c2,n+p]m!n!p!q!)
funcK4[m_,n_,p_,q_]:=Pochhammer[a,m+n+p+q]Pochhammer[b1,m+n]Pochhammer[b2,p+q]/(Pochhammer[c1,m+q]Pochhammer[c2,n]Pochhammer[c3,p]m!n!p!q!)
funcK5[m_,n_,p_,q_]:=Pochhammer[a,m+n+p+q]Pochhammer[b1,m+n]Pochhammer[b2,p+q]/(Pochhammer[c1,m]Pochhammer[c2,n]Pochhammer[c3,p]Pochhammer[c4,q]m!n!p!q!)
funcK6[m_,n_,p_,q_]:=Pochhammer[a,m+n+p+q]Pochhammer[b1,m+n]Pochhammer[b2,p]Pochhammer[b3,q]/(Pochhammer[c1,m]Pochhammer[c2,n+p+q]m!n!p!q!)
funcK7[m_,n_,p_,q_]:=Pochhammer[a,m+n+p+q]Pochhammer[b1,m+n]Pochhammer[b2,p]Pochhammer[b3,q]/(Pochhammer[c1,m+p]Pochhammer[c2,n+q]m!n!p!q!)
funcK8[m_,n_,p_,q_]:=Pochhammer[a,m+n+p+q]Pochhammer[b1,m+n]Pochhammer[b2,p]Pochhammer[b3,q]/(Pochhammer[c1,m+p]Pochhammer[c2,n]Pochhammer[c3,q]m!n!p!q!)
funcK9[m_,n_,p_,q_]:=Pochhammer[a,m+n+p+q]Pochhammer[b1,m+n]Pochhammer[b2,p]Pochhammer[b3,q]/(Pochhammer[c1,m]Pochhammer[c2,n]Pochhammer[c3,p+q]m!n!p!q!)
funcK10[m_,n_,p_,q_]:=Pochhammer[a,m+n+p+q]Pochhammer[b1,m+n]Pochhammer[b2,p]Pochhammer[b3,q]/(Pochhammer[c1,m]Pochhammer[c2,n]Pochhammer[c3,p]Pochhammer[c4,q]m!n!p!q!)
funcK11[m_,n_,p_,q_]:=Pochhammer[a,m+n+p+q]Pochhammer[b1,m]Pochhammer[b2,n]Pochhammer[b3,p]Pochhammer[b4,q]/(Pochhammer[c1,m+n+p]Pochhammer[c2,q]m!n!p!q!)
funcK12[m_,n_,p_,q_]:=Pochhammer[a,m+n+p+q]Pochhammer[b1,m]Pochhammer[b2,n]Pochhammer[b3,p]Pochhammer[b4,q]/(Pochhammer[c1,m+n]Pochhammer[c2,p+q]m!n!p!q!)
funcK13[m_,n_,p_,q_]:=Pochhammer[a,m+n+p+q]Pochhammer[b1,m]Pochhammer[b2,n]Pochhammer[b3,p]Pochhammer[b4,q]/(Pochhammer[c1,m+n]Pochhammer[c2,p]Pochhammer[c3,q]m!n!p!q!)
funcK14[m_,n_,p_,q_]:=Pochhammer[a,m+n+p]Pochhammer[b1,q]Pochhammer[b2,m+q]Pochhammer[b3,n]Pochhammer[b4,p]/(Pochhammer[c,m+n+p+q]m!n!p!q!)
funcK15[m_,n_,p_,q_]:=Pochhammer[a,m+n+p]Pochhammer[b1,q]Pochhammer[b2,m]Pochhammer[b3,n]Pochhammer[b4,p]Pochhammer[b5,q]/(Pochhammer[c1,m+n+p+q]m!n!p!q!)
funcK16[m_,n_,p_,q_]:=Pochhammer[a1,m+n]Pochhammer[a2,m+p]Pochhammer[a3,n+q]Pochhammer[a4,p+q]/(Pochhammer[c,m+n+p+q]m!n!p!q!)
funcK17[m_,n_,p_,q_]:=Pochhammer[a,m+n]Pochhammer[b1,m+p]Pochhammer[b2,n+p]Pochhammer[b3,q]Pochhammer[b4,q]/(Pochhammer[c,m+n+p+q]m!n!p!q!)
funcK18[m_,n_,p_,q_]:=Pochhammer[a,m+n]Pochhammer[b1,m+q]Pochhammer[b2,n+p]Pochhammer[b3,p]Pochhammer[b4,q]/(Pochhammer[c1,m+n+p+q]m!n!p!q!)
funcK19[m_,n_,p_,q_]:=Pochhammer[a,m+n]Pochhammer[b1,m+p]Pochhammer[b2,n]Pochhammer[b3,p]Pochhammer[b4,q]Pochhammer[b5,q]/(Pochhammer[c1,m+n+p+q]m!n!p!q!)
funcK20[m_,n_,p_,q_]:=Pochhammer[a1,m+n]Pochhammer[a2,p+q]Pochhammer[b1,m]Pochhammer[b2,n]Pochhammer[b3,p]Pochhammer[b4,q]/(Pochhammer[c1,m+n+p+q]m!n!p!q!)
funcK21[m_,n_,p_,q_]:=Pochhammer[a,m+n]Pochhammer[b1,m]Pochhammer[b2,n]Pochhammer[b3,p]Pochhammer[b4,q]Pochhammer[b5,p]Pochhammer[b6,q]/(Pochhammer[c1,m+n+p+q]m!n!p!q!)
