// Points from e431.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/e431.dat

e431_points = [[1000,0],[996.44,1.08],[986.38,4.39],[970.8999,9.69],[950.4901,16.26],[925.19,23.76],[895.28,32.22],[861.3099,41.56],[823.84,51.56],[783.46,62.02],[740.8,72.62],[696.49,83.03],[651.14,92.77],[605.15,101.24],[558.67,108.1],[511.9,113.21],[465.13,116.48],[418.6599,117.93],[372.84,117.62],[328.06,115.65],[284.76,112.11],[243.34,107.09],[204.2,100.7],[167.6999,93.0499],[134.18,84.2799],[103.91,74.56],[77.17,64.06],[54.16,53],[35.06,41.64],[19.99,30.27],[9.07,19.25],[2.38,9.03],[0.64,4.38],[0.12,1.81],[0.01,0.21],[0.0699,-1.26],[0.18,-1.94],[0.34,-2.59],[0.57,-3.17],[0.91,-3.72],[1.34,-4.26],[1.86,-4.8],[3.12,-5.87],[4.6499,-6.93],[7.41,-8.51],[13.16,-11.08],[28.9,-15.8001],[50.11,-19.88],[76.54,-23.34],[107.91,-26.1901],[143.84,-28.54],[183.84,-30.42],[227.41,-31.86],[274,-32.86],[323.0199,-33.44],[373.84,-33.57],[425.83,-33.22],[478.34,-32.31],[530.71,-30.75],[582.26,-28.24],[632.83,-24.36],[682.5,-19.25],[731.12,-13.34],[778.5,-7.25],[824,-1.9],[866.54,2.09],[905,4.43],[938.2499,5.04],[965.12,4.09],[984.57,2.3],[996.17,0.65]];

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