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
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
|
=encoding utf8
=cut
package Math::Symbolic::ExportConstants;
use 5.006;
use strict;
use warnings;
require Exporter;
use constant EULER => 2.718281828459045235360287;
use constant PI => 3.141592653589793238462643;
use constant B_SUM => 0;
use constant B_DIFFERENCE => 1;
use constant B_PRODUCT => 2;
use constant B_DIVISION => 3;
use constant U_MINUS => 4;
use constant U_P_DERIVATIVE => 5;
use constant U_T_DERIVATIVE => 6;
use constant B_EXP => 7;
use constant B_LOG => 8;
use constant U_SINE => 9;
use constant U_COSINE => 10;
use constant U_TANGENT => 11;
use constant U_COTANGENT => 12;
use constant U_ARCSINE => 13;
use constant U_ARCCOSINE => 14;
use constant U_ARCTANGENT => 15;
use constant U_ARCCOTANGENT => 16;
use constant U_SINE_H => 17;
use constant U_COSINE_H => 18;
use constant U_AREASINE_H => 19;
use constant U_AREACOSINE_H => 20;
use constant B_ARCTANGENT_TWO => 21;
use constant T_OPERATOR => 0;
use constant T_CONSTANT => 1;
use constant T_VARIABLE => 2;
our @ISA = qw(Exporter);
our %EXPORT_TAGS = (
'all' => [
qw(
EULER
PI
B_SUM
B_DIFFERENCE
B_PRODUCT
B_DIVISION
B_EXP
B_LOG
U_MINUS
U_P_DERIVATIVE
U_T_DERIVATIVE
U_SINE
U_COSINE
U_TANGENT
U_COTANGENT
U_ARCSINE
U_ARCCOSINE
U_ARCTANGENT
U_ARCCOTANGENT
U_SINE_H
U_COSINE_H
U_AREASINE_H
U_AREACOSINE_H
B_ARCTANGENT_TWO
T_OPERATOR
T_CONSTANT
T_VARIABLE
)
]
);
our @EXPORT_OK = ( @{ $EXPORT_TAGS{'all'} } );
our @EXPORT = qw(
);
our $VERSION = '0.612';
1;
__END__
=head1 NAME
Math::Symbolic::ExportConstants - Export constants used for Math::Symbolic
=head1 SYNOPSIS
use Math::Symbolic::ExportConstants qw/:all/;
=head1 DESCRIPTION
This just exports a number of constants on demand.
Usually, you'd want to rather use Math::Symbolic instead.
Math::Symbolic allows you to optionally export the same constants
as this module, but using the ':constants' tag instead of the
':all' tag that you'd have to use with this module.
Please refer to the documentation of the Math::Symbolic module for
a list of constants.
=head2 EXPORT
None by default. But since exporting symbols is the only functionality
of this module, you'll want to export the :all group of constants.
=head1 AUTHOR
Please send feedback, bug reports, and support requests to the Math::Symbolic
support mailing list:
math-symbolic-support at lists dot sourceforge dot net. Please
consider letting us know how you use Math::Symbolic. Thank you.
If you're interested in helping with the development or extending the
module's functionality, please contact the developers' mailing list:
math-symbolic-develop at lists dot sourceforge dot net.
List of contributors:
Steffen Mller, symbolic-module at steffen-mueller dot net
Stray Toaster, mwk at users dot sourceforge dot net
Oliver Ebenhh
=head1 SEE ALSO
New versions of this module can be found on
http://steffen-mueller.net or CPAN. The module development takes place on
Sourceforge at http://sourceforge.net/projects/math-symbolic/
L<Math::Symbolic>
=cut
|
