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

goe428_points = [[1000,0],[950,11.5999],[900,22.2],[800,40.4],[700,57.6],[600,71.8],[500,83],[400,89.2],[300,90.4],[200,83.5999],[150,74.2],[100,60.8],[75,51.6],[50,41.4],[25,26.2],[12.5,17.1],[0,0],[12.5,-5.9],[25,-6.8],[50,-6.6],[75,-5.4],[100,-3.2],[150,2.2],[200,5.6],[300,11.4],[400,15.2],[500,17],[600,16.8],[700,13.6],[800,9.4],[900,5.2],[950,2.6]];

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