Download or view HubbleUDF.frink in plain text format
/** 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[]
Download or view HubbleUDF.frink in plain text format
This is a program written in the programming language Frink.
For more information, view the Frink
Documentation or see More Sample Frink Programs.
Alan Eliasen was born 20136 days, 5 hours, 20 minutes ago.