> g1:=a*x^b*(1-x)^3*(1+c/q2);
 

(Typesetting:-mprintslash)([g1 := a*x^b*(1-x)^3*(1+c/q2)], [a*x^b*(1-x)^3*(1+c/q2)]) 

> dya:=diff(g1,a);
 

(Typesetting:-mprintslash)([dya := x^b*(1-x)^3*(1+c/q2)], [x^b*(1-x)^3*(1+c/q2)]) 

> dyb:=diff(g1,b);
 

(Typesetting:-mprintslash)([dyb := a*x^b*ln(x)*(1-x)^3*(1+c/q2)], [a*x^b*ln(x)*(1-x)^3*(1+c/q2)]) 

> dyc:=diff(g1,c);
 

(Typesetting:-mprintslash)([dyc := a*x^b*(1-x)^3/q2], [a*x^b*(1-x)^3/q2]) 

> dy:= sqrt((dya*da)^2+(dyb*db)^2+(dyc*dc)^2+2*dya*dyb*dab+2*dya*dyc*dac+2*dyc*dyb*dcb);
 

(Typesetting:-mprintslash)([dy := ((x^b)^2*(1-x)^6*(1+c/q2)^2*da^2+a^2*(x^b)^2*ln(x)^2*(1-x)^6*(1+c/q2)^2*db^2+a^2*(x^b)^2*(1-x)^6*dc^2/q2^2+2*(x^b)^2*(1-x)^6*(1+c/q2)^2*a*ln(x)*dab+2*(x^b)^2*(1-x)^6*...
(Typesetting:-mprintslash)([dy := ((x^b)^2*(1-x)^6*(1+c/q2)^2*da^2+a^2*(x^b)^2*ln(x)^2*(1-x)^6*(1+c/q2)^2*db^2+a^2*(x^b)^2*(1-x)^6*dc^2/q2^2+2*(x^b)^2*(1-x)^6*(1+c/q2)^2*a*ln(x)*dab+2*(x^b)^2*(1-x)^6*...
(Typesetting:-mprintslash)([dy := ((x^b)^2*(1-x)^6*(1+c/q2)^2*da^2+a^2*(x^b)^2*ln(x)^2*(1-x)^6*(1+c/q2)^2*db^2+a^2*(x^b)^2*(1-x)^6*dc^2/q2^2+2*(x^b)^2*(1-x)^6*(1+c/q2)^2*a*ln(x)*dab+2*(x^b)^2*(1-x)^6*...
(Typesetting:-mprintslash)([dy := ((x^b)^2*(1-x)^6*(1+c/q2)^2*da^2+a^2*(x^b)^2*ln(x)^2*(1-x)^6*(1+c/q2)^2*db^2+a^2*(x^b)^2*(1-x)^6*dc^2/q2^2+2*(x^b)^2*(1-x)^6*(1+c/q2)^2*a*ln(x)*dab+2*(x^b)^2*(1-x)^6*...
 

dab=0.015190159,dac=-0.16542670,dcb=-0.028085555 

dab=0.0,dac=0.,dcb=0.0 

> y1:=subs(a=0.39195223,b=0.067564942,c=0.063631241,q2=1.279,g1);
dy1:=subs(a=0.39195223,b=0.067564942,c=0.063631241,
da=sqrt(0.064588362),db=sqrt(0.0070870338),dc=sqrt(0.46407566),
dab=0.015190159,dac=-0.16542670,dcb=-0.028085555,q2=1.279,dy);
 

(Typesetting:-mprintslash)([y1 := .4114521572*x^0.67564942e-1*(1-x)^3], [.4114521572*x^0.67564942e-1*(1-x)^3]) 

(Typesetting:-mprintslash)([dy1 := (0.832256990e-2*x^.135129884*(1-x)^6+0.1199784347e-2*x^.135129884*ln(x)^2*(1-x)^6+0.6039298064e-2*x^.135129884*(1-x)^6*ln(x))^(1/2)], [(0.832256990e-2*x^.135129884*(...
(Typesetting:-mprintslash)([dy1 := (0.832256990e-2*x^.135129884*(1-x)^6+0.1199784347e-2*x^.135129884*ln(x)^2*(1-x)^6+0.6039298064e-2*x^.135129884*(1-x)^6*ln(x))^(1/2)], [(0.832256990e-2*x^.135129884*(...
 

> plot({y1,y1+dy1,y1-dy1},x=0..0.3);
 

Plot 

> Gamma1_err:=int(dy1,x=0.00..0.316);
 

(Typesetting:-mprintslash)([Gamma1_err := 0.6919432811e-2], [0.6919432811e-2]) 

> Gamma1_p:=int(y1,x=0..0.316);
 

(Typesetting:-mprintslash)([Gamma1_p := 0.6833252214e-1], [0.6833252214e-1]) 

> yn:=subs(a=-0.0000734,b=-1.933556,c=2.837267,q2=1.279,g1);
dyn:=subs(a=-0.0000734,b=-1.933556,c=2.837267,
da=sqrt(0.000000434),db=sqrt(2.134173),dc=sqrt(2643.0566),
dab=0.00035987,dac=0.0304052,dcb=55.85988,q2=1.279,dy);
 

(Typesetting:-mprintslash)([yn := -0.2362267379e-3*(1-x)^3/x^1.933556], [-0.2362267379e-3*(1-x)^3/x^1.933556]) 

(Typesetting:-mprintslash)([dyn := (0.1968579228e-5*(1-x)^6/x^3.867112+0.1190934090e-6*ln(x)^2*(1-x)^6/x^3.867112+0.9673638899e-6*(1-x)^6*ln(x)/x^3.867112)^(1/2)], [(0.1968579228e-5*(1-x)^6/x^3.867112...
(Typesetting:-mprintslash)([dyn := (0.1968579228e-5*(1-x)^6/x^3.867112+0.1190934090e-6*ln(x)^2*(1-x)^6/x^3.867112+0.9673638899e-6*(1-x)^6*ln(x)/x^3.867112)^(1/2)], [(0.1968579228e-5*(1-x)^6/x^3.867112...
 

> plot({yn,yn+dyn,yn-dyn},x=0.01..0.3);
 

Plot 

> Gamma1_n_err:=int(dyn,x=0.001..0.316);
 

(Typesetting:-mprintslash)([Gamma1_n_err := .4426432720], [.4426432720]) 

> Gamma1_n:=int(yn,x=0.001..0.316);
 

(Typesetting:-mprintslash)([Gamma1_n := -.1562049543], [-.1562049543]) 

> yd:=subs(a=1.77767124,b=0.73906325,c= -0.78551499,q2=1.279,g1);
dyd:=subs(a=1.77767124,b=0.73906325,c= -0.78551499,
da=sqrt(3.88586297),db=sqrt(0.16549087),dc=sqrt(0.065409055),
dab=0.65374959,dac=-0.35940478,dcb=-0.024749276,q2=1.279,dy);
 

(Typesetting:-mprintslash)([yd := .6858906252*x^.73906325*(1-x)^3], [.6858906252*x^.73906325*(1-x)^3]) 

(Typesetting:-mprintslash)([dyd := (.3193683362*x^1.47812650*(1-x)^6+0.7785450954e-1*x^1.47812650*ln(x)^2*(1-x)^6+.2988311732*x^1.47812650*(1-x)^6*ln(x))^(1/2)], [(.3193683362*x^1.47812650*(1-x)^6+0.7...
(Typesetting:-mprintslash)([dyd := (.3193683362*x^1.47812650*(1-x)^6+0.7785450954e-1*x^1.47812650*ln(x)^2*(1-x)^6+.2988311732*x^1.47812650*(1-x)^6*ln(x))^(1/2)], [(.3193683362*x^1.47812650*(1-x)^6+0.7...
 

> plot({yd,yd+dyd,yd-dyd},x=0.001..0.3);
 

Plot 

> Gamma1_d_err:=int(dyd,x=0.001..0.316);
 

(Typesetting:-mprintslash)([Gamma1_d_err := 0.9878144799e-2], [0.9878144799e-2]) 

> Gamma1_d:=int(yd,x=0.001..0.316);
 

(Typesetting:-mprintslash)([Gamma1_d := 0.2797003408e-1], [0.2797003408e-1]) 

>