rubypost 0.0.1

data/README

@@ -0,0 +1,14 @@
+#RubyPost 0.0.1 README
+
+Run
+
+rake
+
+to build the gem, then install the gem into your ruby installation.  
+This is a very early version, it's likely to undergo some significant
+modifications.  Currently working is the graphing part
+
+
+
+
+

data/lib/drawable.rb

@@ -0,0 +1,230 @@
+require 'matrix'
+#require 'vector'
+
+
+module RubyPost
+
+#rubypost drawable
+#base class for anything that actually gets drawn on a figure
+class Drawable < Object
+  
+  attr_reader :draw_type
+  
+  def initialize
+    @options = Array.new
+    @draw_type = 'draw'
+  end
+  
+  #normal path draw
+  def draw
+    @draw_type = 'draw'
+    self
+  end
+  
+  #fill the path
+  def fill
+    @draw_type = 'fill'
+    self
+  end
+  
+  #arrowhead at end of the path
+  def arrow
+    @draw_type = 'drawarrow'
+    self
+  end
+  
+  #arrowhead at both ends
+  def dblarrow
+    @draw_type = 'drawdblarrow'
+    self
+  end
+  
+  def add_option(o)
+    @options.push(o)
+    self
+  end
+  
+  #utility function to compile all the options
+  def compile_options
+    str = String.new
+    @options.each { |o| str = str + ' ' + o.compile }
+    return str
+  end
+  
+  #macro for setting the colour of a drawable
+  def colour(r,g,b)
+    add_option(Colour.new(r,g,b))
+    self
+  end
+  
+  #macro for setting the colour of a drawable.
+  #Spelt incorrectly.
+  def color(r,g,b)
+    colour(r,g,b)
+  end
+  
+  #macro for scaling a drawable.  This is the
+  #same as using add_option(Scale.new(s))
+  def scale(s)
+    add_option(Scale.new(s))
+    self
+  end
+  
+  #macro for translating a drawable.  This is the
+  #same as using add_option(Translate.new(x,y))
+  def translate(x,y)
+    add_option(Translate.new(x,y))
+    self
+  end
+  
+  #macro for rotating a drawable.  This is the
+  #same as using add_option(Rotate.new(a))
+  def rotate(a)
+    add_option(Rotate.new(a))
+    self
+  end
+  
+end
+
+#A custom drawable.  Send it a metapost string
+class CustomDrawable < Drawable
+  
+  attr_writer :command
+  
+  def initialize(c=String.new)
+    super()
+    @command = c
+  end
+  
+  def compile
+    @command.compile + compile_options + ";\n"
+  end
+  
+end
+
+#Cartesion point.
+class Pair < Drawable
+  
+  attr  :x
+  attr  :y
+  
+  #Can set the value and individual scales of the x and y point 
+  def initialize(x=0,y=0)
+    super()
+    @x = x
+    @y = y
+  end
+  
+  def compile
+    '(' + @x.compile + ', ' + @y.compile  + ')'
+  end
+  
+  #returns the addition of the pairs
+  def +(p)
+    Pair.new(@x + p.x, @y + p.y)
+  end
+  
+  #returns the subtraction of the pairs
+  def -(p)
+    Pair.new(@x - p.x, @y - p.y)
+  end
+  
+  #returns the pair multiplied by a scalar
+  def *(n)
+    Pair.new(@x*n, @y*n)
+  end
+  
+  #returns the pair divided by a scalar
+  def /(n)
+    Pair.new(@x/n, @y/n)
+  end
+    
+  #returns true if the pairs are equal
+  def ==(p)
+    @x == p.x && @y == p.y 
+  end
+  
+end
+
+#sequence of pairs connected as a metapost path
+class Path < Drawable
+  
+  def initialize
+    super
+    @p = Array.new
+    straight
+  end
+  
+  def add_pair(p)
+    @p.push(p)
+  end
+  
+  #returns a pair that is the centroid of the pairs
+  #of this path
+  def center(p)
+    ret = Pair.new
+    @p.each { |p| ret = ret + p }
+    return ret/p.length
+  end
+  
+  #reverse the path. <br> 
+  #Note, this reverses the pairs that have so far
+  #been added.  Anything added after calling reverse
+  #will be appended to the end of the array as usual
+  def reverse
+    @p = @p.reverse
+    self
+  end
+  
+  #set the path to have straight line segments
+  def straight
+    @line_type = '--'
+    self
+  end
+  
+  #set the path to have curved line segments
+  def curved
+    @line_type = '..'
+    self
+  end
+  
+  def compile
+    str = '('
+    (@p.length-1).times do |i|
+      str = str + @p[i].compile + @line_type
+    end
+    str = str + @p[-1].compile + ')'
+    str = str + compile_options + ";"
+    str
+  end
+
+end
+
+#Wraps teh metapost unitsquare command
+class Square < Path
+  
+  def initialize
+    super
+    @p.push(Pair.new(-0.5,-0.5))
+    @p.push(Pair.new(-0.5,0.5))
+    @p.push(Pair.new(0.5,0.5))
+    @p.push(Pair.new(0.5,-0.5))
+    @p.push('cycle')
+  end
+  
+end
+
+#Wraps the metapost fullcircle command
+class Circle < Drawable
+  
+  def initialize
+    super
+  end
+  
+  def compile
+    'fullcircle ' + compile_options + ";\n"
+  end
+  
+end
+
+end

