Advanced Search

Question: combine 2 graphs

Question:combine 2 graphs

iloverangers 80 Maple
plot graph
February 05 2010
0

From the program below

 

 

S1:=unapply(u*FresnelS(u)+((1/Pi)*cos((1/2)*Pi*u^2))-(1/Pi),u);

C1:=unapply(u*FresnelC(u)-((1/Pi)*sin((1/2)*Pi*u^2)),u);
R1:=1;
u1:=evalf(sqrt(0.4));

E1:=evalf(Pi*R1*S1(u1)+R1);

 D1:=evalf(Pi*R1*C1(u1));

with(plottools);

with(plots);

c1 := circle([D1, E1], R1);

display(c1);

a:=evalf(Pi*R1*u1);

plot([a*FresnelC(u),a*FresnelS(u),u=0..u1]);

plots[display](plot([a*FresnelC(u),a*FresnelS(u),u=0..u1]),c1,scaling=constrained);

plot(-E1,x=0..1);

 

From this I want to have the graph with the circle and the cornu spiral attached to line y=-E1 at the point x = 1

 
Please Wait...