tioga 1.4

data/tests/tc_FMkr.rb

@@ -0,0 +1,162 @@
+#  tc_FMkr.rb
+
+require 'Tioga/tioga'
+
+require 'test/unit'
+
+class MyPlots
+  
+    include Math
+    include Tioga
+    include FigureConstants
+    
+    attr_reader :t
+
+
+  
+    def initialize
+        @t = FigureMaker.default
+        t.def_figure("Icon_Test") { icon_test }
+        t.def_enter_page_function { enter_page }
+    end
+    
+    def enter_page
+        sz = 8.5
+        t.page_setup(sz*72/2,sz*72/2)
+        t.set_frame_sides(0.15,0.85,0.85,0.15) # left, right, top, bottom in page coords        
+    end
+
+    def icon_test
+        tioga_cool = true
+        # set aspect ratio and font scale depending on whether root figure or not
+        unless t.in_subfigure
+          sz = 4.25; scale = 8
+          t.page_setup(sz*72,sz*72)
+          t.set_frame_sides(0.05,0.95,0.91,0.09) # left, right, top, bottom in page coords
+        else
+          scale = 7   
+        end
+        t.fill_color = SlateGray
+        t.fill_frame
+        margin = 0.02 
+        t.set_subframe('left' => margin, 'right' => margin, 'top' => margin, 'bottom' => margin)
+        t.clip_to_frame
+        saturation = (tioga_cool)? 0.4 : 1
+        starting_L = (tioga_cool)? 0.6 : 0.2
+        ending_L = (tioga_cool)? 0.9 : 1
+        hue = (tioga_cool)? (t.rgb_to_hls(Linen)[0]) : (t.rgb_to_hls(SlateGray)[0])
+        t.axial_shading(
+              'start_point' => [0, 0],
+              'end_point' => [0, 1], 
+              'colormap' => t.create_gradient_colormap(
+                              'hue' => hue,
+                              'saturation' => saturation, 
+                              'starting_L' => starting_L, 
+                              'ending_L' => ending_L)
+              )
+        t.stroke_color = Black
+        t.line_width = 8 
+        t.stroke_frame
+        angle = 60; size = 3.5; shift = -1.0
+        t.show_text('text' => '\sffamily\textbf{Ruby}', 'side' => BOTTOM, 'pos' => 0.27, 'shift' => shift,
+            'scale' => size, 'angle' => angle)
+        t.show_text('text' => '\sffamily\textbf{PDF}', 'side' => BOTTOM, 'pos' => 0.58, 'shift' => shift,
+            'scale' => size, 'angle' => angle)
+        t.show_text('text' => '\textbf{\TeX}', 'side' => BOTTOM, 'pos' => 0.86, 'shift' => shift,
+            'scale' => size, 'angle' => angle)
+        x = t.bounds_xmin + 0.5 * t.bounds_width
+        y = 0.68
+        t.line_width = 2
+        t.fill_opacity = 0.6
+        t.show_marker('font' => Helvetica, 'string' => 'Tioga', 'scale' => scale, 'point' => [x+0.03,y-0.28],
+            'color' => Grey,
+            'mode' => FILL, 'horizontal_scale' => 0.9, 'vertical_scale' => -0.4, 'italic_angle' => -7)
+        t.show_marker('font' => Times_Roman, 'string' => 'Compare this to the file samples/Icon.pdf', 
+            'scale' => 0.7, 'point' => [x,0.95], 'color' => Crimson)
+        t.fill_opacity = 1.0
+        t.show_marker(
+              'font' => Helvetica_BoldOblique, 'string' => 'Tioga', 
+              'scale' => scale, 'point' => [x+0.02,y],
+              'mode' => STROKE_AND_CLIP, 'horizontal_scale' => 0.9)
+        if tioga_cool
+          t.axial_shading( # this fills the 'Tioga' string
+              'start_point' => [0, -0.06],
+              'end_point' => [0, 1.4], 
+              'colormap' => t.rainbow_colormap)
+        else
+          t.axial_shading( # this fills the 'Tioga' string
+              'start_point' => [0, 0.4],
+              'end_point' => [0, 2.3], 
+              'colormap' => t.rainbow_colormap)
+        end
+    end
+
+end
+
+class TestFMkr < Test::Unit::TestCase
+
+    def test_fmkr
+        MyPlots.new.t.make_pdf("Icon")
+        puts " "
+        puts " "
+        puts " "
+        puts ">>> NOTE: please look at tests/Icon_Test.pdf and compare it to samples/Icon.pdf"
+    end
+    
+    def do_one_string(tst)
+        compressed = Flate.compress(tst)
+        puts "compressed from #{tst.size} to #{compressed.size}"
+        expanded = Flate.expand(compressed)
+        assert_equal(tst, expanded)
+    end
+
+    # Returns the real file name of a given file.
+    def real_file_name(file_name)
+      dir = File.dirname(__FILE__)
+      if dir.empty?
+        return file_name
+      else
+        return "#{dir}/#{file_name}"
+      end
+    end
+
+    def test_flate
+        puts ''
+        do_one_string('')
+        do_one_string('A test string')
+        do_one_string('A longer string might actually become a little smaller when compressed')
+        file = File.open(real_file_name('dvector_test.data'))
+        str = file.read
+        do_one_string(str)
+    end
+
+    # A test function for the new scheme of Hash specifications
+    def test_arguments
+      a = { 'biniou' => 0,
+        'stuff' => '->biniou'.to_sym,
+      }
+      b = MyPlots.new.t.prepare_argument_hash(a, {})
+      assert_equal(b['stuff'], 0)
+      assert_equal(b['biniou'], 0)
+    end
+
+end
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+

