diff --git a/source/common/thirdparty/math/asin.c b/source/common/thirdparty/math/asin.c
index 8bc342dd1..72dc9b3e9 100644
--- a/source/common/thirdparty/math/asin.c
+++ b/source/common/thirdparty/math/asin.c
@@ -276,8 +276,7 @@ double c_asin();
 #endif
 extern double PIO2, PIO4, NAN;
 
-double c_asin(x)
-double x;
+double c_asin(double x)
 {
 double a, p, z, zz;
 short sign;
@@ -327,8 +326,7 @@ return(z);
 
 
 
-double c_acos(x)
-double x;
+double c_acos(double x)
 {
 if( (x < -1.0) || (x > 1.0) )
 	{
diff --git a/source/common/thirdparty/math/atan.c b/source/common/thirdparty/math/atan.c
index d73ed1ee4..68e10310a 100644
--- a/source/common/thirdparty/math/atan.c
+++ b/source/common/thirdparty/math/atan.c
@@ -212,8 +212,7 @@ extern double PI, PIO2, PIO4, INFINITY, NEGZERO, MAXNUM;
 #endif
 
 
-double c_atan(x)
-double x;
+double c_atan(double x)
 {
 double y, z;
 short sign, flag;
@@ -269,11 +268,10 @@ return(y);
 /*							atan2	*/
 
 #ifdef ANSIC
-double c_atan2( y, x )
+double c_atan2(double y, double x)
 #else
-double c_atan2( x, y )
+double c_atan2(double x, double y)
 #endif
-double x, y;
 {
 double z, w;
 short code;
diff --git a/source/common/thirdparty/math/cosh.c b/source/common/thirdparty/math/cosh.c
index 778ccd951..bd4df2f39 100644
--- a/source/common/thirdparty/math/cosh.c
+++ b/source/common/thirdparty/math/cosh.c
@@ -79,8 +79,7 @@ int isnan(), isfinite();
 #endif
 extern double MAXLOG, INFINITY, LOGE2;
 
-double c_cosh(x)
-double x;
+double c_cosh(double x)
 {
 double y;
 
diff --git a/source/common/thirdparty/math/exp.c b/source/common/thirdparty/math/exp.c
index 29ec8d5da..46cd0f559 100644
--- a/source/common/thirdparty/math/exp.c
+++ b/source/common/thirdparty/math/exp.c
@@ -164,12 +164,11 @@ static short sc2[] = {0x3eb7,0xf7d1,0xcf79,0xabca};
 
 extern double LOGE2, LOG2E, MAXLOG, MINLOG, MAXNUM;
 
-double c_exp(x)
-double x;
+double c_exp(double x)
 {
 double px, xx;
 int n;
-double polevl(), floor(), ldexp();
+double polevl(double, void *, int), floor(double), ldexp(double, int);
 
 if( x > MAXLOG)
 	{
diff --git a/source/common/thirdparty/math/isnan.c b/source/common/thirdparty/math/isnan.c
index 6c421441f..b09ce01a3 100644
--- a/source/common/thirdparty/math/isnan.c
+++ b/source/common/thirdparty/math/isnan.c
@@ -99,8 +99,7 @@ POSSIBILITY OF SUCH DAMAGE.
 
 /* Return 1 if the sign bit of x is 1, else 0.  */
 
-int signbit(x)
-double x;
+int signbit(double x)
 {
 union
 	{
@@ -140,8 +139,7 @@ else
 
 /* Return 1 if x is a number that is Not a Number, else return 0.  */
 
-int isnan(x)
-double x;
+int isnan(double x)
 {
 #ifdef NANS
 union
@@ -209,8 +207,7 @@ return(0);
 
 /* Return 1 if x is not infinite and is not a NaN.  */
 
-int isfinite(x)
-double x;
+int isfinite(double x)
 {
 #ifdef INFINITIES
 union
diff --git a/source/common/thirdparty/math/log.c b/source/common/thirdparty/math/log.c
index 81595120c..8ad060c7e 100644
--- a/source/common/thirdparty/math/log.c
+++ b/source/common/thirdparty/math/log.c
@@ -230,8 +230,7 @@ int isnan(), isfinite();
 #define SQRTH 0.70710678118654752440
 extern double INFINITY, NAN;
 
-double c_log(x)
-double x;
+double c_log(double x)
 {
 int e;
 #ifdef DEC
diff --git a/source/common/thirdparty/math/log10.c b/source/common/thirdparty/math/log10.c
index 037741c60..b7662dc0e 100644
--- a/source/common/thirdparty/math/log10.c
+++ b/source/common/thirdparty/math/log10.c
@@ -178,8 +178,7 @@ int isnan(), isfinite();
 #endif
 extern double LOGE2, SQRT2, INFINITY, NAN;
 
-double c_log10(x)
-double x;
+double c_log10(double x)
 {
 VOLATILE double z;
 double y;
diff --git a/source/common/thirdparty/math/mtherr.c b/source/common/thirdparty/math/mtherr.c
index 5650e07ed..3f24da2b7 100644
--- a/source/common/thirdparty/math/mtherr.c
+++ b/source/common/thirdparty/math/mtherr.c
@@ -99,9 +99,7 @@ static char *ermsg[7] = {
 };
 
 
-int mtherr( name, code )
-char *name;
-int code;
+int mtherr(char* name, int code)
 {
 
 /* Display string passed by calling program,
diff --git a/source/common/thirdparty/math/polevl.c b/source/common/thirdparty/math/polevl.c
index bc17a1210..dde27daff 100644
--- a/source/common/thirdparty/math/polevl.c
+++ b/source/common/thirdparty/math/polevl.c
@@ -75,10 +75,7 @@ Direct inquiries to 30 Frost Street, Cambridge, MA 02140
 */
 
 
-double polevl( x, coef, N )
-double x;
-double coef[];
-int N;
+double polevl(double x, double coef[], int N)
 {
 double ans;
 int i;
@@ -101,10 +98,7 @@ return( ans );
  * Otherwise same as polevl.
  */
 
-double p1evl( x, coef, N )
-double x;
-double coef[];
-int N;
+double p1evl(double x, double coef[], int N)
 {
 double ans;
 double *p;
diff --git a/source/common/thirdparty/math/pow.c b/source/common/thirdparty/math/pow.c
index 49d091445..3631c4c78 100644
--- a/source/common/thirdparty/math/pow.c
+++ b/source/common/thirdparty/math/pow.c
@@ -387,8 +387,7 @@ extern double NAN;
 extern double NEGZERO;
 #endif
 
-double c_pow( x, y )
-double x, y;
+double c_pow(double x, double y)
 {
 double w, z, W, Wa, Wb, ya, yb, u;
 /* double F, Fa, Fb, G, Ga, Gb, H, Ha, Hb */
@@ -768,8 +767,7 @@ return( z );
 
 
 /* Find a multiple of 1/16 that is within 1/16 of x. */
-static double reduc(x)
-double x;
+static double reduc(double x)
 {
 double t;
 
diff --git a/source/common/thirdparty/math/powi.c b/source/common/thirdparty/math/powi.c
index d4d5a07f6..75a22f8f1 100644
--- a/source/common/thirdparty/math/powi.c
+++ b/source/common/thirdparty/math/powi.c
@@ -78,9 +78,7 @@ int signbit();
 #endif
 extern double NEGZERO, INFINITY, MAXNUM, MAXLOG, MINLOG, LOGE2;
 
-double c_powi( x, nn )
-double x;
-int nn;
+double c_powi(double x, int nn)
 {
 int n, e, sign, asign, lx;
 double w, y, s;
diff --git a/source/common/thirdparty/math/sin.c b/source/common/thirdparty/math/sin.c
index 76c6a1938..4b4275f2e 100644
--- a/source/common/thirdparty/math/sin.c
+++ b/source/common/thirdparty/math/sin.c
@@ -238,8 +238,7 @@ extern double INFINITY;
 #endif
 
 
-double c_sin(x)
-double x;
+double c_sin(double x)
 {
 double y, z, zz;
 int j, sign;
@@ -318,8 +317,7 @@ return(y);
 
 
 
-double c_cos(x)
-double x;
+double c_cos(double x)
 {
 double y, z, zz;
 int i;
@@ -403,8 +401,7 @@ static unsigned short P648[] = {034513,054170,0176773,0116043,};
 static double P64800 = 4.8481368110953599358991410e-5;
 #endif
 
-double radian(d,m,s)
-double d,m,s;
+double radian(double d, double m, double s)
 {
 
 return( ((d*60.0 + m)*60.0 + s)*P64800 );
diff --git a/source/common/thirdparty/math/sinh.c b/source/common/thirdparty/math/sinh.c
index eb868b765..3b54760c4 100644
--- a/source/common/thirdparty/math/sinh.c
+++ b/source/common/thirdparty/math/sinh.c
@@ -132,8 +132,7 @@ double fabs(), c_exp(), polevl(), p1evl();
 #endif
 extern double INFINITY, MINLOG, MAXLOG, LOGE2;
 
-double c_sinh(x)
-double x;
+double c_sinh(double x)
 {
 double a;
 
diff --git a/source/common/thirdparty/math/sqrt.c b/source/common/thirdparty/math/sqrt.c
index de214aff0..67f7376f1 100644
--- a/source/common/thirdparty/math/sqrt.c
+++ b/source/common/thirdparty/math/sqrt.c
@@ -78,8 +78,7 @@ double frexp(), ldexp();
 #endif
 extern double SQRT2;  /*  _sqrt2 = 1.41421356237309504880 */
 
-double c_sqrt(x)
-double x;
+double c_sqrt(double x)
 {
 int e;
 #ifndef UNK
diff --git a/source/common/thirdparty/math/tan.c b/source/common/thirdparty/math/tan.c
index 0b5fecc9c..adeade460 100644
--- a/source/common/thirdparty/math/tan.c
+++ b/source/common/thirdparty/math/tan.c
@@ -220,8 +220,7 @@ extern double PIO4;
 extern double INFINITY;
 extern double NAN;
 
-double c_tan(x)
-double x;
+double c_tan(double x)
 {
 #ifdef MINUSZERO
 if( x == 0.0 )
@@ -240,8 +239,7 @@ return( tancot(x,0) );
 }
 
 
-double c_cot(x)
-double x;
+double c_cot(double x)
 {
 
 if( x == 0.0 )
@@ -253,9 +251,7 @@ return( tancot(x,1) );
 }
 
 
-static double tancot( xx, cotflg )
-double xx;
-int cotflg;
+static double tancot(double xx, int cotflg)
 {
 double x, y, z, zz;
 int j, sign;
diff --git a/source/common/thirdparty/math/tanh.c b/source/common/thirdparty/math/tanh.c
index 1836d35cc..92452c10f 100644
--- a/source/common/thirdparty/math/tanh.c
+++ b/source/common/thirdparty/math/tanh.c
@@ -128,8 +128,7 @@ double fabs(), c_exp(), polevl(), p1evl();
 #endif
 extern double MAXLOG;
 
-double c_tanh(x)
-double x;
+double c_tanh(double x)
 {
 double s, z;