6266c5d32f
Rename my //users directory and all places that refer to glittershark to grfn, including nix references and documentation. This may require some extra attention inside of gerrit's database after it lands to allow me to actually push things. Change-Id: I4728b7ec2c60024392c1c1fa6e0d4a59b3e266fa Reviewed-on: https://cl.tvl.fyi/c/depot/+/2933 Tested-by: BuildkiteCI Reviewed-by: tazjin <mail@tazj.in> Reviewed-by: lukegb <lukegb@tvl.fyi> Reviewed-by: glittershark <grfn@gws.fyi>
85 lines
3.4 KiB
TeX
85 lines
3.4 KiB
TeX
%% start of file `collection.sty'.
|
|
%% Copyright 2013-2013 Xavier Danaux (xdanaux@gmail.com).
|
|
%
|
|
% This work may be distributed and/or modified under the
|
|
% conditions of the LaTeX Project Public License version 1.3c,
|
|
% available at http://www.latex-project.org/lppl/.
|
|
|
|
|
|
%-------------------------------------------------------------------------------
|
|
% identification
|
|
%-------------------------------------------------------------------------------
|
|
\NeedsTeXFormat{LaTeX2e}
|
|
\ProvidesPackage{collection}[2013/03/28 v1.0.0 collections]
|
|
|
|
|
|
%-------------------------------------------------------------------------------
|
|
% requirements
|
|
%-------------------------------------------------------------------------------
|
|
|
|
|
|
\RequirePackage{ifthen}
|
|
|
|
|
|
%-------------------------------------------------------------------------------
|
|
% code
|
|
%-------------------------------------------------------------------------------
|
|
|
|
% creates a new collection
|
|
% usage: \collectionnew{<collection name>}
|
|
\newcommand*{\collectionnew}[1]{%
|
|
\newcounter{collection@#1@count}}
|
|
|
|
% adds an item to a collection
|
|
% usage: \collectionadd[<optional key>]{<collection name>}{<item to add>}
|
|
\newcommand*{\collectionadd}[3][]{%
|
|
\expandafter\def\csname collection@#2@item\roman{collection@#2@count}\endcsname{#3}%
|
|
\if\relax\noexpand#1\relax% if #1 is empty
|
|
\else\expandafter\def\csname collection@#2@key\roman{collection@#2@count}\endcsname{#1}\fi%
|
|
\stepcounter{collection@#2@count}}
|
|
|
|
% returns the number of items in a collection
|
|
% usage: \collectioncount{<collection name>}
|
|
\newcommand*{\collectioncount}[1]{%
|
|
\value{collection@#1@count}}
|
|
|
|
% gets an item from a collection
|
|
% usage: \collectiongetitem{<collection name>}{<element id>}
|
|
% where <element id> is an integer between 0 and (collectioncount-1)
|
|
\newcommand*{\collectiongetitem}[2]{%
|
|
\csname collection@#1@item\romannumeral #2\endcsname}
|
|
|
|
% gets a key from a collection
|
|
% usage: \collectiongetkey{<collection name>}{<element id>}
|
|
% where <element id> is an integer between 0 and (collectioncount-1)
|
|
\newcommand*{\collectiongetkey}[2]{%
|
|
\csname collection@#1@key\romannumeral #2\endcsname}
|
|
|
|
% loops through a collection and perform the given operation on every element
|
|
% usage: \collectionloop{<collection name>}{<operation sequence>}
|
|
% where <operation sequence> is the code sequence to be evaluated for each collection item,
|
|
% code which can refer to \collectionloopid, \collectionloopkey, \collectionloopitem and
|
|
% \collectionloopbreak
|
|
\newcounter{collection@iterator}
|
|
\newcommand*{\collectionloopbreak}{\let\iterate\relax}
|
|
\newcommand*{\collectionloop}[2]{%
|
|
\setcounter{collection@iterator}{0}%
|
|
\loop\ifnum\value{collection@iterator}<\value{collection@#1@count}%
|
|
\def\collectionloopid{\arabic{collection@iterator}}%
|
|
\def\collectionloopitem{\collectiongetitem{#1}{\collectionloopid}}%
|
|
\def\collectionloopkey{\collectiongetkey{#1}{\collectionloopid}}%
|
|
#2%
|
|
\stepcounter{collection@iterator}%
|
|
\repeat}
|
|
|
|
% loops through a collection and finds the (first) element matching the given key
|
|
% usage: \collectionfindbykey{<collection name>}{key>}
|
|
\newcommand*{\collectionfindbykey}[2]{%
|
|
\collectionloop{#1}{%
|
|
\ifthenelse{\equal{\collectionloopkey}{#2}}{\collectionloopitem\collectionloopbreak}{}}}
|
|
|
|
|
|
\endinput
|
|
|
|
|
|
%% end of file `collection.cls'.
|