From 8542895c95954f8bd015ba8436371a6bbdcf78c7 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?John=20Ankarstr=C3=B6m?= Date: Sat, 10 Jul 2021 17:35:21 +0200 Subject: Rename project to ref --- ref.tmac | 50 ++++++++++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 50 insertions(+) create mode 100644 ref.tmac (limited to 'ref.tmac') diff --git a/ref.tmac b/ref.tmac new file mode 100644 index 0000000..1bf5a92 --- /dev/null +++ b/ref.tmac @@ -0,0 +1,50 @@ +.\" configurable options +.\" -------------------- +.ds Sf C \" font +.nr Sp 8p \" point size +.nr Sv 11p \" vertical spacing (leading) +.nr St 8n \" tab width +.nr Tl 2i \" line length for text portions +.nr Td 0.7v \" distance between text portions +. +.\" setup +.\" ----- +.nr _L \n(LL \" save original line length +. +.\" macro definitions +.\" ----------------- +.eo +.\" Sr -- source code begin +.de Sr +. br +. mk c \" vertical position where text ends +. if (\nb > \nc) .sp (\nbu - \ncu) +. if (\nb > 0) .if ((\nc + 1p) > \nb) .sp \n(Tdu +. if !(\nz = 1) .if (\np > 0) .if (\n% > \np) .sp -(\nbu - \ncu - 1.5v) +. nf +. ft \*(Sf +. ps \n(Spu +. vs \n(Svu +. ta \n(Stu +\n(Stu +\n(Stu +\n(Stu +\n(Stu +\n(Stu +. in (\n(Tlu + 0.2i) +. mk a \" vertical position where source code begins +. nr p \n% \" current page number +.. +.\" Se -- source code end +.de Se +. mk b \" vertical position where source code ends +. rt \nau +. nr LL \n(Tl +. nr z 0 +. if (\n% > \np) \{ +. rt \n(HMu \" return to top of new page +. nr z 1 \" signal page break +. \} +. ns \" ignore space before text (like that added by LP/PP) +. LP +.. +.\" Rr -- reset document settings +.de Rr +.nr LL \n(_L +.. +.ec -- cgit v1.2.3