data/lib/graph.rb

@@ -0,0 +1,289 @@
+
+module RubyPost
+
+#wrapper for the metapost graphing macro
+#multiple coordinate systems in a single graph is not yet supported
+#May require pre and post options for graph data which doesn't have
+#a neat solution.  You can ofcourse, still do this with a CustomDrawable.
+class Graph < Drawable
+
+  #automattically sets the size of the graph to 10cm x 10cm 
+  def initialize
+      super
+      @dati  = Array.new
+      $Inputs.add_input('graph')
+      $Inputs.add_input('sarith')
+      self.set_size(10,10)
+  end
+  
+  def add_data(d)
+    @dati.push(d)
+  end
+    
+  #set the size of the graph in cm  
+  def set_size(w,h)
+    @width = w
+    @height = h
+  end
+  
+  def compile
+      str = "begingraph(" + @width.to_s + "cm, " + @height.to_s + "cm);\n"
+      str = str + compile_options + "\n"
+      @dati.each do |d| 
+        str = str + d.compile_pre_commands + "gdraw " + d.compile + d.compile_post_commands + "\n"
+      end
+      str = str + "endgraph;\n"
+      str
+  end
+
+end
+
+#Base class for all graph data.  There are some commands, such as autogrid
+#that must be called after the data is entered with gdraw.  There are others that
+#must be set before the call, such as setcoords.  These macro ensure that order
+#is maintained
+class BaseGraphData < Drawable
+  
+  def initialize
+    super
+    @pre_commands = Array.new
+    @post_commands = Array.new
+  end
+  
+  def add_pre_command(c)
+    @pre_commands.push(c)
+  end
+  
+  def add_post_command(c)
+    @post_commands.push(c)
+  end
+  
+  def compile_pre_commands
+    str = String.new
+    @pre_commands.each { |c| str = str + c.compile }
+    return str
+  end
+  
+  #add a grid to the graph.  This is always done as a post command
+  #in metapost
+  def add_grid(grid)
+    add_post_command(grid)
+  end
+  
+  def add_range(range)
+    add_pre_command(range)
+  end
+  
+  def add_coords(coords)
+    add_pre_command(coords)
+  end
+  
+  def compile_post_commands
+    str = String.new
+    @post_commands.each { |c| str = str + c.compile }
+    return str
+  end
+  
+end
+
+  
+
+#set the x and y coordinates arrays independently
+#This uses temp files in order to store and create
+#the graph.  Graphs created with this type of data
+#need to be compiled directly to postscript using
+#RubyPost::File#compile_to_ps unless you want to
+#copy all of the temporay files too!
+class GraphData < BaseGraphData
+  
+  attr_writer :x, :y
+  
+  #class variable to store the number of the temporary
+  #files used and keep the filenames separate
+  @@graph_data_temp_file = 0
+  
+  #must make a copy of the arrays as it will be compiled
+  #at some latter time and the referenced memory may not
+  #be around then!
+  def initialize(x=Array.new,y=Array.new)
+    super()
+    @x = Array.new(x)
+    @y = Array.new(y)
+    @filename = 'temp_graph_data_' + @@graph_data_temp_file.to_s + '.txt'
+    @@graph_data_temp_file = @@graph_data_temp_file+1
+  end
+  
+  #creates the tempory file with the graph data and send this to the
+  #metapost file.  Also note that we force scientific notation for the
+  #number format as it is ,most compatible with metapost graph.
+  def compile
+    min = [@x.length, @y.length].min
+    IO::File.open(@filename, 'w') do |f|
+      min.times { |i| f.puts sprintf("%e", @x[i]) + ' ' + sprintf("%e", @y[i]) }
+    end
+    "\"" + @filename + "\" " + compile_options + ";"
+  end
+  
+end
+
+#Implements the graph data filename macro
+class GraphFile < BaseGraphData
+  
+  attr_writer :filename
+  
+   def initialize(filename=nil)
+     super()
+     @filename = filename
+   end
+   
+   def compile
+    "\"" + @filename + "\" " + compile_options + ";"
+   end
+   
+end
+
+
+#class for the special options related to graph paths
+class GraphDataOption < PathOption
+end
+
+#wraps the plot option for the graph macro
+class Plot < GraphDataOption
+  
+  attr_writer :dot_type
+  
+  #default is a latex bullet
+  def initialize(p='btex $\bullet$ etex')
+    @dot_type = p
+  end
+  
+  def compile
+    'plot ' + @dot_type
+  end
+  
+end
+
+#Option extention for graphs
+class GraphOption < Option
+end
+
+#set the axis coords, can be log or linear scale
+class Coords < GraphOption
+
+  def initialize(x='linear',y='linear')
+    @x = x
+    @y = y
+  end
+  
+  def loglog
+    @x = 'log'
+    @y = 'log'
+  end
+  
+  def linearlinear
+    @x = 'log'
+    @y = 'log'
+  end
+  
+  def linearlog
+    @x = 'linear'
+    @y = 'log'
+  end
+  
+  def loglinear
+    @x = 'log'
+    @y = 'linear'
+  end
+  
+  def compile
+    'setcoords(' + @x + ',' + @y + ");\n"
+  end
+  
+end
+
+
+#wraps the setrange function in metapost
+#can use strings or numbers.
+class Range < GraphOption
+  
+  attr_writer :xmin, :xmax, :ymin, :ymax
+  
+  def initialize(xmin='whatever', ymin='whatever', xmax='whatever', ymax='whatever')
+    @xmin = xmin
+    @xmax = xmax
+    @ymin = ymin
+    @ymax = ymax
+  end
+  
+  def compile
+    'setrange(' + @xmin.to_s + ', ' + @ymin.to_s + ', ' + @xmax.to_s + ', ' + @ymax.to_s + ");\n"
+  end
+  
+end
+
+
+#set the position and type of grid tick marks and labels
+class AutoGrid < Drawable
+
+  attr_writer :x, :y
+
+  def initialize(x=String.new, y=String.new)
+    super()
+    @x = x
+    @y = y
+  end
+  
+  def compile
+    'autogrid(' + @x + ', ' + @y + ")" + compile_options + ";\n"
+  end
+  
+end
+
+#base class for graph labels
+class GraphLabel < GraphOption
+  
+  attr_writer :label
+  
+  def initialize(label=nil)
+    @label = label
+  end
+  
+end
+
+#place an x label on the graph
+class XLabel < GraphLabel
+  
+  def compile
+    'glabel.bot(' + @label + ", OUT);\n"
+  end
+
+end
+
+#place an y label on the graph
+class YLabel < GraphLabel
+  
+  def compile
+    'glabel.lft(' + @label + ", OUT);\n"
+  end
+
+end
+
+#place an y label on the right hand side of the graph
+class YLabelRight < GraphLabel
+  
+  def compile
+    'glabel.rt(' + @label + ", OUT);\n"
+  end
+
+end
+
+#place a title on the top of the graph
+class GraphTitle < GraphLabel
+  
+  def compile
+    'glabel.top(' + @label + ", OUT);\n"
+  end
+  
+end
+
+end

