That is saying I have the wrong type of argument

Thanks for that. It worked perfectly.
 

Just one extra question. Are you able to tell me in words what you have done for this part?

X:=1+a*FresnelC(u1);

t1:=fsolve(D1+R1*cos(t)=X,t);

C1:=plot([D1+R1*cos(t),R1*sin(t),t=-t1..t1]):

C2:=plot([-D1-R1*cos(t),R1*sin(t),t=-t1..t1]):

 

Would just allow me to understand it a bit better.

Thanks

I have sorted it.  Thanks for your help

Thanks for that, it has helped a bit.

It is (0,-E1) i want the straight line(length 1 unit) to start at and (1,-E1) to be where the curve starts at the end of the line.

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, 0], R1);

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

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

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

p3:=plot(0,x=-1..0);

display(p1,p3);

This altered program is basically what I require except here the curve starts at (0,-E1)  and not (1,-E1) as I need. When in that position it should give a continuous graph throughout.

Hope this is a little clearer

sorry the line doesnt  necessarily need to be x=1 just x=some constant of length 1 unit

Basically I am wanting to design a continuous curve that touches both the x axis and the other line at the same distance (

evalf(FresnelC(u0)+FresnelS(u0)*cot((3*Pi)/8));) from where the lines meet using Fresnel integrals.

I am given the point u0 so could do half the curve, from 0 to u0, but i don't know how to do the other half from u0 to the other line.

Hope this makes some sort of sense.

Thanks for all your help guys. One more thing if you don't mind. How do I make a mark at the centre of each of the two circles given I have the co-ords. I can't seem to find the correct command.

thanks in advance