<div dir="ltr"><div><div><div>D = 10.0*0.0999308;<br>f2d = 0.72;<br>f = D*f2d;<br><br>h = 0.05;<br><br>parabolLowerEdgeHeight = -D/2;<br>parabolPoints = 101;<br>delta = D/(parabolPoints-1);<br><br>For i In {0:parabolPoints-1}<br><br>    x = (i*delta)+parabolLowerEdgeHeight;<br>    z = (x*x)/(4.0*f);<br>    pList[i] = newp;<br>    Point(pList[i]) = {x, 0, z, h};<br><br>EndFor<br><br>Line (newl) = pList[];<br><br>line1[] = Extrude {{0, 0, 1}, {0, 0, 0}, Pi/2} {Line{pList[]};};<br><br>line2[] = Extrude {{0, 0, 1}, {0, 0, 0}, Pi/2} {Line{line1[]};};<br><br><br></div>I am stuck here. I looking forward to get a physical surface for discretization. <br><br></div>Regards,<br><br></div>Rao.<br></div>