diff options
Diffstat (limited to 'reference/C/CONTRIB/SNIP/windchil.c')
-rwxr-xr-x | reference/C/CONTRIB/SNIP/windchil.c | 19 |
1 files changed, 19 insertions, 0 deletions
diff --git a/reference/C/CONTRIB/SNIP/windchil.c b/reference/C/CONTRIB/SNIP/windchil.c new file mode 100755 index 0000000..c868773 --- /dev/null +++ b/reference/C/CONTRIB/SNIP/windchil.c @@ -0,0 +1,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);
+ }
+}
|