Download or view MarsJupiterConvergence.frink in plain text format
/** This is a first cut at calculating the Mars-Jupiter convergence
of 2024. */
use planets.frink
lat = 40 deg North
long = 105 deg West
for d = #2024-08-13# to #2024-08-16# step 30 min
{
// This can also be angularSeparation or airlessAngularSeparation
sep = Planet.angularSeparation[Planet.Jupiter,Planet.Mars,d,lat,long]
[az,alt] = Planet.Jupiter.refractedAzimuthAltitude[d, lat, long]
if (alt > 0 degrees)
println[d + "\t" + format[sep, degrees, 4] + "\t" + skyDarkness[d,lat,long] + "\t" + format[alt, deg, 3] + "\t" + format[(az + 180 deg) mod circle,deg,1]]
}
Download or view MarsJupiterConvergence.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, eliasen@mindspring.com