jdk/src/java.base/share/native/libjava/StrictMath.c
author darcy
Thu, 17 Sep 2015 13:43:06 -0700
changeset 32655 8dfeae0ff332
parent 25859 3317bb8137f4
child 32765 b65c2f5d4d01
permissions -rw-r--r--
8134795: Port fdlibm pow to Java Reviewed-by: bpb
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
2
90ce3da70b43 Initial load
duke
parents:
diff changeset
     1
/*
32655
8dfeae0ff332 8134795: Port fdlibm pow to Java
darcy
parents: 25859
diff changeset
     2
 * Copyright (c) 1994, 2015, Oracle and/or its affiliates. All rights reserved.
2
90ce3da70b43 Initial load
duke
parents:
diff changeset
     3
 * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
90ce3da70b43 Initial load
duke
parents:
diff changeset
     4
 *
90ce3da70b43 Initial load
duke
parents:
diff changeset
     5
 * This code is free software; you can redistribute it and/or modify it
90ce3da70b43 Initial load
duke
parents:
diff changeset
     6
 * under the terms of the GNU General Public License version 2 only, as
5506
202f599c92aa 6943119: Rebrand source copyright notices
ohair
parents: 4520
diff changeset
     7
 * published by the Free Software Foundation.  Oracle designates this
2
90ce3da70b43 Initial load
duke
parents:
diff changeset
     8
 * particular file as subject to the "Classpath" exception as provided
5506
202f599c92aa 6943119: Rebrand source copyright notices
ohair
parents: 4520
diff changeset
     9
 * by Oracle in the LICENSE file that accompanied this code.
2
90ce3da70b43 Initial load
duke
parents:
diff changeset
    10
 *
90ce3da70b43 Initial load
duke
parents:
diff changeset
    11
 * This code is distributed in the hope that it will be useful, but WITHOUT
90ce3da70b43 Initial load
duke
parents:
diff changeset
    12
 * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
90ce3da70b43 Initial load
duke
parents:
diff changeset
    13
 * FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
90ce3da70b43 Initial load
duke
parents:
diff changeset
    14
 * version 2 for more details (a copy is included in the LICENSE file that
90ce3da70b43 Initial load
duke
parents:
diff changeset
    15
 * accompanied this code).
90ce3da70b43 Initial load
duke
parents:
diff changeset
    16
 *
90ce3da70b43 Initial load
duke
parents:
diff changeset
    17
 * You should have received a copy of the GNU General Public License version
90ce3da70b43 Initial load
duke
parents:
diff changeset
    18
 * 2 along with this work; if not, write to the Free Software Foundation,
90ce3da70b43 Initial load
duke
parents:
diff changeset
    19
 * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA.
90ce3da70b43 Initial load
duke
parents:
diff changeset
    20
 *
5506
202f599c92aa 6943119: Rebrand source copyright notices
ohair
parents: 4520
diff changeset
    21
 * Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA
202f599c92aa 6943119: Rebrand source copyright notices
ohair
parents: 4520
diff changeset
    22
 * or visit www.oracle.com if you need additional information or have any
202f599c92aa 6943119: Rebrand source copyright notices
ohair
parents: 4520
diff changeset
    23
 * questions.
2
90ce3da70b43 Initial load
duke
parents:
diff changeset
    24
 */
90ce3da70b43 Initial load
duke
parents:
diff changeset
    25
90ce3da70b43 Initial load
duke
parents:
diff changeset
    26
#include "jni.h"
90ce3da70b43 Initial load
duke
parents:
diff changeset
    27
#include "fdlibm.h"
90ce3da70b43 Initial load
duke
parents:
diff changeset
    28
90ce3da70b43 Initial load
duke
parents:
diff changeset
    29
#include "java_lang_StrictMath.h"
90ce3da70b43 Initial load
duke
parents:
diff changeset
    30
90ce3da70b43 Initial load
duke
parents:
diff changeset
    31
JNIEXPORT jdouble JNICALL
90ce3da70b43 Initial load
duke
parents:
diff changeset
    32
