1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
|
double ADIntr_Partials[ADINTR_MAX_FUNC][ADINTR_MAX_PARTIALS] = {
{ 0.0, 0.0, 0.0, 0.0, 0.0 } /* acos */,
{ 0.0, 0.0, 0.0, 0.0, 0.0 } /* acosh */,
{ 0.0, 0.0, 0.0, 0.0, 0.0 } /* asin */,
{ 0.0, 0.0, 0.0, 0.0, 0.0 } /* asinh */,
{ 0.0, 0.0, 0.0, 0.0, 0.0 } /* atan */,
{ 0.0, 0.0, 0.0, 0.0, 0.0 } /* atan2 */,
{ 0.0, 0.0, 0.0, 0.0, 0.0 } /* atanh */,
{ 0.0, 0.0, 0.0, 0.0, 0.0 } /* ceil */,
{ 0.0, 0.0, 0.0, 0.0, 0.0 } /* cos */,
{ 0.0, 0.0, 0.0, 0.0, 0.0 } /* cosh */,
{ 0.0, 0.0, 0.0, 0.0, 0.0 } /* exp */,
{ 0.0, 0.0, 0.0, 0.0, 0.0 } /* fabs */,
{ 0.0, 0.0, 0.0, 0.0, 0.0 } /* floor */,
{ 0.0, 0.0, 0.0, 0.0, 0.0 } /* fmod */,
{ 0.0, 0.0, 0.0, 0.0, 0.0 } /* frexp */,
{ 0.0, 0.0, 0.0, 0.0, 0.0 } /* ldexp */,
{ 0.0, 0.0, 0.0, 0.0, 0.0 } /* log */,
{ 0.0, 0.0, 0.0, 0.0, 0.0 } /* log10 */,
{ 0.5, 0.5, 0.0, 0.0, 0.0 } /* max */,
{ 0.5, 0.5, 0.0, 0.0, 0.0 } /* min */,
{ 1.0, 0.0, 0.0, 0.0, 0.0 } /* modf */,
{ 0.0, 0.0, 0.0, 0.0, 0.0 } /* pow */,
{ 0.0, 0.0, 0.0, 0.0, 0.0 } /* sin */,
{ 0.0, 0.0, 0.0, 0.0, 0.0 } /* sinh */,
{ 0.0, 0.0, 0.0, 0.0, 0.0 } /* sqrt */,
{ 0.0, 0.0, 0.0, 0.0, 0.0 } /* tan */,
{ 0.0, 0.0, 0.0, 0.0, 0.0 } /* tanh */,
{ 0.5, 0.5, 0.0, 0.0, 0.0 } /* fmax */,
{ 0.5, 0.5, 0.0, 0.0, 0.0 } /* fmin */
};
|
