1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
|
--
-- This is file `pgfmolbio.lua',
-- generated with the docstrip utility.
--
-- The original source files were:
--
-- pgfmolbio.dtx (with options: `pgfmolbio-lua')
--
-- Copyright (C) 2013 by Wolfgang Skala
--
-- This work may be distributed and/or modified under the
-- conditions of the LaTeX Project Public License, either version 1.3
-- of this license or (at your option) any later version.
-- The latest version of this license is in
-- http://www.latex-project.org/lppl.txt
-- and version 1.3 or later is part of all distributions of LaTeX
-- version 2005/12/01 or later.
--
module("pgfmolbio", package.seeall)
if luatexbase then
luatexbase.provides_module({
name = "pgfmolbio",
version = 0.2,
date = "2012/10/01",
description = "Molecular biology graphs wit LuaLaTeX",
author = "Wolfgang Skala",
copyright = "Wolfgang Skala",
license = "LPPL",
})
end
local coordUnit, coordFmtStr
function setCoordinateFormat(unit, fmtString)
coordUnit = unit
coordFmtStr = fmtString
end
function stringToDim(x)
if type(x) == "string" then
return dimen(x)[1]
end
end
function dimToString(x)
return number.todimen(x, coordUnit, coordFmtStr)
end
function getRange(rangeInput, ...)
if type(rangeInput) ~= "string" then return end
local result = {}
local matchStrings = table.pack(...)
for i = 1, matchStrings.n do
if type(matchStrings[i]) == "string" then
table.insert(result, rangeInput:match(matchStrings[i]))
end
end
return unpack(result)
end
function packageWarning(message)
tex.sprint("\\PackageWarning{pgfmolbio}{" .. message .. "}")
end
function packageError(message)
tex.error("Package pgfmolbio Error: " .. message)
errorCatched = true
end
errorCatched = false
if not string.trim then
string.trim = function(self)
return self:match("^%s*(.-)%s*$")
end
end
outputFileId = 0
--
-- End of file `pgfmolbio.lua'.
|