data/lib/objects.rb

@@ -0,0 +1,161 @@
+module RubyPost
+
+#base class for rubypost
+class Object
+  #returns the string of metapost commmands
+  def compile
+    '%compile not implemented for ' + self.class.to_s
+  end
+end
+
+#stores the macros that particular drawbles need.
+#This should really be a private class.
+class Macros < Object
+  
+  def initialize
+    @inputs = Hash.new
+  end
+  
+  #uses hash to make sure we never input same thing twice 
+  def add_input(s)
+    @inputs[s] = nil
+  end
+  
+  def compile
+    str = String.new
+    @inputs.each_key do
+      |k| str = str + "input " + k + ";\n"
+    end
+    str
+  end
+  
+end
+
+#global module variable to be altered by drawables that
+#need a particular metapost macro input.  
+$Inputs = Macros.new
+
+#metapost file
+#A metapost file can contain many figures.
+#Notes: Filenames cannot contain underscores for view to work! <br>
+#compile_to_str has a dodgy backspace handler.
+class File < Object
+  
+  attr_writer :fname
+  
+  @@start_of_file = "prologues := 2;\n"
+  
+  #input 'sarith' so that metapost can read exponential notation
+  def initialize(fname = nil)
+     @figures = Array.new
+     @fname = fname
+  end
+  
+  #add a new figure to this mpost file
+  def add_figure(f)
+    @figures.push(f)
+  end
+  
+  #returns the mp file as a str
+  def compile_to_string
+    str = @@start_of_file + $Inputs.compile
+    @figures.each_index do
+      |i| str = str + 'beginfig(' + (i+1).to_s + ");\n" + @figures[i].compile + "\n"
+    end
+    str = str + "end;\n"
+    #remove the backspaces
+    strback = str.gsub(/.[\b]/, '')
+    if (strback==nil) 
+      return str
+    else 
+      return strback 
+    end
+  end
+  
+  #writes the string of metapost commands to a file named 'fname.mp'
+  def compile_to_file(fname=@fname)
+    @fname = fname
+    IO::File.open(fname + '.mp','w') { |f| f.puts self.compile_to_string }
+  end
+  
+  #calls compile_to_file and writes the
+  #and copmiles the metapost commands if mpost is in the path
+  def compile(fname=@fname)
+    compile_to_file(fname)
+    system('mpost -quiet ' + fname + '.mp')
+  end
+  
+  #default view command is view_dvi
+  def view
+    view_dvi
+  end
+  
+  #assumes that the file has already been compiled by metapost.  ie compile_to_ps
+  #has already been called.  This assumes that the yap viewer and tex is in your path. Install
+  #miktex to get these by default. <p>
+  #Notes: Filenames cannot contain underscores for view_dvi to work.  The "tex mproof" will
+  #not work with underscores
+  def view_dvi
+    str = 'tex mproof'
+    @figures.each_index { |i| str = str + ' ' + @fname + '.' + (i+1).to_s }
+    system(str)
+    system('yap mproof.dvi')
+  end
+  
+end
+
+#wrapper for the metapost figure
+#Figures actually become the figures that will to be viewed
+class Figure < Object
+  
+  def initialize
+    @drawables = Array.new
+  end
+  
+  def add_drawable(d)
+    @drawables.push(d)
+  end
+  
+  def compile
+     str = String.new
+    @drawables.each do |d| 
+      str = str + d.draw_type + ' ' + d.compile +  "\n"
+    end
+    str = str + "endfig;\n"
+    return str
+  end
+  
+end
+
+end
+
+#Add the compile functionality to Ruby Numeric.  Calling
+#compile will add the cm, inch, bp metapost sizes to the
+#to_s 
+class Numeric
+  def cm
+    @mpsize = 'cm'
+    self
+  end
+  def inch
+    @mpsize = 'inch'
+    self
+  end
+  def bp
+    @mpsize = 'bp'
+    self
+  end
+  #A nifty thing here is that if you dont specify the size
+  #if wont print anything
+  def compile
+    to_s + @mpsize.to_s
+  end
+end
+
+#Add the compile functionality to Ruby String class
+#it just calls to_s
+class String
+  def compile
+    to_s
+  end
+end