Java_java_lang_StrictMath_cos(JNIEnv *env, jclass unused, jdouble d)
90ce3da70b43 Initial load
duke
parents:
diff changeset
    33
{
90ce3da70b43 Initial load
duke
parents:
diff changeset
    34
    return (jdouble) jcos((double)d);
90ce3da70b43 Initial load
duke
parents:
diff changeset
    35
}
90ce3da70b43 Initial load
duke
parents:
diff changeset
    36
90ce3da70b43 Initial load
duke
parents:
diff changeset
    37
JNIEXPORT jdouble JNICALL
90ce3da70b43 Initial load
duke
parents:
diff changeset
    38
Java_java_lang_StrictMath_sin(JNIEnv *env, jclass unused, jdouble d)
90ce3da70b43 Initial load
duke
parents:
diff changeset
    39
{
90ce3da70b43 Initial load
duke
parents:
diff changeset
    40
    return (jdouble) jsin((double)d);
90ce3da70b43 Initial load
duke
parents:
diff changeset
    41
}
90ce3da70b43 Initial load
duke
parents:
diff changeset
    42
90ce3da70b43 Initial load
duke
parents:
diff changeset
    43
JNIEXPORT jdouble JNICALL
90ce3da70b43 Initial load
duke
parents:
diff changeset
    44
Java_java_lang_StrictMath_tan(JNIEnv *env, jclass unused, jdouble d)
90ce3da70b43 Initial load
duke
parents:
diff changeset
    45
{
90ce3da70b43 Initial load
duke
parents:
diff changeset
    46
    return (jdouble) jtan((double)d);
90ce3da70b43 Initial load
duke
parents:
diff changeset
    47
}
90ce3da70b43 Initial load
duke
parents:
diff changeset
    48
90ce3da70b43 Initial load
duke
parents:
diff changeset
    49
JNIEXPORT jdouble JNICALL
90ce3da70b43 Initial load
duke
parents:
diff changeset
    50
Java_java_lang_StrictMath_asin(JNIEnv *env, jclass unused, jdouble d)
90ce3da70b43 Initial load
duke
parents:
diff changeset
    51
{
90ce3da70b43 Initial load
duke
parents:
diff changeset
    52
    return (jdouble) jasin((double)d);
90ce3da70b43 Initial load
duke
parents:
diff changeset
    53
}
90ce3da70b43 Initial load
duke
parents:
diff changeset
    54
90ce3da70b43 Initial load
duke
parents:
diff changeset
    55
JNIEXPORT jdouble JNICALL
90ce3da70b43 Initial load
duke
parents:
diff changeset
    56
Java_java_lang_StrictMath_acos(JNIEnv *env, jclass unused, jdouble d)
90ce3da70b43 Initial load
duke
parents:
diff changeset
    57
{
90ce3da70b43 Initial load
duke
parents:
diff changeset
    58
    return (jdouble) jacos((double)d);
90ce3da70b43 Initial load
duke
parents:
diff changeset
    59
}
90ce3da70b43 Initial load
duke
parents:
diff changeset
    60
90ce3da70b43 Initial load
duke
parents:
diff changeset
    61
JNIEXPORT jdouble JNICALL
90ce3da70b43 Initial load
duke
parents:
diff changeset
    62
Java_java_lang_StrictMath_atan(JNIEnv *env, jclass unused, jdouble d)
90ce3da70b43 Initial load
duke
parents:
diff changeset
    63
{
90ce3da70b43 Initial load
duke
parents:
diff changeset
    64
    return (jdouble) jatan((double)d);
90ce3da70b43 Initial load
duke
parents:
diff changeset
    65
}
90ce3da70b43 Initial load
duke
parents:
diff changeset
    66
90ce3da70b43 Initial load
duke
parents:
diff changeset
    67
JNIEXPORT jdouble JNICALL
90ce3da70b43 Initial load
duke
parents:
diff changeset
    68
Java_java_lang_StrictMath_exp(JNIEnv *env, jclass unused, jdouble d)
90ce3da70b43 Initial load
duke
parents:
diff changeset
    69
{
90ce3da70b43 Initial load
duke
parents:
diff changeset
    70
    return (jdouble) jexp((double)d);
90ce3da70b43 Initial load
duke
parents:
diff changeset
    71
}
90ce3da70b43 Initial load
duke
parents:
diff changeset
    72
