Hi, can someone help me with this MATHEMATICA question

Part 4 Surface of Revolution: RevolutionPlot3D -- Create a plot of revfct over [revDomainStart, revDomainEnd] as defined below See the MM tutorial from class for assistance on the MM plotting functions. -- Complete the function revfct3D that defines the generatrix of the surface of revolution You will need to read the Help for RevolutionPlot3D to understand what the {x,y,z} coordinates should be. -- Create a plot of revfct3D that will appear as a curve of the RevolutionPlot3D surface Remove the comments around revfct3Dplot

(* domain for revfct *) revDomainStart = 0.0; revDomainEnd = 1.0;

(* input function used to create generating curve - generatrix *) revfct[t_] := t^2 + Sin[10*Pi*t]*0.1;

(* TO DO *) (* 2d plot of function statement goes here *)

(* TO DO *) (* generatrix from revfct *) revfct3D[s_] := {0.0, 0.0, 0.0};

(* TO DO *) (* plot generatrix in 3D *) (* Add PlotStyle\[Rule]{Red,Thick} *) (* revfct3Dplot = ... *) revfct[t_] = ParametricPlot3D[revfct3D[t] {t, revDomainStart, revDomainEnd}, PlotStyle -> {Red, Thick}];

(* create surface plot *) rplot = RevolutionPlot3D[ revfct[t], {t, revDomainStart, revDomainEnd}, PlotStyle -> Opacity[0.3]];

(* TO DO *) (* plot surface and curve on surface *) Show[{(*revfct3Dplot,*) rplot}, PlotRange -> All]