data/lib/options.rb

@@ -0,0 +1,177 @@
+
+module RubyPost
+
+#return the string s wrapped in btex etex
+def latex(s)
+  'btex ' + s + ' etex'
+end
+
+#options for rubypost drawables.  These wrap metapose commands 
+#such as 'withpen', 'scaled' and etc
+class Option < Object
+end
+
+#Can insert pure metapost option commands here.
+class CustomOption < Option
+  def initialize
+    @command = String.new
+  end
+  
+  def initialize(c=Sting.new)
+    @command = c
+  end
+  
+  def compile
+    @command.compile
+  end
+  
+end
+
+#wrapper for the metapost withcolor command
+#Except colour is now spelt correctly.
+class Colour < Option
+  
+  attr :r
+  attr :g
+  attr :b
+  
+  def initialize(r=0,g=0,b=0)
+    @r = r
+    @g = g
+    @b = b
+  end
+  
+  def compile
+    'withcolor' + '(' + @r.to_s + ',' + @g.to_s + ',' + @b.to_s + ')'
+  end
+  
+end
+
+#incorrectly spelt Colour alias
+class Color < Colour
+end
+
+
+#wraps the metapost withpen command
+class Pen < Option
+  
+  attr_writer :pen_type, :scale
+  
+  def initialize(pt='pencircle', scale  = 1)
+    @pen_type = pt
+    @scale = scale
+  end
+  
+  def compile
+    'withpen ' + @pen_type + ' scaled ' + @scale.compile
+  end
+  
+end
+
+#base class for options related to paths
+class PathOption < Option
+end
+
+#dased path
+#there are a plethora of dashing options.  Only implemented
+#evenly at present.
+class Dashed < PathOption
+  
+  def initialize(t='evenly')
+      @type = t
+  end
+  
+  #evenly dashed line
+  def evenly
+    @type = 'evenly'
+    self
+  end
+  
+  #dahed line with dots inbetween dashes
+  def withdots
+    @type = 'withdots'
+    self
+  end
+  
+  #set the type with the metapost command s.
+  def type(s)
+    @type = s
+    self
+  end
+  
+  def compile
+    'dashed ' + @type
+  end
+  
+end
+
+#Wrapped the scaled metapost command.
+#Resizes the drawable.
+class Scale < Option
+  
+  attr_writer :scale
+  
+  def initialize(scale=1)
+    @scale = scale
+  end
+  
+  def compile
+    'scaled ' + @scale.compile
+  end
+  
+end
+
+#Scale alias
+class Scaled < Scale
+end
+
+#Wraps the rotated metapost command
+class Rotate < Option
+  
+  attr_writer :degrees
+  
+  def initialize(degrees=0)
+    @degrees = degrees
+  end
+  
+  #set the angle in radiians
+  def radians=(rads)
+    @degrees = 180.0*rads/Math::PI
+    self
+  end
+  
+  def compile
+    'rotated ' + @degrees.to_s
+  end
+  
+end
+
+#Rotate alias
+class Rotated < Rotate
+end
+
+#Wraps the metapose shifted command. <br>
+#The translation @t is specifed by a Pair
+class Translate < Option
+  
+  attr_writer :t
+  
+  def initialize(p=Pair.new)
+    @t = p
+  end
+  
+  def compile
+    'shifted ' + @t.compile
+  end
+  
+end
+
+#Translate alias
+class Shifted < Translate
+end
+  
+#Translate alias
+class Shift < Translate
+end
+
+end

