diff options
Diffstat (limited to 'tex/context/base/s-phy-01.mkiv')
-rw-r--r-- | tex/context/base/s-phy-01.mkiv | 111 |
1 files changed, 0 insertions, 111 deletions
diff --git a/tex/context/base/s-phy-01.mkiv b/tex/context/base/s-phy-01.mkiv deleted file mode 100644 index dde3f9bbb..000000000 --- a/tex/context/base/s-phy-01.mkiv +++ /dev/null @@ -1,111 +0,0 @@ -%D \module -%D [ file=s-phy-01, -%D version=2011-11-24, -%D title=\CONTEXT\ Modules, -%D subtitle=Units Tables, -%D author=Hans Hagen, -%D date=\currentdate, -%D copyright={PRAGMA ADE \& \CONTEXT\ Development Team}] -%C -%C This module is part of the \CONTEXT\ macro||package and is -%C therefore copyrighted by \PRAGMA. See mreadme.pdf for -%C details. - -\unprotect - -% todo: better breaks of head line - -\startluacode -moduledata.units = moduledata.units or { } - -local tables = physics.units.tables -local units = tables.units -local shortcuts = tables.shortcuts - -local HL = context.HL -local NC = context.NC -local NR = context.NR - -local function typeset(list,followup,name,category) - if list then - if followup then - context.TB() - end - if category then - HL() - NC() - context.rlap(category .. ":" .. name) - NC() - NC() - NR() - HL() - end - for k, v in table.sortedhash(list) do - NC() - context(k) - NC() - if isunit then - context(v) - else - context.type(v) - end - NC() - if name == "units" or name == "symbols" or name == "packaged" then - context.unittext(v) - elseif name == "prefixes" then - context.prefixtext(v) - elseif name == "operators" then - context.operatortext(v) - elseif name == "suffixes" then - context.suffixtext(v) - end - NC() - NR() - end - if category and name then - HL() - end - end -end - -function moduledata.units.show_table(name) - context.starttabulate { "|lT|l|c|" } - if name and name ~= "" then - local first, second = string.match(name,"(.-):(.-)") -- [units|shortcuts]:[units|...] - if first then - typeset(tables[first] and tables[first][second],false) - else - typeset(units[name],false) - typeset(shortcuts[name],true) - end - else - local done = false - for what, list in table.sortedhash(units) do - typeset(list,done,what,"units") - done = true - end - for what, list in table.sortedhash(shortcuts) do - typeset(list,done,what,"shortcuts") - done = true - end - end - context.stoptabulate() -end - -\stopluacode - -\unexpanded\def\ShowUnitsTable - {\dosingleempty\Show_Units_Table} - -\def\Show_Units_Table[#1]% - {\ctxlua{moduledata.units.show_table("#1")}} - -\protect - -\continueifinputfile{s-phy-01.mkiv} - -\usemodule[art-01] - -\starttext - \ShowUnitsTable -\stoptext |