/** This renders the Hubble Ultra-Deep-Field at the size that it would actually appear on the sky. */ distance = eval[input["Enter distance: ", "27 feet"]] // The size of the sides of the actual image on the sky angle = 2.4 arcmin width = arctan[angle] distance println["The width is " + format[width, "mm", 3]] // The image can be obtained at: // https://en.wikipedia.org/wiki/Hubble_Ultra-Deep_Field i = new image["file:HubbleUDF.png"] g = new graphics g.color[1,1,1] g.drawRectCenter[4 in, 5.5 in, 7 in, 10 in] g.draw[i, 4 in, 5.5 in, width, width] //g.show[] g.print[]