File: infram.tex

package info (click to toggle)
texlive-lang 2012.20120611-2
  • links: PTS
  • area: main
  • in suites: wheezy
  • size: 531,364 kB
  • sloc: perl: 29,862; ansic: 3,234; sh: 1,324; makefile: 1,291; python: 824; ruby: 576; lisp: 485; awk: 431; sed: 138; xml: 57; cs: 2
file content (11 lines) | stat: -rw-r--r-- 538 bytes parent folder | download | duplicates (13) 
1
2
3
4
5
6
7
8
9
10
11
 
%% u/zycie: \infram <gr.ramki> <odl.od ramki> {tre/s/c (materia/l pionowy)}
%% usage:   \infram <thickness> <distance> {contents (vertical stuff)}
\newdimen\frth \newdimen\frdi
\long\def\infram{\vbox\bgroup \afterassignment\inframa \frth = }
\def\inframa{\afterassignment\inframb \frdi = }
\long\def\inframb#1{\hrule height\frth
               \hbox{\vrule width\frth
                     \kern\frdi \vbox{\kern\frdi#1\kern\frdi}\kern\frdi
                     \vrule width\frth}
                     \hrule height\frth\egroup}
\endinput