Index: math.c
===================================================================
RCS file: /repository/php4/ext/standard/math.c,v
retrieving revision 1.41
diff -u -r1.41 math.c
--- math.c	6 Jun 2001 13:05:51 -0000	1.41
+++ math.c	31 Jul 2001 23:24:52 -0000
@@ -152,8 +152,6 @@
 	}
 }
 /* }}} */
-
-
 /* {{{ proto double sin(double number)
    Returns the sine of the number in radians */
 
@@ -265,6 +263,107 @@
 }
 
 /* }}} */
+/* {{{ proto double sinh(double number)
+   Returns the hyperbolic sine of the number,
+   defined as (exp(number) - exp(-number))/2 */
+
+PHP_FUNCTION(sinh)
+{
+	zval **num;
+
+	if (ZEND_NUM_ARGS() != 1 || zend_get_parameters_ex(1, &num) == FAILURE) {
+		WRONG_PARAM_COUNT;
+	}
+	convert_to_double_ex(num);
+	return_value->value.dval = sinh((*num)->value.dval);
+	return_value->type = IS_DOUBLE;
+}
+
+/* }}} */
+/* {{{ proto double cosh(double number)
+   Returns the hyperbolic cosine of the number,
+   defined as (exp(number) + exp(-number))/2 */
+
+PHP_FUNCTION(cosh)
+{
+	zval **num;
+
+	if (ZEND_NUM_ARGS() != 1 || zend_get_parameters_ex(1, &num) == FAILURE) {
+		WRONG_PARAM_COUNT;
+	}
+	convert_to_double_ex(num);
+	return_value->value.dval = cosh((*num)->value.dval);
+	return_value->type = IS_DOUBLE;
+}
+/* }}} */
+/* {{{ proto double tanh(double number)
+   Returns the hyperbolic tangent of the number,
+   defined as sinh(number)/cosh(number) */
+PHP_FUNCTION(tanh)
+{
+	zval **num;
+
+	if (ZEND_NUM_ARGS() != 1 || zend_get_parameters_ex(1, &num) == FAILURE) {
+		WRONG_PARAM_COUNT;
+	}
+	convert_to_double_ex(num);
+	return_value->value.dval = tanh((*num)->value.dval);
+	return_value->type = IS_DOUBLE;
+}
+
+/* }}} */
+/* {{{ proto double asinh(double number)
+   Returns the inverse hyperbolic sine of the number,
+   i.e. the value whose hyperbolic sine is number */
+
+PHP_FUNCTION(asinh)
+{
+	zval **num;
+
+	if (ZEND_NUM_ARGS() != 1 || zend_get_parameters_ex(1, &num) == FAILURE) {
+		WRONG_PARAM_COUNT;
+	}
+	convert_to_double_ex(num);
+	return_value->value.dval = asinh((*num)->value.dval);
+	return_value->type = IS_DOUBLE;
+}
+
+/* }}} */
+/* {{{ proto double acosh(double number)
+   Returns the inverse hyperbolic cosine of the number,
+   i.e. the value whose hyperbolic cosine is number */
+
+PHP_FUNCTION(acosh)
+{
+	zval **num;
+
+	if (ZEND_NUM_ARGS() != 1 || zend_get_parameters_ex(1, &num) == FAILURE) {
+		WRONG_PARAM_COUNT;
+	}
+	convert_to_double_ex(num);
+	return_value->value.dval = acosh((*num)->value.dval);
+	return_value->type = IS_DOUBLE;
+}
+
+/* }}} */
+/* {{{ proto double atanh(double number)
+   Returns the inverse hyperbolic tangent of the number,
+   i.e. the value whose hyperbolic tangent is number */
+
+PHP_FUNCTION(atanh)
+{
+	zval **num;
+
+	if (ZEND_NUM_ARGS() != 1 || zend_get_parameters_ex(1, &num) == FAILURE) {
+		WRONG_PARAM_COUNT;
+	}
+	convert_to_double_ex(num);
+	return_value->value.dval = atanh((*num)->value.dval);
+	return_value->type = IS_DOUBLE;
+}
+
+/* }}} */
+
 /* {{{ proto double pi(void)
    Returns an approximation of pi */
 
@@ -307,6 +406,76 @@
 }
 
 /* }}} */