data/lib/redefine_float_to_s_for_metapost.rb

@@ -0,0 +1,10 @@
+
+#metapost cannot handle expoential notation for float
+#strings.  This redefines the Float#to_s so that it is
+#compatible with metapost.
+class Float
+  alias_method :orig_to_s, :to_s
+  def to_s
+    sprintf("%.#{5}f", self)
+  end
+end

data/lib/revert_float_to_s.rb

@@ -0,0 +1,6 @@
+  #puts Float#to_s back to it's original state
+  class Float
+    def to_s
+      orig_to_s
+    end
+  end

data/lib/rubypost.rb

@@ -0,0 +1,5 @@
+#load the rest of rubypost
+require 'objects'
+require 'drawable'
+require 'options'
+require 'graph'

data/tests/test_cricle.rb

@@ -0,0 +1,24 @@
+#require 'rubygems'
+#gem 'rubypost'
+#require 'rubypost'
+
+#load the rest of rubypost
+require '../lib/objects'
+require '../lib/drawable'
+require '../lib/options'
+
+include RubyPost
+
+#note, can't use underscores in filenames if you are going
+#to use File#view.  tex mproof breaks
+file = RubyPost::File.new('testcircle')
+
+#draw a circle
+fig1 = Figure.new
+file.add_figure(fig1)
+circle1 = RubyPost::Circle.new.scale(1.cm)
+fig1.add_drawable(circle1)
+
+puts file.compile_to_string
+file.compile
+file.view

