texlab 0.1.1 → 0.2.0

data/lib/texlab/boot.rb

@@ -1,437 +0,0 @@
-# This is the boot file to be loaded before parsing a .texlab file
-# encoding: ASCII-8bit
-require "easystats"
-require "plusminus"
-require "to_latex"
-require "gnuplot"
-require "open3"
-
-# tweak Array
-class Array
-  def extract_options!
-    if last.is_a? Hash
-      pop
-    else
-      {}
-    end
-  end
-end
-
-# tweak Hash
-class Hash
-  # Object-like behavior
-  def method_missing name, *args
-    name_string = name.to_s
-    case name_string[-1]
-    when "="
-      self[name_string[0..-2].to_sym] = args[0]
-    when "!"
-      self[name_string[0..-2].to_sym] = {}
-    when "?"
-      !! self[name_string[0..-2]]
-    else
-      self[name]
-    end
-  end
-end
-
-module Enumerable
-  # map-hash
-  def mash
-    res = {}
-    each do |*x|
-      k,v = yield(*x)
-      res[k] = v
-    end
-    res
-  end
-end
-
-class Hash
-  def mash! &block
-    replace mash(&block)
-  end
-end
-
-
-# Average method for array with uncertainty calculation
-class Array
-  def average
-    m = mean
-    m.pm(Math.sqrt(m.delta**2 + (standard_deviation*3)**2))
-  end
-end
-
-
-# latex generation helper
-require "texlab/texlabfile"
-
-$_latexfile = TexlabFile.new $_erbout
-
-def documentHeader *args
-  $_latexfile.documentHeader *args
-end
-
-def env *args
-  $_latexfile.env(*args){yield}
-end
-
-def puts string
-  $_erbout << string.to_latex << "\n"
-end
-
-# table generation
-#
-
-def table title, settings={}
-  @_table = {}
-  yield
-  entries = @_table
-
-  unless @_tables
-    $_latexfile.table(entries, title, settings)
-  else
-    @_tables << [entries, title, settings]
-  end
-end
-
-def column title
-  @_table_columns << (@_table_columns.last[title] || {})
-
-  result = yield
-  subcolumns = @_table_columns.pop
-
-  unless subcolumns.empty?
-    result = subcolumns
-  end
-
-  @_table_columns.last[title] = result
-end
-
-def row title
-  @_table_columns = [@_table[title] || {}]
-  yield
-  @_table[title] = @_table_columns.first
-end
-
-def tables *args
-  opts = args.extract_options!
-  caption = args.shift
-
-  @_tables = []
-  yield
-
-  $_latexfile.tables(@_tables, caption, opts)
-
-  @_tables = nil
-end
-
-
-# Figure generation
-#
-
-def figure *args
-  opts = args.extract_options!
-  caption = args.shift
-  format = opts[:width] ? "width=#{opts[:width]}" : opts[:format]
-  label = opts[:label]
-  filename = opts[:filename]
-  if @_figures
-    @_figures << Figure.new(format, filename, caption, label)
-  else
-    raise "not implemented"
-  end
-end
-
-def figures *args
-  opts = args.extract_options!
-  placement = opts.delete(:placement) || "htbp"
-  label = opts.delete(:label)
-  newPageThreshold = opts.delete(:newPageThreshold) || 29
-  caption = args.shift
-
-  @_figures = []
-  yield
-
-  $_latexfile.figures(caption, @_figures, newPageThreshold, placement, label)
-
-  @_figures = nil
-end
-
-
-# plotting
-#
-
-require "gnuplot"
-
-# override to have "w+" mode
-def Gnuplot.open( persist=true )
-  cmd = Gnuplot.gnuplot( persist ) or raise 'gnuplot not found'
-  IO::popen( cmd, "w+") { |io| yield io }
-end 
-
-def plot *args
-  opts = args.extract_options!
-  title = args[0]
-
-  placement = opts.delete(:placement) || (opts[:label] ? "htbp" : "H")
-  width   = opts.delete(:width) || "17cm"
-  height = opts.delete(:height) || "10cm"
-  cmd    = opts.delete(:cmd) || "plot"
-  label = opts.delete(:label)
-
-  env :figure, "[#{placement}]" do
-    env :center do
-      @_datasets = []
-      yield
-      @_datasets
-
-      gnuplot = Gnuplot.gnuplot(true) or raise "gnuplot not found"
-      Open3.popen3(gnuplot) do |gp, out, err, external|
-        gp <<<<-GP
-          set terminal latex size #{width}, #{height}
-        GP
-
-        Gnuplot::Plot.new(gp, cmd) do |plot|
-          opts.each do |key, value|
-            case value
-            when true
-              plot.send key
-            else
-              plot.send key, value.gsub(/([\\ ])/, "\\\\\\1")
-            end
-          end
-
-          @_datasets.each do |ds|
-            plot.data << ds
-          end
-        end
-        gp.close
-        $_erbout << out.readlines.join("\n")
-
-        if not external.value.success?
-          errlines = err.readlines
-          raise "could not plot:\n" + errlines.join("\n")
-        end
-      end
-    end
-    $_erbout << "\\caption{#{title}}" if title
-    $_erbout << "\\label{#{label}}" if label
-  end
-end
-
-def splot *args, &block
-  opts = args.extract_options!
-  opts.cmd = "splot"
-  plot *args, opts, &block
-end
-
-def dataset *args
-  opts = args.extract_options!
-
-  data = args.shift
-  data_is_expr = !!data
-  if data
-    # simple function
-    ds = Gnuplot::DataSet.new data
-  else
-    # data
-    @_datastrings = []
-    yield
-
-    c = @_datastrings.first.count
-    data = (0...c).map do |i|
-      @_datastrings.map{|t|t[i]}
-    end
-
-    ds = Gnuplot::DataSet.new data
-  end
-  
-  # check args
-  raise ArgumentError, "Unnecessary parameters: #{args}" unless args.empty?
-
-  # tweak args (syntax candy)
-  opts[:title] = nil unless data_is_expr or opts.has_key? :title
-  if opts.key? :title and not opts[:title]
-    opts.delete(:title)
-    opts[:notitle] = true
-  end
-
-  # send options
-  opts.each do |key, value|
-    case value
-    when true
-      ds.send key
-    else
-      ds.send :"#{key}=", value
-    end
-  end
-
-  @_datasets << ds
-
-end
-
-def datastring arg
-  @_datastrings << arg
-end
-
-def data *args
-  datastring args
-end
-
-
-# fitting
-def fit expr, opts={}
-  raise "via: is a necessary parameter" if not opts[:via]
-  via = opts[:via]
-  vars = via.split(",")
-
-  using = opts[:using]
-
-  @_datasets = []
-
-  dataset do 
-    yield
-  end
-
-  ds = @_datasets.first
-
-  errlines = []
-  result = {}
-
-  gnuplot = Gnuplot.gnuplot(true) or raise "gnuplot not found"
-  Open3.popen3(gnuplot) do |gp, out, err, external|
-    vars.each do |var|
-      gp << "#{var} = #{rand}\n"
-    end
-    gp <<<<-GP
-      fit #{expr} '-' #{"using " + using if using} via #{via}
-    GP
-    gp << ds.to_gplot
-    gp.close
-    
-    errlines = err.readlines
-    errlines.each do |l|
-      if l =~ /\A([a-zA-Z_][a-zA-Z0-9_]*)\s*=\s*([0-9eE.+-]+)\s*\+\/-\s*([0-9eE.+-]+)/
-        result[$1.to_sym] = $2.to_f.pm($3.to_f)
-      end
-    end
-  end
-
-  vars.map do |v|
-    result[v.to_sym] or raise "could not fit:\n" + errlines.join("\n")
-  end
-end
-
-
-# macros
-
-$_macros={}
-
-# a macro is available in tex (\asdf) and in ruby (:asdf.to_latex or $asdf). It will go to math
-# mode
-def macro hash
-  text_macro hash.mash{|key, value| [key, value.latex!.to_latex_math] }
-end
-
-# a text macro is available in tex (\asdf) and in ruby (:asdf, $asdf). It will not be
-# forced to math mode 
-def text_macro hash
-  hash.each do |key, value|
-    define_latex_macro key, value
-    define_symbol_macro key, value
-    define_global_macro key, value
-  end
-end
-
-def define_symbol_macro key, value
-  $_macros[key] = value
-end
-
-def define_latex_macro key, value
-  $_erbout << "\\def\\#{key}{#{value}}"
-end
-
-def define_global_macro key, value
-  eval "$#{key} = '#{value.gsub("\\","\\\\").gsub("'", "\\'")}'"
-end
-
-class Symbol
-  # symbol's to_latex is the macro with the same name
-  def to_latex
-    $_macros[self] or raise "Undefined macro: #{self}"
-  end
-
-  def + str
-    "#{to_latex}#{str}".latex!.to_latex_math
-  end
-
-  def * unit
-    "\\unit[\\text{#{to_latex}}]{#{unit}}".latex!.to_latex_math
-  end
-end
-
-
-
-
-%w(
-  alpha beta gamma delta epsilon zeta eta theta iota kappa lambda mu nu xi omicron pi rho sigma tau upsilon phi chi psi omega
-).each do |a|
-  [a, a.capitalize].each do |b|
-    key = b.to_sym
-    value = "\\#{b}".latex!.to_latex_math
-    define_symbol_macro key, value
-    define_global_macro key, value
-  end
-end
-
-('a'..'z').each do |a|
-  [a, a.capitalize].each do |b|
-    key = b.to_sym
-    value = "#{b}".latex!.to_latex_math
-    define_symbol_macro key, value
-    define_global_macro key, value
-  end
-end
-
-
-# units
-$_units = {}
-
-def unit hash
-  $_units.update hash
-end
-
-class Symbol
-  def with_unit
-    raise "No unit defined for #{self}" unless $_units[self]
-    self * "(#{$_units[self]})"
-  end
-end
-
-
-
-# debug
-def debug *args
-  args.each {|a| STDERR.puts a.inspect}
-  return *args
-end
-
-# include Math
-include Math
-
-# degree radian
-def degrees x
-  x * 180.0 / Math::PI
-end
-
-def radians x
-  x / 180.0 * Math::PI
-end
-
-
-# tikz
-def tikz *libs
-  $_erbout << "\\usepackage{tikz}\n"
-  $_erbout << "\\usetikzlibrary{#{libs.join(",")}}\n" if libs.any?
-end