+/* {{{ proto double exp2(double number)
+   Returns 2 raised to the power of the number */
+
+PHP_FUNCTION(exp2)
+{
+	zval **num;
+
+	if (ZEND_NUM_ARGS() != 1 || zend_get_parameters_ex(1, &num) == FAILURE) {
+		WRONG_PARAM_COUNT;
+	}
+	convert_to_double_ex(num);
+	// libc function is broken in RH Linux 6.1, glibc 2.1.3
+	//return_value->value.dval = exp2((*num)->value.dval);
+	return_value->value.dval = pow(2.0,(*num)->value.dval);
+	return_value->type = IS_DOUBLE;
+}
+
+/* }}} */
+/* {{{ proto double exp10(double number)
+   Returns 10 raised to the power of the number */
+
+PHP_FUNCTION(exp10)
+{
+	zval **num;
+
+	if (ZEND_NUM_ARGS() != 1 || zend_get_parameters_ex(1, &num) == FAILURE) {
+		WRONG_PARAM_COUNT;
+	}
+	convert_to_double_ex(num);
+	// libc function is broken in RH Linux 6.1, glibc 2.1.3
+	//return_value->value.dval = exp10((*num)->value.dval);
+	return_value->value.dval = pow(10.0,(*num)->value.dval);
+	return_value->type = IS_DOUBLE;
+}
+
+/* }}} */
+/* {{{ proto double expm1(double number)
+   Returns exp(number) - 1, computed in a way that accurate even when 
+   the value of number is close to zero */
+
+PHP_FUNCTION(expm1)
+{
+	zval **num;
+
+	if (ZEND_NUM_ARGS() != 1 || zend_get_parameters_ex(1, &num) == FAILURE) {
+		WRONG_PARAM_COUNT;
+	}
+	convert_to_double_ex(num);
+	return_value->value.dval = expm1((*num)->value.dval);
+	return_value->type = IS_DOUBLE;
+}
+
+/* }}} */
+/* {{{ proto double log1p(double number)
+   Returns log(1 + number), computed in a way that accurate even when 
+   the value of number is close to zero */
+
+PHP_FUNCTION(log1p)
+{
+	zval **num;
+
+	if (ZEND_NUM_ARGS() != 1 || zend_get_parameters_ex(1, &num) == FAILURE) {
+		WRONG_PARAM_COUNT;
+	}
+	convert_to_double_ex(num);
+	return_value->value.dval = log1p((*num)->value.dval);
+	return_value->type = IS_DOUBLE;
+}
+
+/* }}} */
 /* {{{ proto double log(double number)
    Returns the natural logarithm of the number */
 
@@ -323,6 +492,24 @@
 }
 
 /* }}} */
+/* {{{ proto double log2(double number)
+   Returns the base-2 logarithm of the number */
+
+PHP_FUNCTION(log2)
+{
+	zval **num;
+
+	if (ZEND_NUM_ARGS() != 1 || zend_get_parameters_ex(1, &num) == FAILURE) {
+		WRONG_PARAM_COUNT;
+	}
+	convert_to_double_ex(num);
+	// libc function is broken in RH Linux 6.1, glibc 2.1.3
+	//return_value->value.dval = log2((*num)->value.dval);
+	return_value->value.dval = log((*num)->value.dval)/log(2.0);
+	return_value->type = IS_DOUBLE;
+}
+
+/* }}} */
 /* {{{ proto double log10(double number)
    Returns the base-10 logarithm of the number */
 
@@ -355,6 +542,40 @@
 }
 
 /* }}} */
+/* {{{ proto double cbrt(double number)
+   Returns the cubic root of the number */
+
+PHP_FUNCTION(cbrt)
+{
+	zval **num;
+
+	if (ZEND_NUM_ARGS() != 1 || zend_get_parameters_ex(1, &num) == FAILURE) {
+		WRONG_PARAM_COUNT;
+	}
+	convert_to_double_ex(num);
+	return_value->value.dval = cbrt((*num)->value.dval);
+	return_value->type = IS_DOUBLE;
+}
+
+/* }}} */
+/* {{{ proto double hypot(double num1, double num2)
+   Returns sqrt( num1*num1 + num2*num2) */
+
+PHP_FUNCTION(hypot)
+{
+	zval **num1, **num2;
+
+	if (ZEND_NUM_ARGS() != 2 || zend_get_parameters_ex(2, &num1, &num2) == FAILURE) {
+		WRONG_PARAM_COUNT;
+	}
+	convert_to_double_ex(num1);
+	convert_to_double_ex(num2);
+	return_value->value.dval = hypot((*num1)->value.dval, (*num2)->value.dval);
+	return_value->type = IS_DOUBLE;
+}
+
+/* }}} */
+
 /* {{{ proto double deg2rad(double number)
    Converts the number in degrees to the radian equivalent */