data/tests/test_graph.rb

@@ -0,0 +1,30 @@
+#code to generate a plot of the data in metapost format
+require 'rubypost'
+require 'drawable'
+require 'options'
+require 'graph'
+
+include RubyPost
+
+file = RubyPost::File.new
+fig = Figure.new
+file.add_figure(fig)
+
+graph = Graph.new
+graph.add_option(XLabel.new(latex('x label')))
+graph.add_option(GraphTitle.new(latex('A graph title')))
+graph.add_option(YLabel.new(latex('the y label')))
+graph.add_option(YLabelRight.new(latex('the y label on the right')))
+fig.add_drawable(graph)
+
+#plot y = x^2
+x = (1..20).to_a
+y = Array.new
+x.each { |v| y.push(v**2) }
+gd = GraphData.new(x, y)
+gd.add_option(RubyPost::Colour.new(0.0,1.0,0.0))
+graph.add_data(gd)
+
+file.compile('figures')
+
+file.view

data/tests/test_pair.rb

@@ -0,0 +1,31 @@
+require 'test/unit'
+
+#require 'rubygems'
+#gem 'rubypost'
+#require 'rubypost'
+
+#load the rest of rubypost
+require '../lib/objects'
+require '../lib/drawable'
+require '../lib/options'
+
+include RubyPost
+
+
+class TestPair < Test::Unit::TestCase
+  def testcompare
+    assert_equal(Pair.new(1,2), Pair.new(1,2))
+  end
+  def testadd
+    assert_equal(Pair.new(3,5), Pair.new(1,2)+Pair.new(2,3))
+  end
+  def testsubtract
+    assert_equal(Pair.new(3,5), Pair.new(4,4)-Pair.new(1,-1))
+  end
+  def testmultiply
+    assert_equal(Pair.new(2,2), Pair.new(4,4)*0.5)
+  end
+  def testdivide
+    assert_equal(Pair.new(2,2), Pair.new(4,4)/2)
+  end
+end

