Plot[FresnelS[x],{x,-4,4},GridLines->Automatic]

Plot[FresnelC[x],{x,-4,4},GridLines->Automatic]

Integrate[Sin[t^2],t]

Integrate[Cos[t^2],t]

ParametricPlot[{FresnelC[t],FresnelS[t]},{t,-4,4}]

Integrate[Cos[t^2], {t,y,x}]

D[%,x]

Integrate[g[t],{t,y,x}]

D[%,x]