// Points from naca633418.dat in the archive: http://m-selig.ae.illinois.edu/ads/archives/coord_seligFmt.tar.gz
// Not necessarily in the same order as in: http://m-selig.ae.illinois.edu/ads/coord/naca633418.dat

naca633418_points = [[1000,0.01],[998.93,0.1299],[995.72,0.77],[990.39,1.85],[982.96,3.34],[973.47,5.26],[961.94,7.59],[948.44,10.34],[933.01,13.52],[915.73,17.13],[896.68,21.19],[875.92,25.73],[853.55,30.74],[829.67,36.2],[804.38,42.06],[777.79,48.26],[750,54.69],[721.14,61.27],[691.34,67.86],[660.72,74.36],[629.41,80.64],[597.55,86.6],[565.26,92.14],[532.6999,97.15],[500,101.5],[467.3,105.11],[434.74,107.86],[402.4499,109.69],[370.5899,110.56],[339.28,110.39],[308.66,109.2],[278.86,107.1],[250,104.19],[222.21,100.53],[195.6199,96.19],[170.33,91.23],[146.45,85.74],[124.08,79.79],[103.32,73.44],[84.27,66.75],[66.9899,59.82],[51.56,52.72],[38.0599,45.57],[26.53,38.44],[17.04,31.34],[9.61,24.3899],[4.28,17.6],[1.07,11.21],[0,0],[1.07,-3.29],[4.28,-9.11],[9.61,-14.94],[17.04,-20.58],[26.53,-26.01],[38.0599,-31.24],[51.56,-36.27],[66.9899,-41.08],[84.27,-45.6501],[103.32,-49.94],[124.08,-53.93],[146.45,-57.57],[170.33,-60.83],[195.6199,-63.66],[222.21,-66.01],[250,-67.84],[278.86,-69.09],[308.66,-69.7],[339.28,-69.59],[370.5899,-68.68],[402.4499,-66.94],[434.74,-64.42],[467.3,-61.21],[500,-57.4],[532.6999,-53.08],[565.26,-48.3701],[597.55,-43.37],[629.41,-38.19],[660.72,-32.95],[691.34,-27.78],[721.14,-22.81],[750,-18.14],[777.79,-13.85],[804.38,-10.02],[829.67,-6.69],[853.55,-3.87],[875.92,-1.56],[896.68,0.2999],[915.73,1.72],[933.01,2.6],[948.44,2.86],[961.94,2.5699],[973.47,1.99],[982.96,1.35],[990.39,0.78],[995.72,0.36],[998.93,0.09]];

linear_extrude(height=20)
scale([15, 15])
translate([0,0])
scale (0.001)
polygon(points=naca633418_points);