data/tests/test_path.rb

@@ -0,0 +1,116 @@
+#require 'rubygems'
+#gem 'rubypost'
+#require 'rubypost'
+
+#load the rest of rubypost
+require '../lib/objects'
+require '../lib/drawable'
+require '../lib/options'
+
+include RubyPost
+
+#note, can't use underscores in filenames if you are going
+#to use File#view.  tex mproof breaks
+file = RubyPost::File.new('testpath')
+
+#draw a curved path
+fig1 = Figure.new
+file.add_figure(fig1)
+path = Path.new
+path.curved
+8.times{ |i| path.add_pair(Pair.new(i.cm, ((i/4.0)**2).cm)) }
+fig1.add_drawable(path)
+
+#draw the same path but with an arrow at the end
+fig2 = Figure.new
+file.add_figure(fig2)
+arrow = Path.new.arrow
+arrow.curved
+8.times{ |i| arrow.add_pair(Pair.new(i.cm, ((i/4.0)**2).cm)) }
+fig2.add_drawable(arrow)
+
+#draw the same path but with an arrow on both ends
+fig3 = Figure.new
+file.add_figure(fig3)
+#see the ruby reference for clone symatics
+arrow2 = arrow.clone
+arrow2.dblarrow
+fig3.add_drawable(arrow2)
+
+#draw the same path but with an arrow at the start
+#this is achieved by reversing the path
+fig4 = Figure.new
+file.add_figure(fig4)
+#see the ruby reference for clone symatics
+arrow3 = arrow.clone
+arrow3.reverse
+fig4.add_drawable(arrow3)
+
+#draw the arrow but scale it by 0.5 and make it dashed
+fig5 = Figure.new
+file.add_figure(fig5)
+arrow4 = Path.new.arrow
+arrow4.add_option(Scale.new(0.5))
+arrow4.add_option(Dashed.new)
+8.times{ |i| arrow4.add_pair(Pair.new(i.cm, ((i/4.0)**2).cm)) }
+fig5.add_drawable(arrow4)
+
+#draw the same arrow but scale it by 0.5 and rotate 140 degrees
+#and make it red
+fig6 = Figure.new
+file.add_figure(fig6)
+arrow5 = Path.new.arrow
+arrow5.add_option(Rotate.new(140))
+arrow5.add_option(Scale.new(0.5))
+arrow5.add_option(Colour.new(1.0,0.0,0.0))
+8.times{ |i| arrow5.add_pair(Pair.new(i.cm, ((i/4.0)**2).cm)) }
+fig6.add_drawable(arrow5)
+
+#draw arrow5 again and draw another arrow but translate right by 5cm.
+#note the order of translation and rotation is important.
+#also make the colour blue and use a square pen that is
+#thickened by a factor of 2
+fig7 = Figure.new
+file.add_figure(fig7)
+arrow6 = Path.new.arrow
+arrow6.add_option(Rotate.new(140))
+arrow6.add_option(Scale.new(0.5))
+arrow6.add_option(Translate.new(Pair.new(5.0.cm,0.0)))
+arrow6.add_option(Colour.new(0.0,0.0,1.0))
+arrow6.add_option(Pen.new('pensquare', 2.0))
+8.times{ |i| arrow6.add_pair(Pair.new(i.cm, ((i/4.0)**2).cm)) }
+fig7.add_drawable(arrow6)
+fig7.add_drawable(arrow5)
+
+#draw the path, make it cycle
+fig8 = Figure.new
+file.add_figure(fig8)
+cycled_path = Path.new
+8.times{ |i| cycled_path.add_pair(Pair.new(i.cm, ((i/3.0)**2).cm)) }
+cycled_path.add_pair('cycle')
+fig8.add_drawable(cycled_path)
+
+#draw the path, make it cycle and filled with colour
+fig9 = Figure.new
+file.add_figure(fig9)
+filled_path = Path.new.fill
+8.times{ |i| filled_path.add_pair(Pair.new(i.cm, ((i/3.0)**2).cm)) }
+filled_path.add_pair('cycle')
+fig9.add_drawable(filled_path)
+
+#draw the path, make it cycle and filled with colour
+fig10 = Figure.new
+file.add_figure(fig10)
+test_center = Path.new
+test_center.add_pair(Pair.new(0.0,0.0))
+test_center.add_pair(Pair.new(0.0,3.0.cm))
+test_center.add_pair(Pair.new(3.0.cm,3.0.cm))
+test_center.add_pair(Pair.new(3.0.cm,0.0))
+test_center.add_pair(Pair.new('cycle'))
+
+filled_path.add_pair('cycle')
+fig10.add_drawable(filled_path)
+
+puts file.compile_to_string
+file.compile
+file.view

