DCT/Menu.pm

   1 # menu for DCT, by Shiar
   2
   3 # 2004-09-15 23:32 - moved from 1.6 main
   4
   5 package DCT::Menu;
   6
   7 use strict;
   8 use utf8;
   9
  10 use vars qw($VERSION @ISA @EXPORT);
  11 require Exporter;
  12
  13 @ISA = qw(Exporter);
  14 @EXPORT = qw(@menus);
  15
  16 $VERSION = 1.006.002;
  17
  18 our @menus = (
  19         [qw(refresh math>8 prog> mode>7 unit>11)],
  20         [qw(main>0 log alog ln exp sin cos tan 0 asin acos atan)], #1 math
  21         [qw(main>0 dec bin oct hex logic>3 bit>4)], #2 base
  22         [qw(base>2 and or xor not)], #3 base logic
  23         [qw(base>2 rl sl asr sr rr)], #4 base bit
  24         [qw(base>2 rlb slb srb rrb)], #5 base byte
  25         [qw(main>0 sq sqrt ^ xroot)], #6
  26         [qw(main>0 number_format angle_measure coord_system)], #7 mode
  27         [qw(main>0
  28                 vector> matrix> list> hyperbolic>9 real>10 base>2
  29                 probability> fft> complex> constants>
  30         )], #8 math
  31         [qw(math>8
  32                 sinh cosh tanh asinh acosh atanh
  33                 expm lnp1
  34         )], #9 math hyperbolic
  35         [qw(math>8
  36                 % %ch %t min max mod
  37                 abs sign mant xpon ip fp
  38                 rnd trnc floor ceil r>d d>r
  39         )], #10 math real
  40         [qw(main>0
  41                 tools> length>12 area>13 volume>14 time>15 speed>16
  42                 mass>17 force>18 energy>19 power>20 pressure>21 temperature>22
  43                 electric_current>23 angle>24 light>25 radiation>26 viscosity>27
  44         )], #11 units
  45 #               mm cm m in ft yd km mile mmile lt-yr mil Ang fermi rod fath)],
  46         [qw(unit>11
  47                 _m _cm _mm _yd _ft _in _Mpc _pc _lyr _au _km _mi
  48                 _nmi _miUS _chain _rd _fath _ftUS _Mil _μ _Å _fermi
  49         )], #12 length
  50         [qw(unit>11
  51                 _m^2 _cm^2 _b _yd^2 _ft^2 _in^2
  52                 _km^2 _ha _a _mi^2 _miUS^2 _acre
  53         )], #13 area
  54         [qw(unit>11
  55                 _m^3 _st _cm^3 _yd^3 _ft^3 _in^3
  56                 _l _galUK _galC _gal _qt _pt
  57                 _ml _cu _ozfl _ozUK _tbsp _tsp
  58                 _bbl _bu _pk _fbm
  59         )], #14 volume
  60         [qw(unit>11
  61                 _yr _d _h _min _s _Hz
  62         )], #15 time
  63         [qw(unit>11
  64                 _m/s _cm/s _ft/s _kph _mph _knot
  65                 _c _ga
  66         )], #16 speed
  67         [qw(unit>11
  68                 _kg _g _Lb _oz _slug _lbt
  69                 _ton _tonUS _t _ozt _ct _grain
  70                 _u _mol
  71         )], #17 mass
  72         [qw(unit>11
  73                 _N _dyn _gf _kip _lbf _pdl
  74         )], #18 force
  75         [qw(unit>11
  76                 _J _erg _Kcal _Cal _Btu _ftxlbf
  77                 _therm _MeV _eV
  78         )], #19 energy
  79         [qw(unit>11
  80                 _W _hp
  81         )], #20 power
  82         [qw(unit>11
  83                 _Pa _atm _bar _psi _torr _mmHg
  84                 _inHg _inH2O
  85         )], #21 pressure
  86         [qw(unit>11
  87         )], #22 temperature
  88         [qw(unit>11
  89         )], #23 electric_current
  90         [qw(unit>11
  91         )], #24 angle
  92         [qw(unit>11
  93         )], #25 light
  94         [qw(unit>11
  95         )], #26 radiation
  96         [qw(unit>11
  97         )], #27 viscosity
  98 ); # @menus
  99
 100 1;
 101