Changeset 3744

Timestamp:

12/28/07 23:56:28 (5 years ago)

Author:

cho45

Message:

lang/ruby/hyde/test/hyde_test.rb,
lang/ruby/hyde/lib/hyde.rb:

Add units.

Location:

lang/ruby/hyde

Files:

• lib/hyde.rb (modified) (2 diffs)
• test/hyde_test.rb (modified) (2 diffs)

lang/ruby/hyde/lib/hyde.rb

@@ -1 +1 @@
 
 module Hyde
+        Units = {
+#               :metre      => 1,
+                :m          => 1,
+                :hyde       => 1.56,
+                :barleycorn => 0.008467 ,
+                :inch       => 0.0254   ,
+                :feet       => 0.3048   ,
+                :yard       => 0.9144   ,
+                :pole       => 5.0292   ,
+                :chain      => 20.1168  ,
+                :furlong    => 201.168  ,
+                :mile       => 1609.344 ,
+                :league     => 4828.032 ,
+        }
 
-        # convert unit hyde to metre
-        def hyde_to_m(hyde)
-                hyde * 1.56
+        Prefix = {
+                :Y  => 1e24,
+                :Z  => 1e21,
+                :E  => 1e18,
+                :P  => 1e15,
+                :T  => 1e12,
+                :G  => 1e9,
+                :M  => 1e6,
+                :k  => 1e3,
+                :h  => 1e2,
+                :da => 1e1,
+                :d  => 1e-1,
+                :c  => 1e-2,
+                :m  => 1e-3,
+                :u  => 1e-6,
+                :n  => 1e-9,
+                :p  => 1e-12,
+                :f  => 1e-15,
+                :a  => 1e-18,
+                :z  => 1e-21,
+                :y  => 1e-24,
+        }
+
+        Units.each do |u, v|
+                module_eval <<-EOS
+                        def metre_to_#{u}(m)
+                                m / Units[:#{u}]
+                        end
+                        module_function :metre_to_#{u}
+
+                        def #{u}_to_metre(t)
+                                t * Units[:#{u}]
+                        end
+                        module_function :#{u}_to_metre
+
+                        def hyde_to_#{u}(hyde)
+                                metre_to_#{u}(hyde_to_metre(hyde))
+                        end
+                        module_function :hyde_to_#{u}
+
+                        def #{u}_to_hyde(t)
+                                metre_to_hyde(#{u}_to_metre(t))
+                        end
+                        module_function :#{u}_to_hyde
+                EOS
         end
-        module_function :hyde_to_m
-
-        # convert unit metre to hyde
-        def m_to_hyde(m)
-                m / 1.56
-        end
-        module_function :m_to_hyde
 
         module NumericExtension
@@ -30 +79 @@
 
                 def convert(a)
-                        _, num, unit = */([\d.]+)([ck]?m|hyde)/.match(a)
+                        _, num, prefix, unit = */([\d.]+)(#{Prefix.keys.join("|")})?(#{Units.keys.join("|")})/o.match(a)
                         num = num.to_f
-                        case unit
-                        when "m"
-                                "#{Hyde.m_to_hyde(num)}hyde"
-                        when "cm"
-                                "#{Hyde.m_to_hyde(num / 100)}hyde"
-                        when "km"
-                                "#{Hyde.m_to_hyde(num * 1000)}hyde"
-                        when "hyde"
-                                "#{Hyde.hyde_to_m(num) * 100}cm"
+                        num *= Prefix[prefix.to_sym] if prefix
+                        if unit == "hyde"
+                                "%.1fcm" % [Hyde.hyde_to_metre(num) * 100]
+                        else
+                                "%.1fhyde" % [Hyde.send("#{unit}_to_hyde", num)]
                         end
                 end

lang/ruby/hyde/test/hyde_test.rb

@@ -4 +4 @@
 class HydeTest < Test::Unit::TestCase
         def test_convert
+                assert_equal 1.56, Hyde.hyde_to_metre(1),    "hyde must be 156cm"
                 assert_equal 1.56, Hyde.hyde_to_m(1),    "hyde must be 156cm"
                 assert_equal    1, Hyde.m_to_hyde(1.56), "156cm must be hyde"
+                assert_equal 0.008467, Hyde.barleycorn_to_metre(1)
+                assert_equal  0.0254, Hyde.inch_to_metre(1)
+                assert_equal  0.3048, Hyde.feet_to_metre(1)
+                assert_equal  0.9144, Hyde.yard_to_metre(1)
+                assert_equal  5.0292, Hyde.pole_to_metre(1)
+                assert_equal  20.1168, Hyde.chain_to_metre(1)
+                assert_equal  201.168, Hyde.furlong_to_metre(1)
+                assert_equal  1609.344, Hyde.mile_to_metre(1)
+                assert_equal  4828.032, Hyde.league_to_metre(1)
         end
 
@@ -18 +28 @@
                 assert_equal "1.0hyde", c.convert("1.56m")
                 assert_equal "1.0hyde", c.convert("0.00156km")
+                assert_equal "1.0hyde", c.convert("5.11811024feet")
         end
 end