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