summaryrefslogtreecommitdiff
path: root/reference/C/CONTRIB/SNIP/windchil.c
blob: c868773ca80c509ff9afdcc18d7e7ad96a477c80 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
/*
**  Wind Chill for exposed human skin, expressed as a function of wind
**  speed in Miles per Hour and temperature in degrees Fahrenheit.
**
**  Public domain from numerous published references.
*/

#include <math.h>
 
double wind_chill(int wind_speed, int temp)
{
      if (4 > wind_speed)
            return (double)temp;
      else
      {
            return (((10.45 + (6.686112 * sqrt((double) wind_speed))
                  - (.447041 * wind_speed)) / 22.034 * (temp - 91.4)) + 91.4);
      }
}