%%
%% This is file `setdim.sty',
%% generated with the docstrip utility.
%%
%% The original source files were:
%%
%% newlfm.dtx  (with options: `setdim')
%% 
%% \iffalse meta-comment
%% \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         \~}
\NeedsTeXFormat{LaTeX2e}[1996/06/01]
\ProvidesPackage{setdim}
               [2009/04/10 v9.4
                Address macros]

\def\ifta{0}\def\iftb{0}%
\def\txa#1{\ifthenelse{\equal{\ifta}{1}}{\typeout{#1}}{}}%
\def\settext#1#2#3#4#5{%
\txa{\string\textheight: #1}\txa{\string\textwidth: #2}%
\global\setlength{\textheight}{#1}%
\global\setlength{\textwidth}{#2}%
\global\setlength{\evensidemargin}{#3}%
\global\setlength{\oddsidemargin}{#4}%
\global\setlength{\columnsep}{#5}%
\@change@text%
}%
\def\lsettext#1#2#3#4#5{%
\txa{\string\textheight: #1}\txa{\string\textwidth: #2}%
\setlength{\textheight}{#1}%
\setlength{\textwidth}{#2}%
\setlength{\evensidemargin}{#3}%
\setlength{\oddsidemargin}{#4}%
\setlength{\columnsep}{#5}%
\@lchange@text%
}%
\def\@change@text{%
\global\setlength{\@colht}{\textheight}%
\txa{\string\@colht:\the\@colht}%
\global\setlength{\@colroom}{\textheight}%
\global\setlength{\vsize}{\textheight}%
\global\setlength{\columnwidth}{\textwidth}%
\if@twocolumn%
\advance\columnwidth-\columnsep \divide\columnwidth\tw@%
\@firstcolumntrue%
\fi%
\global\setlength{\hsize}{\columnwidth}%
\global\setlength{\linewidth}{\hsize}%
}%
\def\@lchange@text{%
\setlength{\@colht}{\textheight}%
\txa{\string\@colht:\the\@colht}%
\setlength{\@colroom}{\textheight}%
\setlength{\vsize}{\textheight}%
\setlength{\columnwidth}{\textwidth}%
\if@twocolumn%
\advance\columnwidth-\columnsep \divide\columnwidth\tw@%
\@firstcolumntrue%
\fi%
\setlength{\hsize}{\columnwidth}%
\setlength{\linewidth}{\hsize}%
}%
\def\retdims{%
\showdim{Setpage A}%
\txa{In setpage: \npind}%
\global\setlength{\@xda}{\textheight}%
\global\setlength{\@xdb}{\textwidth}%
\global\setlength{\@xdc}{\evensidemargin}%
\global\setlength{\@xdd}{\oddsidemargin}%
\global\setlength{\@xde}{\columnsep}%
\global\setlength{\@xdf}{\topmargin}%
\global\setlength{\@xdg}{\headheight}%
\global\setlength{\@xdh}{\headsep}%
\global\setlength{\@xdi}{\footskip}%
}%
\def\rstdims{%
\showdim{Setpage A}%
\txa{In setpage: \npind}%
\global\setlength{\textheight}{\@xda}%
\global\setlength{\textwidth}{\@xdb}%
\global\setlength{\evensidemargin}{\@xdc}%
\global\setlength{\oddsidemargin}{\@xdd}%
\global\setlength{\columnsep}{\@xde}%
\global\setlength{\topmargin}{\@xdf}%
\global\setlength{\headheight}{\@xdg}%
\global\setlength{\headsep}{\@xdh}%
\global\setlength{\footskip}{\@xdi}%
\@change@text%
}%
\def\setpage#1#2#3#4#5#6#7#8#9{%
\showdim{Setpage A}%
\txa{In setpage: \npind}%
\settext{#1}{#2}{#3}{#4}{#5}%
\global\setlength{\topmargin}{#6}%
\global\setlength{\headheight}{#7}%
\global\setlength{\headsep}{#8}%
\global\setlength{\footskip}{#9}%
\@change@text%
\showdim{Setpage B}%
}%
\def\lsetpage#1#2#3#4#5#6#7#8#9{%
\showdim{Setpage A}%
\txa{In setpage: \npind}%
\lsettext{#1}{#2}{#3}{#4}{#5}%
\setlength{\topmargin}{#6}%
\setlength{\headheight}{#7}%
\setlength{\headsep}{#8}%
\setlength{\footskip}{#9}%
\@lchange@text%
\showdim{Setpage B}%
}%
\def\changetext#1#2#3#4#5{%
\addtolength{\textheight}{#1}%
\addtolength{\textwidth}{#2}%
\addtolength{\evensidemargin}{#3}%
\addtolength{\oddsidemargin}{#4}%
\addtolength{\columnsep}{#5}%
\@change@text%
}%
\def\changepage#1#2#3#4#5#6#7#8#9{%
\changetext{#1}{#2}{#3}{#4}{#5}%
\addtolength{\topmargin}{#6}%
\addtolength{\headheight}{#7}%
\addtolength{\headsep}{#8}%
\addtolength{\footskip}{#9}%
\@change@text%
}%

%%% Local Variables:
%%% mode: latex
%%% TeX-master: t
%%% End:
\endinput
%%
%% End of file `setdim.sty'.
