diff options
| -rw-r--r-- | Master/texmf-dist/tex/latex/histogr/histogr.sty | 58 |
1 files changed, 58 insertions, 0 deletions
diff --git a/Master/texmf-dist/tex/latex/histogr/histogr.sty b/Master/texmf-dist/tex/latex/histogr/histogr.sty new file mode 100644 index 00000000000..965264b6b3f --- /dev/null +++ b/Master/texmf-dist/tex/latex/histogr/histogr.sty @@ -0,0 +1,58 @@ +%% +%% This is file `histogr.sty', +%% generated with the docstrip utility. +%% +%% The original source files were: +%% +%% histogr.dtx (with options: `package') +%% +%% IMPORTANT NOTICE: +%% +%% For the copyright see the source file. +%% +%% You are *not* allowed to modify this file. +%% +%% You are *not* allowed to distribute this file. +%% For distribution of the original source see +%% the terms for copying and modification in the file histogr.dtx. +%% +%% File: histogr.dtx Copyright (C) 1987-1997 Rainer Sch\"opf +\NeedsTeXFormat{LaTeX2e} +\ProvidesPackage{histogr} + [1997/02/13 v1.01 Histogram (RmS)] +\newcount\hist@x +\newcount\hist@y +\newcount\hist@ystart +\newif\ifhist@vert + +\let\verticallines\hist@verttrue +\let\noverticallines\hist@vertfalse + +\hist@verttrue +\def\histogram(#1,#2){\hist@x #1 \hist@y #2 \hist@ystart\hist@y + \hist@next} +\def\hist@next{\@ifnextchar ({\hist@box}{\hist@end}} +\def\hist@box(#1,#2){\@tempcnta -\hist@x + \advance\@tempcnta #1 + \ifnum \@tempcnta >\z@ + \put(\hist@x,\hist@y){\line(1,0){\@tempcnta}}\else + \put(\hist@x,\hist@y){\line(-1,0){-\@tempcnta}}\fi + \hist@x #1 + \ifhist@vert + \ifnum \hist@y >#2 \@tempcnta\hist@y + \else \@tempcnta #2 \fi + \@tempcntb\@tempcnta + \advance\@tempcnta -\hist@ystart + \put(\hist@x,\@tempcntb){\line(0,-1){\@tempcnta}}% + \else + \@tempcnta -\hist@y + \advance\@tempcnta #2 + \ifnum \@tempcnta >\z@ + \put(\hist@x,\hist@y){\line(0,1){\@tempcnta}}\else + \put(\hist@x,\hist@y){\line(0,-1){-\@tempcnta}}\fi + \fi + \hist@y #2\hist@next} +\def\hist@end{} +\endinput +%% +%% End of file `histogr.sty'. |