data/tests/tc_Flate.rb

@@ -0,0 +1,45 @@
+#  tc_Dtable.rb
+
+require 'test/unit'
+
+class TestDtable < Test::Unit::TestCase
+
+  def make_data(size = 10000) 
+    srand # intitialize the random seed...
+    data = ""
+    i = 0
+    while i < size
+      # not efficicent, but this will have to do ;-) !
+      data += [rand(256)].pack("C")
+      i += 1
+    end
+    return data
+  end
+
+  def test_compression_decompression
+    data = make_data
+    data_compressed = Flate.compress(data)
+    data_second = Flate.expand(data_compressed)
+    assert_equal(data_second, data)
+  end
+
+end
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+

data/tests/tc_Function.rb

@@ -0,0 +1,111 @@
+require 'Dobjects/Function'
+require 'test/unit'
+
+class TestFunction < Test::Unit::TestCase
+  include Dobjects
+
+  def test_sorted
+    x_1 = Dvector[1,2,3]
+    x_2 = Dvector[1,3,2]
+    f_1 = Function.new(x_1, x_2)
+    f_2 = Function.new(x_2, x_1)
+    
+    assert(f_1.sorted?)
+    assert(! f_2.sorted?)
+  end
+
+  NUMBER = 20
+
+  def test_joint_sort
+    x_1 = Dvector.new(NUMBER)
+    x_1.collect! { |x|
+      rand
+    }
+    x_2 = x_1.dup
+    Function.joint_sort(x_1,x_2)
+    NUMBER.times do |i|
+      assert_equal(x_1[i],x_2[i])
+    end
+
+    f = Function.new(x_1,x_2)
+    assert(f.sorted?)
+  end
+
+  def test_point
+    x = Dvector[1,3,2]
+    y = Dvector[2,3,4]
+    f = Function.new(x,y)
+    p = f.point(2)
+    assert_equal(p[0],2.0)
+    assert_equal(p[1],4.0)
+    f.sort
+    p = f.point(2)
+    assert_equal(p[0],3.0)
+    assert_equal(p[1],3.0)
+  end
+
+  def test_bounds
+    x_1 = Dvector[1,2,3,4]
+    x_2 = Dvector[1,9,2,0.1]
+    f = Function.new(x_1, x_2)
+    assert_equal(f.bounds, [1,0.1,4,9])
+  end
+
+  def test_strip
+    x = Dvector[1,3,2,4]
+    y = Dvector[2,3,4,5]
+    x[1] = 0.0/0.0
+    y[2] = 0.0/0.0
+    f = Function.new(x,y)
+    assert_equal(f.strip_nan, 2)
+    assert_equal(f.x, Dvector[1,4])
+    assert_equal(f.y, Dvector[2,5])
+  end
+
+  def test_monotonic
+    x = Dvector[1,3,2,4,5,6]
+    y = x.dup
+    f = Function.new(x,y)
+    ary = f.split_monotonic
+    assert_equal(ary.size, 3)
+    x = Dvector[1,3]
+    assert_equal(ary[0].x, x)
+    x = Dvector[3,2]
+    assert_equal(ary[1].x, x)
+    x = Dvector[2,4,5,6]
+    assert_equal(ary[2].x, x)
+  end
+
+  def test_integrate
+    x = Dvector[1,2,4]
+    y = Dvector[0,1,2]
+    f = Function.new(x,y)
+    # integral should be 0.5 + 1.5 * 2
+    assert_equal(f.integrate, 3.5)
+    assert_equal(f.integrate(0,1), 0.5)
+    assert_equal(f.integrate(1,2), 3)
+
+    g = f.primitive
+    assert_equal(f.x, g.x)
+  end
+
+  def test_length
+    x = Dvector[1,2,4]
+    y = Dvector[0,1,2]
+    f = Function.new(x,y)
+    assert_equal(f.size, 3)
+    assert_equal(f.length, 3)
+  end
+
+  def test_distance
+    f = Function.new(Dvector[0],Dvector[0])
+    assert_equal(f.distance(3,4), 5.0)
+    f = Function.new(Dvector[0,1],Dvector[0,1])
+    assert_equal(f.distance(1,1), 0.0)
+    assert_equal(f.distance(0,1), 1.0)
+    assert_equal(f.distance(1,0), 1.0)
+    assert_equal(f.distance(1,0), 1.0)
+  end
+
+  # There is unfortunately no simple way to test the interpolations...
+end