data/tests/test_square.rb

@@ -0,0 +1,44 @@
+#require 'rubygems'
+#gem 'rubypost'
+#require 'rubypost'
+
+#load the rest of rubypost
+require '../lib/objects'
+require '../lib/drawable'
+require '../lib/options'
+
+include RubyPost
+
+#note, can't use underscores in filenames if you are going
+#to use File#view.  tex mproof breaks
+file = RubyPost::File.new('testsquare')
+
+#draw a square
+fig1 = Figure.new
+file.add_figure(fig1)
+square1 = RubyPost::Square.new.scale(1.cm)
+fig1.add_drawable(square1)
+
+#draw a curved path
+fig2 = Figure.new
+file.add_figure(fig2)
+square2 = RubyPost::Square.new
+square2.add_option(Rotate.new(45))
+square2.add_option(Scale.new(2.cm))
+square2.add_option(Colour.new(1.0,0.0,1.0))
+square2.add_option(Dashed.new)
+square2.add_option(Pen.new('pencircle', 2.0))
+fig2.add_drawable(square2)
+
+#draw a green filled square
+#we are using the colour method for Drawable.  It actually just
+#calls add_option(Colour.new(r,g,b))
+fig3 = Figure.new
+file.add_figure(fig3)
+square3= RubyPost::Square.new.fill.scale(1.cm).colour(0.0,1.0,0.0)
+fig3.add_drawable(square3)
+
+
+puts file.compile_to_string
+file.compile
+file.view

metadata

@@ -0,0 +1,58 @@
+--- !ruby/object:Gem::Specification 
+rubygems_version: 0.9.2
+specification_version: 1
+name: rubypost
+version: !ruby/object:Gem::Version 
+  version: 0.0.1
+date: 2008-01-22 00:00:00 +10:00
+summary: Ruby wrapper for the MetaPost drawing language
+require_paths: 
+- lib
+email: harprobey@gmail.com
+homepage: 
+rubyforge_project: 
+description: 
+autorequire: lib/rubypost
+default_executable: 
+bindir: bin
+has_rdoc: true
+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: 
+- Robby McKilliam
+files: 
+- tests/test_cricle.rb
+- tests/test_graph.rb
+- tests/test_pair.rb
+- tests/test_path.rb
+- tests/test_square.rb
+- lib/drawable.rb
+- lib/graph.rb
+- lib/objects.rb
+- lib/options.rb
+- lib/redefine_float_to_s_for_metapost.rb
+- lib/revert_float_to_s.rb
+- lib/rubypost.rb
+- README
+test_files: 
+- tests/test_path.rb
+rdoc_options: []
+
+extra_rdoc_files: 
+- README
+executables: []
+
+extensions: []
+
+requirements: []
+
+dependencies: []
+