Blame doc/examples/const.c

Packit 67cb25
#include <stdio.h>
Packit 67cb25
#include <gsl/gsl_const_mksa.h>
Packit 67cb25
Packit 67cb25
int
Packit 67cb25
main (void)
Packit 67cb25
{
Packit 67cb25
  double c  = GSL_CONST_MKSA_SPEED_OF_LIGHT;
Packit 67cb25
  double au = GSL_CONST_MKSA_ASTRONOMICAL_UNIT;
Packit 67cb25
  double minutes = GSL_CONST_MKSA_MINUTE;
Packit 67cb25
Packit 67cb25
  /* distance stored in meters */
Packit 67cb25
  double r_earth = 1.00 * au;  
Packit 67cb25
  double r_mars  = 1.52 * au;
Packit 67cb25
Packit 67cb25
  double t_min, t_max;
Packit 67cb25
Packit 67cb25
  t_min = (r_mars - r_earth) / c;
Packit 67cb25
  t_max = (r_mars + r_earth) / c;
Packit 67cb25
Packit 67cb25
  printf ("light travel time from Earth to Mars:\n");
Packit 67cb25
  printf ("minimum = %.1f minutes\n", t_min / minutes);
Packit 67cb25
  printf ("maximum = %.1f minutes\n", t_max / minutes);
Packit 67cb25
Packit 67cb25
  return 0;
Packit 67cb25
}