data/tests/ts_Tioga.rb

@@ -0,0 +1,38 @@
+#  ts_Tioga.rb
+
+
+require 'Tioga/tioga'
+
+puts "This is the test suite for Tioga #{Tioga::FigureMaker.version}"
+# We add this directory to the current search path
+$: << File.dirname(__FILE__)
+
+
+require 'test/unit'
+
+require 'tc_FMkr.rb'
+
+require 'tc_Dvector.rb'
+
+require 'tc_Dtable.rb'
+
+require 'tc_Flate.rb'
+
+require 'tc_Function.rb'
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+

metadata

@@ -0,0 +1,163 @@
+--- !ruby/object:Gem::Specification 
+rubygems_version: 0.9.0
+specification_version: 1
+name: tioga
+version: !ruby/object:Gem::Version 
+  version: "1.4"
+date: 2007-01-25 00:00:00 +01:00
+summary: Tioga - a powerful scientific plotting library
+require_paths: 
+- lib
+email: 
+homepage: http://www.kitp.ucsb.edu/~paxton/tioga.html
+rubyforge_project: 
+description: 
+autorequire: 
+default_executable: 
+bindir: split/scripts
+has_rdoc: false
+required_ruby_version: !ruby/object:Gem::Version::Requirement 
+  requirements: 
+  - - ">"
+    - !ruby/object:Gem::Version 
+      version: 0.0.0
+  version: 
+platform: ruby
+signing_key: 
+cert_chain: 
+post_install_message: 
+authors: []
+
+files: 
+- split/symbols.c
+- split/Tioga/pdfcoords.c
+- split/Tioga/makers.c
+- split/Tioga/axes.c
+- split/Tioga/init.c
+- split/Tioga/figures.c
+- split/Tioga/pdfcolor.c
+- split/Tioga/pdffile.c
+- split/Tioga/pdf_font_dicts.c
+- split/Tioga/pdfimage.c
+- split/Tioga/pdftext.c
+- split/Tioga/symbols.c
+- split/Tioga/pdfpath.c
+- split/Tioga/texout.c
+- split/Function/symbols.c
+- split/Function/function.c
+- split/Function/joint_qsort.c
+- split/Dvector/dvector.c
+- split/Dvector/symbols.c
+- split/Dtable/symbols.c
+- split/Dtable/dtable.c
+- split/Flate/symbols.c
+- split/Flate/flate.c
+- split/namespace.h
+- split/defs.h
+- split/symbols.h
+- split/safe_double.h
+- split/Tioga/pdfs.h
+- split/Tioga/figures.h
+- split/Tioga/symbols.h
+- split/Tioga/defs.h
+- split/Tioga/safe_double.h
+- split/Tioga/namespace.h
+- split/Tioga/dvector.h
+- split/Tioga/dtable.h
+- split/Tioga/flate.h
+- split/Function/defs.h
+- split/Function/symbols.h
+- split/Function/safe_double.h
+- split/Function/namespace.h
+- split/Function/dvector.h
+- split/Dvector/dvector_intern.h
+- split/Dvector/symbols.h
+- split/Dvector/defs.h
+- split/Dvector/safe_double.h
+- split/Dvector/namespace.h
+- split/Dvector/include/dvector.h
+- split/Dtable/dtable_intern.h
+- split/Dtable/symbols.h
+- split/Dtable/defs.h
+- split/Dtable/safe_double.h
+- split/Dtable/namespace.h
+- split/Dtable/dvector.h
+- split/Dtable/include/dtable.h
+- split/Flate/flate_intern.h
+- split/Flate/symbols.h
+- split/Flate/defs.h
+- split/Flate/safe_double.h
+- split/Flate/namespace.h
+- split/Flate/include/flate.h
+- split/extconf.rb
+- split/mkmf2.rb
+- split/Tioga/mk_tioga_sty.rb
+- split/Tioga/extconf.rb
+- split/Tioga/lib/Rectangles.rb
+- split/Tioga/lib/Colorbars.rb
+- split/Tioga/lib/Shading.rb
+- split/Tioga/lib/Arcs_and_Circles.rb
+- split/Tioga/lib/MarkerConstants.rb
+- split/Tioga/lib/FigureConstants.rb
+- split/Tioga/lib/FigMkr.rb
+- split/Tioga/lib/Legends.rb
+- split/Tioga/lib/Strokes.rb
+- split/Tioga/lib/Coordinate_Conversions.rb
+- split/Tioga/lib/Special_Paths.rb
+- split/Tioga/lib/Creating_Paths.rb
+- split/Tioga/lib/Using_Paths.rb
+- split/Tioga/lib/X_and_Y_Axes.rb
+- split/Tioga/lib/irb_tioga.rb
+- split/Tioga/lib/Colormaps.rb
+- split/Tioga/lib/tioga_ui.rb
+- split/Tioga/lib/Utils.rb
+- split/Tioga/lib/Figures_and_Plots.rb
+- split/Tioga/lib/Page_Frame_Bounds.rb
+- split/Tioga/lib/Executive.rb
+- split/Tioga/lib/TeX_Text.rb
+- split/Tioga/lib/tioga.rb
+- split/Tioga/lib/Markers.rb
+- split/Tioga/lib/tioga_ui_cmds.rb
+- split/Tioga/lib/Images.rb
+- split/Tioga/lib/Doc.rb
+- split/Tioga/lib/TexPreamble.rb
+- split/Tioga/lib/Titles_and_Labels.rb
+- split/Tioga/lib/Transparency.rb
+- split/Tioga/lib/ColorConstants.rb
+- split/Function/extconf.rb
+- split/Function/lib/Function_extras.rb
+- split/Dvector/extconf.rb
+- split/Dvector/lib/Numeric_extras.rb
+- split/Dvector/lib/Dvector_extras.rb
+- split/Dtable/extconf.rb
+- split/Dtable/lib/Dtable_extras.rb
+- split/Flate/extconf.rb
+- tests/dvector_test.data
+- tests/dtable_test.data
+- tests/tc_Dtable.rb
+- tests/tc_Flate.rb
+- tests/tc_FMkr.rb
+- tests/ts_Tioga.rb
+- tests/dvector_read_test.data
+- tests/tc_Function.rb
+- tests/tc_Dvector.rb
+- Tioga_README
+- lgpl.txt
+test_files: 
+- tests/ts_Tioga.rb
+rdoc_options: []
+
+extra_rdoc_files: []
+
+executables: 
+- tioga
+extensions: 
+- split/Flate/extconf.rb
+- split/Tioga/extconf.rb
+- split/Dvector/extconf.rb
+- split/Dtable/extconf.rb
+- split/Function/extconf.rb
+requirements: []
+
+dependencies: []
+