90ce3da70b43 Initial load
duke
parents:
diff changeset
    73
JNIEXPORT jdouble JNICALL
90ce3da70b43 Initial load
duke
parents:
diff changeset
    74
Java_java_lang_StrictMath_log(JNIEnv *env, jclass unused, jdouble d)
90ce3da70b43 Initial load
duke
parents:
diff changeset
    75
{
90ce3da70b43 Initial load
duke
parents:
diff changeset
    76
    return (jdouble) jlog((double)d);
90ce3da70b43 Initial load
duke
parents:
diff changeset
    77
}
90ce3da70b43 Initial load
duke
parents:
diff changeset
    78
90ce3da70b43 Initial load
duke
parents:
diff changeset
    79
JNIEXPORT jdouble JNICALL
90ce3da70b43 Initial load
duke
parents:
diff changeset
    80
Java_java_lang_StrictMath_log10(JNIEnv *env, jclass unused, jdouble d)
90ce3da70b43 Initial load
duke
parents:
diff changeset
    81
{
90ce3da70b43 Initial load
duke
parents:
diff changeset
    82
    return (jdouble) jlog10((double)d);
90ce3da70b43 Initial load
duke
parents:
diff changeset
    83
}
90ce3da70b43 Initial load
duke
parents:
diff changeset
    84
90ce3da70b43 Initial load
duke
parents:
diff changeset
    85
JNIEXPORT jdouble JNICALL
90ce3da70b43 Initial load
duke
parents:
diff changeset
    86
Java_java_lang_StrictMath_sqrt(JNIEnv *env, jclass unused, jdouble d)
90ce3da70b43 Initial load
duke
parents:
diff changeset
    87
{
90ce3da70b43 Initial load
duke
parents:
diff changeset
    88
    return (jdouble) jsqrt((double)d);
90ce3da70b43 Initial load
duke
parents:
diff changeset
    89
}
90ce3da70b43 Initial load
duke
parents:
diff changeset
    90
90ce3da70b43 Initial load
duke
parents:
diff changeset
    91
JNIEXPORT jdouble JNICALL
90ce3da70b43 Initial load
duke
parents:
diff changeset
    92
Java_java_lang_StrictMath_cbrt(JNIEnv *env, jclass unused, jdouble d)
90ce3da70b43 Initial load
duke
parents:
diff changeset
    93
{
90ce3da70b43 Initial load
duke
parents:
diff changeset
    94
    return (jdouble) jcbrt((double)d);
90ce3da70b43 Initial load
duke
parents:
diff changeset
    95
}
90ce3da70b43 Initial load
duke
parents:
diff changeset
    96
90ce3da70b43 Initial load
duke
parents:
diff changeset
    97
JNIEXPORT jdouble JNICALL
90ce3da70b43 Initial load
duke
parents:
diff changeset
    98
Java_java_lang_StrictMath_atan2(JNIEnv *env, jclass unused, jdouble d1, jdouble d2)
90ce3da70b43 Initial load
duke
parents:
diff changeset
    99
{
90ce3da70b43 Initial load
duke
parents:
diff changeset
   100
    return (jdouble) jatan2((double)d1, (double)d2);
90ce3da70b43 Initial load
duke
parents:
diff changeset
   101
}
90ce3da70b43 Initial load
duke
parents:
diff changeset
   102
90ce3da70b43 Initial load
duke
parents:
diff changeset
   103
JNIEXPORT jdouble JNICALL
90ce3da70b43 Initial load
duke
parents:
diff changeset
   104
Java_java_lang_StrictMath_IEEEremainder(JNIEnv *env, jclass unused,
90ce3da70b43 Initial load
duke
parents:
diff changeset
   105
                                  jdouble dividend,
90ce3da70b43 Initial load
duke
parents:
diff changeset
   106
                                  jdouble divisor)
90ce3da70b43 Initial load
duke
parents:
diff changeset
   107
{
90ce3da70b43 Initial load
duke
parents:
diff changeset
   108
    return (jdouble) jremainder(dividend, divisor);
90ce3da70b43 Initial load
duke
parents:
diff changeset
   109
}
90ce3da70b43 Initial load
duke
parents:
diff changeset
   110
