mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-11-04 05:59:37 +01:00
151 lines
4.3 KiB
TeX
151 lines
4.3 KiB
TeX
%%
|
|
%% This is file `a4.sty',
|
|
%% generated with the docstrip utility.
|
|
%%
|
|
%% The original source files were:
|
|
%%
|
|
%% a4.dtx (with options: `package')
|
|
%%
|
|
%% Copyright (C) 1994-1996 Nederlandstalige TeX Gebruikersgroep.
|
|
%% All rights reserved.
|
|
%% For additional copyright information see further down in this file.
|
|
%%
|
|
%% This file is part of the NTG document classes distribution
|
|
%% ----------------------------------------------------------
|
|
%%
|
|
%% This file is distributed in the hope that it will be useful,
|
|
%% but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
%% MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
|
|
%%
|
|
%%
|
|
%% IMPORTANT NOTICE:
|
|
%%
|
|
%% For error reports in case of UNCHANGED versions see readme file.
|
|
%%
|
|
%% Please do not request updates from us directly. Distribution is
|
|
%% done through Mail-Servers and TeX organizations.
|
|
%%
|
|
%% You are not allowed to change this file.
|
|
%%
|
|
%% You are allowed to distribute this file under the condition that
|
|
%% it is distributed together with all files mentioned in 00readme.txt.
|
|
%%
|
|
%% If you receive only some of these files from someone, complain!
|
|
%%
|
|
%% You are NOT ALLOWED to distribute this file alone. You are NOT
|
|
%% ALLOWED to take money for the distribution or use of either this
|
|
%% file or a changed version, except for a nominal charge for copying
|
|
%% etc.
|
|
\ifx\ProvidesPackage\undefined
|
|
\def\ProvidesPackage#1[#2 #3 #4]{%
|
|
\wlog{LaTeX Package `#1' #3 <#2> #4}}
|
|
\fi
|
|
\ProvidesPackage{a4}
|
|
[1995/09/25 v1.2e A4 based page layout]
|
|
\ifx\documentclass\undefined
|
|
\else
|
|
\DeclareOption{widemargins}{\WideMargins}
|
|
\fi
|
|
|
|
\topmargin 0pt
|
|
\ifcase \@ptsize
|
|
\textheight 53\baselineskip
|
|
\or
|
|
\textheight 46\baselineskip
|
|
\or
|
|
\textheight 42\baselineskip
|
|
\fi
|
|
\advance\textheight by \topskip
|
|
\ifcase \@ptsize
|
|
\textwidth 5.00in
|
|
\marginparwidth 1.00in
|
|
\if@twoside
|
|
\oddsidemargin 0.55in
|
|
\evensidemargin 0.75in
|
|
\else
|
|
\oddsidemargin 0.55in
|
|
\evensidemargin 0.55in
|
|
\fi
|
|
\or
|
|
\textwidth 5.20in
|
|
\marginparwidth 1.00in
|
|
\if@twoside
|
|
\oddsidemargin 0.45in
|
|
\evensidemargin 0.65in
|
|
\else
|
|
\oddsidemargin 0.45in
|
|
\evensidemargin 0.45in
|
|
\fi
|
|
\or
|
|
\textwidth 5.70in
|
|
\marginparwidth 0.80in
|
|
\if@twoside
|
|
\oddsidemargin 0.20in
|
|
\evensidemargin 0.40in
|
|
\else
|
|
\oddsidemargin 0.20in
|
|
\evensidemargin 0.20in
|
|
\fi
|
|
\fi
|
|
\def\WideMargins{%
|
|
\newdimen\ExtraWidth
|
|
\ifcase \@ptsize
|
|
\ExtraWidth = 0.5in
|
|
\@widemargins
|
|
\or
|
|
\ExtraWidth = 0.5in
|
|
\@widemargins
|
|
\or
|
|
\ExtraWidth = 0.7in
|
|
\@widemargins
|
|
\fi\let\WideMargins\relax\let\@widemargins\relax}
|
|
{\def\do{\noexpand\do\noexpand}
|
|
\xdef\@preamblecmds{\@preamblecmds \do\WideMargins}
|
|
}
|
|
\def\@widemargins{%
|
|
\global\advance\textwidth by -\ExtraWidth
|
|
\global\advance\marginparwidth by \ExtraWidth
|
|
\if@twoside
|
|
\tw@sidedwidemargins
|
|
\else
|
|
\@nesidedwidemargins
|
|
\fi}
|
|
\def\tw@sidedwidemargins{%
|
|
\if@reversemargin
|
|
\@tempdima=\evensidemargin
|
|
\advance\@tempdima by -\oddsidemargin
|
|
\advance\oddsidemargin by \ExtraWidth
|
|
\advance\oddsidemargin by \@tempdima
|
|
\advance\evensidemargin by -\@tempdima
|
|
\else
|
|
\advance\evensidemargin by \ExtraWidth
|
|
\fi}
|
|
\def\@nesidedwidemargins{%
|
|
\if@reversemargin
|
|
\advance\oddsidemargin by \ExtraWidth
|
|
\advance\evensidemargin by \ExtraWidth
|
|
\fi}
|
|
\ifx\documentclass\undefined
|
|
\else
|
|
\ProcessOptions
|
|
\fi
|
|
%% \CharacterTable
|
|
%% {Upper-case \A\B\C\D\E\F\G\H\I\J\K\L\M\N\O\P\Q\R\S\T\U\V\W\X\Y\Z
|
|
%% Lower-case \a\b\c\d\e\f\g\h\i\j\k\l\m\n\o\p\q\r\s\t\u\v\w\x\y\z
|
|
%% Digits \0\1\2\3\4\5\6\7\8\9
|
|
%% Exclamation \! Double quote \" Hash (number) \#
|
|
%% Dollar \$ Percent \% Ampersand \&
|
|
%% Acute accent \' Left paren \( Right paren \)
|
|
%% Asterisk \* Plus \+ Comma \,
|
|
%% Minus \- Point \. Solidus \/
|
|
%% Colon \: Semicolon \; Less than \<
|
|
%% Equals \= Greater than \> Question mark \?
|
|
%% Commercial at \@ Left bracket \[ Backslash \\
|
|
%% Right bracket \] Circumflex \^ Underscore \_
|
|
%% Grave accent \` Left brace \{ Vertical bar \|
|
|
%% Right brace \} Tilde \~}
|
|
%%
|
|
\endinput
|
|
%%
|
|
%% End of file `a4.sty'.
|