data/texlab

@@ -1,3 +0,0 @@
-#!/bin/bash
-
-"$(dirname "$0")/bin/texlab" -g --noplugin -S "$(dirname "$0")/vim/texlab.vim" "$@"

data/texlab.gemspec

@@ -1,92 +0,0 @@
-# Generated by jeweler
-# DO NOT EDIT THIS FILE DIRECTLY
-# Instead, edit Jeweler::Tasks in Rakefile, and run 'rake gemspec'
-# -*- encoding: utf-8 -*-
-
-Gem::Specification.new do |s|
-  s.name = "texlab"
-  s.version = "0.1.1"
-
-  s.required_rubygems_version = Gem::Requirement.new(">= 0") if s.respond_to? :required_rubygems_version=
-  s.authors = ["Bern\u{e1}t Kall\u{f3}"]
-  s.date = "2012-04-09"
-  s.description = "texlab a toolkit based on erb that for creating documents and doing calculations at the same time. It is capable to output the proper number of significant digits, generate tables and plots using gnuplot. It has a simple DSL."
-  s.email = "kallo.bernat@gmail.com"
-  s.executables = ["texlab-compile"]
-  s.extra_rdoc_files = [
-    "LICENSE.txt",
-    "README.rdoc",
-    "README.txt"
-  ]
-  s.files = [
-    ".document",
-    ".rspec",
-    "Gemfile",
-    "Gemfile.lock",
-    "LICENSE.txt",
-    "README.rdoc",
-    "README.txt",
-    "Rakefile",
-    "VERSION",
-    "bin/texlab-compile",
-    "bin/texlab-compile.tex",
-    "bin/texlab-console",
-    "doc/readme.texlab",
-    "lib/texlab.rb",
-    "lib/texlab/boot.rb",
-    "lib/texlab/texlabfile.rb",
-    "spec/spec_helper.rb",
-    "spec/texlab_spec.rb",
-    "texlab",
-    "texlab.gemspec",
-    "vim/texlab.vim"
-  ]
-  s.homepage = "http://github.com/cie/texlab"
-  s.licenses = ["MIT"]
-  s.require_paths = ["lib"]
-  s.rubygems_version = "1.8.15"
-  s.summary = "a tool to create documents with latex and ruby"
-
-  if s.respond_to? :specification_version then
-    s.specification_version = 3
-
-    if Gem::Version.new(Gem::VERSION) >= Gem::Version.new('1.2.0') then
-      s.add_runtime_dependency(%q<rake4latex>, [">= 0"])
-      s.add_runtime_dependency(%q<plusminus>, [">= 0"])
-      s.add_runtime_dependency(%q<easystats>, [">= 0"])
-      s.add_runtime_dependency(%q<to_latex>, [">= 0"])
-      s.add_runtime_dependency(%q<gnuplot>, [">= 0"])
-      s.add_runtime_dependency(%q<latex>, [">= 0"])
-      s.add_development_dependency(%q<rspec>, ["~> 2.8.0"])
-      s.add_development_dependency(%q<rdoc>, ["~> 3.12"])
-      s.add_development_dependency(%q<bundler>, ["~> 1.0.0"])
-      s.add_development_dependency(%q<jeweler>, ["~> 1.8.3"])
-      s.add_development_dependency(%q<rcov>, [">= 0"])
-    else
-      s.add_dependency(%q<rake4latex>, [">= 0"])
-      s.add_dependency(%q<plusminus>, [">= 0"])
-      s.add_dependency(%q<easystats>, [">= 0"])
-      s.add_dependency(%q<to_latex>, [">= 0"])
-      s.add_dependency(%q<gnuplot>, [">= 0"])
-      s.add_dependency(%q<latex>, [">= 0"])
-      s.add_dependency(%q<rspec>, ["~> 2.8.0"])
-      s.add_dependency(%q<rdoc>, ["~> 3.12"])
-      s.add_dependency(%q<bundler>, ["~> 1.0.0"])
-      s.add_dependency(%q<jeweler>, ["~> 1.8.3"])
-      s.add_dependency(%q<rcov>, [">= 0"])
-    end
-  else
-    s.add_dependency(%q<rake4latex>, [">= 0"])
-    s.add_dependency(%q<plusminus>, [">= 0"])
-    s.add_dependency(%q<easystats>, [">= 0"])
-    s.add_dependency(%q<to_latex>, [">= 0"])
-    s.add_dependency(%q<gnuplot>, [">= 0"])
-    s.add_dependency(%q<latex>, [">= 0"])
-    s.add_dependency(%q<rspec>, ["~> 2.8.0"])
-    s.add_dependency(%q<rdoc>, ["~> 3.12"])
-    s.add_dependency(%q<bundler>, ["~> 1.0.0"])
-    s.add_dependency(%q<jeweler>, ["~> 1.8.3"])
-    s.add_dependency(%q<rcov>, [">= 0"])
-  end
-end
-