90ce3da70b43 Initial load
duke
parents:
diff changeset
   111
JNIEXPORT jdouble JNICALL
90ce3da70b43 Initial load
duke
parents:
diff changeset
   112
Java_java_lang_StrictMath_cosh(JNIEnv *env, jclass unused, jdouble d)
90ce3da70b43 Initial load
duke
parents:
diff changeset
   113
{
90ce3da70b43 Initial load
duke
parents:
diff changeset
   114
    return (jdouble) jcosh((double)d);
90ce3da70b43 Initial load
duke
parents:
diff changeset
   115
}
90ce3da70b43 Initial load
duke
parents:
diff changeset
   116
90ce3da70b43 Initial load
duke
parents:
diff changeset
   117
JNIEXPORT jdouble JNICALL
90ce3da70b43 Initial load
duke
parents:
diff changeset
   118
Java_java_lang_StrictMath_sinh(JNIEnv *env, jclass unused, jdouble d)
90ce3da70b43 Initial load
duke
parents:
diff changeset
   119
{
90ce3da70b43 Initial load
duke
parents:
diff changeset
   120
    return (jdouble) jsinh((double)d);
90ce3da70b43 Initial load
duke
parents:
diff changeset
   121
}
90ce3da70b43 Initial load
duke
parents:
diff changeset
   122
90ce3da70b43 Initial load
duke
parents:
diff changeset
   123
JNIEXPORT jdouble JNICALL
90ce3da70b43 Initial load
duke
parents:
diff changeset
   124
Java_java_lang_StrictMath_tanh(JNIEnv *env, jclass unused, jdouble d)
90ce3da70b43 Initial load
duke
parents:
diff changeset
   125
{
90ce3da70b43 Initial load
duke
parents:
diff changeset
   126
    return (jdouble) jtanh((double)d);
90ce3da70b43 Initial load
duke
parents:
diff changeset
   127
}
90ce3da70b43 Initial load
duke
parents:
diff changeset
   128
90ce3da70b43 Initial load
duke
parents:
diff changeset
   129
JNIEXPORT jdouble JNICALL
90ce3da70b43 Initial load
duke
parents:
diff changeset
   130
Java_java_lang_StrictMath_hypot(JNIEnv *env, jclass unused, jdouble x, jdouble y)
90ce3da70b43 Initial load
duke
parents:
diff changeset
   131
{
90ce3da70b43 Initial load
duke
parents:
diff changeset
   132
    return (jdouble) jhypot((double)x, (double)y);
90ce3da70b43 Initial load
duke
parents:
diff changeset
   133
}
90ce3da70b43 Initial load
duke
parents:
diff changeset
   134
90ce3da70b43 Initial load
duke
parents:
diff changeset
   135
90ce3da70b43 Initial load
duke
parents:
diff changeset
   136
90ce3da70b43 Initial load
duke
parents:
diff changeset
   137
JNIEXPORT jdouble JNICALL
90ce3da70b43 Initial load
duke
parents:
diff changeset
   138
Java_java_lang_StrictMath_log1p(JNIEnv *env, jclass unused, jdouble d)
90ce3da70b43 Initial load
duke
parents:
diff changeset
   139
{
90ce3da70b43 Initial load
duke
parents:
diff changeset
   140
    return (jdouble) jlog1p((double)d);
90ce3da70b43 Initial load
duke
parents:
diff changeset
   141
}
90ce3da70b43 Initial load
duke
parents:
diff changeset
   142
90ce3da70b43 Initial load
duke
parents:
diff changeset
   143
JNIEXPORT jdouble JNICALL
90ce3da70b43 Initial load
duke
parents:
diff changeset
   144
Java_java_lang_StrictMath_expm1(JNIEnv *env, jclass unused, jdouble d)
90ce3da70b43 Initial load
duke
parents:
diff changeset
   145
{
90ce3da70b43 Initial load
duke
parents:
diff changeset
   146
    return (jdouble) jexpm1((double)d);
90ce3da70b43 Initial load
duke
parents:
diff changeset
   147
}