MarsJupiterConvergence.frink

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 was born 20143 days, 11 hours, 21 minutes ago.