flip a graph about the x and y axis

The following program produces a plot in the 4th quadrant.

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);

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

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

display(p1,p3);

I want to flip it in the x axis and then in the y axis so it is a continuous curve around the 4 quadrants.

Any ideas?