Return to ptx.src CVS log

Up to [Research Unix] / researchv10no / cmd / troff / ancient.nroff / macros.d

researchv10 Norman

'''\"	ptx.src (@(#)ptx.src	1.1)  -  format permuted index macro
.tr ~
.nr )y \n(.lu-.65i
.nr )x \n()yu/2u
.ds s2 ~~~\"	this is the center gap -- 1m wide
.ds s4 ~\"
.ds s5 ~\"
.de xx
.ds s1\"
.if \w@\\$2@ .ds s1 ~\|\"
.ds s3\"
.if \w@\\$4@ .ds s3 ~\|\"
.ds y \\*(s4\f3\a\fP\\*(s5
.ta \\n()yu-\w@\\*(s5@u
\h@\\n()xu-\w@\\$1\\*(s1\\$2\\*(s2@u@\\$1\\*(s1\\$2\\*(s2\\$3\\*(s3\\$4\\*y\\$5
..
.nf

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.