summaryrefslogtreecommitdiff
path: root/texmf-dist/source/latex/eqexam/eqexam.dtx
diff options
context:
space:
mode:
authorNorbert Preining <norbert@preining.info>2017-07-13 09:20:26 +0900
committerNorbert Preining <norbert@preining.info>2017-07-13 09:20:26 +0900
commit305996352c1aa2f99d04a7a445c88b5ca44bc17b (patch)
tree8d4b71eef933b7c47f307f6d869d4d3fe07bc125 /texmf-dist/source/latex/eqexam/eqexam.dtx
parentf13250c65aadfaaebc86769c49916dbcb1f06500 (diff)
add eqexam
Diffstat (limited to 'texmf-dist/source/latex/eqexam/eqexam.dtx')
-rw-r--r--texmf-dist/source/latex/eqexam/eqexam.dtx8258
1 files changed, 8258 insertions, 0 deletions
diff --git a/texmf-dist/source/latex/eqexam/eqexam.dtx b/texmf-dist/source/latex/eqexam/eqexam.dtx
new file mode 100644
index 00000000..951c5f74
--- /dev/null
+++ b/texmf-dist/source/latex/eqexam/eqexam.dtx
@@ -0,0 +1,8258 @@
+% \iffalse
+% makeindex -s gglo.ist -o eqexam.gls eqexam.glo
+% makeindex -s gind.ist -o eqexam.ind eqexam.idx
+%<*copyright>
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+%% eqexam.sty package, %%
+%% Copyright (C) 2005--2017 D. P. Story %%
+%% dpstory@uakron.edu %%
+%% %%
+%% This program can redistributed and/or modified under %%
+%% the terms of the LaTeX Project Public License 1.2 %%
+%% Distributed from CTAN archives in directory %%
+%% macros/latex/base/lppl.txt; either version 1 of the %%
+%% License, or (at your option) any later version. %%
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+%</copyright>
+%<package>\NeedsTeXFormat{LaTeX2e}
+%<package>\ProvidesPackage{eqexam}
+%<package> [2017/03/16 v4.9 An Exam Construction Package (dps)]
+%<package>\def\eqexamdefReq{2017/03/16}
+%<*driver>
+\documentclass{ltxdoc}
+\GlossaryPrologue{\section{{Change History}}}%
+\IndexPrologue{\section{{Index}}}%
+\value{IndexColumns}=2
+\value{GlossaryColumns}=2
+\usepackage{makeidx}
+\usepackage[colorlinks,hyperindex]{hyperref}
+%\pdfstringdefDisableCommands{\let\\\textbackslash}%
+\EnableCrossrefs
+\CodelineIndex
+\RecordChanges
+\InputIfFileExists{aebdocfmt.def}{\PackageInfo{eqexam}{Inputting aebdocfmt.def}}
+ {\def\IndexOpt{\DescribeMacro}\let\setupFullwidth\relax
+ \PackageInfo{eqexam}{aebdocfmt.def cannot be found}}
+\begin{document}
+ \let\pkg\textsf
+ \def\switchCats{\catcode`\{=12\relax\catcode`\}=12\relax
+ \catcode`\(=1\relax\catcode`\)=2\relax}
+ \GetFileInfo{eqexam.sty}
+ \title{\textsf{eqexam}: An Exam Construction Package}
+ \author{D. P. Story\\
+ Email: \texttt{dpstory@uakron.edu}}
+ \date{Processed \today}
+ \maketitle
+ \tableofcontents
+ \let\Email\texttt
+ \DocInput{eqexam.dtx}
+\IfFileExists{\jobname.ind}{\newpage\setupFullwidth\PrintIndex}{\paragraph*{Index} The index goes here.\\Execute
+ \texttt{makeindex -s gind.ist -o eqexam.ind eqexam.idx} on the command line and recompile
+ \texttt{eqexam.dtx}.}
+\IfFileExists{\jobname.gls}{\PrintChanges}{\paragraph*{Change History} The list of changes goes here.\\Execute
+ \texttt{makeindex -s gglo.ist -o eqexam.gls eqexam.glo} on the command line and recompile
+ \texttt{eqexam.dtx}.}
+\end{document}
+%</driver>
+% \fi
+%
+% \StopEventually{}
+%
+% \InputIfFileExists{aebDoNotIndex.def}{\PackageInfo{eqexam}{Inputting aebDoNotIndex.def}}
+% {\PackageInfo{eqexam}{aebDoNotIndex.def cannot be found}}
+%
+% \section{Introduction}
+%
+% This package is my attempt at writing a set of macros for creating exams.
+% The package can be used with or without \textsf{web} or \textsf{exerquiz}.
+% When used without, what is produced is a document suitable for printing.
+% When \textsf{exerquiz} is used, the same document is produced, but with
+% hypertext links to solutions. This may be useful for publishing solutions
+% on the web, or publishing pretests with/without solutions.
+%
+% The package must be as flexible as possible vis-\`a-vis PDF. (1)
+% \textsf{web} only does not add much, it does input hyperrref and test info
+% such as \cs{title}, \cs{subject}, etc are placed in the Document Info
+% fields of the PDF. (2) If \textsf{exerquiz} is also input (prior to
+% \textsf{eqexam}), then hyperlinks will be created to the solutions to the
+% test, if solutions are included at the end of the document. (3) If
+% \textsf{web} and \textsf{exerquiz} are input, and the \texttt{online}
+% option is taken, then the checkboxes will be come interactive, the space
+% left to work the problems will be multi-line text boxes, fill-ins limited
+% to True/False and simple text fill-in the blank will also become text
+% boxes.
+%
+% When in \texttt{online} mode, the student can take the test in a computer
+% lab, the completed exam can be printed and handed in, or perhaps submitted
+% server-side script.
+%
+% \medskip\noindent (2011/05/13) The version of \textsf{eqexam} is a
+% departure from previous versions. Previously, the list of problems were
+% not in list, they were left-justified, with the problem number extending
+% out into a little area determined by \cs{oddsidemargin}. This makes it
+% hard to reformat a list of problems to fit into a custom book format.
+% This new version defines a new environment, \texttt{eqequestions}, that
+% makes each problem into a list. The list environment allows for an easy
+% redesign of the formatting of the problems. The purpose of this new
+% scheme, is to open up \textsf{eqexam} as a format package that can be used
+% by author for writing a textbook.
+%
+% The \texttt{fortextbook} option supplies support for authors writing a
+% textbook. The \texttt{exam} environment is re-cast into the
+% \texttt{probset} environment, it can be used to write problem sets within
+% the text. there is a version for the instructor and the student. The
+% instructors version writes answers to the problem sets to the margins (or
+% inline). Two solutions are offered, short and long. The short solutions
+% appear in the back of the book (odd-numbered ones for the student edition.
+% The long solutions are used to build the stand-alone solutions manuals for
+% both the student and the instructor. More details are found in
+% \Nameref{fortextbook}, see also \Nameref{fortextbookstyle}.
+%
+% \newpage
+% \section{Package options and Process Options}
+% Let us catalog the options of this package.
+%
+% \subsection{Early inclusion of packages}
+% We include these packages early in the process of loading.
+% \begin{macrocode}
+%<*package>
+% \end{macrocode}
+%\changes{v3.1b}{2012/06/18}{New requirement \textsf{ifpdf}}
+% \begin{macrocode}
+\RequirePackage{ifpdf}[2006/02/20]
+\RequirePackage{ifxetex}[2006/08/21]
+% \end{macrocode}
+% Very useful package for defining key-values.
+% \begin{macrocode}
+\usepackage{xkeyval}
+% \end{macrocode}
+%
+% \subsection{Options New to \textsf{eqexam}}
+% Here are some options unique to this package.
+% \IndexOpt{usecustomdesign}
+% Use this option to avoid \textsf{eqexam} from setting up the ``standard'' page layout.
+% \begin{macrocode}
+\DeclareOptionX{usecustomdesign}{\eqcustomdesigntrue}
+\newif\ifeqcustomdesign \eqcustomdesignfalse
+\DeclareOptionX{nocustomdesign}{\let\eqe@nocustomdesign=1}
+\let\eqe@nocustomdesign=0
+% \end{macrocode}
+% \IndexOpt{fortextbook}
+% An option to extend the application of \textsf{eqexam} to provide support
+% (exercises, providing solutions, short solutions, answers, and hints) for
+% authors writing textbooks. See \Nameref{fortextbook}.
+% \begin{macrocode}
+\DeclareOptionX{fortextbook}{\eqfortextbooktrue}
+\newif\ifeqfortextbook \eqfortextbookfalse
+% \end{macrocode}
+% \IndexOpt{forinstr}
+% \IndexOpt{forstudent}
+% These two options simply set a switch to signal the intention of the
+% document author.
+% \begin{macrocode}
+\DeclareOptionX{forinstr}{\eqforinstrtrue}
+\DeclareOptionX{forstudent}{\eqforinstrfalse}
+\newif\ifeqforinstr \eqforinstrfalse
+% \end{macrocode}
+% \IndexOpt{nomarginwrite}
+% The switch \cs{ifeqwritetomargins} is used by the \texttt{fortextbook}
+% option. It is normally \texttt{true}, but if set to \texttt{false}, the
+% \cs{AddToShipoutPicture} is not generated at the beginning of the
+% document. Here is the code taken from below:
+%\begin{verbatim}
+% \ifeqfortextbook\ifeqwritetomargins
+% \AtBeginDocument{\chkmarginboxwidth
+% \AddToShipoutPicture{\eqe@tb@shipout}}
+% \fi\fi
+%\end{verbatim}
+% Using this option, the check for the margin width is not done,
+% and writing to the margins is turned off.
+% (\cs{marginpar} still works)
+% \begin{macrocode}
+\DeclareOptionX{nomarginwrite}{\eqwritetomarginsfalse}
+\newif\ifeqwritetomargins\eqwritetomarginstrue
+% \end{macrocode}
+%
+% \paragraph*{Configuration Files.}
+% This section contains options for the configuration files.
+% \IndexOpt{cfg}
+% The \texttt{cfg} option is used to specify a named configuration file, extension
+% must be \texttt{.cfg}; usage \texttt{cfg=hwdoc}.
+%\changes{v3.0u}{2012/09/03}{Added the \texttt{cfg} option for inputting
+% a custom config file.}
+%\changes{v3.1d}{2012/09/29}{Added \cs{ifeqexamCFG} and cs{eqexamCFG}; these are
+% used by \textsf{ATB} to attached the configuration file.}
+% \begin{macrocode}
+\define@key{eqexam.sty}{cfg}[]{%
+ \def\arg@i{#1}\ifx\arg@i\@empty
+ \PackageWarning{eqexam}{No value for `cfg' specified}\else
+ \def\ifeqexamCFG{true}\def\eqexamCFG{#1.cfg}%
+ \AtEndOfPackage{\InputIfFileExists{#1.cfg}
+ {\typeout{Inputting #1.cfg}}{\PackageWarning{eqexam}{%
+ Cannot find configuration file #1.cfg}}}\fi
+ }
+\def\ifeqexamCFG{false}
+\let\eqexamCFG\@empty
+% \end{macrocode}
+% \IndexOpt{myconfig}\IndexOpt{myconfigi...myconfigvi}
+% We offer seven sets of configuration files, that should be enough, especially
+% light of the new \texttt{cfg} option, defined above.
+% \changes{v3.0t}{2012/25/01}{Added four more CFG files are the request
+% of a user.}
+% \begin{macrocode}
+\@for\eqe@tmp@i:={},i,ii,iii,iv,v,vi\do{%
+ \edef\eqe@tmp@exp{%
+ \noexpand\DeclareOptionX{myconfig\eqe@tmp@i}%
+ {\noexpand\AtEndOfPackage{\expandafter\noexpand
+ \csname eqemyconfig\eqe@tmp@i\endcsname}}%
+ }\eqe@tmp@exp
+}
+% \end{macrocode}
+%
+% \paragraph*{Point options.}
+% Options relating to points, points on left, right, both, no points,
+% totals on left and right.
+% \IndexOpt{pointsonleft}
+% \IndexOpt{pointsonright}
+% \IndexOpt{pointsonboth}
+% \IndexOpt{nopoints}
+% \IndexOpt{totalsonleft}
+% \IndexOpt{totalsonright}
+% \IndexOpt{nozerototals}
+% We offer options for points and totals.
+% \begin{macrocode}
+\DeclareOptionX{pointsonleft}{\AtEndOfPackage{\PointsOnLeft}}
+\DeclareOptionX{pointsonright}{\AtEndOfPackage{\PointsOnRight}}
+\DeclareOptionX{pointsonboth}{\AtEndOfPackage{\PointsOnBothSides}}
+\DeclareOptionX{nopoints}{\AtEndOfPackage{\NoPoints}}
+\DeclareOptionX{totalsonleft}{\AtEndOfPackage{\TotalsOnLeft}}
+\DeclareOptionX{totalsonright}{\AtEndOfPackage{\TotalsOnRight}}
+\DeclareOptionX{nozerototals}{\AtEndOfPackage{\noZeroTotals}}
+% \end{macrocode}
+%
+% \paragraph*{Totals options.}
+%
+% \IndexOpt{nototals}
+% \IndexOpt{noparttotals}
+% \IndexOpt{parttotalsonright}
+% \IndexOpt{parttotalsonleft}
+% \IndexOpt{noseparationrule}
+% \IndexOpt{nosummarytotals}
+% Options relating to totals
+% \begin{macrocode}
+\let\eqe@YES=y \let\eqe@NO=n
+\let\eqe@One=1 \let\eqe@Zero=0
+\let\eqe@Two=2 \let\eqe@Three=3 \let\eqe@Four=4
+\DeclareOptionX{nototals}{\AtEndOfPackage{\NoTotals}}
+\DeclareOptionX{noparttotals}{%
+ \AtEndOfPackage{\let\eq@parttotals\eqe@NO}}
+\DeclareOptionX{parttotalsonright}{%
+ \def\eqeomarginbox{\eqeomarginboxright}}
+\DeclareOptionX{parttotalsonleft}{%
+ \def\eqeomarginbox{\eqeomarginboxleft}}
+\def\eqeomarginbox{\eqeomarginboxright}
+\DeclareOptionX{noseparationrule}{%
+ \AtEndOfPackage{\separationruleOff}}
+% \AtEndOfPackage{\let\separationrule\relax}}
+\DeclareOptionX{nosummarytotals}{\let\eq@nosummarytotals\eqe@YES}
+% \end{macrocode}
+%
+% \paragraph*{cover page options.} There are two such options,
+% \texttt{coverpage} and \texttt{cover\-page\-sumry}.
+% \IndexOpt{coverpage}
+% If this option is taken, a cover page is generate.
+% \begin{macrocode}
+\DeclareOptionX{coverpage}{\def\eqex@coverpage{\eqexcoverpage}%
+ \setcounter{page}{0}}
+% \end{macrocode}
+% \IndexOpt{coverpagesumry}
+% If this option is taken, an \textbf{Exam Record} is generated on the
+% cover page, provided the \texttt{coverpage} option is taken. Possible
+% values aer \texttt{byparts}, \texttt{bypages}, or \texttt{none}.
+% \begin{macrocode}
+\define@choicekey+{eqexam.sty}{coverpagesumry}[\val\nr]%
+ {byparts,bypages,none}{%
+ \ifcase\nr\relax
+ \def\sumryAnnots{\cpSumrybyparts}\or
+ \def\sumryAnnots{\cpSumrybypages}\or
+ \let\sumryAnnots\relax
+ \fi
+}{\PackageWarning{aeb}{Bad choice for coverpagesumry, permissible values
+ are byparts, bypages, and none. Try again}}
+\let\sumryAnnots\relax
+% \end{macrocode}
+%
+% \paragraph*{Options related to how the document is built.}
+%
+% \IndexOpt{nospacetowork}
+% The vertical space defined by the solution environment is removed.
+% \begin{macrocode}
+\DeclareOptionX{nospacetowork}{%
+ \AtEndOfPackage{\let\eq@insertverticalspace\eqe@NO}}
+% \end{macrocode}
+% \IndexOpt{answerkey}
+% Equivalent to solutionsafter and proofing.
+% \begin{macrocode}
+\newif\ifanswerkey \answerkeyfalse
+\DeclareOptionX{answerkey}{\AnswerKey}
+\def\AnswerKey{\answerkeytrue\eq@proofingtrue
+ \eq@solutionsaftertrue}
+% \end{macrocode}
+% \IndexOpt{vspacewithsolns}
+% When \texttt{vspacewithsolns} is used, vertical space is created by
+% the solutions environment, and the solutions are written to the
+% end of the file.
+% \changes{v2.0d}{2011/03/04}{%
+% Added the \texttt{vspacewithsolns} option}
+% \IndexOpt{ftbsolns}
+% Added \texttt{ftbsolns} as an alias for \texttt{vspacewithsolns}
+% \changes{v3.0h}{2011/08/17}{% 2011/08/17 v3.0h Added the
+% \texttt{vspacewithsolns} option}. This is implemented through
+% a Boolean switch \cs{ifvspacewithsolns}, which I'm sorry now I've made
+% so long. To make up for that bad decision, I also define
+% \DescribeMacro{\ifkeyalt}\cmd{ifkeyalt} to be \cmd{\ifvspacewithsolns}
+% with making conditional decisions, of course, one cannot say
+% \cs{keyalttrue}.
+% \begin{macrocode}
+\newif\ifvspacewithsolns\vspacewithsolnsfalse
+\def\ifkeyalt{\csname ifvspacewithsolns\endcsname}
+\def\ifkeyOrkeyalt{\ifanswerkey
+ \def\eqe@next{\csname iftrue\endcsname}\else
+ \ifvspacewithsolns\def\eqe@next{\csname iftrue\endcsname}\else
+ \def\eqe@next{\csname iffalse\endcsname}\fi\fi\eqe@next}
+\DeclareOptionX{vspacewithsolns}{%
+ \vspacewithsolnstrue\displayworkareatrue}
+\DeclareOptionX{ftbsolns}{%
+ \vspacewithsolnstrue\displayworkareatrue}
+% \end{macrocode}
+% \IndexOpt{useforms}
+% Use forms (if online option is taken); otherwise draw rectangles for
+% multiple choice/multiple selection questions.
+% \begin{macrocode}
+\DeclareOptionX{useforms}{\AtEndOfPackage{\def\sqstar{*}}}
+% \end{macrocode}
+% \IndexOpt{allowcirc4mc}
+% This option uses \texttt{lcircle10} to draw circles around multiple choice questions.
+% \begin{macrocode}
+\newif\ifallowcircmc \allowcircmcfalse
+\DeclareOptionX{allowcirc4mc}{\allowcircmctrue}
+% \end{macrocode}
+%
+% \paragraph*{PDF Options} The various options to go beyond paper!
+%
+% \IndexOpt{online}
+% \IndexOpt{pdf}
+% \IndexOpt{links}
+% \IndexOpt{email}
+% Options related to the interactive capability of \textsf{eqexam}.
+% \changes{v3.1b}{2012/06/18}{Added \cs{eqe@auto@chk@drivers}}
+% For each of the PDF options, we auto-check for \textsf{pdftex}
+% and \textsf{xetex}.
+% \begin{macrocode}
+\def\eqe@auto@chk@drivers{\ifpdf\ExecuteOptionsX{pdftex}\else
+ \ifxetex\ExecuteOptionsX{xetex}\fi\fi}
+\newif\ifeqeonline \eqeonlinefalse
+\DeclareOptionX{online}{\eqe@auto@chk@drivers
+ \let\eq@online\eqe@YES\eqeonlinetrue\ExecuteOptionsX{links}}
+\DeclareOptionX{pdf}{\eqe@auto@chk@drivers\let\load@web\eqe@YES}
+\DeclareOptionX{links}{\eqe@auto@chk@drivers
+ \let\load@web\eqe@YES\let\load@exerquiz\eqe@YES}
+\DeclareOptionX{email}{\eqe@auto@chk@drivers
+ \let\use@email\eqe@YES\ExecuteOptionsX{online}}
+% \end{macrocode}
+% \IndexOpt{obeylocalversions}
+% This option is used for multiple versions of a document.
+% \begin{macrocode}
+\newif\ifeqobeylocalversion \eqobeylocalversionfalse
+\DeclareOptionX{obeylocalversions}{\eqobeylocalversiontrue}
+% \end{macrocode}
+% \IndexOpt{usexkv}
+% Causes the \textsf{xkeyval} package to be input, this option extends the
+% option list of
+% \cs{fillIn}.
+% \begin{macrocode}
+\DeclareOptionX{usexkv}{\let\eq@usexkeys\eqe@YES}
+% \end{macrocode}
+%\texttt{2014/12/19} Now, the \texttt{usexkeys} is on by default.
+%\changes{v3.5a}{2014/12/19}{Made \texttt{usexkeys} as default}
+% \begin{macrocode}
+\let\eq@usexkeys\eqe@YES
+% \end{macrocode}
+%
+%\paragraph*{Renditions} Options relating to renditions.
+% \IndexOpt{max}
+% \IndexOpt{rendition}
+% The \texttt{max} and \texttt{rendition} option can be used instead of the
+% \verb!\numVersions{2}! and \verb!\forVersion{a}!, respectively. These options
+% allow you to set the version information though a package option. This allows us, for
+% example, to use a \textsf{cfg} file such as \texttt{rendition.cfg} to dynamically set the version.
+% This feature is used primarily by \textsf{AeB Exam Builder}.
+% \changes{v2.0}{2010/03/05}
+% {%
+% Switched over to \textsf{xkeyval}, added max and rendition to be consistent
+% with the renditions package, though we don't use the rendition package
+% itself. \textsf{eqexam} has a more extensive renditions system already.
+% Introduced this mostly for use AeB Exam Builder.
+% }
+% \begin{macrocode}
+\let\eq@renditionOptions\@empty
+\let\eq@max@selected\@empty \let\eq@ren@selected\@empty
+\DeclareOptionX{max}{\def\eq@max@selected{#1}%
+ \g@addto@macro\eq@renditionOptions{\numVersions{#1}}}
+\DeclareOptionX{rendition}{\def\eq@ren@selected{#1}%
+ \g@addto@macro\eq@renditionOptions{\forVersion{#1}}}
+% \end{macrocode}
+% \paragraph*{Randomization} Options relating to randomization.
+% \IndexOpt{allowrandomize}
+% Use this option to randomize the choices of a multiple choice question.
+% \begin{macrocode}
+\DeclareOptionX{allowrandomize}{\AtEndOfPackage{\inputRandomizeChoices}}
+\def\inputRandomizeChoices{\InputIfFileExists{aebrandom.def}
+ {\typeout{inputting aebrandom.def}}{cannot find aebrandom.def}}
+% \end{macrocode}
+%
+% \paragraph*{Set Misc. Defaults and Helper Macros.}
+% We set some defaults, and define macros for use by the document author.
+% \begin{macrocode}
+\let\eq@online\eqe@NO
+\def\ifisOnline{\ifx\eq@online\eqe@YES}
+\let\use@email\eqe@NO
+\let\load@web\eqe@NO
+\let\load@exerquiz\eqe@NO
+\def\sqLinks{\def\sqstar{}}\sqLinks
+\def\sqForms{\def\sqstar{*}}
+\def\NoSpaceToWork{\let\eq@insertverticalspace\eqe@NO}
+\def\SpaceToWork{\let\eq@insertverticalspace\eqe@YES}
+\let\eq@nototals\eqe@NO
+\let\eq@nosummarytotals\eqe@NO
+\let\eq@parttotals\eqe@YES
+\let\eqx@separationrule\eqe@YES
+\let\eq@insertverticalspace\eqe@YES
+\let\eqex@coverpage\relax
+\def\@reportpoints{0}
+\let\marginpoints\@empty
+\let\totalsbox=\hfil
+% \end{macrocode}
+%
+% \subsection{Options from and for \textsf{web}}
+% \IndexOpt{forpaper}
+% \IndexOpt{forcolorpaper}
+% Here is the list of options of \textsf{exerquiz} we plan to recognize.
+% \changes{v4.6a}{2016/06/04}{Added \string\cs{ifequsecolor} to easily distinguish between
+% \string\texttt{forpaper} and \string\texttt{forcolorpaper} options.}
+% \begin{macrocode}
+\@ifundefined{ifequsecolor}{\newif\ifequsecolor\equsecolorfalse}{}
+\DeclareOptionX{forpaper}{\equsecolorfalse\eqforpapertrue
+ \PassOptionsToPackage{monochrome}{\eq@ColorPackage}}
+\DeclareOptionX{forcolorpaper}{\equsecolortrue\eqforpapertrue} % for print
+% \end{macrocode}
+% \IndexOpt{preview}
+% Preview shows outlines for form fields.
+% \begin{macrocode}
+\DeclareOptionX{preview}{\previewtrue}
+% \end{macrocode}
+% \IndexOpt{webOpts}
+% Pass options to \textsf{web}, when \texttt{pdf} or higher is used.
+% \begin{macrocode}
+\define@key{eqexam.sty}{webOpts}[]{\def\eqe@webOpts{#1,\eqDriverName}}
+\def\eqe@webOpts{\eqDriverName}
+% \end{macrocode}
+%
+% \subsection{Options from and for \textsf{exerquiz}}
+% Options from \textsf{exerquiz} that are useful for this package.
+% \IndexOpt{exerquizOpts}
+% Pass options to \textsf{exerquiz}, when \texttt{links} or higher is used.
+% \begin{macrocode}
+\define@key{eqexam.sty}{exerquizOpts}[]{\def\eqe@eqOpts{#1,nodljs}}
+\def\eqe@eqOpts{nodljs}
+% \end{macrocode}
+% \IndexOpt{nosolutions}
+% \IndexOpt{nohiddensolutions}
+% \IndexOpt{noHiddensolutions}
+% \IndexOpt{solutionsafter}
+% \changes{v1.7b}{2007/21/07}{Added a \texttt{solutionsonly} option}
+% \IndexOpt{solutionsonly}
+% Solutions related options
+% \begin{macrocode}
+% dps 03/04/11
+\DeclareOptionX{nosolutions}{\eq@nolinktrue\eq@nosolutionstrue
+ \displayworkareatrue}
+\DeclareOptionX{nohiddensolutions}{\eq@globalshowsolutionstrue}
+\DeclareOptionX{noHiddensolutions}%
+ {\eq@globalshowsolutionstrue\AtBeginDocument{\def\Hidesymbol{h}}}
+\DeclareOptionX{solutionsafter}{\eq@solutionsaftertrue
+ \displayworkareafalse}
+\DeclareOptionX{solutionsonly}{%
+ \solutionsonlytrue\answerkeytrue\displayworkareafalse
+ \AtEndOfPackage{\therearesolutionstrue\let\exerSolnsHeadnToc\relax}}
+% \end{macrocode}
+% \IndexOpt{proofing}
+% The \texttt{proofing} option sets a switch that controls whether
+% the checkbox for multiple choice questions appears, and whether
+% the answer for the \cs{fillin} command appears. \cmd{\ifeq@proofing}
+% is set to true when the \texttt{answerkey} option is taken.
+% \begin{macrocode}
+\DeclareOptionX{proofing}{\eq@proofingtrue}
+% \end{macrocode}
+% We provide two helper commands for turning on or off proofing. These are
+% \DescribeMacro{\showproofing}\cmd{\showproofing} for turning on proofing
+% and \DescribeMacro{\hideproofing}\cmd{\hideproofing} for turning off proofing.
+% There was some reason for defining these two, but can't remember now.
+% \begin{macrocode}
+\newcommand{\showproofing}{\eq@proofingtrue}
+\newcommand{\hideproofing}{\eq@proofingfalse}
+% \end{macrocode}
+% \IndexOpt{showgrayletters}
+% \changes{v1.7c}{2008/08/21}
+% {
+% Added the \texttt{showgrayletters} option to eqexam
+% (ported from exerquiz)
+% }
+% When this option is in effect, capital letters in gray appear under
+% the multiple choice question boxes.
+% \begin{macrocode}
+\newif\ifaebshowgrayletters\aebshowgraylettersfalse
+\DeclareOptionX{showgrayletters}%
+ {\AtEndOfPackage{\aebshowgrayletterstrue}}
+% \end{macrocode}
+%
+%\changes{v2.0i}{2011/04/17 }
+%{
+% Added the switch \cs{ifdisplayworkarea} to better control when the
+% work area is to be displayed.
+%}
+% \begin{macrocode}
+\newif\ifdisplayworkarea \displayworkareafalse
+% \end{macrocode}
+%
+% \paragraph*{Color packages}
+% We set the color package, \texttt{xcolor} preferred.
+% \begin{macrocode}
+\IfFileExists{xcolor.sty}%
+{\def\eq@ColorPackage{xcolor}\def\eqe@color@opt{table}%
+ \PassOptionsToPackage{xcolor}{table}}
+{\def\eq@ColorPackage{color}\let\eqe@color@opt\@empty}
+% \end{macrocode}
+% \DescribeMacro{noxcolor}\texttt{noxcolor} forces the use of the color package.
+% \begin{macrocode}
+\DeclareOptionX{noxcolor}{\def\eq@ColorPackage{color}}
+% \end{macrocode}
+%
+% \subsubsection{Title page options}
+% To\DescribeMacro{useclassmaketitle} support the use of eqexam outside a straight exam document, we allow the
+% user to bypass the redefinition of \cs{maketitle}. This is automatic
+% with the \texttt{fortextbook} option.
+% \begin{macrocode}
+\newif\if@eqeuseclassmaketitle \@eqeuseclassmaketitlefalse
+\DeclareOptionX{useclassmaketitle}{\@eqeuseclassmaketitletrue}
+\newif\if@bypasseqexamheading \@bypasseqexamheadingfalse
+\DeclareOptionX{bypasspkgpagestyle}{\@bypasseqexamheadingtrue
+ \ExecuteOptionsX{nototals}}
+% \end{macrocode}
+% \subsection{Drivers Recognized}
+% These drivers are only relevant when
+% a \textsf{PDF} option is taken (\texttt{pdf}, \texttt{links}, \texttt{online}, \texttt{email}).
+% For ordinary paper documents, it is not necessary to specify the driver. If you
+% put the assignment/homework/test (solns) on the web, suggested option is \texttt{pdf},
+% this inputs hyperref, and the document info dialog is filled in.
+% \IndexOpt{dvipsone}
+% \IndexOpt{dvips}
+% \IndexOpt{pdftex}
+% \IndexOpt{dvipdfm}
+% \IndexOpt{dvipdfmx}
+% \IndexOpt{xetex}
+% \IndexOpt{textures}
+% The list of recognized and supported drivers.
+% \begin{macrocode}
+\DeclareOptionX{dvipsone}{%
+ \def\eqe@drivernum{0}\def\eqDriverName{dvipsone}%
+ \PassOptionsToPackage{\eq@ColorPackage}{dvipsone}}
+\DeclareOptionX{dvips}{\def\eqe@drivernum{0}\def\eqDriverName{dvips}%
+ \PassOptionsToPackage{\eq@ColorPackage}{dvips}}
+\DeclareOptionX{pdftex}{\def\eqe@drivernum{1}\def\eqDriverName{pdftex}%
+ \PassOptionsToPackage{\eq@ColorPackage}{pdftex}}
+\DeclareOptionX{dvipdfm}{%
+ \def\eqe@drivernum{2}\def\eqDriverName{dvipdfm}%
+ \PassOptionsToPackage{\eq@ColorPackage}{dvipdfm}}
+\DeclareOptionX{dvipdfmx}{\def\eqe@drivernum{2}%
+ \def\eqDriverName{dvipdfmx}%
+ \PassOptionsToPackage{\eq@ColorPackage}{dvipdfmx}}
+\DeclareOptionX{xetex}{\def\eqe@drivernum{2}\def\eqDriverName{xetex}%
+ \PassOptionsToPackage{\eq@ColorPackage}{xetex}}
+\DeclareOptionX{textures}{%
+ \def\eqe@drivernum{3}\def\eqDriverName{textures}%
+ \PassOptionsToPackage{\eq@ColorPackage}{textures}}
+\DeclareOptionX*{%
+ \PassOptionsToPackage{\CurrentOption}{\eq@ColorPackage}}
+\def\eqe@drivernum{5}
+\let\eqDriverName\@empty
+% \end{macrocode}
+% If \textsf{exerquiz} is not loaded, when we need to define some of the switches that
+% were defined in \textsf{exerquiz}.
+%
+% The following switches are used in the options above, and are also defined
+% in web, exerquiz, or eforms.
+% \begin{macrocode}
+\newif\ifeq@solutionsafter \eq@solutionsafterfalse
+\newif\ifsolutionsonly\solutionsonlyfalse
+\newif\ifeq@hidesolution \eq@hidesolutionfalse
+\newif\ifeq@globalshowsolutions \eq@globalshowsolutionsfalse
+\newif\ifeq@nosolutions \eq@nosolutionsfalse
+\newif\ifeq@proofing \eq@proofingfalse
+\newif\ifeq@nolink \eq@nolinkfalse
+\@ifundefined{ifpreview}{\newif\ifpreview \previewfalse}{}
+\newif\ifeqforpaper \eqforpaperfalse
+% \end{macrocode}
+% We define the commands for inputting the CFG files.
+% \begin{macrocode}
+\def\eqe@csarg#1#2{\expandafter#1\csname#2\endcsname}
+\@for\eqe@tmp@i:={},i,ii,iii,iv,v,vi\do{\eqe@csarg
+ \edef{eqemyconfig\eqe@tmp@i}{\noexpand
+ \InputIfFileExists{eqexam\eqe@tmp@i.cfg}{}{}}%
+ \eqe@tmp@exp
+}
+% \end{macrocode}
+%
+% \subsection{Bring in Config Files}
+%
+% First read \texttt{web.cfg}, to possibly get the driver, then input
+% \texttt{eqecus.opt}, which is used to create convenient custom options.
+% \changes{v1.6e}{2006/05/07}{%
+% Added a custom option feature. Just before the options are processed, the
+% tex compiler looks for the file \texttt{eqecus.opt}. This file should
+% contain one or more custom options. }
+%
+% Here is an example of usage for defining your own custom options, must be based on
+% current options, this code would be in the file \texttt{eqecus.opt}.
+%\begin{verbatim}
+%\DeclareOptionX{atbdbopts}
+%{%
+% \ExecuteOptionsX{online}
+% \ExecuteOptionsX{forcolorpaper}
+% \ExecuteOptionsX{nosolutions}
+% \ExecuteOptionsX{nopoints}
+% \ExecuteOptionsX{nototals}
+% \ExecuteOptionsX{nospacetowork}
+% \ExecuteOptionsX{obeylocalversions}
+% \ExecuteOptionsX{myconfig}
+%}
+%\end{verbatim}
+% The following config files are input prior to \cs{ProcessOptionsX}, and can,
+% therefore, contain declaration of options. \texttt{web.cfg} usually only
+% specifies the default driver. \texttt{eqecus.opt} is used by \textsf{@EASE},
+% but can be used locally.
+% \begin{macrocode}
+\InputIfFileExists{web.cfg}{}{}
+\InputIfFileExists{eqecus.opt}{}{}
+% \end{macrocode}
+%\changes{v2.0}{2010/03/05}
+%{
+% Added exambuilder.cfg for use by AeB Exam Builder, to pass the values of the options
+% max and rendition to eqexam.
+%}
+% These two are used by the \textsf{rendition} package and the exam builder utility.
+% \begin{macrocode}
+\InputIfFileExists{rendition.cfg}{}{}
+\InputIfFileExists{exambuilder.cfg}{}{}
+% \end{macrocode}
+%
+% \subsection{Process Options}
+%
+% Now process the options.
+% \begin{macrocode}
+\ProcessOptionsX
+% \end{macrocode}
+% \changes{v3.2c}{2013/02/23}{Added \cs{selectedMC} at end of package}
+% The \cs{selectedMC} command contains the choice for the styling for the
+% region multiple choice questions: rectangles or circles. The default is
+% rectangles.
+% \begin{macrocode}
+\AtEndOfPackage{\selectedMC}
+% \end{macrocode}
+% (2015/07/12) Move the inclusion of the color package prior to loading many of the other
+% required packages.
+% \begin{macrocode}
+\edef\eqe@tmpexp{\noexpand
+\RequirePackage{\eq@ColorPackage}}\eqe@tmpexp
+% \end{macrocode}
+% We require a minimal version for \textsf{xcolor}.
+%\changes{}{2015/07/21}{add \cs{let}\cs{CT@arc@}\cs{relax}}
+% \begin{macrocode}
+\@ifpackageloaded{xcolor}{\AtEndOfPackage{\let\CT@cell@color\relax
+ \let\CT@arc@\relax}%
+ \@ifpackagelater{xcolor}{2004/07/04}{}{\PackageError{eqexam}{%
+ *************************************************\MessageBreak
+ * Your Version of `xcolor.sty' is too old!\MessageBreak
+ * You need the version from 2004/07/04 or newer\MessageBreak
+ * or use: \string\usepackage[noxcolor]{eqexam}\MessageBreak
+ * or \string\documentclass[noxcolor]{article}\MessageBreak
+ *************************************************}{}%
+ }%
+}{}
+% \end{macrocode}
+% If \texttt{nocustomdesign} option is taken, we set the switch
+% \cmd{\eqcustomdesignfalse}.
+% \begin{macrocode}
+\if\eqe@nocustomdesign1\eqcustomdesignfalse\fi
+% \end{macrocode}
+% Define a \cs{immediate}\cs{write} helper macro.
+% \begin{macrocode}
+\long\def\eqe@IWO#1{\immediate\write#1}
+% \end{macrocode}
+% \paragraph*{Early definitions for the \texttt{fortextbook} option.}
+% \begin{macro}{\showAllAnsAtEnd}
+% If the user has chosen the \texttt{vspacewithsolns} option, we must turn
+% of all other solution options, namely \texttt{answerkey}. This command is
+% used internally.
+% \changes{v4.6b}{2016/10/02}{Include \string\cs{eqTopOfSolnPage} from \string\pkg{exerquiz}
+% to support copying question to solution page.}
+% \medskip\par\noindent
+% (2016/10/02) Include \cs{eqTopOfSolnPage} from \pkg{exerquiz}
+% to support copying question to solution page.
+% \begin{macrocode}
+\newcommand{\showAllAnsAtEnd}{%
+ \makeAnsEnvForSolnsAtEnd\eqTopOfSolnPage
+ \answerkeytrue\eq@proofingtrue
+ \eq@solutionsaftertrue\vspacewithsolnstrue
+ \displayworkareafalse\withsoldoctrue
+}
+% \end{macrocode}
+% \begin{macro}{\makeAnsEnvForSolnsAtEnd}
+% One user wanted to be able to use the \texttt{answers} environment
+% in the solutions section at the end of the document (when the
+% \texttt{vspacewithsolns} is used). Here it is. This definition
+% is added to the definition of \cmd{\showAllAnsAtEnd}.
+% \begin{macrocode}
+\newcommand{\makeAnsEnvForSolnsAtEnd}{%
+% \end{macrocode}
+% \changes{v3.1e}{2012/11/10}{Removed hard-wired \cs{proofingsymbol}}
+% \begin{macrocode}
+% \proofingsymbol{\ding{52}}%
+ \let\answers\answers@sq
+ \let\endanswers\endanswers@sq
+ \let\manswers\manswers@sq
+ \let\endmanswers\endmanswers@sq
+}
+% \end{macrocode}
+% \begin{macrocode}
+\newcommand{\solAtEndFormatting}[1]{\def\eqeAEFormatting{#1}}
+\let\eqeAEFormatting\@empty
+% \end{macrocode}
+% \cs{writeAllAnsAtEnd} writes the \cs{showAllAnsAtEnd} command to the solutions file.
+% \begin{macrocode}
+\def\writeAllAnsAtEnd{\ifsolutionsonly\else
+ \let\quiz@solns\ex@solns
+ \eqe@IWO\quiz@solns{\string\showAllAnsAtEnd}%
+ \ifx\eqeAEFormatting\@empty\else
+ \eqe@IWO\quiz@solns{\string\eqeAEFormatting}\fi
+ \fi
+}
+% \end{macrocode}
+% \end{macro}
+% \end{macro}
+% \begin{macro}{\setSolnMargins}
+% Sets the value of \cs{eqemargin} in the context of the solution file,
+% this command is redefined later.
+% \begin{macrocode}
+\newcommand{\setSolnMargins}[1]{\setlength\eqemargin{#1}}
+% \end{macrocode}
+% \end{macro}
+% (2011/05/08) In the new version of \textsf{eqexam}, the one that makes
+% the problems within an \texttt{exam} environment, into a list, the
+% solutions file that appears at the end of the document also needs to be
+% put into a list. Here, we define the command that writes the beginning of
+% the \texttt{eqequestions} environment to the beginning of the
+% \cs{jobname.sol} file. We hard-wire write \verb!\setSolnMargins{\the\eqemargin}!
+% to the solution file, but leave a back door open to write an alternate string.
+% (2014/03/20) \DescribeMacro{\altSetSolnMargins}\cmd{\altSetSolnMargins} allows you,
+% through its argument to pass an alternate string.
+% \begin{macrocode}
+\def\altSetSolnMargins#1{\def\alt@SetSolnMargins{#1}}
+\let\alt@SetSolnMargins\@empty
+\def\writeBeginEqeQuestions{%
+ \ifsolutionsonly\else
+ \let\quiz@solns\ex@solns
+ \ifx\alt@SetSolnMargins\@empty
+ \writeToSolnFile{\string\setSolnMargins{\the\eqemargin}}\else
+ \writeToSolnFile{\alt@SetSolnMargins}\fi
+ \writeToSolnFile{\string\noindent\string\begin{eqequestions}}%
+ \fi
+}
+% \end{macrocode}
+% (2011/05/08) We define the command that writes the end of the \texttt{eqequestions}
+% environment to the beginning of the \cs{jobname.sol} file.
+% \begin{macrocode}
+\newcommand{\setBtwnExamSkip}[1]{\gdef\btwnExamSkipAmt{#1}%
+ \def\btwnExamSkip{\ifdim#1=0pt\else
+ \vskip#1\relax\fi}}
+\setBtwnExamSkip{6pt}
+\def\writeEndEqeQuestions{%
+ \ifsolutionsonly\else
+ \let\quiz@solns\ex@solns
+ \eqe@IWO\quiz@solns{\string\end{eqequestions}^^J}%
+ \writeToSolnFile{\string\btwnExamSkip^^J}%
+ \fi
+}
+% \end{macrocode}
+% If \cs{ifvspacewithsolns} we set the switches need to simulate
+% \texttt{nosolutions}.
+% \begin{macrocode}
+\ifvspacewithsolns
+ \answerkeyfalse\eq@proofingfalse\eq@solutionsafterfalse
+ \eq@nolinkfalse\eq@nosolutionsfalse\displayworkareatrue
+\fi
+% \end{macrocode}
+%
+% \subsection{Save Switch Values}
+%
+% Now, save the current state of the switches defined above. When, and if,
+% the packages web, \textsf{exerquiz} and \textsf{eforms} are loaded, they will overwrite the
+% choices set by the author, so we save them.
+% \begin{macrocode}
+\let\savedeq@online\eq@online
+\let\savedifeq@solutionsafter\ifeq@solutionsafter
+\let\savedifeq@hidesolution\ifeq@hidesolution
+\let\savedifeq@globalshowsolutions\ifeq@globalshowsolutions
+\let\savedifeq@nosolutions\ifeq@nosolutions
+\let\savedifeq@proofing\ifeq@proofing
+\let\savedifeq@nolink\ifeq@nolink
+\let\savedifpreview\ifpreview
+\let\savedifeqforpaper\ifeqforpaper
+\let\ifnosolutions\ifeq@nosolutions
+% \end{macrocode}
+% \section{Required Packages}
+% The following are the required packages for \textsf{eqexam}.
+% \begin{macrocode}
+\RequirePackage{amstext,amssymb}
+% \end{macrocode}
+% \begin{macrocode}
+\@ifundefined{if@fleqn}{\let\fleqnOn\relax\let\fleqnOff\relax}
+ {\def\fleqnOn{\@fleqntrue}\def\fleqnOff{\@fleqnfalse}}
+% \end{macrocode}
+% Bring the \texttt{comment} package in early, before \texttt{verbatim}, these two
+% clash a bit.
+% \begin{macrocode}
+\RequirePackage{comment}
+% \end{macrocode}
+% The macro \cs{includeexersolutions} is defined in \textsf{eqexam.def}. We execute
+% the command \cs{include@solutions} before the web package is loaded. The \textsf{web} package
+% has a \cs{AtEndDocument} as well, and inserts a new page that we don't want.
+% \begin{macrocode}
+\AtEndDocument{\includeexersolutions}
+% \end{macrocode}
+% If user has specified one of the pdf options (pdf, links, online, email), we bring in
+% the web package.
+% \begin{macrocode}
+\@ifpackageloaded{web}{\let\load@web\eqe@YES}{%
+ \ifx\load@web\eqe@YES\ifnum\eqe@drivernum=5
+ \PackageInfo{eqexam}{You have not selected a driver %
+ for eqexam. Perhaps the \MessageBreak
+ driver is introduced through web.cfg%
+ }\fi\expandafter\RequirePackage\expandafter[\eqe@webOpts]{web}%
+ \edef\@pdfcreator{\@pdfcreator, The eqexam Package}\fi
+}
+% \end{macrocode}
+% If user has specified links, online or email, we bring in the exerquiz package.
+% \begin{macrocode}
+\@ifpackageloaded{exerquiz}{\let\load@exerquiz\eqe@YES}{%
+ \let\symbolchoice\@gobble
+ \ifx\load@exerquiz\eqe@YES\expandafter
+ \RequirePackage\expandafter[\eqe@eqOpts]{exerquiz}[2011/08/30]
+% \end{macrocode}
+% We input \textsf{exerquiz} with the \texttt{nodljs}, we don't need all the JavaScript
+% to process interactive shortquizzes or quizzes, but we do want the option of
+% adding in document JavaScript, so after we input \textsf{exerquiz}, we set the
+% switches to allow these features.
+% \begin{macrocode}
+ \let\importdljs\eqe@YES\let\execjs\eqe@YES
+ \fi
+}
+\@ifpackageloaded{eforms}{}{%
+% \end{macrocode}
+% If \textsf{eforms} is not loaded, we define \cs{symbolchoice}, which is
+% defined in \textsf{eforms} to gobble up its argument, we don't need it.
+% \begin{macrocode}
+ \let\symbolchoice\@gobble
+}
+% \end{macrocode}
+% Here is a fix to a problem I've been having previewing in \textsf{dviwindo}. I've traced
+% the problem down to \cs{@pdfviewparams}. Redefining \cs{@pdfviewparams} as follows.
+% \begin{macrocode}
+\def\eqDvipsone{dvipsone}
+\@ifpackageloaded{hyperref}
+ {\ifx\eqDriverName\eqDvipsone
+ \renewcommand\@pdfviewparams{ null null null}\fi
+ }{\let\textorpdfstring\@firstoftwo}
+% \end{macrocode}
+% Now that we have possibly input \textsf{web} or \textsf{exerquiz}, we need to restore the authors options.
+% \begin{macrocode}
+\let\eq@online\savedeq@online
+\let\ifeq@solutionsafter\savedifeq@solutionsafter
+\def\ifsolutionsafter{\ifeq@solutionsafter} % user interface
+\let\ifeq@hidesolution\savedifeq@hidesolution
+\let\ifeq@globalshowsolutions\savedifeq@globalshowsolutions
+\let\ifeq@nosolutions\savedifeq@nosolutions
+\let\ifeq@proofing\savedifeq@proofing
+\let\ifeq@nolink\savedifeq@nolink
+\let\ifpreview\savedifpreview
+\let\ifeqforpaper\savedifeqforpaper
+% \end{macrocode}
+% Other packages of interest.
+% \begin{macrocode}
+\RequirePackage{calc}
+\RequirePackage{pifont}
+\RequirePackage{array}
+% \end{macrocode}
+% Here, I input the \texttt{verbatim} package after the comment package.
+% \begin{macrocode}
+\RequirePackage{verbatim}
+% \end{macrocode}
+% When constructing paper tests, I often use a multi-column format for some of
+% the questions, so let's require this package
+% \begin{macrocode}
+\RequirePackage{multicol}
+\setlength\columnseprule{.4pt}
+\raggedcolumns\multicolsep=3pt
+\newcommand{\setmulticolprob}{%
+ \setlength{\linewidth}{\linewidth+\eqemargin}}
+% \end{macrocode}
+% For the \texttt{fortextbook} option, we require \textsf{eso-pic}.
+% \begin{macrocode}
+\edef\eqe@reqPack{\ifeqfortextbook\noexpand\RequirePackage{eso-pic}\else
+\relax\fi}
+\eqe@reqPack
+% \end{macrocode}
+% We've processed the options, I need to detect whether the document author
+% has not chosen any solutions options.
+% \begin{macrocode}
+\@ifundefined{ifsolutionsAtEnd}
+ {\newif\ifsolutionsAtEnd\solutionsAtEndtrue}{}
+\ifvspacewithsolns\solutionsAtEndtrue\fi
+\ifanswerkey\solutionsAtEndfalse\fi
+\ifeq@nosolutions\solutionsAtEndfalse\fi
+\ifeq@solutionsafter\solutionsAtEndfalse\fi
+% \end{macrocode}
+% \section{Page Layout}
+% (2011/05/08) The revised version of \texttt{eqexam} allows the document author
+% to more easily design the size of the page; the new version makes all content
+% inside the \texttt{exam} environment into a list, this gives us better control over the
+% margins and spacing.
+% \begin{macro}{\eqexammargin}
+% (2011/05/08) Use this command to set the margin for the \texttt{exam} environment.
+% \begin{macrocode}
+\@ifundefined{eqemargin}{\newlength{\eqemargin}}{}
+\providecommand{\prbDecPt}[1]{\def\eqe@decPointPrb{#1}}
+\def\eqe@decPointPrb{.}\def\eqe@dpsepPrb{\ }
+\providecommand{\prbPrtsep}[1]{\def\eqe@prtsepPrb{#1}}
+\def\eqe@prtsepPrb{\ }
+\providecommand{\prbNumPrtsep}[1]{\def\eqe@hspannerPrb{#1}}
+\def\eqe@hspannerPrb{\ }
+\newcommand{\eqexammargin}[2][\normalsize\normalfont\bfseries]{%
+ \settowidth{\eqemargin}{#1#2\eqe@decPointPrb\eqe@hspannerPrb}}
+% \end{macrocode}
+% (2011/05/08) The default margin for the \textsf{eqexam} environment, two digits and a space.
+% \begin{macrocode}
+\eqexammargin{00}
+% \end{macrocode}
+%\changes{v3.0s}{2012/01/01}{%
+% Moved a copy of \cs{eqe@spannerSoln} out of the \texttt{ftbsty} to the \texttt{package} section,
+% its needed here as well.}
+% \begin{macrocode}
+\def\eqe@hspannerSoln{\ } % space after prob number
+\providecommand{\solNumPrtsep}[1]{\def\eqe@hspannerSoln{#1}}
+% \end{macrocode}
+% \end{macro}
+% \begin{macro}{\eqeSetExamPageParams}
+% (2011/05/08) The default spacing maximizes the amount of space on the page.
+% \begin{macrocode}
+\newcommand{\eqeSetExamPageParams}{%
+ \setlength{\headheight}{12pt}
+ \setlength{\topmargin}{-.5in}
+ \setlength{\headsep}{20pt}
+ \setlength{\oddsidemargin}{0pt}
+ \setlength{\evensidemargin}{0pt}
+ \setlength{\marginparsep}{11pt}
+ \setlength{\marginparwidth}{35pt}
+ \setlength{\footskip}{11pt}
+}
+% \end{macrocode}
+% \end{macro}
+% \begin{macro}{\eqExamPageLayout}
+% Set the basic parameters of this exam page package
+% \begin{macrocode}
+\newcommand{\eqExamPageLayout}{%
+ \setlength\textwidth\paperwidth
+ \addtolength{\textwidth}{-2in}
+ \addtolength{\textwidth}{-\oddsidemargin}
+ \setlength\textheight{\paperheight}
+ \addtolength\textheight{-2in}
+ \addtolength\textheight{-\headheight}
+ \addtolength\textheight{-\headsep}
+ \addtolength\textheight{-\topmargin}
+ \addtolength\textheight{-\footskip}
+}
+% \end{macrocode}
+% (2011/05/08) If \texttt{usecustomdesign} is used it is expected that
+% \cs{eqe\-Set\-Exam\-Page\-Params} and \cs{eqeSetExamPageParams} are redefined in he preamble,
+% otherwise, we set up the standard parameters; otherwise
+% \begin{macrocode}
+\ifeqcustomdesign\else
+\eqeSetExamPageParams
+\eqExamPageLayout
+\fi
+% \end{macrocode}
+% \end{macro}
+% A simple page layout scheme for this exam.
+% \begin{macrocode}
+\newcommand{\ps@eqExamheadings}
+{%
+ \renewcommand{\@oddhead}{%
+ {\normalfont\normalsize\ifnum\value{page}<2
+ \hfil\else\eqExamRunHead\fi}}%
+ \renewcommand{\@evenhead}{\@oddhead}
+ \renewcommand{\@oddfoot}{\settotalsbox\runExamFooter}
+ \renewcommand{\@evenfoot}{\@oddfoot}
+}
+\raggedbottom
+% \end{macrocode}
+% \section{Counters, Lengths and Tokens}
+% Some counters to keep track of things. \DescribeEnv{eqpointsofar}
+% \DescribeEnv{eqpointsthispage} The first two counters keep track, respectively,
+% of the total points so far up the current page, and the number of points
+% on the current page. \DescribeEnv{eq@numparts} The counter \texttt{eq@numparts}
+% holds the number of parts of the multi-part question.
+% \begin{macrocode}
+\newcounter{eqpointsofar}
+\newcounter{eqpointsthispage}
+\newcounter{eq@numparts}
+\newcounter{eq@count}
+\newtoks\partNames \partNames={}
+\newlength{\eq@tmplengthA}
+\newbox{\eq@pointbox}
+\newlength{\eq@pointboxtotalheight}
+% \end{macrocode}
+% Some scratch registers to do calc calculations.
+% \begin{macrocode}
+\newlength{\eqetmplengtha}
+\newlength{\eqetmplengthb}
+% \end{macrocode}
+% \section{Some Macros to Support the Options}
+% We make a few definitions to support various options.
+% \begin{macrocode}
+\def\PointsOnLeft{\def\@reportpoints{1}\let\marginpoints\eqleftmargin}
+\def\PointsOnRight{\def\@reportpoints{2}\relax
+ \let\marginpoints\eqrightmarginbox}
+\def\PointsOnBothSides{\def\@reportpoints{3}\relax
+ \let\marginpoints\eqbothmargins}
+\newif\ifeqe@nopoints \eqe@nopointsfalse
+\def\NoPoints{\if\isInExamEnv\eqe@NO
+ \eqe@nopointstrue\def\@reporttotals{0}\let\totalsbox=\hfil
+ \let\marginpoints\@empty\let\eq@nosummarytotals\eqe@YES\else
+ \PackageWarning{eqexam}{The \string\NoPoints\space ignored;
+ it needs to be executed\MessageBreak outside of an
+ exam environment}\fi}
+\def\TotalsOnLeft{\def\@reporttotals{1}\def\totalsbox{\totalsboxleft}}
+\def\TotalsOnRight{\def\@reporttotals{2}\def\totalsbox{\totalsboxright}}
+\def\noZeroTotals{\let\eqe@zeroTotalsAllowed\eqe@NO}
+\def\allowZeroTotals{\let\eqe@zeroTotalsAllowed\eqe@YES}
+\allowZeroTotals
+\def\NoTotals{\def\@reporttotals{0}\let\totalsbox=\hfil}
+\def\SummaryTotalsOn{\let\eq@nosummarytotals\eqe@NO}
+\def\SummaryTotalsOff{\let\eq@nosummarytotals\eqe@YES}
+\def\eoeTotalOff{\let\eq@parttotals\eqe@NO}
+\def\eoeTotalOn{\let\eq@parttotals\eqe@YES}
+\def\separationruleOn{\let\eqx@separationrule\eqe@YES}
+\def\separationruleOff{\let\eqx@separationrule\eqe@NO}
+\def\AllowFitItIn{\global\let\eq@fititin\eqfititin}
+\def\DoNotFitItIn{\global\let\eq@fititin\@gobble}
+% \end{macrocode}
+%\changes{v3.0p}{2011/09/22}{Added \cs{NoSolutions} to be executed in
+%preamble, needed with the fortextbook package.}
+% \begin{macrocode}
+\def\NoSolutions{\eq@nolinktrue\eq@nosolutionstrue
+ \displayworkareatrue}
+\@onlypreamble\NoSolutions
+% \end{macrocode}
+% \begin{macro}{\vspacewithkeyOn}
+% \begin{macro}{\vspacewithkeyOff}
+%\changes{v2.0k}{2011/04/29}{Added user interface to the switch
+%\cs{ifkeepdeclaredvspacing}, which is defined in \texttt{eqexam.def}/\textsf{exerquiz}.}
+% User interface to keeping the declare vspace, even when
+% the \texttt{answerkey} (or \texttt{solutionsafter}) option is taken. The switch
+% \cs{ifkeepdeclaredvspacing} is defined in \texttt{eqexam.def}/\textsf{exerquiz}.
+% \begin{macrocode}
+\def\vspacewithkeyOn{\keepdeclaredvspacingtrue}
+\def\vspacewithkeyOff{\keepdeclaredvspacingfalse}
+% \end{macrocode}
+% \end{macro}
+% \end{macro}
+%\DescribeMacro{\displayPointsOn}\cmd{\displayPointsOn} displays the points, if not otherwise
+% overridden and the command \DescribeMacro{\displayPointsOff}\cmd{\displayPointsOff} turns off the
+% display of points. In either case, points are calculated.
+% \begin{macrocode}
+\newif\ifdispl@yPoints\displ@yPointstrue
+\newcommand{\displayPointsOn}{\displ@yPointstrue}
+\newcommand{\displayPointsOff}{\displ@yPointsfalse}
+\newif\ifl@stDispl@yPoints\l@stDispl@yPointsfalse
+% \end{macrocode}
+% \begin{macro}{\encloseProblemsWith}
+%\changes{v1.7b}{2007/21/07}
+%{%
+% Added \cs{encloseProblemsWith} to support the \texttt{solutionsonly} option
+%}
+% \cs{encloseProblemsWith} to support the \texttt{solutionsonly} option
+% \begin{macrocode}
+\def\encloseProblemsWith#1{%
+ \ifsolutionsonly\excludecomment{#1}\else
+ \includecomment{#1}\fi
+}
+% \end{macrocode}
+% \end{macro}
+% \section{Colors}
+% \begin{macro}{\proofingsymbolColor}
+% \begin{macro}{\instructionsColor}
+% \begin{macro}{\eqCommentsColor}
+% \begin{macro}{\universityColor}
+% \begin{macro}{\titleColor}
+% \begin{macro}{\authorColor}
+% \begin{macro}{\subjectColor}
+% \begin{macro}{\linkcolor}
+% \begin{macro}{\nolinkcolor}
+% \begin{macro}{\fillinColor}
+% \begin{macro}{\forceNoColor}
+% \begin{macro}{\eqEndExamTotalColor}
+% Here we list commands for controlling colors. There are some other
+% colors defined in the stand alone code.
+% \changes{v1.6e}{2006/05/07}
+% {
+% Added easy user access to various colors, \cs{proofing\-symbol\-Color},
+% \cs{instructionsColor}, \cs{eqCommentsColor}, \cs{authorColor},
+% \cs{title\-Color}, \cs{universityColor} and \cs{subjectColor}
+% }
+% \begin{macrocode}
+\providecommand{\proofingsymbolColor}[1]{\def\@proofingsymbolColor{#1}}
+\proofingsymbolColor{red}
+\providecommand{\instructionsColor}[1]{\def\@instructionsColor{#1}}
+\instructionsColor{blue}
+\providecommand{\eqCommentsColor}[1]{\def\@eqCommentsColor{#1}}
+\eqCommentsColor{blue}
+\providecommand{\eqCommentsColorBody}[1]{\def\@eqCommentsColorBody{#1}}
+\eqCommentsColorBody{black}
+\providecommand{\universityColor}[1]{\def\webuniversity@color{#1}}
+\universityColor{blue}
+\providecommand{\titleColor}[1]{\def\webtitle@color{#1}}
+\titleColor{black}
+\providecommand{\authorColor}[1]{\def\webauthor@color{#1}}
+\authorColor{black}
+\providecommand{\subjectColor}[1]{\def\websubject@color{#1}}
+\subjectColor{blue}
+\providecommand{\linkcolor}[1]{\def\@linkcolor{#1}}
+\linkcolor{blue}
+\providecommand{\nolinkcolor}[1]{\def\@nolinkcolor{#1}}
+\nolinkcolor{black}
+\providecommand{\eqEndExamTotalColor}[1]{\def\endexamtotal@color{#1}}
+\eqEndExamTotalColor{black}
+\newcommand\fillinColor[1]{\def\eq@fillinColor{#1}}\fillinColor{red}
+\providecommand{\sectionColor}[1]{\def\web@sectionsColorOld{#1}
+ \def\aeb@sectioncolor{#1}}
+\sectionColor{blue}
+\newcommand{\forceNoColor}{%
+ \proofingsymbolColor{black}\instructionsColor{black}
+ \eqCommentsColor{black}\universityColor{black}
+ \titleColor{black}\authorColor{black}
+ \subjectColor{black}\linkcolor{black}
+ \nolinkcolor{black}\fillinColor{black}
+ \eqEndExamTotalColor{black}
+ \if\load@web\eqe@YES\sectionColor{black}\fi
+}
+% \end{macrocode}
+% \end{macro}
+% \end{macro}
+% \end{macro}
+% \end{macro}
+% \end{macro}
+% \end{macro}
+% \end{macro}
+% \end{macro}
+% \end{macro}
+% \end{macro}
+% \end{macro}
+% \end{macro}
+% \section{Version Control}
+% Here are some simple macros use to create two versions,
+% version A and version B, of the same test.
+% \begin{macro}{\examNum}
+% Convenience macro for holding the exam number. It sets the
+% value of \cs{nExam}.
+% \begin{macrocode}
+\def\examNum#1{\def\nExam{#1}}
+\examNum{1}
+% \end{macrocode}
+% \end{macro}
+% \begin{macro}{\Exam}
+% \begin{macro}{\sExam}
+% Convenience macros for titling the exam. Usage:
+%\begin{verbatim}
+%\VersionAtext{Test~\nExam--Version A}
+%\VersionBtext{Test~\nExam--Version B}
+%\shortVersionAtext{T\nExam A}
+%\shortVersionBtext{T\nExam B}
+%
+%\examNum{1}
+%\forVersion{c}
+%\subject[C3]{Calculus III}
+%\title[\sExam]{\Exam}
+%\author{Dr.\ D. P. Story}
+%\end{verbatim}
+% These next two definitions are overwritten by the two
+% commands \cs{longTitleText} and \cs{shortTitleText}.
+% \begin{macrocode}
+\def\Exam{\ifAB{\eq@VersionAtext}{\eq@VersionBtext}}
+\def\sExam{\ifAB{\eq@shortVersionAtext}{\eq@shortVersionBtext}}
+% \end{macrocode}
+% \end{macro}
+% \end{macro}
+% \begin{macro}{\VersionAtext}
+% \begin{macro}{\VersionBtext}
+% \begin{macro}{\shortVersionAtext}
+% \begin{macro}{\shortVersionBtext}
+% Convenience macros for entering the text for the title, long and short
+% for versions A and B.
+% \begin{macrocode}
+\def\VersionAtext#1{\def\eq@VersionAtext{#1}}
+\def\VersionBtext#1{\def\eq@VersionBtext{#1}}
+\def\shortVersionAtext#1{\def\eq@shortVersionAtext{#1}}
+\def\shortVersionBtext#1{\def\eq@shortVersionBtext{#1}}
+\VersionAtext{Exam~\nExam--Version A}
+\VersionBtext{Exam~\nExam--Version B}
+\shortVersionAtext{Exam~\nExam A}
+\shortVersionBtext{Exam~\nExam B}
+% \end{macrocode}
+% \end{macro}
+% \end{macro}
+% \end{macro}
+% \end{macro}
+% In this section we introduce a new set of commands that supersedes
+% the commands defined above. Those commands were limited to only
+% two versions. The ones below can handle up to $26$ versions.
+% \begin{macrocode}
+\newtoks\eqtemptokena
+\newtoks\eqtemptokenb
+% \end{macrocode}
+% \begin{macro}{\numVersions}
+% In the preamble, declare the number of versions for this document
+% using \cs{numVersions}, e.g., |\numVersions{3}|. This sets the value
+% of \cs{eq@nVersions}
+% \begin{macrocode}
+\def\numVersions#1{\ifnum#1>26\def\eq@nVersions{26}%
+ \PackageWarning{eqexam}{The value of \string\numVersions\space is
+ too large. \MessageBreak Choose a natural number less than 27}
+ \else\def\eq@nVersions{#1}\fi}
+% \end{macrocode}
+% \end{macro}
+% \begin{macro}{\longTitleText}
+% \begin{macro}{\endlongTitleText}
+% \begin{macro}{\shortTitleText}
+% \begin{macro}{\endshortTitleText}
+% Next we state the long and short titles for our document,
+% one for each of our declare number of versions given earlier.
+% For example, we can use the value \cs{nExam} in out titles. Usage:
+%\begin{verbatim}
+% \longTitleText
+% {Test~\nExam--Version A}
+% {Test~\nExam--Version B}
+% {Test~\nExam--Make Up}
+% \endlongTitleText
+% \shortTitleText
+% {T\nExam A}
+% {T\nExam B}
+% {T\nExam MU}
+% \endshortTitleText
+%\end{verbatim}
+% I've added markers that delimit the end of the arguments. In this
+% way, the end of the list of titles can be detected, even though
+% the number of titles is not the same as what is declared by the
+% \cs{numVersions}.
+%
+% If there are more titles than what is declared, the rest are absorbed (gobbled).
+% If there are fewer titles than declared, a {\LaTeX} package error is generated,
+% and substitute titles are generated.
+% \changes{v1.9f}{2009/10/06}
+% {
+% Modified \cs{longTitleText}, \cs{shortTitleText} to have an optional
+% argument (A--Z;a--z). You can select a particular title from a list
+% of titles. If no optional argument is passed, then the title determined
+% by \cs{forVersion} is used.
+% }
+% Modified \cs{longTitleText} and \cs{shortTitleText} to have an optional
+% argument (A--Z;a--z). You can select a particular title from a list
+% of titles. If no optional argument is passed, then the title determined
+% by \cs{forVersion} is used.
+% \begin{macrocode}
+\newcommand{\longTitleText}[1][]{%
+ \ifeqglobalversion\let\eq@selectedVersion@save\eq@selectedVersion
+ \else\let\eq@selectedVersion@save\relax\fi
+ \uppercase{\def\eqe@localTextTitle{#1}}%
+ \ifx\eqe@localTextTitle\@empty\else
+ \expandafter\forVersion\expandafter{\eqe@localTextTitle}\fi
+ \eqe@contTitleText{\Exam}{\endlongTitleText}%
+}
+\def\endlongTitleText{l}
+\newcommand{\shortTitleText}[1][]{%
+ \ifeqglobalversion\let\eq@selectedVersion@save\eq@selectedVersion
+ \else\let\eq@selectedVersion@save\relax\fi
+ \uppercase{\def\eqe@localTextTitle{#1}}%
+ \ifx\eqe@localTextTitle\@empty\else
+ \expandafter\forVersion\expandafter{\eqe@localTextTitle}\fi
+ \eqe@contTitleText{\sExam}{\endshortTitleText}%
+}
+\def\endshortTitleText{s}
+% \end{macrocode}
+% Both title commands, above, call this macro which sets the environment
+% for \cs{@gatherTitleText}, which gathers the list of titles.
+% \begin{macrocode}
+\def\eqe@contTitleText#1#2{%
+ \setcounter{eq@count}{0}%
+ \eqtemptokena={}\let\endtitleMarker#2
+ \@gatherTitleText{#1}%
+}
+% \end{macrocode}
+% \end{macro}
+% \end{macro}
+% \end{macro}
+% \end{macro}
+% This command gathers each title and places it as the argument of a
+% \cs{v<LETTTER>} command. These are accumulated in token registers
+% then saved in \cs{Exam} and \cs{sExam}.
+% \begin{macrocode}
+\def\@gatherTitleText#1#2{%
+ \def\eqe@argii{#2}
+ \if\endtitleMarker\eqe@argii
+% \end{macrocode}
+% Encountered the end marker. See if we have collected the
+% correct number of titles declared. If we have collected too
+% few, we note an warning in the log, and create titles.
+% \begin{macrocode}
+ \ifnum\value{eq@count}>\eq@nVersions\let\eqe@next\relax
+ \else\def\eqe@next{\eq@shortTitlesFix{#1}}\fi
+ \else
+ \stepcounter{eq@count}
+ \eqtemptokenb=\expandafter{#2}
+ \xdef#1{\the\eqtemptokena\expandafter\noexpand
+ \csname v\Alph{eq@count}\endcsname{\the\eqtemptokenb}}
+ \xdef\sExam{\the\eqtemptokena\expandafter\noexpand
+ \csname v\Alph{eq@count}\endcsname{\the\eqtemptokenb}}
+ \eqtemptokena=\expandafter{#1}
+ \ifnum\value{eq@count}<\eq@nVersions
+ \def\eqe@next{\@gatherTitleText{#1}}%
+ \else
+ \def\eqe@next{%
+ \if\endtitleMarker\endlongTitleText
+ \expandafter\eqe@absorbTokensLong
+ \else
+ \expandafter\eqe@absorbTokensShort
+ \fi
+ }%
+ \fi
+ \fi
+ \eqe@next
+}
+\long\def\eqe@absorbTokensLong#1\endlongTitleText{%
+ \protected@xdef\Exam{\Exam}\ifx\eq@selectedVersion@save\relax
+ \eqe@offVersion\else\expandafter\forVersion\expandafter
+ {\eq@selectedVersion@save}\fi}
+\long\def\eqe@absorbTokensShort#1\endshortTitleText{%
+ \protected@xdef\sExam{\sExam}\ifx\eq@selectedVersion@save\relax
+ \eqe@offVersion\else\expandafter\forVersion\expandafter
+ {\eq@selectedVersion@save}\fi}
+% \end{macrocode}
+% We have reached \cs{endtitleMarker}, but the count is still less than \cs{eq@nVersions},
+% so we'll warn the user, and create titles for user.
+% \begin{macrocode}
+\def\eq@shortTitlesFix#1{%
+ \PackageWarning{eqexam}{You have defined an insufficient number
+ of titles\MessageBreak for the number of versions declared in
+ \string\numVersions.\MessageBreak Please fix the problem}%
+ \stepcounter{eq@count}%
+ \if\endtitleMarker\endlongTitleText
+ \edef\eqe@tmp{\noexpand\@gatherTitleText{\noexpand#1}
+ {??---Title \# \the\value{eq@count}---??}%
+ \noexpand\endlongTitleText}
+ \else
+ \edef\eqe@tmp{\noexpand\@gatherTitleText{\noexpand#1}
+ {T\#\the\value{eq@count}??}\noexpand\endshortTitleText}
+ \fi
+ \addtocounter{eq@count}{-1}%
+ \eqe@tmp
+}
+% \end{macrocode}
+% Here, we define \cs{ifAB} so that document under the old system
+% still work properly, I hope. Usage of \cs{ifAB} at this point
+% is discouraged.
+% \begin{macrocode}
+\def\ifAB#1#2{\if\eq@selectedVersion A#1%
+ \else\if\eq@selectedVersion B#2\fi\fi}
+\def\eq@replaceToken#1{#1}
+% \end{macrocode}
+% \begin{macro}{\forVersion}
+% Here is the command that does all the work. It creates alternate
+% text macros for each of the versions declared using \cs{numVersions}.
+%
+% For example, assuming |\numVersions{3}| appeared earlier, the
+% command |\forVersion{a}| (or |\forVersion{A}|) defines $3$ text commands \cs{vA}, \cs{vB} and
+% \cs{vC}, each taking one argument, the text you want to display:
+%\begin{verbatim}
+% Name the \vA{place}\vB{date}\vC{year} of the signing of the Declaration
+% of independence.
+%\end{verbatim}
+% Since we said |forVersion{a}| only the \cs{vA} text
+% is displayed, the others are gobbled up, etc. But wait, the \cs{forVersion}
+% does more than that! It also creates a series of comment environments
+% |\begin{verA}/\end{verA}|, |\begin{verB}/\end{verB}|, |\begin{verC}/\end{verC}|, etc.,
+% where only the version for which this compile applies will be typeset,
+% the others are commented out.
+%\begin{verbatim}
+%\numVersions{3}
+%\forVersion{b}
+%...
+%\begin{document}
+%...
+% Solve the equation for $\vA{x}\vB{y}\vC{z}$:
+%\[
+%\begin{verA}
+% 2x + 4 = 7
+%\end{verA}
+%\begin{verB}
+% 5y + 2 = 4
+%\end{verB}
+%\begin{verC}
+% 3z - 2 = 2
+%\end{verC}
+%\]
+%\end{verbatim}
+% \changes{1.6b}{2006/04/03}
+% {
+% Changed the alphabet environments \texttt{A}, \texttt{B}, etc.\ due to a
+% conflict with \cs{S}, the control sequence for the \textsf{amsmath} package
+% for a section: \cs{S} expands to \S. Names changed to \texttt{verA}, \texttt{verB}, etc.
+% }
+% \changes{v1.6f}{2006/10/24}
+% {
+% Fixed a bug in the \cs{eqe@initializeMultiVersions} command, made sure that any
+% already defined comment environments are set to relax.
+% }
+% \begin{macrocode}
+\newif\ifeqglobalversion \eqglobalversionfalse
+\newif\ifeqlocalversion \eqlocalversionfalse
+\newif\if@templocalversion \@templocalversionfalse
+\def\eqe@initializeMultiVersions{%
+ \let\save@message\message\let\message\@gobble
+ \@tfor\eqe@tmp:=ABCDEFGHIJKLMNOPQRSTUVWXYZ\do{%
+ \expandafter\let\csname v\eqe@tmp\endcsname\@gobble
+ \expandafter\excludecomment\expandafter{ver\eqe@tmp}%
+ \expandafter\let\csname Afterver\eqe@tmp Comment\endcsname\relax
+ }\let\message\save@message
+}
+\AtBeginDocument{\let\eqe@initializeMultiVersions\relax}
+% \end{macrocode}
+% (09/10/04) Trying to fix a bug in the case when the version selected is greater
+% then the number of versions available for a given problem; that is, when modular
+% arithmetic occurs (in \cs{selectVersion}).
+% \begin{macrocode}
+\let\eqe@@onVersion\@empty
+\def\eqe@onVersion{\g@addto@macro\eqe@@onVersion}
+\let\eqe@@offVersion\@empty
+\def\eqe@offVersion{\g@addto@macro\eqe@@offVersion}
+\let\eqe@@holdTemp\@empty
+\def\eqe@holdTemp{\g@addto@macro\eqe@@holdTemp}
+% \end{macrocode}
+% Two commands to turn on and off versions (the \cs{v<LETTER>} and the \texttt{ver<LETTER>}
+% environment).
+%
+% Throughout the definitions below, we use \cs{csarg}, a command that is defined in the
+% \textsf{comment} package.
+% \begin{macrocode}
+\def\eqe@showArg#1{#1}
+\def\eqe@turnOnComment#1{%
+% \csarg\let{v#1}\@empty
+ \csarg\let{v#1}\eqe@showArg
+ \edef\exp@temp{\noexpand\includecomment{ver#1}}\exp@temp
+}
+\def\eqe@turnOffComment#1{%
+ \csarg\let{v#1}\@gobble
+ \edef\exp@temp{\noexpand\excludecomment{ver#1}}\exp@temp
+ \csarg\let{Afterver#1Comment}\relax
+}
+% \end{macrocode}
+% Finally, the \cs{forVersion} command. \DescribeMacro{\selVersion}\cmd{\selVersion}
+% holds the version selected in upper-case.
+% \begin{macrocode}
+\def\forVersion#1%
+{%
+ \eqe@initializeMultiVersions
+ \let\eqe@@onVersion\@empty
+ \let\eqe@@offVersion\@empty
+ \global\eqglobalversiontrue
+ \setcounter{eq@count}{0}%
+ \uppercase{\edef\eq@selectedVersion{#1}}%
+ \edef\selVersion{\eq@selectedVersion}%
+ \@ifundefined{eq@nVersions}{\PackageInfo{eqexam}{%
+ \string\numVersions\space has not been declared, \MessageBreak
+ taking the number of versions to be 2.}\def\eq@nVersions{2}}{}%
+ \loop
+ \stepcounter{eq@count}%
+ \expandafter\if\Alph{eq@count}\eq@selectedVersion
+ \xdef\eq@nSelectedVersion{\the\value{eq@count}}%
+ \setcounter{eq@count}{27}\fi
+ \ifnum\value{eq@count}<26\repeat
+ \ifnum\eq@nSelectedVersion >\eq@nVersions
+ \PackageError{eqexam}
+ {The value of \string\forVersion
+ \space(\eq@selectedVersion)\MessageBreak
+ exceeds the value of \string\numVersions\space
+ (\eq@nVersions)}%
+ {Decrease the value of \string\forVersion.}%
+ \fi
+ \setcounter{eq@count}{0}%
+ \let\save@message\message\let\message\@gobble
+ \loop
+ \stepcounter{eq@count}%
+ \csarg\let{After\Alph{eq@count}Comment}\relax
+ \lowercase
+ {%
+ \if#1\alph{eq@count}%
+ \eqe@turnOnComment{\Alph{eq@count}}%
+% \end{macrocode}
+% (09/10/04) Save the commands for turning on the version with
+% \cs{eqe@onVersion}, and for turning it off with
+% \cs{eqe@offVeresion}.
+% \begin{macrocode}
+ \edef\temp@exp{\noexpand
+ \eqe@turnOnComment{\Alph{eq@count}}}%
+ \expandafter\eqe@onVersion\expandafter{\temp@exp}%
+ \edef\temp@exp{\noexpand
+ \eqe@turnOffComment{\Alph{eq@count}}}%
+ \expandafter\eqe@offVersion\expandafter{\temp@exp}%
+ \else
+ \eqe@turnOffComment{\Alph{eq@count}}%
+ \fi
+ }%
+ \ifnum\value{eq@count}<\eq@nVersions\repeat
+ \let\message\save@message
+}
+% \end{macrocode}
+% Let us assume version A initially, user with reset this in document.
+%\changes{1.6c}{2006/05/02}
+%{%
+% At the end of the package, set the initial value of \cs{select\-Version} to
+% \string\verb!*+\string\selectVersion{26}+ and set the initial value
+% of \cs{forVersion} to \string\verb!*+\string\forVersion{A}+.
+%}
+% \begin{macrocode}
+\AtEndOfPackage{\numVersions{26}\forVersion{A}%
+ \eq@renditionOptions}
+% \end{macrocode}
+% \end{macro}
+% \begin{macro}{\selectVersion}
+% When an exam has questions in which the number of variations are not all the same,
+% then you can locally change the version between problems.
+% If the first argument is empty, the first variation is chosen.
+% The syntax is
+%\begin{verbatim}
+%\selectVersion{2}{3}
+%\end{verbatim}
+%This command says that the next problem has 3 variations, and here we select the second one.
+%\changes{1.6a}{2006/01/22}
+% {%
+% added \cs{selectVersion} command, also the command was fixed \cs{forVersion} so that it can be changed
+% within the document, added switches to control new selection.
+% }
+%\changes{v3.7}{2015/02/11}{Worked on the logic}
+% \begin{macrocode}
+\def\selectVersion#1#2{% #1 \le #2
+ \xdef\nLocalSelection{#1}\xdef\nLocalVersions{#2}%
+% \end{macrocode}
+% If obey local version is in effect and the local selection is not empty,
+% no modular arithmetic is needed in the first loop below
+% of \cs{nLocalSelection}.
+% \begin{macrocode}
+ \let\needsModArith\eqe@YES
+ \ifeqobeylocalversion\ifx\nLocalSelection\@empty\else
+ \let\needsModArith\eqe@NO\fi\fi
+% \end{macrocode}
+% When the solutions appear at the end of the document, the version may not match
+% the version for the question. We need to use a private hook defined in
+% \textsf{exerquiz} (and \texttt{eqexam.def}) to reproduce the same settings going into
+% each solution at the end. So, we write the \cs{selectVersion} to the solution
+% file.
+% \begin{macrocode}
+ \edef\exer@solnheadhook{%
+ \string\selectVersion{#1}{#2}}%
+% \end{macrocode}
+% Turn off messaging.
+% \begin{macrocode}
+ \let\save@message\message\let\message\@gobble
+% \end{macrocode}
+% Reset the selected version, the one selected in the preamble. A previous problem
+% may have changed the version due to modular arithmetic.
+% \begin{macrocode}
+ \eqe@@onVersion
+ \ifx\eqe@@holdTemp\@empty\else
+% \end{macrocode}
+% If \cs{eqe@holdTemp} is non-empty, this means that modular
+% arithmetic was performed on the previous problem. We need to turn
+% on the original choice, and turn off the temporary choice, then
+% clear the command \cs{eqe@@holdTemp}.
+% \begin{macrocode}
+ \eqe@@onVersion\eqe@@holdTemp
+ \let\eqe@@holdTemp\@empty
+ \fi
+% \end{macrocode}
+% If \cs{eqglobalversion} is \texttt{true}, then a \cs{forVersion}
+% has been executed. If the number of versions declared by
+% \cs{numVersions} is greater than the number of local versions for
+% this problem, then we perform modular arithmetic to get an
+% appropriate alternative. It may be necessarily to temporarily put
+% \cs{eqobeylocalversion} to true to accomplish, but we use change it
+% back at the end.
+% \begin{macrocode}
+\ifx\needsModArith\eqe@YES
+ \ifeqglobalversion\ifnum\eq@nSelectedVersion>\nLocalVersions
+% \end{macrocode}
+% If we perform modular arithmetic, turn off original choice.
+% \begin{macrocode}
+ \eqe@@offVersion
+% \end{macrocode}
+% Now perform mod arithmetic
+% \begin{macrocode}
+ {\count0=\eq@nSelectedVersion \count2=\count0
+ \advance\count0by-1 \divide\count0by\nLocalVersions
+ \multiply\count0by\nLocalVersions %\count2=\eq@nSelectedVersion
+ \advance\count2by-\count0
+ \xdef\nLocalSelection{\the\count2 }%
+ \ifeqobeylocalversion\else
+ \global\@templocalversiontrue
+ \global\eqobeylocalversiontrue\fi}%
+ \global\let\eqe@@holdTemp\@empty
+ \fi\fi
+\fi
+ \ifeqobeylocalversion
+ \global\eqlocalversiontrue
+ \setcounter{eq@count}{0}%
+% \end{macrocode}
+% If local selection is empty, use the version requested by \cs{forVersion},
+% modular arithmetic may have to be performed.
+% arithmetic to resolve the matter
+% \begin{macrocode}
+ \ifx\nLocalSelection\@empty
+ \def\nLocalSelection{\eq@nSelectedVersion}%
+ \fi
+% \end{macrocode}
+% If local selection exceeds number of local versions, use modular
+% arithmetic to resolve the matter
+% \begin{macrocode}
+ \ifnum\nLocalSelection>\nLocalVersions
+ {\count0=\nLocalSelection
+ \count2=\count0
+ \advance\count0by-1 \divide\count0by\nLocalVersions
+ \multiply\count0by\nLocalVersions
+ \advance\count2by-\count0
+ \xdef\nLocalSelection{\the\count2 }}%
+ \fi
+ \let\save@message\message\let\message\@gobble
+ \loop
+ \stepcounter{eq@count}%
+ \csarg\let{Afterver\Alph{eq@count}Comment}\relax
+ \lowercase
+ {%
+ \ifnum\value{eq@count}=\nLocalSelection
+ \eqe@turnOnComment{\Alph{eq@count}}%
+ \edef\temp@exp{\noexpand
+ \eqe@turnOffComment{\Alph{eq@count}}}%
+ \expandafter\eqe@holdTemp\expandafter{\temp@exp}%
+ \else
+ \eqe@turnOffComment{\Alph{eq@count}}%
+ \fi
+ }%
+ \ifnum\value{eq@count}<\nLocalVersions\repeat
+ \let\message\save@message
+ \fi
+ \if@templocalversion\global\eqobeylocalversionfalse\fi
+% \end{macrocode}
+% added 09/10/03 reset back to default
+% \begin{macrocode}
+ \@templocalversionfalse
+ \let\message\save@message
+}
+% \end{macrocode}
+% \end{macro}
+% \section{Title Definitions from Web}
+% \begin{macro}{\title}
+% \begin{macro}{\subject}
+% \begin{macro}{\author}
+% \begin{macro}{\email}
+% \begin{macro}{\keywords}
+% \begin{macro}{\university}
+% Make Title Definitions taken from the \texttt{Web} package. This is
+% to maintain compatibility with \texttt{Web}.
+% \begin{macrocode}
+\@ifpackageloaded{web}{}{%
+ \@ifpackageloaded{hyperref}{}{\let\texorpdfstring\@firstoftwo}%
+ \let\web@save@title\title
+ \def\title{\@ifnextchar[{\@web@title}{\@web@title[]}}
+ \def\@web@title[#1]#2{\gdef\webtitle{#2}%
+ \@ifundefined{hypersetup}{}{\hypersetup{pdftitle={#2}}}%
+ \def\webArg{#1}\ifx\webArg\@empty\gdef\shortwebtitle{#2}\else
+ \gdef\shortwebtitle{#1}\fi\web@save@title{#2}}
+ \let\web@saved@author\author
+ \def\author#1{\gdef\webauthor{#1}%
+ \@ifundefined{hypersetup}{}{\hypersetup{pdfauthor={#1}}}%
+ \web@saved@author{#1}}
+ \def\subject{\@ifnextchar[{\@subject}{\@subject[]}}
+ \def\@subject[#1]#2{\def\webArg{#1}%
+ \ifx\webArg\@empty\gdef\shortwebsubject{#2}\else
+ \gdef\shortwebsubject{#1}\fi\gdef\websubject{#2}%
+ \@ifundefined{hypersetup}{}{\hypersetup{pdfsubject={#2}}}}
+ \def\email#1{\gdef\webemail{#1}}
+ \def\keywords#1{\gdef\webkeywords{#1}%
+ \@ifundefined{hypersetup}{}{\hypersetup{pdfkeywords={#1}}}}
+ \def\university#1{\gdef\webuniversity{#1}}
+ \def\copyrightyears#1{\gdef\webcopyrightyears{#1}}
+ \def\version#1{\gdef\web@version@value{#1}%
+ \edef\webversion{\ifx\web@version@value\@empty\else
+ \noexpand\web@versionlabel\noexpand\
+ \noexpand\web@version@value\fi}%
+ }
+ \let\web@version@value\@empty
+ \def\versionLabel#1{\def\web@versionlabel{#1}}
+ \versionLabel{Version}
+ \def\web@toc{Table of Contents}
+ \def\web@continued{cont.}
+% set some defaults
+ \title{}\author{}\email{}\subject{}\keywords{}\university{}
+ \providecommand{\optionalPageMatter}[2][]{%
+ \def\optionalpagematter{#2}}
+ \def\optionalpagematter{}
+}
+% \end{macrocode}
+% \end{macro}
+% \end{macro}
+% \end{macro}
+% \end{macro}
+% \end{macro}
+% \end{macro}
+% \begin{macro}{\date}
+% {\LaTeX} (\TeX) defines a \cs{date} command that is also used by \textsf{eqexam}.
+% \begin{macrocode}
+\def\duedate#1{\def\theduedate{#1}}
+\duedate{}
+% \end{macrocode}
+% \end{macro}
+% \begin{macro}{\duedate}
+% In addition to these, we also define a \cs{duedate} macro, may be useful for
+% writing assignments with a due date.
+% \begin{macrocode}
+\def\duedate#1{\def\theduedate{#1}}
+\duedate{}
+% \end{macrocode}
+% \end{macro}
+% \begin{macro}{\thisterm}
+% The command \cs{thisterm} can be used in the \cs{date} field to indicate the term
+% of this test, for example, \verb!\date{\thisterm, \the\year}! This command may
+% be redefined to conform to your own academic terms.
+% \begin{macrocode}
+\newcommand\thisterm{%
+% if prior to June (Jan--May)
+ \ifnum\month<6Spring\else
+% if prior to August (June-July)
+ \ifnum\month<8Summer\else
+% August or later; if Sept--Dec
+ \ifnum\month>8Fall\else
+% Month of August; if after 25th
+ \ifnum\day>25Fall\else
+% if it's 25th or earlier in month of August
+ Summer\fi\fi\fi\fi
+}
+% \end{macrocode}
+% \end{macro}
+% \section{Identification Information}
+% We define a series of commands in support of building an exam: Lines to identify
+% the student and his/her student id (SID), the instructors email address, the name of the
+% test and the course.
+%\par\medskip
+%\noindent\DescribeMacro{\eqExamName}\DescribeMacro{\examNameLabel} provides a line for the student to enter his/her name into the
+% exam. The command \cs{examNameLabel} can be used to define the name label, the default
+% is \texttt{Name:}
+%
+% Will insert a text box as well if the \texttt{option} is taken in addition
+% to \texttt{nosolutions} and with \texttt{solutionsafter} not taken.
+% This macro defines \cs{eq@ExamName}, which actually contains the code.
+% The first (optional) parameter is passed to \cs{insTxtFieldIdInfo}, and can be
+% used to change the appearance of the text field created; the second required parameter
+% is the width of the field.
+% \begin{macrocode}
+\newcommand{\examAnsKeyLabel}[1]{%
+ \def\@examAnsKeyLabel{\ifanswerkey\space #1\fi}}
+\examAnsKeyLabel{Answer Key}
+\newcommand\examNameLabel[1]{\gdef\@examNameLabel{#1\@examAnsKeyLabel}}
+\examNameLabel{Name:}
+\newcommand{\idinfoHighlight}[1]{\def\eqe@idinfohl{#1}}
+\idinfoHighlight{\underbar}
+\newcommand\eqExamName[2][]{%
+ \def\eqExamName@argi{#1}\def\eqExamName@argii{#2}}
+\def\eq@ExamName{\bgroup
+ \settowidth\eq@tmplengthA{\@examNameLabel\ }%
+ \@tempdima=\eqExamName@argii\relax
+ \advance\@tempdima by-\eq@tmplengthA
+ \eqe@idinfohl{\makebox[\eqExamName@argii][l]{\@examNameLabel}}%
+ \expandafter\insTxtFieldIdInfo\expandafter[\eqExamName@argi]%
+ {\@tempdima}{IdInfo.Name}\egroup}
+% \end{macrocode}
+% Here we set the field to be a required field with width of $2.25$ inches
+% \begin{macrocode}
+\eqExamName[\Ff\FfRequired]{2.25in}
+% \end{macrocode}
+% \DescribeMacro{\eqSID} provides a line for the student to enter his/her ID number (SID).
+%
+% Will insert a text box as well if the \texttt{option} is taken in addition
+% to \texttt{nosolutions} and with \texttt{solutionsafter} not taken.
+% The first (optional) parameter is passed to \cs{insTxtFieldIdInfo}, and can be
+% used to change the appearance of the text field created; the second required parameter
+% is the width of the field.
+% \begin{macrocode}
+\newcommand\examSIDLabel[1]{\gdef\@examSIDLabel{#1}}
+\examSIDLabel{SID:}
+\newcommand\eqSID[2][]{\def\eqSID@argi{#1}\def\eqSID@argii{#2}}
+\def\eq@SID{\bgroup\settowidth\eq@tmplengthA{\@examSIDLabel\ }%
+ \@tempdima=\eqSID@argii\relax\advance\@tempdima by-\eq@tmplengthA
+ \eqe@idinfohl{\makebox[\eqSID@argii][l]{\@examSIDLabel}}%
+ \expandafter\insTxtFieldIdInfo\expandafter[\eqSID@argi]%
+ {\@tempdima}{IdInfo.SID}\egroup}
+% \end{macrocode}
+% Here we set the field to be a required field with width of $2.25$ inches
+% \begin{macrocode}
+\eqSID[\Ff\FfRequired]{2.25in}
+% \end{macrocode}
+% \DescribeMacro{\eqEmail} provides a line for the student
+% to enter his/her email address. Useful for documents submitted by email, the
+% instructor can reply.
+%
+% Will insert a text box as well if the \texttt{option} is taken in addition
+% to \texttt{nosolutions} and with \texttt{solutionsafter} not taken.
+% The first (optional) parameter is passed to \cs{insTxtFieldIdInfo}, and can be
+% used to change the appearance of the text field created; the second required parameter
+% is the width of the field.
+% \begin{macrocode}
+\newcommand\examEmailLabel[1]{\gdef\@examEmailLabel{#1}}
+\examEmailLabel{Email:}
+\newcommand\eqEmail[2][]{%
+ \def\eqExam@argi{#1}\def\eqEmail@argii{#2}}
+\gdef\eq@Email{\bgroup\settowidth\eq@tmplengthA{\@examEmailLabel\ }%
+ \@tempdima=\eqEmail@argii\relax\advance\@tempdima by-\eq@tmplengthA
+ \underbar{\makebox[\eqEmail@argii][l]{\@examEmailLabel}}%
+ \expandafter\insTxtFieldIdInfo\expandafter[\eqEmail@argi]%
+ {\@tempdima}{IdInfo.email}\egroup}
+% \end{macrocode}
+% Here we set the field to be a field with width of $2.25$ inches. (Not set to be a required field.)
+% \begin{macrocode}
+\eqEmail{2.25in}
+% \end{macrocode}
+% \DescribeMacro{\insTxtFieldIdInfo} The above macros (\cs{eqExamName}, \cs{eqSID} and \cs{eqEmail})
+% all call this macro, which inserts a Acroforms text field if the \texttt{option} is taken in addition
+% to \texttt{nosolutions} and with \texttt{solutionsafter} not taken.
+%
+% The first (optional) parameter is used to change the appearance of the text field.
+% The second parameter is the width of the field, and the third is the field name.
+% \begin{macrocode}
+\def\insTxtFieldIdInfo[#1]#2#3{%
+ \@ifundefined{@quiz}{}{\if\eq@online\eqe@YES
+ \ifeq@nosolutions\ifeq@solutionsafter\else
+ \raisebox{-1bp}{\makebox[0pt][r]{%
+ \textField[\BC{}#1]{#3}{#2}{11bp}}}%
+ \fi\fi\fi
+ }%
+}
+% \end{macrocode}
+% \DescribeMacro{\SubmitInfo} is required when the \texttt{email} option is taken,
+% and should appear in the preamble. The first argument is the URL to the \textsf{eqAttach.asp}
+% code on the server, and the second is the email of the instructor is to receive the results.
+% (Multiple recipients can be specified by separating each with a comma.)
+% \begin{macrocode}
+\def\SubmitInfo#1#2{%
+ \def\EqExam@SubmitURL{#1}\def\@EmailInstr{#2}%
+}
+% \end{macrocode}
+% \DescribeMacro{\EmailCourseName} is used to specify the course name of the course. The default
+% value for this is \cs{websubject}, obtained from the \cs{subject} macro used in the preamble; however,
+% if you want a different name in the email, perhaps with more information included, you can redefine
+% the value using this macro.
+% \begin{macrocode}
+\def\EmailCourseName#1{\def\@EmailCourseName{#1}}
+% \end{macrocode}
+% Here's the default value.
+% \begin{macrocode}
+\EmailCourseName{\websubject}
+% \end{macrocode}
+% \DescribeMacro{\EmailExamName} is used to specify the exam name of the course. The default
+% value for this is \cs{webtitle}, obtained from the \cs{title} macro used in the preamble; however,
+% if you want a different name in the email, perhaps with more information included, you can redefine
+% the value using this macro.
+% (Multiple recipients can be specified by separating each with a comma.)
+% \begin{macrocode}
+\def\EmailExamName#1{\def\@EmailExamName{#1}}
+% \end{macrocode}
+% Here's the default value.
+% \begin{macrocode}
+\EmailExamName{\webtitle}
+% \end{macrocode}
+% \DescribeMacro{\EmailSubject} The document author mail want a custom subject in the email, instead
+% of the standard one. By using this macro, he can design his own email subject.
+% \begin{macrocode}
+\def\EmailSubject#1{\def\@EmailSubject{#1}}
+% \end{macrocode}
+% Here's the default value, which generates no custom subject line.
+% \begin{macrocode}
+\EmailSubject{}
+% \end{macrocode}
+% In this case \textsf{eqAttach.asp} inserts the standard one.
+%\begin{verbatim}
+%Exam Results: \webtitle of \websubject
+%\end{verbatim}
+% The email would read like ``\texttt{Exam Results:~Test 1 of Calculus I}'', for example.
+%
+% \DescribeMacro{\ServerRetnMsg} Unless submitted in \texttt{silent} mode, the \textsf{eqAttach.asp}
+% returns a message acknowledging the receipt of the data. \cs{ServerRetnMsg} is used to customize
+% this message.
+% \begin{macrocode}
+\def\ServerRetnMsg#1{\def\@ServerRetnMsg{#1}}
+% \end{macrocode}
+% Here's the default value, which generates no custom return message
+% \begin{macrocode}
+\ServerRetnMsg{}
+% \end{macrocode}
+% \noindent\DescribeMacro{\SubmitButtonLabel} is the label that appears on the submit button.
+% \begin{macrocode}
+\def\SubmitButtonLabel#1{\def\@SubmitButtonLabel{#1}}
+% \end{macrocode}
+% Here's the default value.
+% \begin{macrocode}
+\SubmitButtonLabel{Submit}
+% \end{macrocode}
+% \DescribeMacro{\SubmitButton} is the macro that provides the submit button
+% when the \texttt{email} option is taken. It appears automatically at the top of
+% the first page of the exam, and appears only if \texttt{nosolutions} has has been
+% taken, and \texttt{solutionsafter} has not been taken.
+% \begin{macrocode}
+\let\priorSubmitJS\@gobble
+\let\postSubmitJS\@empty
+\def\SubmitButton
+{%
+ \ifx\use@email\eqe@YES\ifeq@nosolutions\ifeq@solutionsafter\else
+ \makebox[0pt][l]{\pushButton
+ [\CA{\@SubmitButtonLabel}\A{\JS{%
+ var _eqEok2Submit = true;\r
+ var aSubmitFields = new Array("eqexam", "IdInfo");\r
+ \priorSubmitJS\r
+ if(_eqEok2Submit) this.submitForm("\EqExam@SubmitURL",
+ true, false, aSubmitFields);\r
+ \postSubmitJS
+ }}]{Submit}{1.5in}{16bp}}%
+ \makebox[0pt][l]{\textField[\F\FHidden\DV{\@EmailInstr}
+ \V{\@EmailInstr}]{IdInfo.mailTo}{11bp}{11bp}}%
+ \makebox[0pt][l]{\textField[\F\FHidden\DV{\@EmailCourseName}
+ \V{\@EmailCourseName}]{IdInfo.courseName}{11bp}{11bp}}%
+ \makebox[0pt][l]{\textField[\F\FHidden\DV{\@EmailExamName}
+ \V{\@EmailExamName}]{IdInfo.examName}{11bp}{11bp}}%
+ \makebox[0pt][l]{\textField[\F\FHidden\DV{\@EmailSubject}
+ \V{\@EmailSubject}]{IdInfo.subject}{11bp}{11bp}}%
+ \makebox[0pt][l]{\textField[\F\FHidden\DV{\@ServerRetnMsg}
+ \V{\@ServerRetnMsg}]{IdInfo.retnmsg}{11bp}{11bp}}%
+ \fi\fi\fi
+}
+% \end{macrocode}
+% \begin{macrocode}
+\def\thequizno{\if\probstar*\Alph{quizno}\else\alph{quizno}\fi}
+\def\linkContentFormat{%
+ \if\probstar*\Alph{quizno}\else\alph{quizno}\fi}
+\def\linkContentWrapper{(\hfil\linkContentFormat\hfil)}%
+\def\Ans@r@l@Defaults
+{%
+ \BC{}\S{S}\W{1}\Ff{\FfNoToggleToOff}
+ \textSize{12}\textColor{0 g}
+}
+% \end{macrocode}
+% (2014/03/12) Added \verb!\eq@hspanner\ignorespaces!, in the next two commands. Fixes
+% problems with spacing following the choice box.
+% \begin{macrocode}
+\newcommand{\optsRadioBtnf}[1]{\def\eqe@optsRadiof{#1}}
+\newcommand{\optsRadioBtnl}[1]{\def\eqe@optsRadiol{#1}}
+\let\eqe@optsRadiof\@empty\let\eqe@optsRadiol\@empty
+\def\eqExam@Ans@sq@l{\leavevmode
+ \if\eq@listType1\stepcounter{quizno}\else\ifwithsoldoc
+ \stepcounter{quizno}\else\refstepcounter{quizno}\fi\fi
+ \PBS\raggedright\settowidth{\eq@tmplength}{\eq@lw@l}%
+ \sbox{\eq@tmpbox}{\eq@l@l}\eq@tmpdima=\wd\eq@tmpbox
+ \def\link@@Content{\linkContentWrapper}%
+ \hangindent=\eq@tmplength\hangafter=1\relax
+ \edef\fieldName{%
+ \if\probstar*eqexam.\curr@quiz.\theeqquestionnoi.part\thepartno%
+ \else
+ eqexam.\curr@quiz.\theeqquestionnoi%
+ \fi
+ }%
+ \if\eq@online\eqe@YES\relax
+ \makebox[0pt][l]{%
+ \radio@@Button{\presets{\eqe@optsRadiol}}{\fieldName}%
+ {\eq@tmpdima}{\RadioFieldSize}{\Ans@choice\alph{quizno}}%
+ {\eq@protect\A}{\eq@setWidgetProps\eq@l@check@driver}%
+ {\Ans@r@l@Defaults\every@RadioButton\every@qRadioButton}}%
+ \else
+ \edef\@linkcolor{\@nolinkcolor}%
+ \fi
+ \ifeq@nosolutions\edef\@linkcolor{\@nolinkcolor}\fi
+ \textcolor{\@linkcolor}{\makebox[\eq@tmpdima]{\link@@Content}}%
+ \Ans@proofing{\eq@tmpdima}%
+ \eq@hspanner\ignorespaces
+}
+\def\eqExam@Ans@sq@f{\if\eq@listType1\stepcounter{quizno}\else
+ \ifwithsoldoc\stepcounter{quizno}\else\refstepcounter{quizno}\fi\fi
+ \PBS\raggedright\settowidth{\eq@tmplength}{\eq@lw@f}%
+ \eq@tmpdima=\wd\eq@tmpbox%
+ \hangindent=\eq@tmplength\hangafter=1\relax
+ \if\eq@online\eqe@NO\previewtrue
+ \insertGrayLetters
+ \Ans@sq@f@driver
+ \else
+ \ifanswerkey\previewtrue
+ \Ans@sq@f@driver
+ \else
+% \ifallowcircmc
+% \ifx\Bbox\eqe@BboxCirc\symbolchoice{circle}\fi\fi
+ \edef\fieldName{%
+ \if\probstar*eqexam.\curr@quiz.\theeqquestionnoi.%
+ part\thepartno%
+ \else
+ eqexam.\curr@quiz.\theeqquestionnoi%
+ \fi
+ }\insertGrayLetters
+ \radio@@Button{\presets{\eqe@optsRadiof}}%
+ {\fieldName}{\RadioFieldSize}%
+ {\RadioFieldSize}{\Ans@choice\alph{quizno}}{\eq@protect\A}%
+ {\eq@setWidgetProps\eq@RadioCheck@driver}%
+ {\@@Ans@sq@f@Defaults\Ans@sq@f@Actions\every@RadioButton
+ \every@sqRadioButton\insert@circlesymbol}%
+ \fi
+ \fi
+ \Ans@proofing{\RadioFieldSize}%
+ \eq@hspanner\ignorespaces
+}
+\newcommand{\optsCkBxf}[1]{\def\eqe@optscbf{#1}}
+\newcommand{\optsCkBxl}[1]{\def\eqe@optscbl{#1}}
+\let\eqe@optscbl\@empty\let\eqe@optscbf\@empty
+\def\eqExam@Ans@ck@sq@l{\leavevmode
+ \if\eq@listType1\stepcounter{quizno}\else
+ \ifwithsoldoc\stepcounter{quizno}\else\refstepcounter{quizno}\fi\fi
+ \PBS\raggedright\settowidth{\eq@tmplength}{\eq@lw@l}%
+ \sbox{\eq@tmpbox}{\eq@l@l}\eq@tmpdima=\wd\eq@tmpbox
+ \def\link@@Content{\linkContentWrapper}%
+ \hangindent=\eq@tmplength\hangafter=1\relax
+ \edef\fieldName{%
+ \if\probstar*eqexam.\curr@quiz.\theeqquestionnoi.%
+ part\thepartno.\alph{quizno}%
+ \else
+ eqexam.\curr@quiz.\theeqquestionnoi.\alph{quizno}%
+ \fi
+ }%
+ \if\eq@online\eqe@YES\relax
+ \makebox[0pt][l]{\check@@Box{\presets{\eqe@optscbl}}{\fieldName}%
+ {\eq@tmpdima}{\RadioFieldSize}{\Ans@choice\alph{quizno}}%
+ {\eq@protect\A}{\eq@setWidgetProps\eq@l@check@driver}%
+ {\Ans@r@l@Defaults\every@RadioButton\every@qRadioButton}}%
+ \else
+ \edef\@linkcolor{\@nolinkcolor}%
+ \fi
+ \ifeq@nosolutions\def\@linkcolor{\@nolinkcolor}\fi
+ \textcolor{\@linkcolor}{\makebox[\eq@tmpdima]{\link@@Content}}%
+ \Ans@proofing{\eq@tmpdima}%
+ \eq@hspanner\ignorespaces
+}
+\def\eqExam@Ans@ck@sq@f{\if\eq@listType1\stepcounter{quizno}\else
+ \ifwithsoldoc\stepcounter{quizno}\else\refstepcounter{quizno}\fi\fi
+ \PBS\raggedright\settowidth{\eq@tmplength}{\eq@lw@f}%
+ \eq@tmpdima=\wd\eq@tmpbox%
+ \hangindent=\eq@tmplength\hangafter=1\relax
+ \if\eq@online\eqe@NO\previewtrue
+ \insertGrayLetters
+ \Ans@sq@f@driver
+ \else
+ \ifanswerkey\previewtrue
+ \Ans@sq@f@driver
+ \else
+ \edef\fieldName{%
+ \if\probstar*eqexam.\curr@quiz.\theeqquestionnoi.%
+ part\thepartno.\alph{quizno}%
+ \else
+ eqexam.\curr@quiz.\theeqquestionnoi.\alph{quizno}%
+ \fi
+ }\insertGrayLetters
+ \mbox{\check@@Box{\presets{\eqe@optscbf}}{\fieldName}%
+ {\RadioFieldSize}{\RadioFieldSize}%
+ {\Ans@choice\alph{quizno}}{\eq@protect\A}%
+ {\eq@setWidgetProps\eq@RadioCheck@driver}%
+ {\@@Ans@sq@f@Defaults\Ans@sq@f@Actions\every@RadioButton
+ \every@sqRadioButton}}%
+ \fi
+ \fi
+ \Ans@proofing{\RadioFieldSize}%
+ \eq@hspanner\ignorespaces
+}
+% \end{macrocode}
+% \DescribeMacro{\optsMlTextField} is used to pass options to the multiline
+% text field.
+% \begin{macrocode}
+\def\optsMlTextField#1{\def\eqe@optsmltf{#1}}
+\let\eqe@optsmltf\@empty
+\def\eqExamPriorVspace#1{%
+ \edef\fieldName{%
+ \if\probstar*eqexam.\curr@quiz.%
+ \theeqquestionnoi.part\thepartno.solution%
+ \else
+ eqexam.\curr@quiz.\theeqquestionnoi.solution%
+ \fi
+ }%
+ \nobreak\noindent\textField[\BC{}\presets{\eqe@optsmltf}
+ \Ff\FfMultiline]{\fieldName}{\linewidth}{#1}\@gobble
+}
+% \end{macrocode}
+%
+% Test to see if \texttt{exerquiz} is loaded. If not, we input
+% the `stand alone', \texttt{eqalone.def}, followed by \texttt{eqexam.def}. The latter
+% definition file is maintained in \texttt{exerquiz.dtx} under the \texttt{eqexam} option.
+%
+% \begin{macrocode}
+\@ifpackageloaded{exerquiz}{%
+ \let\Ans@sq@l\eqExam@Ans@sq@l
+ \let\Ans@sq@f\eqExam@Ans@sq@f
+ \let\Ans@ck@sq@l\eqExam@Ans@ck@sq@l
+ \let\Ans@ck@sq@f\eqExam@Ans@ck@sq@f
+ \def\eqexheader@wrapper{\makebox[0pt][r]{%
+ \hypertarget{qex.\the@exno}{\eqexheader}}}%
+ \if\eq@online\eqe@YES\relax
+ \newcounter{@cntfillin}%
+ \let\eqPriorVspace\eqExamPriorVspace
+ \fi
+}%
+{%
+ \input{eqalone.def}
+ \input{eqexam.def}
+% \end{macrocode}
+% \changes{v4.9}{2017/03/16}{Updated \string\pkg{eqexam} to reflect changes in \string\texttt{eqexam.def}.}
+% \begin{macrocode}
+ \@ifl@ter{def}{eqexam}{\eqexamdefReq}{}
+ {\PackageWarningNoLine{eqexam}
+ {This version of eqexam requires eqexam.def\MessageBreak
+ dated \eqexamdefReq\space or later}}
+ \def\eqexheader@wrapper{\makebox[0pt][r]{\eqexheader}}
+}
+% \end{macrocode}
+% We wrote \verb!\begin{eqequestions}! to the top of the solutions file (\cs{jobname.sol}.
+% \begin{macrocode}
+%\writeBeginEqeQuestions
+% \end{macrocode}
+% If the \texttt{vspacewithsolns} is in effect, we write solutions to the end of the document.
+% \begin{macrocode}
+\AtBeginDocument{%
+ \ifvspacewithsolns\writeAllAnsAtEnd\else
+ \ifeqfortextbook\writeAllAnsAtEnd\fi\fi
+}
+% \end{macrocode}
+% We execute \cs{vspacewithkeyOff}, which sets \cs{ifkeepdeclaredvspacing} to false,
+% the default behavior of \textsf{eqexam} before the new feature.
+% \begin{macrocode}
+\vspacewithkeyOff
+% \end{macrocode}
+% \begin{macrocode}
+%</package>
+% \end{macrocode}
+% \section{Stand alone Code}
+%
+% \begin{macrocode}
+%<*standalone>
+% \end{macrocode}
+% Now we begin the listing of the stand alone code. This code is necessary if
+% \textsf{exerquiz} has not been loaded, which is the case if there is no \textsf{PDF} options
+% or if the \texttt{pdf} option is taken.
+%
+% Many of the following definitions are given in \texttt{eforms}, which was recently separated
+% from \texttt{exerquiz} and is now maintained as a separate package.
+% \begin{macrocode}
+\ProvidesFile{eqalone.def}
+ [2012/25/01 v3.0t Minimal code used by eqexam (dps)]
+\@ifundefined{eq@tmpbox}{\newsavebox{\eq@tmpbox}}{}% defined in eforms
+\@ifundefined{eq@tmpdima}{\newdimen\eq@tmpdima}{} % defined in eforms
+\def\RadioFieldSize{11bp}
+% \end{macrocode}
+% \begin{macrocode}
+\newdimen\eqcenterWidget
+% \end{macrocode}
+% This macro is used to vertically center the response box on the line. Seems to
+% work well.
+% \begin{macrocode}
+\def\centerWidget
+#1{%
+ \eqcenterWidget=#1
+ \eqcenterWidget=.5\eqcenterWidget
+ \advance\eqcenterWidget by-4bp
+}
+% \end{macrocode}
+% \DescribeMacro{\eqe@Bbox}When the \texttt{preview} option has been used, draw a frame box
+% around the bounding rectangle.
+% \changes{}{2015/06/04}{Added \cs{previewColor}}
+% \DescribeMacro\previewColor\cmd{\previewColor} adds some color to the preview (bounding boxes). The
+% default is \texttt{black}.
+% \begin{macrocode}
+\providecommand\previewColor{black}
+\def\eqe@BboxRect#1#2{\hbox{\color{\previewColor}\vbox{\hrule width #1
+ \hbox to#1{\vrule height#2\hfill\vrule height#2}\vfill\hrule}}}
+\def\useRectForMC{\let\Bbox\eqe@BboxRect}
+\def\selectedMC{\useRectForMC}
+% \end{macrocode}
+% \DescribeMacro{\Rect} is used internally to color a link.
+% \begin{macrocode}
+\def\Rect#1{\textcolor{\@linkcolor}{#1}}
+% \end{macrocode}
+% The auxiliary file \texttt{eqexam.def}, created by \textsf{exerquiz}, writes
+% \DescribeMacro{\ReturnTo}\cs{ReturnTo} to the \textsf{SOL} file
+% in the form \verb!\ReturnTo{page.1}{\mbox{}}!. We want to remove the
+% \cs{mbox} because it causes, at times, more vertical space that is wanted
+% in an exam document.
+% \begin{macrocode}
+\def\eqe@striphbox\mbox#1{#1}
+\newcommand{\ReturnTo}[2]{\eq@fititin{\eqe@striphbox#2}}
+% \end{macrocode}
+%\section{Switching proofing symbols}
+% \DescribeMacro{\proofingsymbol} The definition of the proofing symbol, this
+% symbol marks the correct answer of a multiple choice question when the
+% \texttt{proofing} option is used.
+% \begin{macrocode}
+\newcommand{\proofingsymbol}[1]{%
+ \def\@proofingsymbol{\textcolor{\@proofingsymbolColor}{#1}}}
+% \end{macrocode}
+% This is the answers macro for the link-style and is called from the \texttt{eqexam.def} file.
+% \begin{macrocode}
+%</standalone>
+% \end{macrocode}
+% \begin{macrocode}
+%<*package>
+% \end{macrocode}
+% In response to the \texttt{allowcircmc}, we load \texttt{lcircle10} and use the `h' and `x'
+% glyph.
+% \begin{macrocode}
+\def\selectedMC{\useRectForMC}
+\ifallowcircmc
+ \font\eqe@lcir=lcircle10 at 12pt
+ \bgroup
+% \end{macrocode}
+% Get the width of the `h', the circle has zero height and depth. Set the
+% diameter and radius of the circle.
+% \begin{macrocode}
+ \setbox0=\hbox{\eqe@lcir h}
+ \xdef\eqe@cirDiam{\the\wd0}
+ \@tempdima=.5\wd0
+ \xdef\eqe@cirRadius{\the\@tempdima}
+ \egroup
+% \end{macrocode}
+% A command to use the circle (h) and the filled circle (x).
+% \begin{macrocode}
+ \def\circ@Glyph#1#2{\hbox{\smash{\raisebox{\eqe@cirRadius}%
+ {\makebox[\eqe@cirDiam]{\llap{\rlap{\eqe@lcir#1}%
+ \hskip#2\relax}}}}}}
+% \end{macrocode}
+% Added preview color to the circle version of the bounding box. The color
+% accessed through \cs{previewColor}, its default is \texttt{black}.
+% \begin{macrocode}
+ \def\eqe@BboxCirc#1#2{\hbox{%
+ \textcolor{\previewColor}{\circ@Glyph{h}{0pt}}}}
+% \end{macrocode}
+% For proofing purposes, prepare the filled circle in the form of the command
+% \cs{circProofingForCirc}.
+% \begin{macrocode}
+ \def\circProofingForCirc{\centerWidget\RadioFieldSize
+ \lower\eqcenterWidget\circ@Glyph{x}{1.4pt}}
+ \if\eq@online\eqe@YES
+% \end{macrocode}
+% If online (\texttt{online} or \texttt{email} option), we cancel these commands.
+% \begin{macrocode}
+ \def\useCircForMC{\let\Bbox\eqe@BboxCirc\useMCCircles}
+ \def\selectedMC{\useCircForMC}
+ \@ifundefined{eqe@BboxRect}
+ {\def\useRectForMC{\let\Bbox\ef@Bbox\useMCRects}}
+ {\def\useRectForMC{\let\Bbox\eqe@BboxRect\useMCRects}}
+% \let\useRectForMC\relax
+ \else % if not online
+ \@ifundefined{eqe@BboxRect}
+ {\def\useRectForMC{\let\Bbox\ef@Bbox}}
+ {\def\useRectForMC{\let\Bbox\eqe@BboxRect}}
+ \def\useCircForMC{\let\Bbox\eqe@BboxCirc}
+ \def\selectedMC{\useCircForMC}
+ \fi
+ \def\useCircForProof{\symbolchoice{circle}%
+ \proofingsymbol{\circProofingForCirc}}
+\else
+% \end{macrocode}
+% If \texttt{allowcircmc} is not taken
+% \begin{macrocode}
+ \if\eq@online\eqe@YES
+ \def\useCircForMC{\let\Bbox\eqe@BboxCirc\useMCCircles}
+ \@ifundefined{eqe@BboxRect}
+ {\def\useRectForMC{\let\Bbox\ef@Bbox\useMCRects}}
+ {\def\useRectForMC{\let\Bbox\eqe@BboxRect\useMCRects}}
+ \else
+ \@ifundefined{eqe@BboxRect}
+ {\def\useRectForMC{\let\Bbox\ef@Bbox}}
+ {\def\useRectForMC{\let\Bbox\eqe@BboxRect}}
+ \def\useCircForMC{\useRectForMC}
+ \def\selectedMC{\useRectForMC}
+ \fi
+ \let\useCircForProof\relax
+\fi
+% \end{macrocode}
+%\DescribeMacro{\useRectForMS}\cmd{\useRectForMS} When declared, rectangles are
+% used for multiple selection, similarly, \DescribeMacro{\useCircForMS}\cmd{\useCircForMS}
+% uses circles if \texttt{allowcirc4mc} is in effect.
+% \begin{macrocode}
+\newif\ifuserectforms
+\def\useRectForMS{\userectformstrue}
+\def\useCircForMS{\userectformsfalse}
+% \end{macrocode}
+% \changes{v3.1e}{2012/11/10}{Changed default for \cs{proofingsymbol}}
+% \begin{macrocode}
+\newcommand{\useCheckForProof}{\symbolchoice{check}%
+ \proofingsymbol{\ding{52}}}
+\useCheckForProof
+% \end{macrocode}
+% Similarly, for a cross, we get a nice `handwritten' cross \verb!\ding{56}!, !when we latex
+% the document; for the \texttt{online} or \texttt{email} option, we get a simple cross in the
+% active radio button field.
+% \begin{macrocode}
+\newcommand{\useCrossForProof}{\symbolchoice{cross}%
+ \proofingsymbol{\raisebox{-1pt}{\rlap{\kern-1pt\Large\ding{56}}}}}
+% \end{macrocode}
+%
+% \section{The Main Code}
+% We now continue with the main package. Mostly, we define macros specific to the
+% \texttt{eqexam} package: define the \texttt{problem} and \texttt{problem*} environments,
+% macros for calculating totals per page, etc.
+%
+% \begin{macrocode}
+\def\MCcolor{black}
+\def\Ans@sq@l@driver{\edef\@linkcolor{\MCcolor}%
+ \Rect{\makebox[\eq@tmpdima]{\linkContentWrapper}}%
+ \Ans@proofing{\eq@tmpdima}%
+}
+% \end{macrocode}
+% This is the answers macro for the form-style and is called from the \texttt{eqexam.def} file.
+% \begin{macrocode}
+\def\Ans@sq@f@driver{%
+ \centerWidget\RadioFieldSize
+ \leavevmode\lower\eqcenterWidget\Bbox %\eqe@Bbox
+ {\RadioFieldSize}{\RadioFieldSize}%
+ \Ans@proofing{\RadioFieldSize}%
+}
+% \end{macrocode}
+% Write quiz solutions to the exercise solutions file
+% \begin{macrocode}
+\def\eq@sqsllabel{\string\textbf{Solution to Quiz:}}
+\def\sqsllabel{\eq@sqsllabel}
+% \end{macrocode}
+% \begin{macro}{\writeToSolnFile}
+% General purpose command for writing to the solution file.
+% \begin{macro}{\preExamSolnHead}
+% Executed just before a user friendly name
+% \begin{macro}{\examSolnHeadFmt}
+% Format for the user friendly name
+% \begin{macro}{\postExamSolnHead}
+% Executed just after a user friendly name
+% \begin{macrocode}
+\let\quiz@solns\ex@solns
+\newcommand{\preExamSolnHead}{\goodbreak\noindent}
+\newcommand{\examSolnHeadFmt}[1]{\textbf{#1}}
+\newcommand{\postExamSolnHead}{\par\medskip}
+\newcommand{\writeToSolnFile}[1]{%
+ \let\quiz@solns\ex@solns
+ \set@display@protect
+ \eqe@IWO\quiz@solns{#1}%
+ \set@typeset@protect
+}
+% \end{macrocode}
+% We will write all solutions to the \texttt{.sol} auxiliary file.
+% \begin{macrocode}
+\def\eqe@writetoSolns#1{%
+ \set@display@protect
+ \eqe@IWO\quiz@solns{\string\preExamSolnHead
+ \string\examSolnHeadFmt{#1}\string\postExamSolnHead}%
+ \set@typeset@protect
+}
+\def\eqe@writetoAux#1{%
+ \set@display@protect
+ \eqe@IWO\@auxout{#1}%
+ \set@typeset@protect
+}
+% \end{macrocode}
+% \end{macro}
+% \end{macro}
+% \end{macro}
+% \end{macro}
+% Turn off interactivity of short quiz.
+\def\Ans@sq@l@Actions{}
+\def\Ans@sq@f@Actions{}
+% \begin{macrocode}
+% \end{macrocode}
+% This macro is defined in \texttt{exerquiz}, but has a little different definition for \textsf{eqexam}.
+% \begin{macrocode}
+\def\Ans@proofing
+#1{%
+ \ifeq@proofing\if\Ans@choice1\relax
+ \llap{\rlap{\,\@proofingsymbol}\hskip#1\relax}%
+ \fi\fi
+}
+% \end{macrocode}
+% This macro gets the page number of the last page of the exam. It is read in through
+% a macro definition made and written to the \texttt{.aux} file.
+% \begin{macrocode}
+\def\eq@ExamLastPage{\csname eqExamLastPage\endcsname}
+\newcommand{\nPagesOnExam}{\csname eqExamLastPage\endcsname}
+\newcommand{\nPagesOfQues}{\ifvspacewithsolns
+ \csname eqExamQuesLastPage\endcsname\else
+ \csname eqExamLastPage\endcsname\fi}
+\newcommand{\nPagesOfSols}{\def\eqExamNumPagesSolns{0}%
+ \csarg\ifx{eqExamLastPage}\relax\else
+ \csarg\ifx{eqExamLastPage}\relax\else
+ {\count\z@=\nPagesOnExam\relax\advance
+ \count\z@-\nPagesOfQues\relax
+ \xdef\eqExamNumPagesSolns{\the\count\z@}}\fi\fi
+ \eqExamNumPagesSolns
+}
+% \end{macrocode}
+% \begin{macro}{\lastPageOfExam}
+%\changes{v2.0l}{2011/05/05}{%
+% Returns the page number of the end of the exam with a given name.
+%}
+% Returns the page number of the end of the exam with a name of \texttt{\#1}.
+% \begin{macro}{\firstPageOfExam}
+%\changes{v2.0l}{2011/05/05}{%
+% Returns the page number of the beginning of the exam with a given name.
+%}
+% Returns the page number of the beginning of the exam with a name of \texttt{\#1}.
+% \begin{macrocode}
+\newcommand{\lastPageOfExam}[1]{\pageref{#1PageEnd}}
+\newcommand{\firstPageOfExam}[1]{\pageref{#1PageBegin}}
+% \end{macrocode}
+% \end{macro}
+% \end{macro}
+% The last two commands are meant to produce typeset numbers; however, there
+% is a need to convert these to numbers that tex's registers can manipulate.
+% Here goes. \DescribeMacro{\eqe@defNumRefii}\cmd{\eqe@defNumRefii} takes
+% its argument and strips away the other arguments of \cs{pageref}; it picks
+% off the second of two or five, depending if \textsf{hyperref} is loaded.
+% It defines a macro |\csname nRefii@#1\endcsname| whose value is a page
+% number of the referenced object.
+% \begin{macrocode}
+\newcommand{\eqe@defNumRefii}[1]{%
+ \@ifundefined{hyperref}{\let\@getsecondOf\@secondoftwo}
+ {\let\@getsecondOf\@secondoffive}%
+ \@ifundefined{r@#1}{%
+% \end{macrocode}
+% If the reference \texttt{r@\#1} is undefined, define the value to be 0
+% \begin{macrocode}
+ \csarg\gdef{nRefii@#1}{0}}{%
+% \end{macrocode}
+% If the reference \texttt{r@\#1} is defined, define the value to be
+% the second argument of \cs{r@\#1} expanded
+% \begin{macrocode}
+ \expandafter\xdef\csname nRefii@#1\endcsname
+ {\expandafter\expandafter\expandafter
+ \@getsecondOf\csname r@#1\endcsname}%
+ }%
+}
+% \end{macrocode}
+% \DescribeMacro{\eqe@numRefii} takes one argument, the control
+% name. Its value is zero or \cs{nRefii@\#1}. This expands to a number
+% in all cases. It can be used in tex comparisons.
+% \begin{macrocode}
+\def\eqe@numRefii#1{%
+ \csarg\ifx{nRefii@#1}\relax 0\else
+ \@nameuse{nRefii@#1}\fi}
+% \end{macrocode}
+% \begin{macro}{\numLastPageOfExam}
+% \begin{macro}{\numFirstPageOfExam}
+% This is the user-interface to acquiring the first and last page
+% numbers of the exam with name \texttt{\#1}. These can be used
+% in comparisons, e.g.
+%\begin{verbatim}
+% \rfooteqe{\ifnum\value{page}<\numLastPageOfExam{<myTest>}%
+% \textbf{Test Continues}\fi}
+%\end{verbatim}
+% \begin{macrocode}
+\newcommand{\numLastPageOfExam}[1]{\eqe@numRefii{#1PageEnd}}
+\newcommand{\numFirstPageOfExam}[1]{\eqe@numRefii{#1PageBegin}}
+% \end{macrocode}
+% \end{macro}
+% \end{macro}
+% \begin{macrocode}
+\newcommand{\makeRefsNums}{%
+ \@ifundefined{thePartNames}{}{\begingroup
+ \def\\##1{\typeout{processing ##1}%
+ \eqe@defNumRefii
+ {##1PageEnd}\eqe@defNumRefii{##1PageBegin}}%
+ \thePartNames
+ \endgroup}%
+}
+% \end{macrocode}
+% \begin{macrocode}
+\AtBeginDocument{\makeRefsNums}
+% \end{macrocode}
+% \subsection{Running Heads and Feet}
+% We develop a series of macros for creating running headers and footers for the exam.
+% \begin{macro}{\lheadeqe}
+% \begin{macro}{\cheadeqe}
+% \begin{macro}{\rheadeqe}
+%\changes{2.0a}{2010/05/06}{
+% Changed the definitions of \cs{lhead}, \cs{chead}, and \cs{rhead} so they don't clash
+% with the \textsf{fancyhdr} package. If \textsf{fancyhdr} is not loaded at the time \textsf{eqexam} is loaded, we
+% \cs{let} the old names to the new names. Therefore, when \textsf{fancyhdr} is loaded first use
+% the new definitions.
+%}
+% Set the left, center, and right running headers.
+% \begin{macrocode}
+\newcommand{\lheadeqe}[1]{\def\eq@lhead{#1}}
+\lheadeqe{\shortwebsubject/\shortwebtitle}
+\newcommand{\cheadeqe}[1]{\def\eq@chead{#1}}
+\cheadeqe{-- Page \arabic{page} of {\nPagesOnExam} --}
+\newcommand{\rheadeqe}[1]{\def\eq@rhead{#1}}
+% \end{macrocode}
+% The default is \cs{eq@ExamName}, which is defined by \cs{eqExamName}, the default displays the word \texttt{"Name"}
+% and an underlined horizontal space for the student to enter his/her name.
+% \begin{macrocode}
+\rheadeqe{\eq@ExamName}
+% \end{macrocode}
+% \begin{macro}{\lhead}
+% \begin{macro}{\chead}
+% \begin{macro}{\rhead}
+% These are the original names for the headers, we'll keep them if
+% \textsf{fancyhdr} is not already loaded to maintain compatibility
+% with previous versions of \textsf{eqexam}. The use of these commands
+% is \emph{discouraged}.
+% \begin{macrocode}
+\@ifpackageloaded{fancyhdr}{}{%
+ \let\lhead\lheadeqe
+ \let\chead\cheadeqe
+ \let\rhead\rheadeqe
+}
+% \end{macrocode}
+% \end{macro}
+% \end{macro}
+% \end{macro}
+% \end{macro}
+% \begin{macro}{\runExamHeader}
+% \begin{macro}{\eqExamRunHead}
+% The running header of the exam, may be redefined.
+% \begin{macrocode}
+\newcommand{\runExamHeader}{\eq@lhead\hfill\eq@chead\hfill\eq@rhead}
+\newcommand\eqExamRunHead{%
+ \addtolength\textwidth{\oddsidemargin}%
+ \noindent\hspace*{-\oddsidemargin}\makebox[\textwidth]
+ {\runExamHeader}%
+}
+% \end{macrocode}
+% \end{macro}
+% \end{macro}
+% \paragraph*{Running footers.}
+% One or two users wanted to use running footers, so
+% here they are.
+% \begin{macro}{\lfooteqe}
+% \begin{macro}{\cfooteqe}
+% \begin{macro}{\rfooteqe}
+% There has been some demand for running footers. You have to be
+% a little careful, \textsf{eqexam} uses the footer for the
+% command \cmd{\settotalsbox}, which puts in the totals for the pages
+% either on the left (\texttt{totalsonleft}) or right (\texttt{totalsonright}) side, depending on the option.
+% \begin{macrocode}
+\newcommand{\lfooteqe}[1]{\def\eq@lfoot{#1}}
+\lfooteqe{}
+\newcommand{\cfooteqe}[1]{\def\eq@cfoot{#1}}
+\cfooteqe{}
+\newcommand{\rfooteqe}[1]{\def\eq@rfoot{#1}}
+\rfooteqe{}
+% \end{macrocode}
+% \DescribeMacro{\runExamFooter}Considering the defaults for the left, center, and right footer elements,
+% the default footer contributes nothing, except inserting
+% \cmd{\settotalsbox} (see the definition of \cs{@oddfoot})
+% \begin{macrocode}
+\newcommand{\runExamFooter}{\eq@lfoot\hfill\eq@cfoot\hfill\eq@rfoot}
+% \end{macrocode}
+% \end{macro}
+% \end{macro}
+% \end{macro}
+% \end{macro}
+% \end{macro}
+% \paragraph*{Running headers for solutions.}
+% We provide a special set of headers for the solution pages.
+% The document author needs to manage running footers for the solution
+% pages.
+% \begin{macro}{\lheadSol}
+% \begin{macro}{\cheadSol}
+% \begin{macro}{\rheadSol}
+% \begin{macro}{\runExamHeaderSol}
+% \begin{macro}{\eqsolutionshook}
+% The running header of the exam, when solutions are included at the end of
+% the document, perhaps for posting the solutions to the exam, or
+% publication of a ``pretest''. Note that \cs{eqsolutionshook} is defined
+% in \texttt{exerquiz/eqexam.def}. May be redefined.
+% \begin{macrocode}
+\newcommand{\lheadSol}[1]{\def\eq@lheadSol{#1}}
+\lheadSol{\shortwebsubject/\shortwebtitle}
+\newcommand{\cheadSol}[1]{\def\eq@cheadSol{#1}}
+\cheadSol{-- Page \arabic{page} of {\eq@ExamLastPage} --}
+\newcommand{\rheadSol}[1]{\def\eq@rheadSol{#1}}
+\rheadSol{SOLUTIONS}
+% \end{macrocode}
+% The \cs{runExamHeaderSol} distributes the three solution headers across
+% the page.
+% \begin{macrocode}
+\newcommand{\runExamHeaderSol}
+ {\eq@lheadSol\hfill\eq@cheadSol\hfill\eq@rheadSol}
+% \end{macrocode}
+% The solutions headers are inserted using the \cs{eq@solutionshook}, see
+% the definition of \cmd{\exerSolnInput}.
+% \begin{macrocode}
+\def\eq@solutionshook
+{%
+ \gdef\eqExamRunHead{\addtolength\textwidth{\oddsidemargin}%
+ \noindent\hspace*{-\oddsidemargin}\makebox[\textwidth]
+ {\runExamHeaderSol}}%
+}
+% \end{macrocode}
+% \end{macro}
+% \end{macro}
+% \end{macro}
+% \end{macro}
+% \end{macro}
+% \subsection{\texorpdfstring{\protect\cs{maketitle}}{\textbackslash{maketitle}} definitions}
+% \begin{macro}{\maketitle}
+% \begin{macro}{\maketitledesign}
+% \begin{macro}{\altTitle}
+% Standard {\LaTeX} macro, but this time it is used to create the header at the top of the first
+% page of the exam. Typically, consisting of two rows of info. (1) first row has course name, exam name, and
+% a place for the student to put his/her name. (2) second row has date and instructor. May be redefined.
+%
+% Modify the title by redefining \cs{maketitledesign}, the \cs{maketitle} command
+% itself has {\LaTeX} commands in it that should not be changed.
+% \changes{v1.6i}{2007/09/18}
+%{
+% Added the command \cs{altTitle} as an alternate title for the exam
+% document. This alternate title appear centered under the title
+% of the document.
+%}
+% \begin{macrocode}
+\newcommand\maketitledesign
+{%
+ \makebox[\textwidth]{\normalsize
+ \shortstack[l]{\strut\websubject\\\@date}\hfill
+ \shortstack[c]{\webtitle\\\strut\@altTitle}\hfill
+ \shortstack[l]{\strut\eq@ExamName\\\webauthor}}%
+}
+\def\altTitle#1{\def\@altTitle{#1}}
+\let\@altTitle\@empty
+\def\eqemaketitle
+{%
+% \end{macrocode}
+% \cs{EQEcalculateAllTotals}: We don't actually calculate all totals, just
+% some of them. We do calculate the grade total of all the \texttt{exam}
+% environments in the document, we also calculate the percentage that each
+% exam contributes to to the total. If \cs{maketitle} is not used, for
+% whatever reason, this command should be calculated explicitly just after
+% |\begin{document}|.
+% \changes{v3.0y}{2012/04/20}{Moved \cs{EQEcalculateAllTotals} from the bottom
+% to the top of \cs{eqemaketitle}. In case the author wants the grand total
+% of the exam in the title, we need to make all calculations before
+% \cs{maketitledesign.}}
+% \begin{macrocode}
+ \EQEcalculateAllTotals
+ \begingroup
+% \addtolength\textwidth{\oddsidemargin}%
+ \noindent%\hspace*{-\oddsidemargin}%
+ \raisebox{.7in}[0pt][0pt]{\SubmitButton}%
+ \maketitledesign
+ \endgroup
+}
+% \end{macrocode}
+% If the \texttt{fortextbook} option is not taken, we set up the usual \cs{maketitle} definition.
+% If the \texttt{useclassmaketitle} option is taken, we don't redefine either.
+% \begin{macrocode}
+\ifeqfortextbook
+ \@ifpackageloaded{web}{\let\maketitle\web@save@maketitle}{}%
+\else
+ \if@eqeuseclassmaketitle
+ \@ifpackageloaded{web}{\let\maketitle\web@save@maketitle}{}%
+ \else
+ \let\maketitle\eqemaketitle
+ \fi
+\fi
+% \end{macrocode}
+% \end{macro}
+% \end{macro}
+% \end{macro}
+% \subsection{The cover page definitions}
+% \begin{macro}{\eqexcoverpage}
+% The \texttt{eqexam} package allows for the possibility of a cover page, if the \texttt{coverpage}
+% option is taken.
+% \begin{macro}{\placeCoverPageLogo}
+% A simple command to insert a logo on the cover page. The logo can be used to cover the
+% score in the next page, if the instructor places the score under the logo. Example of usage
+%\begin{verbatim}
+% \placeCoverPageLogo{5in}{-1.5in}{\includegraphics{nwfsc_logo}}
+%\end{verbatim}
+% Working from the upper left corner, the first parameter is the amount to move to logo
+% to the right, the second parameter is the amount to move the logo vertically. The
+% Third parameter is the content; perhaps an \cs{includegraphics} command.
+%\changes{v1.9b}{2009/09/29}{Added \cs{placeCoverPageLogo} to insert a logo on the cover page.}
+% \begin{macrocode}
+\newcommand\placeCoverPageLogo[3]{%
+ \def\eqe@insertLogo{\hbox to0pt{%
+ \hspace*{#1}\smash{\raisebox{#2}{#3}}\hss}}}
+\let\eqe@insertLogo\relax
+% \end{macrocode}
+% Define \cs{eqexcoverpage}, this command places \cs{eqe@insertLogo} and
+% \cs{eqex\-cover\-page\-design} in a group. It is this command that gets executed when
+% the user calls for the \texttt{coverpage} option.
+% \begin{macrocode}
+\def\eqexcoverpage{%
+ \begingroup
+ \pagenumbering{roman}
+ \eqe@insertLogo
+ \eqexcoverpagedesign
+ \endgroup\newpage
+ \pagenumbering{arabic}
+}
+% \end{macrocode}
+% \end{macro}
+% \end{macro}
+% \begin{macro}{\eqexcoverpagedesign}
+% The \texttt{eqexam} package allows for the possibility of a cover page,
+% if the \texttt{coverpage} option is taken. This macro can and should be
+% redefined to fit your needs. The definition below is just a
+% representative example.
+% \begin{macro}{\coverpagesubject}
+% \begin{macro}{\coverpageUniversityFmt}
+% \begin{macro}{\coverpageSubjectFmt}
+% \begin{macro}{\coverpageTitleFmt}
+% The following four commands are used with the cover page.
+% The \cs{cover\-page\-sub\-ject} is used to provide a special subject
+% for the cover page, different from \cs{websubject}. The others
+% are used for formatting.
+%\changes{v1.9a}{2009/28/09}{Added these various Fmt commands for coverpage.}
+% \begin{macrocode}
+\newcommand{\coverpagesubject}[1]{\def\coverpage@subject{#1}}
+\let\coverpage@subject\@empty
+\def\eqexamsubject{\ifx\coverpage@subject\@empty\websubject
+ \else\coverpage@subject\fi}
+\newcommand{\coverpageUniversityFmt}[1]{%
+ \def\eqex@coverpageUniversityFmt{#1}}
+\coverpageUniversityFmt{\bfseries\large}
+\newcommand{\coverpageSubjectFmt}[1]{%
+ \def\eqex@coverpageSubjectFmt{#1}}
+\coverpageSubjectFmt{\bfseries\large}
+\newcommand{\coverpageTitleFmt}[1]{%
+ \def\eqex@coverpageTitleFmt{#1}}
+\coverpageTitleFmt{\bfseries\large}
+\newcommand\cpCID[1]{\def\cp@@CID{#1}}
+\let\cp@@CID\@empty
+%\newcommand\coverpageCID[1]{\def\cpCID@argi{#1}}
+\newcommand{\cpSetCIDWidth}[1]{\bgroup\setlength{\@tempdima}{#1}
+ \xdef\cpCID@argi{\the\@tempdima}\egroup}
+\def\cp@CID{\bgroup\settowidth\eq@tmplengthA{\cp@@CID}%
+ \@tempdima=\cpCID@argi\relax
+ \advance\@tempdima-\eq@tmplengthA
+ \eqe@idinfohl{\makebox[\cpCID@argi][l]{\cp@@CID}}\egroup}
+\cpSetCIDWidth{2.25in}
+%\coverpageCID{2.25in}
+% \end{macrocode}
+% \end{macro}
+% \end{macro}
+% \end{macro}
+% \end{macro}
+% When \texttt{coverpage} and \texttt{coverpagesumry} are used, an \textbf{Exam Record}
+% is generated, just a summary may appear beneath the name and ID section of the cover
+% page (\DescribeMacro{\qeSumryVert}\cmd{\qeSumryVert}) or to the right
+% (\DescribeMacro{\eqeSumryHoriz}\cmd{\eqeSumryHoriz}).
+% \begin{macrocode}
+\def\eqeSumryVert{\def\eqe@SumryVert{\par\vfill}%
+ \let\eqe@SumryHoriz\relax
+ \def\eqe@@SumryVert{\vspace{\stretch{-1}}\bigskip}}
+\def\eqeSumryHoriz{\def\eqe@SumryHoriz{\hfill}\let\eqe@SumryVert\relax
+ \let\eqe@@SumryVert\relax}
+% \end{macrocode}
+% The default is a horizontal orientation.
+% \begin{macrocode}
+\eqeSumryHoriz
+% \end{macrocode}
+% We can name the components of the \textbf{Exam Record} by page or by parts. For the case
+% they are named by parts, there are three options: You can used the exam name (the default);
+% you can use the friendly name of the exam (the optional argument), executing
+% \DescribeMacro{\useUIPartNames}\cmd{\useUIPartNames} invokes this option; you can use
+% custom names (useful if the friendly names are too long), execute the command
+% \DescribeMacro{\useCustomPartNames}\cmd{\useCustomPartNames} for this option.
+% \begin{macrocode}
+\def\eqe@coverPageNaming{0}
+\newcommand{\useUIPartNames}{\def\eqe@coverPageNaming{1}}
+\newcommand{\useCustomPartNames}{\def\eqe@coverPageNaming{2}}
+% \end{macrocode}
+% When there is custom naming (\cmd{\customNaming}), we need to provide the user with a
+% way of defining these custom names. \DescribeMacro{\customNaming}\cmd{\customNaming}
+% provides that mechanism. The command takes two arguments, the first is
+% \meta{name}, the exam name, the second is the associated \meta{text} the text that is to appear
+% in the \textbf{Exam Record}
+% \begin{macrocode}
+\newcommand{\customNaming}[2]{\@namedef{userCustom#1}{#2}}
+% \end{macrocode}
+% \begin{macrocode}
+\newcommand{\cpSetNameAndIDWidth}[1]{\bgroup
+ \setlength{\@tempdima}{#1}%
+ \xdef\cp@SetNameAndIDWidth{\the\@tempdima}\egroup}
+\cpSetNameAndIDWidth{.45\textwidth}
+\newcommand{\cpEnclNameAndID}[1]{\def\cp@EnclNameAndID{#1}}
+\let\cp@EnclNameAndID\@empty
+\newcommand{\cpSetHghtFrstLn}[1]{\def\cp@HghtFrstLn{#1}}
+\def\cp@HghtFrstLn{0pt}
+\def\cp@setHghtFrstLn{\rule[\cp@HghtFrstLn]{0pt}{0pt}}
+\newcommand\cpNameAndID{\noindent
+ \edef\eqExamName@argii{\cp@SetNameAndIDWidth}%
+ \edef\eqSID@argii{\cp@SetNameAndIDWidth}%
+ \edef\cpCID@argi{\cp@SetNameAndIDWidth}%
+ \cp@EnclNameAndID{\parbox[b]{\cp@SetNameAndIDWidth}{\parindent0pt
+ \cp@setHghtFrstLn\eq@ExamName\\[2ex]
+ \ifx\cp@@CID\@empty\eq@SID\else\cp@CID\fi\\[2ex]
+ \ifx\use@email\eqe@YES\eq@Email\\[2ex]\fi
+ \textcolor{\webauthor@color}{\webauthor}, \@date\vskip0pt}}}
+% \end{macrocode}
+% Now we present the definition of \cs{eqexcoverpagedesign}.
+% \begin{macrocode}
+\newcommand{\eqexcoverpagedesign}
+{%
+ \begingroup
+ \parindent0pt
+ \thispagestyle{empty}
+% \addtolength\textwidth{\oddsidemargin}
+ \vspace*{.1\textheight}
+ \noindent%\hspace*{-\oddsidemargin}%
+ \makebox[\linewidth]{\parbox{\linewidth}%
+ {\eqex@coverpageUniversityFmt
+ \color{\webuniversity@color}%
+ \centering\webuniversity}}
+ \par\vspace{.1\textheight}
+ \noindent%\hspace*{-\oddsidemargin}%
+ \makebox[\linewidth]{\parbox{\linewidth}%
+ {\eqex@coverpageSubjectFmt
+ \color{\websubject@color}%
+ \centering\eqexamsubject}}
+ \par\vspace{\bigskipamount}
+ \noindent%\hspace*{-\oddsidemargin}%
+ \makebox[\linewidth]{\parbox{\linewidth}%
+ {\eqex@coverpageTitleFmt
+ \color{\webtitle@color}%
+ \centering\webtitle}}
+ \par\vspace{\stretch{1}}
+ \optionalpagematter
+ \par\vspace{\stretch{1}}\cpNameAndID
+ \eqe@SumryHoriz\eqe@SumryVert
+ \sumryAnnots
+ \endgroup
+}
+% \end{macrocode}
+% \end{macro}
+% The following are various local strings used in the \textbf{Exam Record}, the
+% default is to use English words.
+% \begin{macro}{\cpSumryHeader}
+% The header that appears at the top of the box
+% \begin{macro}{\cpSumryPts}
+% The formatting for the number of points
+% \begin{macro}{\cpSumryPage}
+% The word for ``Page''
+% \begin{macro}{\cpSumryTotal}
+% The word for ``Total''
+% \begin{macro}{\cpSumryGrade}
+% The word for ``Grade''
+% \begin{macro}{\cpSetSumryWidth}
+% The width of the summary box
+% \begin{macro}{\cpUsefbox}
+% Enclose in an \cs{fbox}? The default is yes
+% \begin{macro}{\cpNofbox}
+% Do not enclose in an \cs{fbox}
+% \begin{macrocode}
+\newcommand{\cpSumryHeader}{\textbf{Exam Record}}
+\newcommand{\cpSumryPts}{\,\text{pts}}
+\newcommand{\cpSumryPage}{Page}
+\newcommand{\cpSumryTotal}{Total:}
+\newcommand{\cpSumryGrade}{Grade:}
+\newcommand{\cpSetSumryWidth}[1]{\bgroup\setlength{\@tempdima}{#1}
+ \xdef\cp@SetSumryWidth{\the\@tempdima}\egroup}
+\cpSetSumryWidth{.5\textwidth}
+\newcommand{\cpUsefbox}{\let\cp@Usefbox\fbox}
+\cpUsefbox
+\newcommand{\cpNofbox}{\let\cp@Usefbox\mbox}
+\newcommand{\cprulelength}{1.5in}
+% \end{macrocode}
+% \end{macro}
+% \end{macro}
+% \end{macro}
+% \end{macro}
+% \end{macro}
+% \end{macro}
+% \end{macro}
+% \end{macro}
+% A helper command used in \cs{cpSumybyparts}
+% \begin{macrocode}
+\def\cp@IsertNaming#1{%
+ \ifcase\eqe@coverPageNaming
+ #1\or\@nameuse{userFriendly#1}\or
+ \@nameuse{userCustom#1}\else#1\fi
+}
+% \end{macrocode}
+% \DescribeMacro{\cpSumrybyparts}
+% The routine for building the summary box, where we list the statistics
+% for each part.
+% \begin{macrocode}
+\newcommand{\cpSumrybyparts}{%
+ \eqe@@SumryVert\cp@Usefbox{%
+ \ifx\cp@Usefbox\fbox
+ \def\cp@sumryWdth{\cp@SetSumryWidth-2\fboxrule-2\fboxsep}\else
+ \def\cp@sumryWdth{\cp@SetSumryWidth}\fi
+ \begin{minipage}[b]{\cp@sumryWdth}\kern0pt
+ \begin{flushleft}
+ \setlength{\eqetmplengtha}{\cprulelength}%
+ \edef\eqe@cprulelength{\the\eqetmplengtha}%
+ \csarg\ifx{NumberOfParts}\relax
+ \else
+ \count2=0
+ \medskip
+ \cpSumryHeader\par\parskip\bigskipamount
+ \def\\##1{\advance\count2by\csname ##1total\endcsname
+ \underbar{\makebox[0pt][l]{%
+ \cp@IsertNaming{##1}}\hspace*{\eqe@cprulelength}}%
+ / $\eqe@ptsFmt{\csname ##1total\endcsname}%
+ \cpSumryPts$\par}\thePartNames
+ \fi
+ \underbar{\makebox[0pt][l]{\cpSumryTotal}%
+ \hspace{\eqe@cprulelength}}/
+ $\eqe@ptsFmt{\the\count2\relax}\cpSumryPts$ \par
+ \underbar{\makebox[0pt][l]{\cpSumryGrade}%
+ \hspace{\eqe@cprulelength}}%
+ \ifx\cp@Usefbox\fbox\medskip\fi
+ \end{flushleft}\kern0pt
+ \end{minipage}}\par
+}
+% \end{macrocode}
+% \DescribeMacro{\cpSumrybypages}
+% The routine for building the summary box, where we list the statistics
+% for each page.
+% \begin{macrocode}
+\newcommand{\cpSumrybypages}{%
+ \eqe@@SumryVert\cp@Usefbox{%
+ \ifx\cp@Usefbox\fbox
+ \def\cp@sumryWdth{\cp@SetSumryWidth-2\fboxrule-2\fboxsep}\else
+ \def\cp@sumryWdth{\cp@SetSumryWidth}\fi
+ \begin{minipage}[b]{\cp@sumryWdth}\kern0pt
+ \begin{flushleft}
+ \setlength{\eqetmplengtha}{\cprulelength}%
+ \edef\eqe@cprulelength{\the\eqetmplengtha}%
+ \csarg\ifx{NumberOfParts}\relax
+ \else\medskip\count0=0\relax\count2=0\relax
+ \cpSumryHeader\par\parskip\bigskipamount
+ \ifsolutionsAtEnd
+ \@ifundefined{eqExamQuesLastPage}{\def\NUMPAGES{0}}
+ {\edef\NUMPAGES{\@nameuse{eqExamQuesLastPage}}}%
+ \else
+ \@ifundefined{eqExamLastPage}{\def\NUMPAGES{0}}
+ {\edef\NUMPAGES{\@nameuse{eqExamLastPage}}}%
+ \fi
+ \@whilenum\count0<\NUMPAGES\relax\do{%
+ \advance\count0by1\relax
+ \@ifundefined{Page\the\count0total}{\count4=0\relax}
+ {\count4=\@nameuse{Page\the\count0total}\relax}%
+ \csarg\ifx{Page\the\count0spilltotal}\relax
+ \else\advance\count4by\csname%
+ Page\the\count0spilltotal\endcsname\relax\fi
+ \advance\count2by\count4\relax\underbar{%
+ \makebox[0pt][l]{\cpSumryPage~\the\count0}%
+ \hspace*{\eqe@cprulelength}}/
+ $\eqe@ptsFmt{\the\count4\relax}%
+ \cpSumryPts$\csarg\ifx{Page\the\count0spilltotal}\relax
+ \else\ $(\@nameuse{Page\the\count0spilltotal}%
+ \cpSumryPts+\@nameuse{Page\the\count0total}%
+ \cpSumryPts)$\fi\par
+ }%
+ \fi
+ \underbar{\makebox[0pt][l]{\cpSumryTotal}%
+ \hspace{\eqe@cprulelength}}/
+ $\eqe@ptsFmt{\the\count2\relax}\cpSumryPts$\par
+ \underbar{\makebox[0pt][l]{\cpSumryGrade}%
+ \hspace{\eqe@cprulelength}}%
+ \ifx\cp@Usefbox\fbox\medskip\fi
+ \end{flushleft}\kern0pt
+ \end{minipage}}\par
+}
+% \end{macrocode}
+% If the author takes the \texttt{coverpage} option, \cs{eqex@coverpage} is set equal
+% to \cs{eqexcoverpagedesign}, otherwise, it is set equal to \cs{relax}.
+% \begin{macrocode}
+\AtBeginDocument{\eqex@coverpage}
+% \end{macrocode}
+% \subsection{Insert Points in Margins and Compute Page Totals}
+% Here we attempt to place point values of a problem in the margins and
+% to compute the page totals.
+%
+%\begin{macro}{\probvalue}
+% This is a fundamental macro for keeping track of the points of the problem.
+% It increments the counter \texttt{eqpointvalue}, which keeps a running total
+% of the points of the current part of the exam, puts the value in the margins,
+% and sets a \texttt{mark}, so that at the end of the page, we can compute the
+% number of points on the current page. This macro is used in several situations,
+% for example, in the \texttt{problem} environment, \cs{manualcalcparts} and in
+% \cs{autocaleparts}. \textbf{Should not be redefined}.
+%\begin{flushleft}
+%Parameters
+%\begin{verbatim}
+%#1 = total points for this problem
+%#2 = 0 if total points, otherwise, #2 is the number of points each
+% problem.
+%\end{verbatim}
+%\end{flushleft}
+% \begin{macrocode}
+\def\@marktotalvalue{\global\let\eqe@innermarkpts\relax
+ \if@bypasseqexamheading\else\def\eqe@marktxt{%
+ \theeqpointvalue\@nameuse{eqExam}\theeq@numparts}%
+ \ifx\endparts\endexercise@parts@tabular
+ \xdef\eqe@innermarkpts{\noexpand\mark{\eqe@marktxt}}\else
+ \mark{\eqe@marktxt}\fi\fi}
+\def\probvalue#1#2{\addtocounter{eqpointvalue}{#1}%
+ \ifdispl@yPoints\marginpoints{#1}{#2}\fi
+ \@marktotalvalue}
+% \end{macrocode}
+% \end{macro}
+% \DescribeMacro{\widthtpboxes} is the width of the box in the margins that
+% contains the points or totals. The design of the box keys off this width.
+% \begin{macrocode}
+\newcommand{\widthtpboxes}{35pt}
+% \end{macrocode}
+% \DescribeMacro{\marginboxdesign} is the basic box that encloses the points
+% on the right, and the totals. This box may be redefined as desired, in which case,
+% \cs{measurePtBoxHt} should be re-executed.
+% \begin{macrocode}
+\newcommand{\marginboxdesign}[2][]{%
+ \parbox{\widthtpboxes}{\tabcolsep=0pt\relax
+ \begin{tabular}{|c|}\hline
+ \vrule height15pt width0pt#1\\\hline
+ \makebox[\widthtpboxes-2\fboxrule]{#2}\\\hline
+ \end{tabular}%
+ }%
+}
+% \end{macrocode}
+% \begin{macro}{\eqleftmarginbox}
+% This macro places the problem value in the left margin, can be redefined, if you dare.
+%\begin{flushleft}
+% Parameters
+%\begin{verbatim}
+%#1 = total points for this problem
+%#2 = 0 if total points, otherwise, #2 is the number of points each
+% problem.
+%\end{verbatim}
+%\end{flushleft}
+% Currently, this macro is not used so I'll make it into verbatim text.
+%\begin{verbatim}
+\newcommand{\eqleftmarginbox}[2]{\makebox[0pt][r]{%
+ \setlength\tabcolsep{0pt}%
+ \raisebox{-.5\height}[0pt][0pt]{%
+ \marginboxdesign{\marginpointsboxtext{#1}{#2}}%
+ }\hspace*{\marginparsep}\hspace*{\eqemargin}}%
+}
+%\end{verbatim}
+% \end{macro}
+% \paragraph*{Formatting the points}
+% \begin{macro}{\ptsLabel}
+% \begin{macro}{\eachLabel}
+% \begin{macro}{\pointsLabel}
+% The following three convenience commands can be used to localize some of
+% the strings to other languages.
+% \begin{macrocode}
+\providecommand{\ptsLabel}[1]{\def\eqptsLabel{#1}}\ptsLabel{pts}
+\providecommand{\ptLabel}[1]{\def\eqptLabel{#1}}\ptLabel{pt}
+\newcommand{\eachLabel}[1]{\def\eqeachLabel{#1}}\eachLabel{ea.}
+% \end{macrocode}
+% These next two are used by the \texttt{instructions} environment to display
+% the points for the exam.
+% \begin{macrocode}
+\newcommand{\pointsLabel}[1]{%
+ \def\eqpointsLabel{#1}}\pointsLabel{points}
+\newcommand{\pointLabel}[1]{%
+ \def\eqpointLabel{#1}}\pointLabel{point}
+% \end{macrocode}
+% \end{macro}
+% \end{macro}
+% \end{macro}
+% \paragraph*{pointsonleft or pointsonboth}
+% \begin{macro}{\marginpointtext}
+% Creates the text for \cs{eqleftmargin} to use. From the macro definition,
+% if \texttt{\#2} is 0, then we write the points for the problem, else, we write
+% the points each for the problem. \DescribeMacro{\leftmarginPtsTxt}\cmd{\leftmarginPtsTxt}
+% is the formatting for the total points for the problem; while
+% \DescribeMacro{\leftmarginPtsEaTxt}\cmd{\leftmarginPtsEaTxt} is the formatting
+% for the \verb!{problem*}{<num>ea}!-type problems.
+%
+% \begin{macro}{\pointsAsText}
+% We begin by giving the user a choice, typeset
+% the points in math mode (the default) or typeset in the normal font.
+% \begin{macrocode}
+\def\pointsAsText{\def\eqe@ptsFmt{\text}}
+\let\eqe@ptsFmt\relax
+\@onlypreamble\pointsAsText
+% \end{macrocode}
+% \end{macro}
+% \DescribeMacro{\marginpointtext} determines, based on \texttt{\#2}
+% whether the points are `points each' or not, and calls either
+% \cmd{\leftmarginPtsTxt} or \cmd{\leftmarginPtsTxt}, as appropriate.
+% \begin{macrocode}
+\newcommand{\marginpointtext}[2]{\ifnum#2=0\leftmarginPtsTxt{#1}\else
+ \leftmarginPtsEaTxt{#2}\fi
+}
+% \end{macrocode}
+% \DescribeMacro{\leftmarginPtsTxt} displays points in the left margin:
+% \mbox{(\small$\texttt{\#1}^{\mbox{\scriptsize{pt}}}$)} or
+% \mbox{(\small$\texttt{\#1}^{\mbox{\scriptsize{pts}}}$)},
+% where \texttt{\#1} is the number of points for this problem.
+% \begin{macrocode}
+\newcommand{\leftmarginPtsTxt}[1]{(\small$\eqe@ptsFmt{#1}^{\text{%
+ \ifnum#1=1\relax\eqptLabel\else\eqptsLabel\fi}}$)}
+% \end{macrocode}
+% \DescribeMacro{\leftmarginPtsEaTxt} displays `points each' in the left margin:
+% \mbox{(\small$\texttt{\#1}_{\mbox{\scriptsize{ea.}}}^{\mbox{\scriptsize{pt}}}$)} or
+% \mbox{(\small$\texttt{\#1}_{\mbox{\scriptsize{ea.}}}^{\mbox{\scriptsize{pts}}}$)},
+% where \texttt{\#1} is the number of points for each part of this problem.
+% \begin{macrocode}
+\newcommand{\leftmarginPtsEaTxt}[1]{(\small$\eqe@ptsFmt{#1}_{\text{%
+ \eqeachLabel}}^{\text{\ifnum#1=1\relax\eqptLabel\else
+ \eqptsLabel\fi}}$)}
+% \end{macrocode}
+% \end{macro}
+% \begin{macro}{\eqleftmargin}
+% Places the number of points (or points each) in the left margin. Can be redefined as
+% desired. This macro is used when author chooses the \texttt{pointsonleft}
+% or \texttt{pointsonbothsides} option. The text for the points is defined above,
+% \cmd{\marginpointtext}.
+% \begin{macrocode}
+\newcommand{\eqleftmargin}[2]{\makebox[0pt][r]{\marginpointtext{#1}{#2}%
+ \setlength{\@tempdima}{\marginparsep+\eqemargin}%
+ \hspace*{\@tempdima}}}
+% \end{macrocode}
+% \end{macro}
+% \paragraph*{pointsonright or pointsonboth}
+% \begin{macro}{\marginpointsboxtext}
+% When the author selects \texttt{pointsonright} or \texttt{pointsonbothsides}, a box
+% appears in the right margin containing problem totals, this is the text for the box.
+% \begin{macrocode}
+\newcommand{\marginpointsboxtext}[2]{\small$\eqe@ptsFmt{#1}\,\text{%
+ \ifnum#1=1\relax\eqptLabel\else\eqptsLabel\fi}$}
+% \end{macrocode}
+% \end{macro}
+% \begin{macro}{\eqrightmarginbox}
+% When the author selects \texttt{pointsonright} or \texttt{pointsonbothsides}, a box
+% appears in the right margin containing problem totals, this is the box that appears.
+% \begin{macro}{\insertPointsBoxPDF}
+% \begin{macro}{\insertTotalsBoxPDF}
+% These two commands are \cmd{\let}ing them be either a form field (that the
+% document author can fill in during online grading, or as \cs{relax}. It depends
+% on whether the \texttt{email} option is taken or not.
+% \begin{macrocode}
+\def\@insertPointsBoxPDF
+{
+ \def\fieldName{pointsgiven.\curr@quiz.page\thepage.%
+ \theeqquestionnoi}%
+ \calcTextField[\F\FHidden\BC{}\Q1\textColor{1 0 0 rg}]
+ {\fieldName}{\widthtpboxes}{15pt}%
+}
+\def\@insertTotalsBoxPDF
+{
+ \def\fieldName{pagetotals.\curr@quiz.page\thepage}%
+ \calcTextField[\F\FHidden\BC{}\Q1\textColor{1 0 0 rg}
+ \AA{\AACalculate{AFSimple_Calculate("SUM",
+ new Array("pointsgiven.\curr@quiz.page\thepage"));}}]
+ {\fieldName}{\widthtpboxes}{15pt}%
+}
+\ifx\use@email y
+ \let\insertPointsBoxPDF\@insertPointsBoxPDF
+ \let\insertTotalsBoxPDF\@insertTotalsBoxPDF
+\else
+ \let\insertPointsBoxPDF\@empty
+ \let\insertTotalsBoxPDF\@empty
+\fi
+% \end{macrocode}
+% \end{macro}
+% \end{macro}
+% The points box that appears in the left margin, may be re-defined, if you dare.
+% At the bottom of the box goes the points for the problem, if the \texttt{email} option
+% is used, in the top, a text field is inserted.
+% \begin{macrocode}
+\newcommand{\eqrightmarginbox}[2]{\makebox[0pt][l]{%
+ \setlength\tabcolsep{0pt}%
+% \end{macrocode}
+% (2011/05/08) new calculation for the right point box.
+% \begin{macrocode}
+ \setlength{\@tempdima}{\textwidth-\eqemargin+\marginparsep}%
+ \hspace*{\@tempdima}%
+ \raisebox{-.5\height}[0pt][0pt]{%
+ \marginboxdesign[\insertPointsBoxPDF]%
+ {\marginpointsboxtext{#1}{#2}}%
+ }\hfil
+ }%
+}
+% \end{macrocode}
+% At the end of each exam \verb!\end{exam}! the part totals can be optionally
+% displayed on the right. This is the box for doing that.
+% \begin{macrocode}
+\newcommand{\eqeomarginboxright}[2]{\makebox[0pt][l]{%
+ \setlength\tabcolsep{0pt}%
+ \setlength{\@tempdima}{\textwidth+\marginparsep-\parindent}%-\parindent
+ \hspace*{\@tempdima}%
+ \raisebox{-.5\height}[0pt][0pt]{%
+ \marginboxdesign[\insertTotalsBoxPDF]%
+ {\marginpointsboxtext{#1}{#2}}%
+ }\hfil
+ }%
+}
+% \end{macrocode}
+% At the end of each exam \verb!\end{exam}! the part totals can be optionally
+% displayed on the left. This is the box for doing that.
+% \begin{macrocode}
+\newcommand{\eqeomarginboxleft}[2]{\noindent\makebox[0pt][r]{%
+ \raisebox{-.5\height}[0pt][0pt]{%
+ \marginboxdesign[\insertTotalsBoxPDF]%
+ {\marginpointsboxtext{#1}{#2}}%
+ }{\settowidth{\@tempdimb}{\eqe@hspannerPrb}%
+ \setlength{\@tempdima}{\marginparsep+\eqemargin-\@tempdimb}%
+ \hspace*{\@tempdima}}}\hfil
+}
+% \end{macrocode}
+% \DescribeMacro{\measurePtBoxHt} We measure the height of our point/total boxes and store it
+% in the length \cs{eq@pointboxtotalheight}, which is used
+% to separate the boxes so they don't overlap.
+% \begin{macrocode}
+\newcommand{\measurePtBoxHt}{\setbox\eq@pointbox\hbox{%
+ \marginboxdesign{\marginpointsboxtext{00}{0}}%
+ }\setlength\eq@pointboxtotalheight{.5\ht\eq@pointbox}%
+ \xdef\halfHtPtBox{\the\eq@pointboxtotalheight}%
+ \setlength\eq@pointboxtotalheight{\dp\eq@pointbox+\ht\eq@pointbox}%
+ \xdef\totHtPtBox{\the\eq@pointboxtotalheight}%
+ \xdef\dpPtBox{\the\dp\eq@pointbox}%
+ \xdef\htPtBox{\the\ht\eq@pointbox}%
+}
+\measurePtBoxHt
+% \end{macrocode}
+% \end{macro}
+% A helper command to set both margin boxes.
+% \begin{macrocode}
+\newcommand{\eqbothmargins}[2]{\eqleftmargin{#1}{#2}%
+ \eqrightmarginbox{#1}{#2}}
+% \end{macrocode}
+% The macro \cs{probvalue}, defined above, says
+%\begin{verbatim}
+%\mark{\theeqpointvalue\csname eqExam\endcsname\theeq@numparts}
+%\end{verbatim}
+% so the \cs{botmark} contains the point value of this page and the part number for
+% this page.
+% \begin{macrocode}
+\def\lastparttotaled{0}
+% \end{macrocode}
+% The \texttt{botmark} looks like \texttt{18\string\eqExam0}, where $18$ will be the total number of
+% points accumulated for this exam part. We need to retrieve these number, I don't remember why
+% I save them this way.
+%
+% \DescribeMacro{\parsetotals}
+% The \cs{parsetotals} macro is called in \cs{settotalsbox} to retrieve the ongoing point values
+% from \cs{botmark}, and returns two parameters, contained in \cs{argi} and \cs{argiii}.
+% \DescribeMacro{\stripeqExam}
+% Whereas, \cs{stripeqExam} just retrieves the first parameter only.
+% \begin{macrocode}
+\def\parsetotals#1\eqExam#2\end{\def\argi{#1}\def\argii{#2}}
+\def\stripeqExam#1\eqExam{\def\argii{#1}}
+% \end{macrocode}
+% \begin{macro}{\settotalsbox}
+% This is the box containing the page total, it may appear on the left or right side bottom
+% corner.
+% \begin{macrocode}
+\def\settotalsbox{%
+ \expandafter\parsetotals\botmark\eqExam\end
+ \ifx\argi\@empty\hfil
+ \else\ifx\argii\@empty\hfil
+ \else
+ \expandafter\stripeqExam\argii
+% \end{macrocode}
+% Set \texttt{eqpointsthispage} equal to \cs{argi}, which should be the accumulated total
+% for this part of the test so far.
+% \begin{macrocode}
+ \setcounter{eqpointsthispage}{\argi}%
+% \end{macrocode}
+% This subtract \texttt{eqpointsofar}, which should be the total for this test part through the
+% previous page. The difference is the number of points for this page.
+% \begin{macrocode}
+ \addtocounter{eqpointsthispage}{-\value{eqpointsofar}}%
+% \end{macrocode}
+% Now we set \texttt{eqpointsofar} to the new accumulated total \cs{argi}.
+% \begin{macrocode}
+ \setcounter{eqpointsofar}{\argi}%
+% \end{macrocode}
+% And save to the auxiliary file for later usage.
+% \begin{macrocode}
+ \xdef\lastparttotaled{\argii}%
+ \eqe@IWO\@auxout{\string\csarg\string\gdef{Page\thepage total}%
+ {\theeqpointsthispage}}%
+% \end{macrocode}
+% Finally, place the totals box.
+% \begin{macrocode}
+ \totalsbox
+ \fi
+ \fi
+}
+% \end{macrocode}
+% \end{macro}
+% \DescribeMacro{\totalsboxtext} This is the text that appears in the totals boxes
+% \begin{macrocode}
+\newcommand\totalsboxtext{\small$
+ \eqe@ptsFmt{\theeqpointsthispage}\,\text{%
+ \ifnum\theeqpointsthispage=1\relax\eqptLabel\else
+ \eqptsLabel\fi}$}
+% \end{macrocode}
+% \DescribeMacro{\eqevtranstotbox}\cmd{\eqevtranstotbox} is a length
+% that can be used to raise or lower the position of the total boxes
+% in the left/right bottom corner. The default is \texttt{0pt}.
+% \begin{macrocode}
+\newlength\eqevtranstotbox
+\setlength{\eqevtranstotbox}{0pt}
+% \end{macrocode}
+% \DescribeMacro{\totalsboxleft}\DescribeMacro{\totalsboxright} There are two totals boxes, one for the left and one
+% for the right side. These can be redefined as desired.
+% \begin{macrocode}
+\def\eqe@chkZeroTotals{\let\eqe@allow\eqe@YES
+ \ifx\eqe@zeroTotalsAllowed\eqe@NO
+ \ifnum\theeqpointsthispage=0 \let\eqe@allow\eqe@NO\fi\fi}
+\newcommand{\totalsboxleft}{\eqe@chkZeroTotals
+ \ifx\eqe@allow\eqe@YES
+ \makebox[0pt][r]{\setlength\tabcolsep{0pt}%
+ \raisebox{-\height+\eqevtranstotbox}[0pt][0pt]{%
+ \marginboxdesign[\insertTotalsBoxPDF]{\totalsboxtext}%
+ }\hspace*{\marginparsep}%
+ }\fi\hfil
+}
+\newcommand{\totalsboxright}{\eqe@chkZeroTotals
+ \ifx\eqe@allow\eqe@YES
+ \makebox[0pt][l]{\setlength\tabcolsep{0pt}%
+ \hspace*{\textwidth}\hspace*{\marginparsep}%
+ \raisebox{-\height+\eqevtranstotbox}[0pt][0pt]{%
+ \marginboxdesign[\insertTotalsBoxPDF]{\totalsboxtext}%
+ }%
+ }\fi\hfil
+}
+% \end{macrocode}
+% We begin the document by declaring the current part is part 0 with 0 points. This is the default,
+% in case the author writes a document with no parts or points!
+% \begin{macrocode}
+\ifeqe@nopoints\else\if@bypasseqexamheading\else
+\AtBeginDocument{\mark{0\csname eqExam\endcsname0}}
+\fi\fi
+% \end{macrocode}
+% At the end of the document, we write out the number of parts for this test, and
+% the names of the parts the author has given each part.
+% \begin{macrocode}
+\AtEndDocument{%
+ \eqe@IWO\@auxout{\string\csarg\string\gdef{NumberOfParts}%
+ {\arabic{eq@numparts}}}%
+ \eqe@IWO\@auxout{\string\csarg\string\gdef{thePartNames}%
+ {\the\partNames}}%
+ \clearpage\addtocounter{page}{-1}\writelastpage\relax
+ \addtocounter{page}{1}%
+}
+% \end{macrocode}
+% \begin{macro}{\theGrandTotal}
+% When an exam has multiple parts, the total of each part is computed
+% and the grand total is computed with \cs{theGrandTotal}.
+% \begin{macrocode}
+\newcommand\theGrandTotal{%
+ $\eqe@ptsFmt{\csname eqeGrandTotal\endcsname}$}
+% \end{macrocode}
+% \end{macro}
+% \begin{macro}{\totalForPart}
+% User access to the total for a exam environment, one argument, the name of the exam.
+% \begin{macro}{\percentForPart}
+% Attempts to calculate the percent of the total that the referenced exam (\texttt{\#1})
+% contributes to the grand total.
+% \begin{macrocode}
+\newcommand{\totalForPart}[1]{$\eqe@ptsFmt{\csname#1total\endcsname}$}
+\def\tot@lForPart#1{\csname#1total\endcsname}
+\newcommand{\percentForPart}[1]{$\eqe@ptsFmt
+ {\csname#1percent\endcsname}$\%}
+% \end{macrocode}
+% \end{macro}
+% \end{macro}
+%
+%\subsection{Computing Number of Points within a Segment of the Exam}
+%
+% We add some commands for calculating number of points in a segment of the exam.
+% A segment being defined subset of consecutive problems within an exam. We can
+% define segments by placing markers (using \cs{placeMarkerHere}) between problems. We can
+% then calculate the total number of points between markers.
+%
+% The counter below is a scratch counter for making the calculations. We assume the
+% \texttt{calc} package is loaded, it does the work for us.
+%
+% \begin{macrocode}
+\newcounter{markerCnt}
+% \end{macrocode}
+% \begin{macro}{\placeMarkerHere}
+% Placed outside of any \texttt{problem}/\texttt{problem*} environment, this command
+% takes one argument, the symbolic name for this marker. We write to the auxiliary file
+% and define a command whose name is based on \texttt{\#1}, and whose value is
+% the cumulative total \cs{theeqpointvalue}.
+%\changes{v1.8}{2008/11/02}
+%{
+% Added a set of commands \cs{placeMarkerHere}, \cs{calcFromMarkers},
+% and \cs{markerTotalFmt} to enable the calculation of totals of segments
+% of the exam.
+%}
+% \begin{macrocode}
+\def\placeMarkerHere#1{%
+ \eqe@IWO\@auxout{\string\csarg\string\gdef
+ {#1SaveTotalHere}{\theeqpointvalue}}%
+}
+% \end{macrocode}
+% \end{macro}
+% \begin{macro}{\calcFromMarkers}
+% Once the markers are in place, we can calculate the number of points defined between
+% two such markers. The \cs{calcFromMarkers} takes three arguments, \texttt{\#2} and
+% \texttt{\#3} are the symbolic names of the two markers. While, \texttt{\#1} is an optional
+% argument for formatting the calculation. The default is \cs{@markerTotalFmt}, defined
+% below in \cs{markerTotalFmt}. The value of the total is \cs{themarkerCnt}.
+% \begin{macrocode}
+\newcommand{\calcFromMarkers}[3][\@markerTotalFmt]{%
+ \@ifundefined{#2SaveTotalHere}{}%
+ {\@ifundefined{#3SaveTotalHere}{}{\setcounter{markerCnt}%
+ {\@nameuse{#2SaveTotalHere}-\@nameuse{#3SaveTotalHere}}%
+ \ifnum\value{markerCnt}<0\relax
+ \setcounter{markerCnt}{-\value{markerCnt}}\fi#1}}%
+}
+% \end{macrocode}
+% \end{macro}
+% \begin{macro}{\markerTotalFmt}
+% Used to set the global format of the marker totals. The value of the marker total
+% is \cs{themarkerCnt}. The default follows the definition of \cs{markerTotalFmt}
+% \begin{macrocode}
+\newcommand{\markerTotalFmt}[1]{\def\@markerTotalFmt{#1}}
+\markerTotalFmt{\space(\themarkerCnt\space points)}
+% \end{macrocode}
+% \end{macro}
+% \begin{macro}{\calcQsBtwnMarkers}
+% \changes{v3.1}{2012/05/16}{Added \cs{calcQsBtwnMarkers}}
+% \cs{calcQsBtwnMarkers[\meta{Mrk2}]}|{|\meta{Mrk1}|}| does a number of things; primarily,
+% it determines the range of the questions between the two marks. The names of the
+% commands produced are all based in the first marker name \meta{Mrk1}.
+% \DescribeMacro{ \bslash\meta{Mrk1}Start}\cs{\meta{Mrk1}Start} is the first question number that follows the
+% the placement of \cs{calcQsBtwnMarkers}. Similarly,
+% \DescribeMacro{ \bslash\meta{Mrk1}End}\cs{\meta{Mrk1}End}
+% is the last question number between the two marks \meta{Mrk1} and \meta{Mrk2}.
+%
+% We also calculate \DescribeMacro{ \bslash\meta{Mrk1}nQs}\cs{\meta{Mrk1}nQs}, the number of questions appearing between
+% \meta{Mrk1} and \meta{Mrk2}.
+% \begin{macrocode}
+\newcommand{\calcQsBtwnMarkers}[2][]{\setcounter{markerCnt}{0}%
+ \def\eqe@argi{#1}%
+% \end{macrocode}
+% \cs{\meta{Mrk1}thisQnum} is the question number in effect at the point where
+% the command \cs{calcQsBtwnMarkers} is inserted.
+% \begin{macrocode}
+ \eqe@IWO\@auxout{\string\csarg\string\gdef
+ {#2thisQnum}{\theeqquestionnoi}}%
+% \end{macrocode}
+% \cs{\meta{Mrk1}Start} is 0 if undefined.
+% \begin{macrocode}
+ \@ifundefined{#2thisQnum}{\csarg\xdef{#2Start}{0}%
+ \eqe@IWO\@auxout{\string\csarg\string\gdef
+ {#2Start}{0}}%
+ }{%
+% \end{macrocode}
+% \cs{\meta{Mrk1}Start} is the current question number plus 1.
+% \begin{macrocode}
+ \setcounter{markerCnt}{\value{eqquestionnoi}+1}\csarg
+ \xdef{#2Start}{\the\value{markerCnt}}%
+ \eqe@IWO\@auxout{\string\csarg\string\gdef
+ {#2Start}{\@nameuse{#2Start}}}%
+ }
+% \end{macrocode}
+% Using now both \meta{Mrk1} and \meta{Mrk2} we calculate the difference
+% in the two. Result held in \texttt{markerCnt}. If there is no optional parameter, \meta{Mrk2},
+% do not produce the \cs{\meta{Mrk1}thisQnum}.
+% \begin{macrocode}
+ \ifx\eqe@argi\@empty\else
+ \@ifundefined{#2thisQnum}{\setcounter{markerCnt}{0}}%
+ {\@ifundefined{#1thisQnum}{\setcounter{markerCnt}{0}}{%
+ \setcounter{markerCnt}%
+ {\@nameuse{#1thisQnum}-\@nameuse{#2thisQnum}}%
+ }}%
+ \fi
+% \end{macrocode}
+% \cs{\meta{Mrk1}nQs} is the number of questions that appear between
+% \meta{Mrk1} and \meta{Mrk2}.
+% \begin{macrocode}
+ \csarg\xdef{#2nQs}{\the\value{markerCnt}}%
+ \eqe@IWO\@auxout{\string\csarg\string\gdef
+ {#2nQs}{\the\value{markerCnt}}}%
+% \end{macrocode}
+% \cs{\meta{Mrk1}End} is 0 if undefined. If there is no optional parameter, \meta{Mrk2},
+% do not produce the \cs{\meta{Mrk1}End}
+% \begin{macrocode}
+ \ifx\eqe@argi\@empty\else
+ \@ifundefined{#1thisQnum}{\csarg\xdef{#2End}{0}%
+ \eqe@IWO\@auxout{\string
+ \csarg\string\gdef{#2End}{0}}%
+ }{%
+% \end{macrocode}
+% \cs{\meta{Mrk1}End} is \cs{\meta{Mrk2}thisQnum}.
+% \begin{macrocode}
+ \csarg\xdef{#2End}{\@nameuse{#1thisQnum}}%
+ \eqe@IWO\@auxout{\string\csarg\string\gdef
+ {#2End}{\@nameuse{#2End}}}%
+ }%
+ \fi
+}
+% \end{macrocode}
+% \begin{macro}{\markStartFor}
+% \begin{macro}{\markEndtFor}
+% \begin{macro}{\markNumQsFor}
+% We provide a user interface to the three macros defined above. The required
+% parameter is a mark (a name that was used as the first argument of
+% \cmd{\calcQsBtwnMarkers}).
+% \begin{macrocode}
+\newcommand{\markStartFor}[1]{\@nameuse{#1Start}}
+\newcommand{\markEndFor}[1]{\@nameuse{#1End}}
+\newcommand{\markNumQsFor}[1]{\@nameuse{#1nQs}}
+% \end{macrocode}
+% \end{macro}
+% \end{macro}
+% \end{macro}
+% \end{macro}
+%
+% \subsection{Useful Commands to Write Problems}
+%
+% \subsubsection{The \texorpdfstring{\cs{placeAtxy}}{\textbackslash{placeAtxy}} command}
+% \begin{macro}{\placeAtxy}
+% Use to place material within the solutions area that is visible to the student
+% on the test document. Syntax:
+% \begin{quote}\switchCats\ttfamily
+% \string\placeAtxy{\meta(x\_dim)}{\meta(y\_dim)}{\meta(content)}
+% \end(quote)
+% \cs{placeAtxy} goes immediately after \verb!\end{solution}!
+% \begin{macrocode}
+\newcommand{\placeAtxy}[3]{{%
+ \par\nointerlineskip
+ \ifdisplayworkarea
+ \ifx\eq@insertverticalspace\eqe@YES
+ \makebox[0pt][l]{\hspace*{-\parindent}\hspace*{#1}%
+ \raisebox{#2}[0pt][0pt]{#3}}\fi
+ \fi
+}}
+% \end{macrocode}
+% \end{macro}
+% \subsubsection{The \texttt{workarea} environment}
+% As of this writing, 2012/12/09, this segment of code has been re-written. The
+% \texttt{splitsolution} and \texttt{panel} environments have a new syntax. I've never
+% gotten any feedback from user who use these environments, so I suspect the impact
+% of these changes are minimal.
+% \begin{environment}{workarea}
+% A work area is an environment used when we display vertical space such as when the
+% \texttt{nosolutions} and \texttt{vspacewithsolns} options are in effect.
+% \DescribeMacro{\workareasb}\cmd{\workareasb} is a save box used in the
+% argument of \texttt{lrbox} to save the contents of the \texttt{minipage}.
+% \begin{quote}\switchCats\ttfamily
+% \string\begin{workarea}[\meta(width)]{\meta(depth)}\\
+% ...\\
+% \string\end{workarea}
+% \end(quote)
+% \begin{macrocode}
+\newsavebox{\workareasb}
+\newenvironment{workarea}[2][\linewidth]
+{%
+ \removelastparskip
+ \edef\workareadepth{\if\currhideopt H0pt\else#2\fi}%
+ \begin{lrbox}{\workareasb}\setlength{\eqetmplengtha}{#1}%
+ \begin{minipage}[b][\workareadepth][t]{\eqetmplengtha}\vspace*{3pt}%
+}{%
+ \end{minipage}\end{lrbox}%
+% \end{macrocode}
+% \texttt{4/5/11} Changed the logic here, so the \texttt{workarea} is available
+% for the \texttt{vspace\-with\-solns} option.
+% \begin{macrocode}
+ \par\ifdisplayworkarea
+ \ifx\eq@insertverticalspace\eqe@YES
+ \removelastparskip
+ \vspace{-\baselineskip}%
+ \if\currhideopt H\else
+ \noindent\strut\smash{\usebox{\workareasb}}%
+ \fi\fi
+ \fi
+}
+% \end{macrocode}
+% \end{environment}
+% \subsubsection{The \texttt{splitsolution} environment}
+% \begin{environment}{splitsolution}
+%\changes{v3.2}{2012/12/10}{Rewrote splitsolution and related code to change the syntax.}
+% This is a special solution environment designed for use with the
+% \texttt{online} or \texttt{email} options, but it is compatible with all other options
+% as well.\par\medskip\noindent
+%\begin{minipage}{.55\linewidth}
+%\textbf{New Syntax}\\[3pt]
+%\begingroup\small
+% \switchCats\ttfamily
+% \string\begin{splitsolution}[\meta(width)][\meta(depth)]\\
+% \string\begin{panel}[l\string|r]\\
+% ...\\
+% \string\end{panel}\\
+% \string\begin{solution}\\
+% ...\\
+% \string\end{solution}\\
+% \string\end{splitsolution}
+%\par\endgroup
+%\end{minipage}\hfil
+%\begin{minipage}{.45\linewidth}
+%\textbf{Old Syntax}\\[3pt]
+%\begingroup\small
+% \switchCats\ttfamily
+% \string\begin{splitsolution}{\meta(depth)}\\
+% \string\begin{panel}[l\string|r]{\meta(width)}\\
+% ...\\
+% \string\end{panel}\\
+% \string\begin{solution}\\
+% ...\\
+% \string\end{solution}\\
+% \string\end{splitsolution}
+%\par\endgroup
+%\end{minipage}
+%\par\medskip\noindent
+% The \texttt{panel} writes its contents to a CUT file, then inputs it back
+%in to get its dimensions, it places the contents in the box
+%\cs{eqpanelbox}.
+%
+% Below is an example of the use of the \texttt{splitsolution} environment
+% (which is defined well below here).
+%\begin{verbatim}
+%\begin{problem}[5]
+%This is a question worth $5$ points.
+%\begin{splitsolution}
+%\begin{panel}\relax
+%\includegraphics[scale=.2]{fig1}
+%\end{panel}
+%\begin{solution}
+%This a really good solution and worthy of a $5$ points.
+%\end{solution}
+%\end{splitsolution}
+%\end{problem}
+%\end{verbatim}
+% Here, we include a graphic. We put it into a box, \cs{eqpanelbox} to get its dimensions.
+% The \texttt{splitsolution} environment has one required argument, the total height of the
+% solution. We then place the graphic in the \texttt{panel} environment, and write the solution
+% in the usual way.
+%\par\medskip\noindent
+% We arrive at the \DescribeEnv{splitsolution}\texttt{splitsolution} environment.
+% \begin{macrocode}
+\def\splitsolution{%
+ \@ifnextchar[{\splitsolutioni}%
+ {\splitsolutioniii{\panelwidth}{\panelheight}}%
+}
+\def\splitsolutioni[#1]{%
+ \@ifnextchar[{\splitsolutionii{#1}}
+ {\splitsolutioniii{\panelwidth}{#1}}%
+}
+\def\splitsolutionii#1[#2]{%
+ \splitsolutioniii{#1}{#2}%
+}
+\def\splitsolutioniii#1#2{%
+ \@ifundefined{panel@write}{\newwrite\panel@write}{}%
+ \gdef\ss@Argiii{#1}\gdef\ss@Argii{#2}%
+% \end{macrocode}
+% Here, we \cs{let} \cs{solution} to \cs{@sssolution} and replace it with
+% \cs{@ssSolution}
+% \begin{macrocode}
+ \let\@sssolution\solution
+ \let\end@sssolution\endsolution
+ \let\solution\@ssSolution
+ \let\endsolution\end@ssSolution
+ \par\noindent\ignorespaces
+% \end{macrocode}
+% The \texttt{panel} environment should appear next, just after the \verb!\begin{splitslution}!
+% \begin{macrocode}
+}
+\def\endsplitsolution{%
+ \ifeq@solutionsafter\strut\par\fi
+ \ifx\solutionparshape\@empty\else
+ \advance\linewidth-\leadinIndentPrtSep\fi %%dps
+ \edef\eqe@workwidth{\if\ss@Argi l\noexpand\ss@Argiii
+ \else\noexpand\linewidth\fi}%
+ \edef\eqe@workfill{\if\ss@Argi l\else\hfill\fi}%
+ \begin{workarea}[\eqe@workwidth]{\eqedepth}%
+ \let\panelGetDimen\relax%
+ \eqe@workfill\input{panel\thepanel@cnt.cut}%
+ \end{workarea}
+ \strut\par
+}
+% \end{macrocode}
+% \end{environment}
+%\par\medskip\noindent
+% \DescribeMacro{\panelgap}\cs{panelgap} is the separation between solution area
+% and the panel. \DescribeMacro{\eqpanelbox} is a box to put things into, to measure their
+% dimensions. The user accessible commands \DescribeMacro{\panelwidth}\cs{panelwidth} returns the
+% width and \DescribeMacro{\panelheight}\cs{panelheight} the height. There is a special counter
+% \DescribeMacro{panel@cnt}\texttt{panel@cnt} to keep track of the panels generated.
+% \begin{macrocode}
+\newcommand\panelgap{3pt}
+\newsavebox{\eqpanelbox}
+\newdimen\eqepanelwidth
+\newdimen\eqepanelheight
+% \end{macrocode}
+% The \DescribeMacro{\getDimSSPanel}\cs{getDimSSPanel} is an internal command. It
+% places it argument in the box \cs{eqpanelbox} and gets its dimensions. It
+% save the dimensions as \cs{eqepanelwidth} and \cs{eqepanelheight} (the total height).
+% \begin{macrocode}
+\newcommand{\getDimSSPanel}[1]{%
+ \sbox{\eqpanelbox}{#1}%
+ \eqepanelwidth=\wd\eqpanelbox
+ \eqepanelheight=\ht\eqpanelbox
+ \advance\eqepanelheight by\the\dp\eqpanelbox
+}
+% \end{macrocode}
+% \DescribeMacro{\panelwidth}\cs{panelwidth} and \DescribeMacro{\panelheight}\cs{panelheight}
+% are aliases for the dimension registers. This is for compatibility with previous versions.
+% \begin{macrocode}
+\def\panelwidth{\eqepanelwidth}
+\def\panelheight{\eqepanelheight}
+\newcounter{panel@cnt}
+% \end{macrocode}
+% \DescribeMacro{panel} environment goes inside the \texttt{splitsolution}
+% environment. Permissible values of the first parameter are \texttt{r} and
+% \texttt{l}, the default being \texttt{l}. This is the alignment parameter.
+% The second argument is the width of the panel.
+% \begin{macrocode}
+\def\panel{\def\eqe@panelir{\eqe@paneli[r]}%
+ \@ifnextchar[{\eqe@paneli}
+ {\@ifnextchar\relax{\expandafter\eqe@panelir\@gobble}%
+ {\eqe@paneli[r]}}%
+}
+% \end{macrocode}
+% We continue the \texttt{panel} environment.
+% \begin{macrocode}
+\def\eqe@paneli[#1]{%
+ \gdef\ss@Argi{#1}\def\eqe@l{l}\def\eqe@r{r}%
+ \ifx\ss@Argi\@empty\gdef\ss@Argi{r}\else
+ \ifx\eqe@l\ss@Argi\else\ifx\eqe@r\ss@Argi\else
+ \PackageError{eqexam}{Permissible arguments for panel are l and r}
+ {Use l or r for the argument of panel.}\fi\fi\fi
+ \stepcounter{panel@cnt}%
+ \immediate\openout \panel@write panel\thepanel@cnt.cut
+% \end{macrocode}
+% Manage the \texttt{h}, \texttt{H}, and global overrides.
+% \begin{macrocode}
+ \if\currhideopt H%
+ \eqe@IWO\panel@write{\vfill}%
+ \immediate\closeout\panel@write
+ \gdef\ss@Argii{0pt}%
+ \else
+ \if\currhideopt h\ifeq@solutionsafter\else
+ \ifeq@globalshowsolutions\else
+ \eqe@IWO\panel@write{\vfill}%
+ \immediate\closeout\panel@write
+ \gdef\ss@Argii{0pt}%
+ \fi\fi
+ \fi
+ \fi
+ \begingroup
+% \end{macrocode}
+% Write the contents of this environment to the file
+% \texttt{panel\string\thepanel@cnt.cut}.
+% \begin{macrocode}
+ \let\verbatim@out\panel@write
+% \end{macrocode}
+% We begin by writing \verb!\panelGetDimen{%! to the CUT file
+% \begin{macrocode}
+ {\lccode`C=`\%\lccode`P=`\{
+ \lowercase{\eqe@IWO\verbatim@out{\string\panelGetDimen PC}}}%
+% \end{macrocode}
+% Followed by the verbatim listing of the \texttt{panel} environment.
+% \begin{macrocode}
+ \verbatimwrite
+}
+\def\endpanel{%
+ \endverbatimwrite
+% \end{macrocode}
+% After the verbatim write, we write \verb!}! to close off the argument
+% of \cs{panelGetDimen}.
+% \begin{macrocode}
+ {\lccode`P=`\}\lowercase{\eqe@IWO\verbatim@out{P}}}%
+ \immediate\closeout\panel@write
+ \endgroup
+% \end{macrocode}
+% The command \cs{eqePANEL} cut does all the work at the end of this environment.
+% We first \cs{let} \cs{panelGetDimen} to \cs{getDimenSSPanel} and input the
+% CUT file. This loads the panel contents into \cs{eqpanelbox}, and gets their
+% dimensions. We set the value of \cs{ss@Argiii} which is the width parameter
+% of the \texttt{splitsolution} environment. \cs{mp@Width} calculates the width.
+% \begin{macrocode}
+ \gdef\eqePANELCUT{%
+ \let\panelGetDimen\getDimSSPanel
+ \input{panel\thepanel@cnt.cut}%
+ \setlength{\eq@tmpdima}{\ss@Argiii}%
+ \xdef\ss@Argiii{\the\eq@tmpdima}%
+ \xdef\mp@Width{\ifeq@solutionsafter\linewidth
+ \else\linewidth-\ss@Argiii-\panelgap\fi}%
+ }\aftergroup\eqePANELCUT
+}
+% \end{macrocode}
+% \cs{eqe@IW} is a macro that either writes verbatim text (\texttt{\#1}), or
+% it gobbles the argument, depending on whether have \texttt{solutionsafter}, \texttt{nosolutions},
+% hidden or not hidden.
+% \begin{macrocode}
+\long\def\eqe@IW#1{%
+ \ifeq@solutionsafter
+ \let\eqe@next\@empty
+ \else
+ \def\eqe@next{\eqe@IWO\verbatim@out{#1}}%
+ \ifeq@nosolutions\else
+ \if\currhideopt H%
+ \gdef\ss@Argii{0pt}\let\eqe@next\@empty
+ \else
+ \if\currhideopt h%
+ \ifeq@globalshowsolutions\else
+ \gdef\ss@Argii{0pt}\let\eqe@next\@empty
+ \fi
+ \fi
+ \fi
+ \fi
+ \fi
+ \eqe@next
+}
+% \end{macrocode}
+% The \texttt{splitsolution} environment \cs{let}s the solution environment
+% to the internal \texttt{@ssSolution} environment. It performs various tasks
+% then turns it over to the old solution environment, which has been \cs{let}
+% to \cs{@sssolution}.
+% \begin{macrocode}
+\newenvironment{@ssSolution}[1][\ss@Argii]%
+{%
+ \def\eqe@argi{#1}\ifx\eqe@argi\@empty\else
+% \setlength{\eq@tmpdima}{#1}%
+%
+ \let\soln@keys@nLines\@empty
+ \edef\panelheight{\the\panelheight}%
+ \edef\panelwidth{\the\panelwidth}%
+ \edef\temp@exp{\noexpand
+ \setkeys*{soln@keys}{#1}}\temp@exp
+% \setkeys*{soln@keys}{#1}%
+ \ifx\soln@keys@nLines\@empty
+ \edef\ss@Argii{\XKV@rm}%
+ \else
+ \@tempdima\wlVspace\relax
+ \@tempdima=\soln@keys@nLines\@tempdima
+ \edef\ss@Argii{\the\@tempdima}%
+ \ifx\XKV@rm\@empty\else
+ \if@equsedim\edef\ss@Argii{\XKV@rm}\fi\fi
+ \fi
+ \setlength{\eq@tmpdima}{\ss@Argii}%
+% \ifx\sameVspace\@empty\gdef\sameVspace{0pt}\fi
+% \end{macrocode}
+% If the \texttt{panelheight} is greater than the requested height,
+% we make the requested height equal to \texttt{panelheight}.
+% \begin{macrocode}
+ \ifdim\eqepanelheight>\eq@tmpdima
+ \eq@tmpdima\eqepanelheight\fi
+ \xdef\ss@Argii{\the\eq@tmpdima}%
+ \fi
+% \end{macrocode}
+% We calculate the depth of the solutions; this is generally the values
+% passed to use as the optional argument, and encapsuled by \cs{ss@Argii}.
+% \begin{macrocode}
+ \xdef\eqedepth{%
+ \ifvspacewithsolns\ss@Argii\else
+ \ifeq@nosolutions\ss@Argii\else
+ \ifeq@solutionsafter\ss@Argii\else0pt\fi\fi\fi}%
+% \end{macrocode}
+% The width is either \cs{linewidth} or \verb!\linewidth-\ss@Argiii-\panelgap!,
+% where \cs{ss@Argiii} is the width of the panel.
+% \begin{macrocode}
+ \xdef\mp@Width{\ifeq@solutionsafter\noexpand\linewidth\else
+ \noexpand\linewidth-\ss@Argiii-\panelgap\fi}%
+% \end{macrocode}
+% If its a left panel\dots
+% \begin{macrocode}
+ \if\ss@Argi l%
+ \ifeq@solutionsafter
+ \def\eqe@lPanel{\parbox[b][\eqedepth][t]{\ss@Argiii}
+% \end{macrocode}
+% Here, and elsewhere, we \cs{let} \cs{panelGetDimen} to \cs{relax} when we
+% want to purely input the CUT file in the solution.
+% \begin{macrocode}
+ {\let\panelGetDimen\relax
+ \input{panel\thepanel@cnt.cut}\vfill}\hfill}%
+ \def\eqe@rPanel{\@empty}%
+ \else
+% \end{macrocode}
+% For the left panel, we need to subtract \cs{eqemargin}
+% \begin{macrocode}
+ \def\eqe@subleftgutter{-\string\eqemargin}%
+ \def\eqe@lPanel{%
+ \string\parbox[b][\string\eqedepth]{\ss@Argiii}%
+ {\string\let\string\panelGetDimen\string\relax
+ \string\input{panel\thepanel@cnt.cut}%
+ \string\vfill}\string\hfill^^J}%
+ \def\eqe@rPanel{\@empty}%
+ \fi
+ \else
+% \end{macrocode}
+% If its a right panel\dots
+% \begin{macrocode}
+ \ifeq@solutionsafter
+ \def\eqe@lPanel{\@empty}%
+ \def\eqe@rPanel{%
+ \hfill\parbox[b][\eqedepth][t]{\ss@Argiii}
+ {\let\panelGetDimen\relax
+ \hfill\input{panel\thepanel@cnt.cut}\vfill}}%
+ \else
+% \end{macrocode}
+% For the right panel, we do not to subtract \cs{eqemargin} as above.
+% \begin{macrocode}
+ \let\eqe@subleftgutter\@empty
+ \def\eqe@lPanel{\@empty}%
+ \def\eqe@rPanel{%
+ \string\hfill\string\parbox[b][\string\eqedepth]%
+ {\ss@Argiii}{\string\endgraf%
+ \string\noindent\string\hfill%
+ \string\let\string\panelGetDimen\string\relax
+ \string\input{panel\thepanel@cnt.cut}%
+ \string\vfill}}%
+ \fi
+ \fi
+ \let\verbatim@out\ex@solns
+ \par\ifeq@solutionsafter\smallskip\fi
+% \end{macrocode}
+% Since everything is put a box, we set the \cs{linewidth}, and
+% set \cs{solutionparshape} to \cs{@empty}.
+% \begin{macrocode}
+ \ifx\solutionparshape\@empty\else
+ \advance\linewidth-\leadinIndentPrtSep\fi %%dps
+ \let\solutionparshape\@empty
+ \noindent\minipage{\linewidth}%
+ \if\ss@Argi l\noindent\parbox[b][\eqedepth][t]{\ss@Argiii}%
+ {\vfill}\hfill\fi
+ \minipage[b][\eqedepth][t]{\mp@Width}%
+ {\lccode`C=`\%\lowercase{\eqe@IW{%
+ \string\def\string\panelgap{\panelgap}%
+ \string\setlength{\string\panelwidth}{\ss@Argiii}%
+ \string\def\string\eqedepth
+ {\ifeq@nosolutions\ss@Argii\else\ss@Argii\fi}C}}}%
+ {\lccode`C=`\%\lowercase{\eqe@IW{%
+ \string\strut\string\noindent%
+% \string\strut\par\string\nobreak\string\noindent%
+ \string\hbox\space to\string\linewidth\bgroup^^J%
+ \eqe@lPanel\string\minipage[b][\string\eqedepth][t]%
+ {\string\linewidth\eqe@subleftgutter%
+ -\string\panelwidth-\string\panelgap}C
+ }}}%
+ \ifeq@solutionsafter
+ \noindent\strut\hbox to\linewidth\bgroup
+ \eqe@lPanel
+ \minipage[b][\eqedepth][t]{\linewidth-\ss@Argiii-\panelgap}%
+ \def\solutionsafterSkip{}%
+ \fi
+% \end{macrocode}
+% Here, we start the original definition of the solutions environment, which was \cs{let}
+% to \cs{@sssolution}.
+% \begin{macrocode}
+ \ifx\soln@keys@nLines\@empty
+ \edef\passedss@Argii{\ss@Argii}\else
+ \edef\passedss@Argii{\ss@Argii,nLines=\soln@keys@nLines}\fi
+ \expandafter\@sssolution\expandafter[\passedss@Argii]%
+}{%
+ \eqe@IW{\string\endminipage\eqe@rPanel\egroup}%
+ \ifeq@solutionsafter\endminipage\eqe@rPanel\egroup\fi
+ \end@sssolution
+ \endminipage\endminipage
+}
+% Redefine the \cs{paragraph} command
+% \begin{macrocode}
+\renewcommand{\paragraph}
+ {\@startsection{paragraph}{4}{0pt}{12pt}{-3pt}{\bfseries}}
+% \end{macrocode}
+% \begin{macro}{\defaultInstructions}
+% For the \texttt{instructions} environment, defined next, the default string
+% for the instructions is \cs{eq@default@Instructions}, this command is
+% defined using \cs{defaultInstructions}.
+% \begin{macrocode}
+\newcommand{\defaultInstructions}[1]{\def\eq@default@Instructions{#1}}
+\defaultInstructions{Instructions.}
+% \end{macrocode}
+% \end{macro}
+%
+% \begin{environment}{instructions}
+% Each test, or a part of a test usually have instructions. This \texttt{instruction}
+% environment is used in this purpose. Normally, the number of points for the part is
+% displayed following the heading (the default is \textbf{Instructions.}). You can
+% eliminate the total points from the instructions by taking the \texttt{nosummarytotals}
+% option.
+%
+% \begin{macrocode}
+\newcommand{\beforeInstrSkip}{1ex}
+\newcommand{\afterInstrSkip}{-0em}
+\newcommand\hInstrSpace{\ }
+\newcommand\styleInstr{\bfseries}
+\newenvironment{instructions}[1][\eq@default@Instructions]{%
+% \end{macrocode}
+% If \cs{summaryPointTotal} is zero, show no summary points.
+% \begin{macrocode}
+ \@ifundefined{\thisexamlabel total}{\let\eq@nosummarytotals\eqe@YES}
+ {\ifnum\summaryPointTotal=0 \let\eq@nosummarytotals\eqe@YES\fi}%
+ \expandafter\def\expandafter\eq@argi\expandafter{#1}%
+ \def\hsi{\hInstrSpace}%
+% \end{macrocode}
+% We start a paragraph environment
+% \begin{macrocode}
+ \@startsection{paragraph}{4}{\z@}%
+ {\beforeInstrSkip\space\@plus1ex \@minus.2ex}%
+ {\afterInstrSkip}{\normalfont\normalsize\styleInstr}*%
+ {\textcolor{\@instructionsColor}{#1}\normalcolor%
+ \ifx\eq@nosummarytotals\eqe@YES\else\ifx\eq@argi\@empty\else\hsi\fi
+ {\normalfont\summaryTotalsTxt}\hsi\fi}\hskip-\lastskip
+ \ifx\eq@nosummarytotals\eqe@YES\ifx\eq@argi\@empty\else\hsi\fi\fi
+ \normalfont\normalsize\ignorespaces
+}{\par\vskip\beforeInstrSkip\relax}
+% \end{macrocode}
+% \cmd{\summaryPointTotal}\DescribeMacro{\summaryPointTotal} contains the total points
+% for the current exam; the command \cmd\summaryTotalsTxt\DescribeMacro\summaryTotalsTxt\ defines its the formatting
+% for the points. The command \cmd\nQuesInExam\DescribeMacro\nQuesInExam\ is the total number
+% of questions in the exam.
+% \begin{macrocode}
+\newcommand\summaryPointTotal{\csname\thisexamlabel total\endcsname}
+\newcommand\summaryTotalsTxt{($\eqe@ptsFmt{\summaryPointTotal}\,\text{%
+ \@ifundefined{\thisexamlabel total}{\eqpointsLabel}%
+ {\ifnum\summaryPointTotal=1\relax\eqpointLabel\else
+ \eqpointsLabel\fi}}$)}
+\newcommand{\nQuesInExam}[1][\thisexamlabel]{%
+ \def\eqe@argi{#1}%
+ \ifx\thisexamlabel\@empty\ifx\eqe@argi\thisexamlabel
+ \PackageError{eqexam}{The optional argument for
+ \string\nQuesInExam\MessageBreak must be specified}{}\fi\fi
+ \csname#1nQuestions\endcsname}
+% \end{macrocode}
+% \end{environment}
+% Make this definition for \texttt{hyperref}, so its anchors will be unique. Useful
+% when there are multiple parts of the test.
+% \begin{macrocode}
+\ifx\hyper@anchor\@undefined\else
+ \renewcommand\theHeqquestionnoi
+ {\curr@quiz.\theeqquestionnoi\eqe@fpmrk}
+ \renewcommand\theHquizno{%
+ \if\probstar*\curr@quiz.%
+ \theeqquestionnoi.part\thepartno.\arabic{quizno}%
+ \else
+ \curr@quiz.%
+ \theeqquestionnoi.\arabic{quizno}%
+ \fi
+ }
+ \renewcommand\theHpartno{\curr@quiz.%
+ \theeqquestionnoi.part\thepartno}
+\fi
+% \end{macrocode}
+% \begin{environment}{eqComments}
+% Often, I want to make additional instructions between problems, you can use
+% this comment environment.
+% \begin{macrocode}
+\newcommand{\beforeCommentSkip}{1.25ex}
+\newcommand{\afterCommentSkip}{-1ex}
+\newcommand\hCommSpace{\ }
+\newcommand\styleComm{\bfseries}
+\newenvironment{eqComments}[1][\strut]{\removelastskip
+ \def\eqe@argi{#1}\def\eqe@Strut{\strut}\def\hsc{\styleComm}%
+ \@startsection{paragraph}{4}{\z@}%
+ {\beforeCommentSkip\space\@plus1ex \@minus.2ex}%
+ {\afterCommentSkip}{\normalfont\normalsize\styleComm}*%
+ {\textcolor{\@eqCommentsColor}{#1}}%
+ \ifx\eqe@argi\eqe@Strut\hskip\afterCommentSkip
+ \else\ifx\eqe@argi\@empty\hskip\afterCommentSkip\else
+ \hsc\strut\fi\fi\normalfont\normalsize
+ \color{\@eqCommentsColorBody}\ignorespaces
+}{\par\vskip\beforeCommentSkip\space\@plus1ex \@minus.2ex}
+% \end{macrocode}
+% \end{environment}
+% \subsection{The \texttt{exam} Environment}
+% Each part of the exam is enclosed in an \texttt{exam} environment. The environment is
+% a customized version of the \texttt{shortquiz} environment.
+% \begin{macro}{\exambegdef}
+% Some definitions that are executed at the beginning of each exam environment.
+% \begin{macrocode}
+\let\tb@beginexam@code\relax
+\def\partialspillovertotals{0}
+\def\exambegdef
+{%
+ \csname\thisexamlabel pagemark\endcsname
+ \@ifundefined{partialtotalpg}{}{%
+ \ifnum\partialtotalpg=\arabic{page}%
+ {\count0=\partialspillovertotals
+ \advance\count0by\partialtotaleoe
+ \xdef\partialspillovertotals{\the\count0}%
+ \eqe@IWO\@auxout{\string\csarg\string\gdef
+ {Page\partialtotalpg spilltotal}{\partialtotaleoe}}%
+ }%
+ \fi
+ }%
+ \csarg\ifx{\thisexamlabel pageno}\relax
+ \else
+ \csarg\ifx{pagenofirstprob\thisexamlabel}\relax
+ \else
+ \csarg\ifnum{\thisexamlabel pageno}
+ < \@nameuse{pagenofirstprob\thisexamlabel}%
+ \else
+ \csarg\ifx{\thisexamlabel pagemark}\relax
+ \else
+ \ifnum\value{page}=%
+ \csname\thisexamlabel pageno\endcsname
+ \eqe@IWO\@auxout{\string\csarg\string\gdef
+ {\thisexamlabel pagemark}{\string\newpage}}%
+ \fi
+ \fi
+ \fi
+ \fi
+ \fi
+ \setcounter{eqquestionnoi}{0}\setcounter{eqpointvalue}{0}%
+ \setcounter{eqpointsofar}{0}\setcounter{eqpointsthispage}{0}%
+ \setcounter{eq@count}{0}%
+% \end{macrocode}
+% We wrote \verb!\begin{eqequestions}! to the top of the solutions file (\cs{jobname.sol}.
+% \begin{macrocode}
+ \writeBeginEqeQuestions
+% \end{macrocode}
+% \begin{macrocode}
+ \label{\thisexamlabel PageBegin}%
+ \eqe@IWO\@auxout{\string\csarg\string\gdef
+ {\thisexamlabel pageno}{\thepage}}%
+% \let\sq@priorhook\@empty
+ \ifeqfortextbook
+ \global\examenvtrue\tb@beginexam@code
+ \fi
+}
+% \end{macrocode}
+% \end{macro}
+% \begin{macro}{\examenddef}
+% Some definitions that are executed at the end of each exam environment.
+% We place a totals box to report the total since the last page.
+% \begin{macrocode}
+\def\tb@insmargmark{\ifisinstred\ifismarginans
+ \insMidMarg{\mark{}}\fi\fi}
+\def\eqe@adjForSepRule{\if\eq@parttotals\eqe@YES
+ \eq@pointboxtotalheight\halfHtPtBox\relax
+ \advance\eq@pointboxtotalheight\dpPtBox\relax
+ \advance\eq@pointboxtotalheight\pointsmarginparpush
+ \vspace*{\eq@pointboxtotalheight}\fi}
+\def\eqe@afterexamsepcode{% dps7
+ \if\eq@parttotals\eqe@YES
+ \@actionsAtPageBreak{\global\let\@spacetobreak1}%
+ {\global\let\@spacetobreak0}%
+ \ifx\@spacetobreak0\relax
+ \bgroup\@tempdima=\pagetotal
+ \advance\@tempdima\eq@pointboxtotalheight
+ \ifdim\@tempdima>\pagegoal\aftergroup\newpage
+ \else\ifnum\arabic{eq@count}>0\relax
+ \removelastskip\vskip6pt\kern0pt %dps7
+ \if\@reportpoints\eqe@One\else\@checkSpacing{0}\fi
+ \textcolor{\endexamtotal@color}%
+ {\eqeomarginbox{\arabic{eq@count}}{0}}\fi
+ \ifx\eqx@separationrule\eqe@YES
+ \separationrule\eqe@adjForSepRule\fi
+ \fi\egroup
+ \fi
+ \else\ifx\eqx@separationrule\eqe@YES
+ \separationrule\eqe@adjForSepRule\fi
+ \fi
+}
+\def\examenddef
+{%
+ \global\let\partialtotaleoe\relax
+ \global\let\partialtotalpg\relax
+ \global\let\afterexamsepcode\relax
+ \csarg\ifx{NumberOfParts}\relax
+ \else
+ \ifnum\value{eq@numparts}<\NumberOfParts
+ \setcounter{eq@count}{\value{eqpointvalue}}%
+ \addtocounter{eq@count}{-\value{eqpointsofar}}%
+ \xdef\partialtotaleoe{\arabic{eq@count}}%
+ \xdef\partialtotalpg{\arabic{page}}%
+% \end{macrocode}
+% See if there is enough room at the bottom of the page to place the end of exam
+% totals and to start a new exam, if any. If not, forget it, and start a new page.
+% \begin{macrocode}
+ \global\let\afterexamsepcode\eqe@afterexamsepcode % dps7
+ \fi
+ \fi
+ \ifeqfortextbook\global\examenvfalse\fi
+% \end{macrocode}
+% (2011/05/08) Just before the file is closed and input, we write the end
+% of the \texttt{eqequestions} environment, \verb!\end{eqequestions}!.
+% \begin{macrocode}
+ \writeEndEqeQuestions
+% \end{macrocode}
+% \begin{macrocode}
+ \writetotalstoaux
+ \addtocounter{page}{-1}%
+ \writelastpage[\thisexamlabel]\addtocounter{page}{1}%
+ \ifeqfortextbook\tb@insmargmark\fi
+}
+\def\@actionsAtPageBreak#1#2{%
+ \bgroup\@tempdima\pagegoal\advance\@tempdima-\pagetotal
+ \@tempdimb\@fvsizeskip\vsize
+ \ifdim\@tempdima < \@tempdimb #1\else #2\fi\egroup
+}
+% \end{macrocode}
+% \end{macro}
+% \begin{macro}{\separationrule}
+% For an exam with multiple parts, a separation rule is created, unless absorbed
+% into a page break. The command \cs{separationrule} defines this separation rule,
+% it can be redefined as desired.
+% \changes{v1.7a}{2007/12/10}
+%{
+% Added \cs{separationrule} so user's can redesign the separation rule
+% that is created between two parts of an exam.
+%}
+% \begin{macrocode}
+\newcommand{\separationrule}{\makebox[\linewidth-\eqemargin][c]%
+ {\rule{.67\linewidth}{.4pt}}}
+% \end{macrocode}
+% \end{macro}
+% (2011/05/08) This is a new environment that makes an exam into a list of problems.
+% This is an attempt to expand the use of \textsf{eqexam} to {\LaTeX}
+% documents. We give control over the page layout so an eqexam document
+% can be used within a textbook.
+% \begin{macrocode}
+\def\eqe@hspannerPrb{\ }
+\@ifundefined{ifwithsoldoc}{\newif\ifwithsoldoc\withsoldocfalse}{}
+\newcommand{\eqequestopsep}[1]{\def\eqeques@topsep{#1}}
+\providecommand{\eqequesparsep}[1]{\def\eqeques@parsep{#1}}
+\newcommand{\eqequesitemsep}[1]{\def\eqeques@itemsep{#1}}
+\newcommand{\eqequeslistparindent}[1]{\def\eqeques@listparindent{#1}}
+\eqequestopsep{0pt}
+\eqequesparsep{0pt}
+\eqequesitemsep{0pt}
+\eqequeslistparindent{0pt}
+\newif\iffirstitem
+\def\eqeSolnItemMngt{\iffirstitem\global\firstitemfalse
+ \let\eqe@next\@empty\else\let\eqe@next\item\fi\eqe@next\relax}
+\newenvironment{eqequestions}{%
+ \begin{list}{}{%
+ \ifwithsoldoc\let\solnItemMngt\eqeSolnItemMngt\fi
+ \setlength{\labelwidth}{\eqemargin}%
+ \setlength{\parsep}{\eqeques@parsep}%
+ \setlength{\itemsep}{\eqeques@itemsep}%
+ \setlength{\topsep}{\eqeques@topsep}%
+ \setlength{\itemindent}{0pt}%
+ \setlength{\listparindent}{\eqeques@listparindent}%dps%
+ \ifwithsoldoc\settowidth{\labelsep}{\eqe@hspannerSoln}\else
+ \settowidth{\labelsep}{\eqe@hspannerPrb}\fi
+ \setlength{\leftmargin}{\labelwidth}%
+ }\ifwithsoldoc\global\firstitemtrue\fi\item\relax}{\end{list}}
+% \end{macrocode}
+% \begin{environment}{exam}
+% Each part of the exam is enclosed in an \texttt{exam} environment. The one
+% required parameter is the name of the part, for example, `Part1', `Part2'.
+% These should be one word, no white spaces, just letters and possibly numbers.
+% \begin{macrocode}
+\def\setDefaultfvsizeskip#1{\def\default@fvsizeskip{#1}%
+ \def\@fvsizeskip{#1}}
+\def\default@fvsizeskip{.3}
+\edef\@fvsizeskip{\default@fvsizeskip}
+\newcommand{\fvsizeskip}[1]{\def\@fvsizeskip{#1}}
+\def\autoExamName{exam\the\value{eq@numparts}}
+\def\nNumberOfP@rts{\csname NumberOfParts\endcsname}
+\abovesqskip{}
+\let\eqeWrtExamTitleToSolns\eqe@YES
+\def\wrtExamTitleInSolns{\let\eqeWrtExamTitleToSolns\eqe@YES}
+\def\noExamTitleInSolns{\let\eqeWrtExamTitleToSolns\eqe@NO}
+\let\thisexamlabel\@empty
+\let\isInExamEnv\eqe@NO
+\newenvironment{exam}[2][]
+{%
+ \makeRoomForProb{\@fvsizeskip\textheight}{0}%
+ \let\isInExamEnv\eqe@YES
+ \stepcounter{eq@numparts}%
+% \end{macrocode}
+% If \texttt{\#2} is empty, use \cs{autoExamName}
+% \begin{macrocode}
+ \def\eqexamargii{#2}\ifx\eqexamargii\@empty
+ \edef\eqexamargii{\autoExamName}\fi
+ \xdef\thisexamlabel{\eqexamargii}\xdef\curr@quiz{\eqexamargii}%
+ \def\eqexamargi{#1}\ifx\eqexamargi\@empty
+ \edef\eqexamargi{\eqexamargii}\fi
+ \expandafter\gdef\expandafter\thisUFexamlabel
+ \expandafter{\eqexamargi}%
+ \edef\eq@tmp{\the\partNames\string\\{\eqexamargii}}%
+ \global\partNames=\expandafter{\eq@tmp}%
+ \csarg\ifx{NumberOfParts}\relax\else
+\ifx\eqeWrtExamTitleToSolns\eqe@YES
+ \ifnum\nNumberOfP@rts=1\relax\else
+ \def\eqe@argi{#1}\ifx\eqe@argi\@empty
+ \eqe@writetoSolns{\eqexamargii}\eqe@writetoAux{\string
+ \csarg\string\gdef{userFriendly\eqexamargii}{\eqexamargii}}
+ \else
+ \eqe@writetoSolns{#1}\eqe@writetoAux{\string
+ \csarg\string\gdef{userFriendly#2}{#1}}
+ \fi
+ \fi\fi
+\fi
+ \exambegdef
+ \edef\temp@Exp{\noexpand\shortquiz\sqstar[\eqexamargii]}\temp@Exp
+% \expandafter\shortquiz\sqstar[\eqexamargii]%
+}{%
+ \examenddef
+% \end{macrocode}
+% \changes{v4.4}{2015/05/24}{Finish with a \cs{vskip} to clear the last
+% item or problem.}
+% \begin{macrocode}
+ \vskip\eqeques@parsep\relax\kern0pt %dps88
+ \endshortquiz
+ \aftergroup\afterexamsepcode % dps7
+ \par\penalty-100\vskip0pt
+}
+% \end{macrocode}
+% \end{environment}
+% \begin{macro}{\EQEcalculateAllTotals}
+% (4/22/11) Added the command \cs{EQEcalculateAllTotals}. The command is executed
+% as part of the \cs{maketitle} command. If \cs{maketitle} is not used for some reason
+% \cs{EQEcalculateAllTotals} can be executed just after \verb~\begin{document}~.
+% \begin{macrocode}
+\newcommand{\EQEcalculateAllTotals}{%
+ \begingroup
+% \end{macrocode}
+% We calculate the grand total of all the parts of the \texttt{exam} environments,
+% and we define \cs{eqeGrandTotal}, which contains the total.
+% \begin{macrocode}
+ \count\z@=0\relax
+ \def\\##1{\csarg\ifx{##1total}\relax\else
+ \advance\count\z@\csname##1total\endcsname
+% \end{macrocode}
+% \cs{thePartNames} list all named exam environments in the document, e.g.,
+%\begin{verbatim}
+% \\{Part1}\\{Part2}...\\{LastPart}
+%\end{verbatim}
+% \begin{macrocode}
+ \fi}\csname thePartNames\endcsname
+ \xdef\eqeGrandTotal{\the\count\z@}%
+ \ifnum\eqeGrandTotal=0 \else
+% \end{macrocode}
+% If there is a nonzero grandtotal, we move on to calculate
+% the percentages.
+% \begin{macrocode}
+ \def\\##1{\eqe@calc@percent{##1}}%
+ \csname thePartNames\endcsname\fi
+ \endgroup
+}
+% \end{macrocode}
+%
+% \begin{macro}{\eqe@calc@percent}
+% We go through the parts listed in \cs{thePartNames} and create a
+% calculation of the percentage for that part, and leave it in
+% \verb!\csname#1percent\endcsname!, which can be accessed
+% through the \cs{percentForPart} command, for example
+% \verb!\percentForPart{<part_name>}! might expand to \texttt{45.6\%}.
+% \begin{macro}{\nPctDecPts}
+% The number of decimal points to carry in the representation of the
+% percentage.
+% \begin{macrocode}
+\newcommand{\nPctDecPts}{1}
+\def\eqe@calc@percent#1{\@ifundefined{#1total}{%
+ \csarg\gdef{#1percent}{??}}{%
+% \end{macrocode}
+% If the \textsf{fp} package is not loaded, we use register arithmetic,
+% percentages are truncated to integers.
+% \begin{macrocode}
+ \csarg\ifx{FPdiv}\relax
+ \count2=\tot@lForPart{#1}%
+ \edef\expGT{\csname eqeGrandTotal\endcsname}%
+ \multiply\count2by100\relax\divide\count2by\expGT\relax
+ \csarg\xdef{#1percent}{\the\count2 }\else
+% \end{macrocode}
+% If the \textsf{fp} package is loaded, we use this package to calculate
+% the percentage, accurate to one decimal place.
+% \begin{macrocode}
+ \FPdiv{\eqe@pForPart}{\csname#1total\endcsname}%
+ {\csname eqeGrandTotal\endcsname}%
+ \FPmul{\eqe@pForPart}{\eqe@pForPart}{100}%
+ \FPround{\eqe@pForPart}{\eqe@pForPart}{\nPctDecPts}%
+ \csarg\xdef{#1percent}{\eqe@pForPart}\fi
+ }%
+}
+% \end{macrocode}
+% \end{macro}
+% \end{macro}
+% \end{macro}
+% \begin{macrocode}
+\def\writetotalstoaux{\eqe@IWO\@auxout{\string
+ \csarg\string\gdef{\thisexamlabel total}{\theeqpointvalue}}%
+ \eqe@IWO\@auxout{\string\csarg
+ \string\gdef{\thisexamlabel nQuestions}{\theeqquestionnoi}}%
+}
+\newcommand{\writelastpage}[1][]{\def\eqe@argi{#1}%
+ \ifx\eqe@argi\@empty\else\label{#1PageEnd}\fi
+ \eqe@IWO\@auxout{\string\csarg
+ \string\gdef{eqExamLastPage}{\arabic{page}}}%
+}
+\def\exlabel{}
+\def\sqlabel{}
+\def\exsolafter{\textit{Solution}:}
+\def\sqsolafter{\textit{Solution}:}
+% \end{macrocode}
+% The exercise labels in the body of the text. (2015/02/27) changed
+% the command \cs{exlabelformatwp} to incorporate other parameters.
+% \begin{macrocode}
+%\def\exlabelformat{\textbf{\theeqquestionnoi.\ }}
+\def\exlabelformat{\textbf{%
+ \theeqquestionnoi\eqe@decPointPrb\eqe@hspannerPrb}}
+\def\exlabelformatwp{\exlabelformat}
+% \end{macrocode}
+% The exercise labels for solutions at the end of the document
+% \begin{macrocode}
+\def\exsllabelformat
+ {\string\makebox[0pt][r]{\string\textbf{%
+ \theeqquestionnoi\eqe@decPointPrb\eqe@hspannerSoln}}}
+\def\exsllabelformatwp
+ {\string\makebox[0pt][r]{\string\textbf{%
+ \theeqquestionnoi\eqe@decPointPrb\eqe@hspannerSoln}}%
+ (\thepartno)\eqe@hspannerSoln}
+\ifanswerkey
+ \def\exrtnlabelformat{}
+ \def\exrtnlabelformatwp{}
+ \def\eq@sqslrtnlabel{}
+\else
+ \def\exrtnlabelformat{$\square$}
+ \def\exrtnlabelformatwp{$\square$}
+ \def\eq@sqslrtnlabel{$\square$}
+\fi
+\def\sqslrtnlabel{\eq@sqslrtnlabel}
+% \end{macrocode}
+% (2010/08/21) Enable some localizations of strings
+% \begin{macrocode}
+\newcommand{\exsectitletext}{Solutions to \webtitle}
+\def\exsectitle{\normalsize\exsectitletext}
+%\def\exsectitle{\normalsize\hspace*
+% {-\oddsidemargin}\exsectitletext}
+\@ifpackageloaded{exerquiz}{%{Solutions to \websubject}
+ \renewcommand{\exsecrunhead}{}}{\newcommand{\exsecrunhead}{}}
+%\providecommand{\exsecrunhead}{Solutions to \websubject}%
+\def\eq@sqslsectitle{}
+\def\eq@sqslsecrunhead{}
+\def\eq@sqsllabel{{\string\llap{\string\textbf{\theeqquestionnoi.\ }}}}
+\def\eq@sqlabel{}
+\let\include@quizsolutions\relax
+\let\solnhspace\@empty
+% \end{macrocode}
+% \subsection{\texttt{problem} Environments}
+% A single question is posed with the \texttt{problem} environment, and a question with
+% multiple parts with the \texttt{problem*} environment.
+% \begin{macro}{\fillin}
+% This macro is used for fill-in type questions. The first argument is the length
+% of the underline blank to leave to fill-in, the second argument is the correct answer.
+% \begin{macrocode}
+\newcommand{\optsFillIn}[1]{\def\eqe@optsFillIn{#1}}
+\let\eqe@optsFillIn\@empty
+\newcommand{\fillin}[3][u]{%
+ \ifx#1u\let\@fillinFmt\underbar
+ \else\ifx#1b\let\@fillinFmt\relax
+ \else\let\@fillinFmt\relax\fi\fi
+ \ifeq@proofing
+ \@fillinFmt{\makebox[#2]{%
+ \strut\hfil\bfseries\color{red}#3\hfil}}%
+ \else
+ \@fillinFmt{\makebox[#2]{\strut\hfil}}%
+ \@ifundefined{@quiz}{}{%
+ \if\eq@online\eqe@YES\relax
+ \ifeq@nosolutions
+ \ifeq@solutionsafter\else
+ \ifx\eq@insertverticalspace\eqe@YES\relax
+ \stepcounter{@cntfillin}%
+ \edef\fieldName{%
+ \if\probstar*eqexam.\curr@quiz.fillin.%
+ \theeqquestionnoi.part\thepartno.%
+ fi\the@cntfillin%
+ \else
+ eqexam.\curr@quiz.fillin.%
+ \theeqquestionnoi.fi\the@cntfillin%
+ \fi
+ }\makebox[0pt][r]{\textField[\BC{}
+ \presets{\eqe@optsFillIn}]{%
+ \fieldName}{#2}{11bp}}%
+ \fi
+ \fi
+ \fi
+ \fi
+ }%
+ \fi\space\ignorespaces}
+% \end{macrocode}
+% \end{macro}
+% \begin{macro}{\TF}
+% A specialized version of \cs{fillin} for True/False questions.
+% \begin{macrocode}
+\newcommand\defaultTFwidth{30pt}
+\newcommand\TF[2][\defaultTFwidth]{%
+ \def\eqe@next{\fillin{#1}{#2}}%
+ \ifdim\eq@extralabelsep=0pt\relax\else
+ \if\probstar*\relax\if\exerwparts@cols0
+ \def\eqe@next{\makebox[0pt][r]{%
+ \fillin{#1}{#2}}\ignorespaces}%
+ \fi\fi\fi
+\eqe@next}
+\def\fillinWidth#1{%
+ \if\probstar*
+ \settowidth{\eq@tmplengthA}{\normalfont\ }%
+ \addtolength{\eq@tmplengthA}{#1}%
+ \edef\eq@extralabelsep{\the\eq@tmplengthA}%
+ \fi
+}
+\let\fillInFormatDefault\@empty
+% \end{macrocode}
+% \end{macro}
+% \begin{macro}{\Do<num>}
+% The following commands supports the optional argument \texttt{{\string\Do<num>}}.
+% When I teach senior or graduate-level classes, I often give a problem with
+% multiple parts (each of equal value) and ask them to ``do 3 of the following 5''
+% parts.
+% \begin{macrocode}
+\def\eqe@DoWarning#1{\PackageWarning{eqexam}{\string#1\space
+ requires the first argument\MessageBreak of problem* to be <num>ea}}
+\def\eqe@DoNum{\textbf{??}\eqe@DoWarning{\DoNum}}
+\def\eqe@nDoNum{\textbf{??}\eqe@DoWarning{\nDoNum}}
+\let\DoNum\eqe@DoNum
+\let\nDoNum\eqe@nDoNum
+\def\makeDoNum#1{\xdef\nDoNum{#1}%
+ \def\ifc@sewrap{\ifcase#1??\or}%
+ \xdef\DoNum{\expandafter\ifc@sewrap\eqe@wordNums\else
+ \eqe@wordNumbsError\fi}}
+\def\makeOutOfNum#1{\xdef\nOutOfNum{#1}%
+ \def\ifc@sewrap{\ifcase#1??\or}%
+ \xdef\OutOfNum{\expandafter\ifc@sewrap\eqe@wordNums\else
+ \eqe@wordNumbsError\fi}}
+\def\eqe@OutOfNum{\textbf{??}\eqe@DoWarning{\OutOfNum}}
+\def\eqe@nOutOfNum{\textbf{??}\eqe@DoWarning{\nOutOfNum}}
+\let\OutOfNum\eqe@OutOfNum
+\let\nOutOfNum\eqe@nOutOfNum
+% \end{macrocode}
+% \DescribeMacro{\eqe@wordNums} is used to typeset the English word for
+% the numbers (1--10). This command may be redefined to other languages.
+% \begin{macrocode}
+\newcommand{\eqe@wordNums}{one\or two\or three\or
+ four\or five\or six\or seven\or eight\or nine\or ten}
+\newcommand{\eqe@wordNumbsError}{\noexpand\PackageError{eqexam}%
+ {Number out of range, 1--10}%
+ {Use a smaller number, or redefine the command
+ \string\eqe@wordNums.}}
+% \end{macrocode}
+% \end{macro}
+% \begin{macrocode}
+\def\makeRoomForProb#1#2{\par %\endgraf % dps 11/11/10
+ \bgroup\@nobreakfalse\addpenalty{-500}%
+ \setlength{\@tempdimb}{#1}%
+ \@tempdima \pagegoal \advance \@tempdima -\pagetotal
+ \ifdim \@tempdima<\@tempdimb\ifnum\col@number>\@ne\columnbreak
+ \else\newpage\fi\fi\egroup
+ \ifnum\@reportpoints>1
+ \ifx\eqe@prevProbZero\eqe@YES
+ \if\eqe@isPts0\else\vskip-\halfHtPtBox\relax\fi
+ \else
+ \ifl@stDispl@yPoints
+ \if\eqe@isPts0\@checkSpacing{1}\else
+ \if#21 \@checkSpacing{0}\fi
+ \fi\fi
+ \fi
+ \fi
+}
+% \end{macrocode}
+% \begin{macro}{\emitMessageNearBottom}
+% The syntax for this command is
+%\begin{verbatim}
+% \emitMessageNearBottom*[vspace]{msg}
+%\end{verbatim}
+% If there is less than \texttt{vspace} remaining on the page, a message,
+% \texttt{msg}, is emitted. Then the optional \texttt{*} appears, a
+% \cs{newpage} is also emitted just after the \texttt{msg} and
+% \cs{insertContAnnot} is expanded just after \cs{newpage}.
+% \begin{macrocode}
+\newcommand{\emitMessageNearBottom}{\@ifstar
+ {\def\eqe@emnb{\ifnum\col@number>\@ne\columnbreak
+ \else\newpage\fi\insertContAnnot}\eq@emitMessageNearBottom}
+ {\let\eqe@emnb\relax\eq@emitMessageNearBottom}}
+\newcommand{\eq@emitMessageNearBottom}[2][\iacvspace]{%
+ \eq@@emitMessageNearBottom{#1}{#2}}
+\def\eq@@emitMessageNearBottom#1#2{\par
+ \bgroup\@nobreakfalse\addpenalty{-500}%
+ \setlength{\@tempdimb}{#1}%
+ \@tempdima \pagegoal \advance \@tempdima -\pagetotal
+ \ifdim \@tempdima<\@tempdimb #2 \eqe@emnb\fi\egroup}
+% \end{macrocode}
+% \end{macro}
+% \DescribeMacro{\getSpaceLeftOnPage}\cmd{\getSpaceLeftOnPage} calculates
+% the amount of space left on the current page. It saves the calculation
+% in the text macro \DescribeMacro{\amtSpaceOnLeftOnPage}\cmd{\amtSpaceOnLeftOnPage}.
+% \begin{macrocode}
+\newcommand{\getSpaceLeftOnPage}{\par\bgroup
+ \@tempdima \pagegoal \advance \@tempdima -\pagetotal
+ \xdef\amtSpaceOnLeftOnPage{\the\@tempdima}\egroup}
+% \end{macrocode}
+% \begin{macro}{\promoteNewPage}
+%\changes{v2.0n}{2011/05/13}{%
+% A simple variation on \cs{makeRoomForProb} designed for user use.
+%}
+% A simple variation on \cs{makeRoomForProb} designed for user use.
+% \begin{macrocode}
+\newcommand{\pnpDflt}{\@fvsizeskip\textheight}
+\newcommand{\promoteNewPage}[1][\pnpDflt]{%
+ \makeRoomForProb{#1}{0}}
+% \end{macrocode}
+% \end{macro}
+% Used in \cmd{\makeRoomForProb} and elsewhere. \DescribeMacro{\pointsmarginparpush}
+% \cs{pointsmarginparpush} adds a little more separation between point
+% boxes. \DescribeMacro{\@checkSpacing}\cmd{\@checkSpacing} is the algorithm
+% for adjusting the vertical spaces between problems when points are on the
+% right.
+% \begin{macrocode}
+\def\pointsmarginparpush{3pt}
+\def\@checkSpacing#1{\bgroup\ifinner\else
+ \@tempdima\lastPageTotal
+ \@tempdimb\pagetotal
+% \end{macrocode}
+% If \cs{lastPageTotal} is less than \cs{pagetotal}, continue
+% \begin{macrocode}
+ \ifdim\@tempdima < \@tempdimb
+% \end{macrocode}
+% Compute \texttt{\cs{pagetotal} - \cs{lastPageTotal}}
+% \begin{macrocode}
+ \advance\@tempdimb by-\@tempdima
+ \ifdim\@tempdimb < \eq@pointboxtotalheight
+ \if#11%
+ \eq@pointboxtotalheight\halfHtPtBox\relax
+ \advance\eq@pointboxtotalheight\dpPtBox\relax
+ \fi
+ \@tempdima=\eq@pointboxtotalheight
+ \advance\@tempdima\pointsmarginparpush\relax
+ \advance\@tempdima by-\@tempdimb
+ \vspace*{\@tempdima}%
+ \fi
+ \fi\fi
+\egroup}
+\def\@checkSpacingi{\bgroup
+ \@tempdima = \lastPageTotal
+ \@tempdimb = \pagetotal
+ \ifdim\@tempdima < \@tempdimb
+ \advance\@tempdimb by-\@tempdima
+ \eq@pointboxtotalheight\halfHtPtBox\relax
+ \advance\eq@pointboxtotalheight\dpPtBox\relax
+ \ifdim\@tempdimb < \eq@pointboxtotalheight
+ \@tempdima=\eq@pointboxtotalheight
+ \advance\@tempdima\pointsmarginparpush\relax
+ \advance\@tempdima by-\@tempdimb
+ \vspace*{\@tempdima}%
+ \fi
+ \fi
+\egroup}
+% \end{macrocode}
+% \DescribeMacro{\default@nbaselineskip} is the default number of \cs{baselineskip}s needed to place
+% a new problem. While \DescribeMacro{\nbaselineskip}\cmd{\nbaselineskip} is the number
+% of \cs{baselineskip}s needed for a new \texttt{problem} (or \texttt{problem*}).
+% \begin{macrocode}
+\newcommand{\setDefaultnbaselineskip}[1]{\def\default@nbaselineskip{#1}}
+\setDefaultnbaselineskip{6}
+\def\nbaselineskip#1{\def\@nbaselineskip{#1}}
+\def\nbaselineskipReset{\edef\@nbaselineskip{\default@nbaselineskip}}
+\nbaselineskipReset
+% \end{macrocode}
+% \begin{environment}{problem}
+% The \texttt{problem} is used to pose a single---non-multi-part---question.
+% The optional argument is the number of points for this problem.
+% \begin{macrocode}
+\def\eqe@gobbletoend#1\end{}
+\def\eqe@grabarg#1\end{\def\numpoints{#1}}
+\def\eqe@isPts{1}
+% \end{macrocode}
+% We reset some \textsf{exerquiz} parameters for \textsf{eqexam}
+% \begin{macrocode}
+\aboveexskip{3pt}\belowexskip{3pt}
+\partstopsep{3pt}\partsitemsep{3pt}\partsparsep{0pt}
+\rowsepDefault{3pt}\partstabcolsep{1.5pt}%
+\partstabtopsep{3pt}\partstabrowsep{3pt}
+\renewcommand\belowexsolnskip{{}}%
+% \end{macrocode}
+% The \textsf{problem} environment now begins.
+% \begin{macrocode}
+\let\isProbEnv\eqe@NO
+\let\topofprobhook\relax
+\newenvironment{problem}[1][]{\let\isProbEnv\eqe@YES
+ \if\eqe@isPts0\global\let\eqe@prevProbZero\eqe@YES\else
+ \global\let\eqe@prevProbZero\eqe@NO\fi
+ \global\thereissolutionfalse
+ \def\numpointsEmpty{0}\def\numpoints{#1}%
+ \ifx\numpoints\@empty\def\numpoints{0}\def\numpointsEmpty{1}%
+ \gdef\eqe@isPts{0}\else\gdef\eqe@isPts{1}\fi
+ \makeRoomForProb{\@nbaselineskip\baselineskip}{\eqe@isPts}%
+ \gdef\probstar{x}\let\afterlabelhskip\@empty
+ \ifx\marginpoints\@empty\else %\def\numpoints{#1}%
+ \if\numpointsEmpty\eqe@One\let\marginpoints\@gobbletwo\fi
+% \end{macrocode}
+%\changes{v2.0n}{2011/05/13}{%
+% Added \texttt{*<num>} to signal in-line display of points.
+%}
+% (2011/5/13) We add a \texttt{*} feature. When the author types
+% \texttt{[*3]}, it is a three point problem, but the value is expressed
+% in-line, not in the margins.
+% \begin{macrocode}
+ \@ifstar{\let\@isitstar\eqe@One\eqe@grabarg}%
+ {\let\@isitstar\eqe@Zero\eqe@gobbletoend}#1\end
+ \if\@isitstar\eqe@One\addtocounter{eqpointvalue}{\numpoints}%
+ \@marktotalvalue
+ \ifdispl@yPoints
+ \def\marginparafterhook{\PTs{\numpoints}\space}\else
+ \def\marginparafterhook{\PTs*{\numpoints}\space}\fi\else
+ \def\marginparpriorhook{\noindent
+ \probvalue{\numpoints}{0}}\fi
+ \fi\setcounter{eq@count}{\value{eqquestionnoi}}%
+ \addtocounter{eq@count}{1}%
+ \ifnum\value{eq@count}=1\relax
+ \eqe@IWO\@auxout{\string
+ \csarg\string\gdef{pagenofirstprob\thisexamlabel}{\thepage}}%
+ \fi
+% \end{macrocode}
+% \changes{}{2015/06/01}{Added the hook \cs{topofprobstarhook}}
+% \DescribeMacro\topofprobhook is a general purpose hook at the top of the
+% \texttt{problem} environment, before the beginning of the nested
+% \texttt{eqequestions} environment.
+% \begin{macrocode}
+ \topofprobhook
+% \end{macrocode}
+% \changes{v3.1e}{2012/11/10}{Removed hard-wired \cs{proofingsymbol}}
+% \begin{macrocode}
+% \proofingsymbol{\ding{52}}%
+ \begin{eqequestions}%
+ \begin{exercise}[eqquestionnoi]%
+}{\end{exercise}%
+ \end{eqequestions}%
+ \ifeqlocalversion\ifeqglobalversion
+ \xdef\eqe@tmp{\noexpand\forVersion{\eq@selectedVersion}}%
+ \aftergroup\eqe@tmp
+ \fi\fi
+ \global\eqlocalversionfalse
+ \ifdispl@yPoints\global\l@stDispl@yPointstrue
+ \else\global\l@stDispl@yPointsfalse\fi
+ \global\let\eqe@fpmrk\@empty
+}
+% \end{macrocode}
+% \end{environment}
+% \begin{macro}{\PTs}
+% \begin{macro}{\itemPTsTxt}
+% \begin{macro}{\itemPTsFormated}
+% When you specify \cs{auto} for the optional argument of the \texttt{problem*}
+% environment, when each item must have the command \cs{PTs} to assign the
+% value of that question. The \cs{PTs} has one optional star-parameter, and one
+% required parameter. The required parameter is the number of points for this item,
+% if the \texttt{*} is specified, then the point value is not typeset in the document.
+%
+% The command \cs{itemPTsTxt} has one argument, the number of points for this item. This
+% argument is passed from the \cs{PTs} command. You can redefine the way the points appear
+% in the document using \cs{itemPTsTxt}. As separate command \cs{itemPTsFormated} is used to
+% put parentheses around \cs{itemPTsTxt}. If the \texttt{*} option is taken with \cs{PTs}, then
+% you are free to place \cs{itemPTsTxt} anywhere in the problem statement.
+% \changes{v1.6g}{2006/11/29}
+%{
+% Added \cs{itemPTsTxt} and \cs{itemPTsFormated} to work with \cs{PTs}.
+% Also added a \texttt{*} option, to \cs{PTs}, in this case the points
+% are not typeset.
+%}
+% \begin{macrocode}
+\newcommand\itemPTsTxt[1]{$\eqe@ptsFmt{#1}\,\text{%
+ \ifnum#1=1\relax\eqptLabel\else\eqptsLabel\fi}$}
+\newcommand\itemPTsEaTxt[1]{$\eqe@ptsFmt{#1}\,\text{%
+ \ifnum#1=1\relax\eqptLabel\else\eqptsLabel\fi\space\eqeachLabel}$}
+\newcommand{\itemPTsFormated}[1]{(#1)}
+% \end{macrocode}
+% (2013/12/04) Added \DescribeMacro{\obeyPTsStar}\cmd{\obeyPTsStar} and
+% \DescribeMacro{\ignorePTsStar}\cmd{\ignorePTsStar}. The former is the default.
+% if \cmd{\ignorePTsStar} is in effect, \cs{PTs*} is treated as \cs{PTs}. Useful
+% for assigning points to parts of a question, but not explicitly telling the student.
+% when you compile for the key (with \texttt{answerkey} option), you can include
+% \cmd{\ignorePTsStar} so the instructor can see the assigned points for each part.
+% \begin{macrocode}
+\newif\ifObeyPTsStar \ObeyPTsStartrue
+\def\obeyPTsStar{\global\ObeyPTsStartrue}
+\def\ignorePTsStar{\global\ObeyPTsStarfalse}
+\def\PTs{\leavevmode\@ifstar{\@PTs{*}}{\@PTs{x}}}
+\def\@PTs#1#2{%
+ \if\@reportpoints\eqe@Zero\ignorespaces\else
+ \if\eqe@pointsPartsId\eqe@One
+ \addtocounter{eqpointvalue}{#2}\@marktotalvalue
+ \addtocounter{eq@count}{#2}\fi
+% \end{macrocode}
+% If \DescribeMacro{\ignorePTsStar}\cmd{\ignorePTsStar} is in effect
+% (\cmd{\ObeyPTsStarfalse}), we gobble
+% the \cs{else} and let the code flow through.
+% \begin{macrocode}
+ \if#1*\ifObeyPTsStar\ignorespaces\else\expandafter\@gobble\fi
+ \else
+% \end{macrocode}
+% (2012/04/26) Wrapped |\itemPTsFormated{\itemPTsTxt{#2}}| as the argument
+% of \cs{eqe@movePTs}. \cs{eqe@movePTs} does nothing by default, but may be
+% redefined, for example, to place the value of each part on the margin.
+% The default definition of \cs{eqe@movePTs} follows.
+% \begin{macrocode}
+ \eqe@movePTs{\itemPTsFormated{\itemPTsTxt{#2}}}\fi
+ \fi
+}
+\def\eqe@movePTs#1{#1}
+% \end{macrocode}
+% \end{macro}
+% \end{macro}
+% \end{macro}
+% \DescribeMacro{\Do<num>} The \cs{isItD@} tests to see if the next token
+% is \cs{Do}, if yes, it marks it and calls \cs{y@st@Do}, which gets the argument
+% if the \cs{Do} token.
+% \begin{macrocode}
+\let\auto\relax
+\def\isItD@{\@ifnextchar\Do{\let\yest@D@\eqe@YES\y@st@Do}
+ {\let\yest@D@\eqe@NO\@gobblet@end}}
+\let\yest@D@\eqe@NO
+\let\D@Num\@empty
+\def\y@st@Do\Do#1\end{\gdef\D@Num{#1}}
+\def\@gobblet@end#1\end{}
+% \end{macrocode}
+% Test the argument to see if it is the \cs{auto} token
+% \begin{macrocode}
+\def\is@uto#1\auto#2\@nil{\def\eqe@argi{#1}\def\eqe@argii{#2}%
+ \ifx\eqe@argii\@empty\let\isit@uto\eqe@Zero\else
+ \let\isit@uto\eqe@One\fi
+}
+% \end{macrocode}
+%
+% \begin{environment}{problem*}
+%
+% The \texttt{problem*} environment is used to pose a multi-part question.
+% The \texttt{parts} environment is used to enumerate the parts.
+%\changes{v2.0c}{2011/01/11}{%
+% Changed \cs{@next} to \cs{eqe@next}. There was conflict in
+% the use of this command with one of the float environments. When user
+% used the table environment inside the problem* environment, the
+% compiled stopped because \cs{@next} was overwritten.
+%}
+% \begin{macrocode}
+% \end{macrocode}
+% We create a Id for the points specified by the first (and second) optional parameters:
+% 0 (total points specified); 1 (\cs{auto} specified); 2 (points each
+% specified); 4 (\cs{Do} second optional parameter); a value of \cs{relax} means
+% no points specified (the default).
+% \begin{macrocode}
+\let\eqe@pointsPartsId\relax
+% \end{macrocode}
+% \begin{macrocode}
+\def\leadinitemWarningStar{\PackageWarning{eqexam}
+ {Using the star (*) in front of the points\MessageBreak
+ designator is not allowed when there is a
+ \MessageBreak\string\leadinitem}}
+\def\tableadinWarningStar{\PackageWarning{eqexam}
+ {Using the star (*) in front of the points\MessageBreak
+ designator is not allowed when there is a
+ \MessageBreak\string\tableadin}}
+% \end{macrocode}
+% We now begin the code for the \texttt{problem*} environment.
+% \begin{macrocode}
+\let\isProbStarEnv\eqe@NO
+\let\topofprobstarhook\relax
+\csarg\def{problem*}{\let\isProbEnv\eqe@YES
+ \let\isProbStarEnv\eqe@YES
+ \global\thereissolutionfalse
+ \@ifnextchar[{\pr@bl@m@star}{\pr@bl@m@star[]}}
+\def\pr@bl@m@star[#1]{%
+ \@ifnextchar[{\pr@blem@star{#1}}{\pr@blem@star{#1}[]}}
+\def\pr@blem@star#1[#2]{%
+ \if\eqe@isPts0\global\let\eqe@prevProbZero\eqe@YES\else
+ \global\let\eqe@prevProbZero\eqe@NO\fi
+ \def\numpoints{#1}\ifx\numpoints\@empty
+ \gdef\eqe@isPts{0}\else\gdef\eqe@isPts{1}\fi
+ \makeRoomForProb{\@nbaselineskip\baselineskip}{\eqe@isPts}%
+% \end{macrocode}
+% Let the \cs{Do} commands to internal versions
+% \begin{macrocode}
+ \let\DoNum\eqe@DoNum\let\nDoNum\eqe@nDoNum
+ \let\OutOfNum\eqe@OutOfNum\let\nOutOfNum\eqe@nOutOfNum
+% \end{macrocode}
+% \changes{v3.1e}{2012/11/10}{Removed hard-wired \cs{proofingsymbol}}
+% \begin{macrocode}
+% \proofingsymbol{\ding{52}}%
+ \gdef\probstar{*}%
+ \gdef\pr@b@secondarg{#2}\setcounter{eq@count}{0}%
+ \let\afterlabelhskip\@empty
+ \global\let\probpointseach\@empty\def\numpoints{#1}%
+% \end{macrocode}
+% Determine if the argument begins with \texttt{*}
+% \begin{macrocode}
+ \@ifstar{\let\@isitstar\eqe@One\eqe@grabarg}%
+ {\let\@isitstar\eqe@Zero\eqe@gobbletoend}#1\end
+% \end{macrocode}
+% If this \texttt{problem*} environment has a \cs{leadinitem}, the \texttt{*}
+% option is not allowed
+% \begin{macrocode}
+ \if\@isitstar\eqe@One
+ \@tempcnta=\theeqquestionnoi\relax
+ \advance\@tempcnta1\relax
+ \@ifundefined{leadinitem\thisexamlabel-\the\@tempcnta}{}
+ {\leadinitemWarningStar\let\@isitstar\eqe@Zero}%
+ \@ifundefined{tableadin\thisexamlabel-\the\@tempcnta}{}
+ {\tableadinWarningStar\let\@isitstar\eqe@Zero}%
+ \fi
+% \end{macrocode}
+% Check for the \cs{auto} keyword
+% \changes{v3.1a}{2012/05/21}{Using a more robust method of detecting the
+% presence of \cs{auto}}.
+% There are problems when the first two digits are the same, the old comparison
+% would say that the first parameter is \cs{auto}, which is it not. Replace
+% the old comparison with a more robust method.
+% \begin{macrocode}
+ \expandafter\is@uto\numpoints\auto\@nil
+ \if\isit@uto\eqe@One\let\eqe@pointsPartsId\eqe@One
+ \global\let\probpointseach\relax
+% \end{macrocode}
+% The author has requested \cs{auto}
+% \begin{macrocode}
+ \def\eqe@next{\autocalcparts}%
+ \else
+ \ifx\pr@b@secondarg\@empty\else
+ \let\eqe@pointsPartsId\eqe@Four
+ \isItD@#2\end\fi
+% \end{macrocode}
+% Not \cs{auto} so either \texttt{<num>ea} or \texttt{<num>}
+% \begin{macrocode}
+ \def\eqe@next{\manualcalcparts{\numpoints}}%
+ \fi\eqe@next
+% \end{macrocode}
+% 2012/11/30 added \cs{leadinitem} defined \texttt{eqexam.def} as a dummy command, which we
+% the \cs{let} here to \cs{eqe@leadinitem}.
+% \begin{macrocode}
+ \let\leadinitem\eqe@leadinitem
+% \end{macrocode}
+% 2015/05/31 added \cs{tableadin} defined \texttt{eqexam.def} as a dummy command, which we
+% the \cs{let} here to \cs{eqe@leadinitem}.
+% \begin{macrocode}
+ \let\tableadin\eqe@tableadin
+% \end{macrocode}
+% \changes{}{2015/06/01}{Added the hook \cs{topofprobstarhook}}
+% \DescribeMacro\topofprobstarhook is a general purpose hook at the top of the
+% \texttt{problem*} environment, before the beginning of the nested
+% \texttt{eqequestions} environment.
+% \begin{macrocode}
+ \topofprobstarhook
+ \ifeqfortextbook
+ \writeToSolnFile{\protect\global\protect\frstProbNumShownfalse}\fi
+ \begin{eqequestions}%
+ \begin{exercise}[eqquestionnoi]*}%
+% \end{macrocode}
+% \begin{macrocode}
+\def\ftb@endprobstarCks{%
+ \ifWithinANSGrp
+ \PackageError{eqexam}{\string\bGrpANS\space is still open}
+ {You need to match it with an \string\bGrpANS,
+ or remove it.}%
+ \fi
+}
+% \end{macrocode}
+%\DescribeMacro{\endproblem*} begins here.
+% \begin{macrocode}
+\csarg\def{endproblem*}{%
+ \eqe@IWO\@auxout{\string
+ \csarg\string\gdef{nPartsThisProb\thisexamlabel.\theeqquestionnoi}%
+ {\arabic{partno}}}%
+ \ifx\probpointseach\@empty\else
+ \ifx\probpointseach\auto
+ \eqe@IWO\@auxout{\string
+ \csarg\string\gdef{prob\thisexamlabel.\theeqquestionnoi}%
+ {\theeq@count}}%
+ \else
+ \setcounter{eq@count}{\value{partno}}%
+ \ifx\pr@b@secondarg\@empty\else
+ \bgroup\toks0=\expandafter{\pr@b@secondarg}%
+ \expandafter\isItD@\the\toks0 \end
+% \end{macrocode}
+% If there is a |\Do|, we write this info to AUX.
+% \begin{macrocode}
+ \ifx\yest@D@\eqe@YES\ifx\eqe@pointsEach\eqe@YES
+ \eqe@IWO\@auxout{\string
+ \csarg\string\gdef{DoNumThisProb\thisexamlabel.%
+ \theeqquestionnoi}{\D@Num}}%
+ \@tempcnta = \value{eq@count}%
+ \advance\@tempcnta -\D@Num
+ \global\advance\value{eq@count}-\@tempcnta
+% 3.0k
+ \@tempcnta=\value{partno}%
+ \advance\@tempcnta -\D@Num
+ \multiply\@tempcnta by\argi
+ \addtocounter{eqpointvalue}{-\@tempcnta}%
+ \fi\fi
+ \egroup
+ \fi
+ \multiply\value{eq@count}\argi
+ \eqe@IWO\@auxout{\string
+ \csarg\string\gdef{prob\thisexamlabel.\theeqquestionnoi}%
+ {\theeq@count}}%
+ \fi\fi
+ \end{exercise}%
+ \end{eqequestions}%
+ \ifeqfortextbook\ftb@endprobstarCks\fi
+ \ifeqlocalversion\ifeqglobalversion
+ \xdef\eqe@tmp{\noexpand\forVersion{\eq@selectedVersion}}%
+ \aftergroup\eqe@tmp
+ \fi\fi
+ \global\eqlocalversionfalse
+% \end{macrocode}
+% \changes{}{2015/06/02}{Added \cs{@marktotalvalue} which seems to solve a problem
+% with \texttt{multicols}. Sometimes the totals are not correct, they do not `migrate' out
+% as they should.}
+% \begin{macrocode}
+ \@marktotalvalue
+ \ifdispl@yPoints\global\l@stDispl@yPointstrue
+ \else\global\l@stDispl@yPointsfalse\fi
+}
+% \end{macrocode}
+% \end{environment}
+% \begin{macro}{\leadinitem}
+%\changes{v3.1f}{2012/11/27}{Created \cs{leadinitem} command for a lead in question
+% for the \texttt{parts*} environment.}
+% Some authors, no me among them, want to post a question with parts (\texttt{problem*}) without
+% an introductory sentence. Scandalous!
+%\begin{verbatim}
+%\begin{problem*}\relax
+%\leadinitem Prove that $4x^2\ge (x+1)^2$ for $x\ge1$.
+%\begin{solution} soln\end{solution}
+%\begin{parts}
+%\item Use the principle of mathematical induction to prove that
+% $4^n\geq3n^2$ for all positive integers $n$.
+%\begin{solution} soln\end{solution}
+%\end{parts}
+%\end{problem*}
+%\end{verbatim}
+% Below is my solution to this problem. There were changes in both \textsf{eqexam} and
+% \textsf{exerquiz} (\texttt{eqexam.def}). Here are the listing of changes for my future
+% reference.
+%\begin{itemize}
+% \item Defined \cs{eqe@leadinitem}, \cs{eqe@@leadinitem}, and \cs{leadinitem} below.
+% The first one mostly tests whether we are permitted to use the \cs{leadinitem} command.
+% If \cs{solutionparshape} is empty, the command may be used. (This gives a restriction
+% of only one use per a single \texttt{problem*} environment.) Control is passed
+% to \cs{eqe@@leadinitem} which does all the work.
+% \item In the definition of \cs{pr@blem@star} (part of the startup for \texttt{problem*} we
+% say \verb!\let\leadinitem=\eqe@leadinitem!
+% \item In the startup code for \texttt{exercise@parts@list} (\texttt{exerquiz})
+% lines containing \cs{solutionparshape} and \verb!\let\leadinitem\eq@leadinitemparts!
+% are found. Also, when the \texttt{parts} environment is complete, we restore the
+% default definition of \cs{leadinitem}, \verb!\let\leadinitem\leadinitem@external!.
+% \item In the definition of \cs{eqe@@leadinitem}, we also define \cs{solutionparshape}
+% to help control the paragraphs for this delicate problem of a lead-in item. Its
+% normal definition is \cs{@empty}, and this fact used to detect whether the document
+% author is trying to use two \cs{leadinitem}s in one \texttt{problem*} environment.
+%\item At the beginning of the definition of the command \cs{@exercise} (in \textsf{exerquiz}
+% we \cs{let} \cs{solutionparshape} to \cs{@empty}.
+% \item So too does \cs{solutionparshape} appear in the definition of
+% \cs{vspaceFmt} (\textsf{exerquiz}).
+% \item \cs{solutionparshape} use used to correctly format in the \texttt{solutionsafter},
+% found in \cs{solnexer@@@woparts} (\textsf{exerquiz}).
+%\end{itemize}
+% As can be seen, this simple feature is not so simple.\par\medskip\noindent
+% Set the default value of \cs{solutionparshape}.
+% \begin{macrocode}
+\let\solutionparshape\@empty
+% \end{macrocode}
+% This is the beginning of \DescribeMacro{\leadinitem}\cs{leadinitem}, at least the
+% the active definition within the \texttt{problem*} environment, and outside
+% the \texttt{parts} environment.
+% \begin{macrocode}
+\def\eqe@leadinitem{%
+ \ifx\solutionparshape\@empty
+% \end{macrocode}
+% \cs{solutionparshape} empty means \cs{leadinitem} hasn't been used yet,
+% so we can use it here by passing control to \cs{eqe@@leadinitem}, otherwise,
+% we toss an exception.
+% \begin{macrocode}
+ \def\eqe@next{\eqe@@leadinitem}%
+ \ifeqfortextbook\writeToSolnFile{\protect\bpartsmrk}\fi
+ \else
+ \def\eqe@next{\PackageError{eqexam}
+ {The \string\leadinitem\space command may
+ only be used\MessageBreak once per problem* environment}
+ {Remove all but one of the \string\leadinitem\space
+ commands.}}%
+ \fi\eqe@next
+}
+\newif\ifisleadin \isleadinfalse
+\let\isparshapeExpanded\eqe@NO
+\def\eqe@@leadinitem{\if\itsforleadinitem\eqe@NO
+ \setcounter{partno}{0}\fi\refstepcounter{partno}%
+% \end{macrocode}
+% After initializing the counter, we make various calculations
+% \begin{macrocode}
+ \eq@initializeContAnnot
+ \isleadintrue\let\isitleadin\eqe@YES
+% \end{macrocode}
+% We signal a \cs{leadinitem} by writing a special command to the AUX file,
+% this is used to disallow the use of the \texttt{*} option of points.
+% \begin{macrocode}
+ \eqe@writetoAux{\string
+ \csarg\string\gdef{leadinitem\thisexamlabel-\theeqquestionnoi}{}}%
+ \settowidth{\eq@tmpdima}{\normalfont\parts@indent\eqe@prtsepPrb}%
+ \xdef\leadinIndentPrtSep{\the\eq@tmpdima}%
+ \setlength{\eq@tmpdima}{\eqemargin+\eq@tmpdima}%
+ \xdef\leadinIndent{\the\eq@tmpdima}%
+ \settowidth{\eq@tmplength}{\parts@indent}%
+ \edef\partsleadinIndent{\the\eq@tmplength}%
+ \setlength{\eq@tmplength}{\linewidth-\leadinIndentPrtSep}%
+ \edef\leadinIndentLength{\the\eq@tmplength}%
+% \end{macrocode}
+% \changes{v3.8}{2015/03/17}{Spacing is not correct with standard itemize and
+% enumerate environments, this is a fix.}
+% Modify \cs{@listii} from core LaTeX: Increase \cs{leftmarginii} and \cs{linewidth}
+% appropriately.
+% \begin{macrocode}
+\@ifundefined{@listii@SAVE}{\global\let\@listii@SAVE\@listii}{}%
+ \expandafter\def\expandafter\@listii\expandafter{\@listii@SAVE
+ \advance\leftmarginii\leadinIndentPrtSep\relax
+ \leftmargin\leftmarginii \labelwidth\leftmarginii
+ \advance\labelwidth-\labelsep
+% \advance\linewidth\leadinIndentPrtSep\relax
+ }%
+% \end{macrocode}
+% The \texttt{parshape} for the first paragraph of the \cs{leadinitem}.
+% \begin{macrocode}
+ \parshape=2 \eqemargin \linewidth \leadinIndent \leadinIndentLength
+% \end{macrocode}
+% Here is the definition of \cs{solutionparshape}, we use the shape of
+% subsequent paragraphs.
+% \begin{macrocode}
+ \xdef\solutionparshape{%\noexpand\linewidth\leadinIndentLength
+ \noexpand\parshape=1 \leadinIndent\space\leadinIndentLength}%
+% \end{macrocode}
+% After the current paragraph, we execute \cs{solutionparshape}, then
+% empty out \cs{everypar}. Seems to work.
+% \begin{macrocode}
+ \global\let\isparshapeExpanded\eqe@NO
+ \everypar{\solutionparshape
+ \global\let\isparshapeExpanded\eqe@YES\everypar{}}%
+% \end{macrocode}
+% These next lines were taken from \cs{eq@item@common} in \textsf{exerquiz}.
+% The command \cs{eq@insertContAnnot} was removed from the \cs{eq@item@common} code, it is not needed
+% here and caused trouble. We \cs{let} \cs{eq@item} to \cs{eq@leadin@item} to
+% continue the flow. \cs{@ckhide} checks for an optional argument (\texttt{h} or \texttt{H})
+% and sets switches as appropriate.
+% \begin{macrocode}
+ \let\eq@item\eq@leadin@item\eqp@rtc@lcm@rk
+ \def\currhideopt{x}\eq@hidesolutionfalse\eq@nolinkfalse
+ \@ifnextchar[{\@ckhide}{\eq@item}%
+}
+% \end{macrocode}
+% The final step. If the solution is hidden, we do not write the header.
+% \changes{v3.3a}{2013/05/03}{Changed name of \cs{eq@writeexheader} to \cs{eqExerSolnHeader}}
+% \begin{macrocode}
+\def\eq@leadin@item{\eq@ckglobalhide\ifeq@hidesolution\else
+ \global\let\eqExerSolnHeader\eq@@writeexheaderlist\fi
+ \ifeq@nosolutions\eq@nolinktrue\fi
+ \unskip\noindent\makebox[\partsleadinIndent]{\eqexlisttabheader}%
+ \eqe@prtsepPrb\ignorespaces
+}
+% \end{macrocode}
+% \end{macro}
+% \DescribeMacro{\tableadin}\cs{tableadin} is \cs{let} to \cs{eqe@tableadin} within
+% the \texttt{problem*} env. The switch \cs{if@tableadinitem} is defined in
+% \textsf{exerquiz}.
+% \begin{macrocode}
+\def\eqe@tableadin{\@tableadinitemtrue\eqe@writetoAux{\protect
+ \csarg\protect\gdef{tableadin\thisexamlabel-\theeqquestionnoi}{}}%
+}
+% \end{macrocode}
+% \begin{macro}{\pushProblem}
+% \begin{macro}{\popProblem}
+% There may be an occasion when a multi-part question needs to be broken between parts.
+% use the \cs{pushProblem} and \cs{popProblem} for this purpose. The push saves the
+% counter value, and ends the \texttt{parts} environment. The pop restarts the
+% \texttt{parts}, and resets the parts counter.
+% \changes{1.6b}{2006/3/12}
+% {
+% Added \cs{pushProblem} and \cs{popProblem} to grant the ability to interrupt
+% a parts environment for, for example, a multicolumn environment.
+% }
+%\par\medskip\noindent
+%In the example below, we have our parts in a \texttt{multicols} environment, we
+%\cs{pushProblem}, close \texttt{multicols}, \cs{popProblem} and continue with
+% the multi-parts in single column.
+%\begin{verbatim}
+%\item Compute $\lim_{x\to2^{\text{$-$}}} f(x)$
+%\begin{solution}[1in]\end{solution}
+%\pushProblem
+%\end{multicols}
+%\popProblem
+%\item What value(s) of $c$ make the function $f$
+%continuous at $x=2$?
+%\begin{solution}[.5in]\end{solution}
+%\end{parts}
+%\end{verbatim}
+% \begin{macrocode}
+\newcommand\pushProblem{\xdef\nlastItem{\arabic{partno}}\end{parts}}
+% \end{macrocode}
+% (2013/05/30) Adding an optional parameter to \cs{popProblem} to match
+% the option argument of the \texttt{parts} environment. This enables you
+% to push a \texttt{list} environment and push a \texttt{tabular} environment.
+% \begin{macrocode}
+\newcommand\popProblem[1][]{%
+ \def\@argi{#1}\ifx\@argi\@empty
+ \def\eqe@bParts{\begin{parts}}\else
+ \def\eqe@bParts{\begin{parts}[#1]}\fi
+ \eqe@bParts\setcounter{partno}{\nlastItem}}
+% \end{macrocode}
+% \end{macro}
+% \end{macro}
+% \begin{macrocode}
+\def\lastPageTotal{0pt}
+\def\marginparafterhook{\xdef\lastPageTotal{\the\pagetotal}}
+% \end{macrocode}
+% \DescribeMacro{\manualcalcparts} is the command calculates points
+% when the argument is \emph{not} \cs{auto}. The macro \cmd{\prob@Arg}
+% determines if the points argument passed is of the form \texttt{<num>ea}.
+% \begin{macrocode}
+\def\prob@Arg#1ea#2\end{\def\argi{#1}\def\argii{#2}}
+% \end{macrocode}
+% Now begin \cs{manualcalcparts}; \texttt{\#1} is the number of points, which may be
+% of the form \texttt{<num>ea}, or just \texttt{<num>}.
+% \begin{macrocode}
+\let\eqe@pointsEach\eqe@NO
+\def\manualcalcparts#1{%
+ \expandafter\prob@Arg#1ea\end
+ \ifx\argii\@empty\edef\numpoints{#1}%
+ \let\eqe@pointsEach\eqe@NO
+% \end{macrocode}
+% Argument form is \texttt{<num>} assumed: Total points specified, we
+% should ignore any \cs{PTs} commands.
+% \begin{macrocode}
+ \let\eqe@pointsPartsId\eqe@Zero
+ \else
+% \end{macrocode}
+% Argument form is \texttt{<num>ea} assumed: Again we
+% should ignore any \cs{PTs} commands.
+% \begin{macrocode}
+ \gdef\probpointseach{x}\let\eqe@pointsPartsId\eqe@Two
+ \let\eqe@pointsEach\eqe@YES
+% \end{macrocode}
+% Points each specified
+% \begin{macrocode}
+ \setcounter{eq@count}{\value{eqquestionnoi}}%
+ \addtocounter{eq@count}{1}\csarg
+ \ifx{prob\thisexamlabel.\theeq@count}\relax
+ \def\numpoints{\argi}\else
+ \def\numpoints{\expandafter
+ \csname prob\thisexamlabel.\theeq@count\endcsname}%
+ \fi
+% \end{macrocode}
+%\changes{v4.1}{2015/04/23}{Moved this segment of code to \cs{manualcalcparts},
+% it is taken from the main \texttt{problem*} env.}
+% \begin{macrocode}
+ \ifx\yest@D@\eqe@YES
+ \setcounter{eq@count}{\value{eqquestionnoi}}%
+ \addtocounter{eq@count}{1}%
+ \@ifundefined{nPartsThisProb\thisexamlabel.\theeq@count}
+ {\makeOutOfNum{0}\makeDoNum{0}}{%
+ \expandafter\makeOutOfNum{%
+ \csname nPartsThisProb\thisexamlabel.%
+ \theeq@count\endcsname}%
+ \expandafter\makeDoNum{%
+ \csname DoNumThisProb\thisexamlabel.%
+ \theeq@count\endcsname}}%
+ \fi
+ \fi
+% \end{macrocode}
+% If \cs{marginpoints} is \cs{@empty}, the author has chosen the \texttt{nopoints} option
+% or used the \cs{NoPoints} command.
+% \begin{macrocode}
+ \ifx\marginpoints\@empty
+% \end{macrocode}
+% No points for this exam
+% \begin{macrocode}
+ \else
+ \ifx\argi\@empty
+% \end{macrocode}
+% If \cs{argi} is empty, no points were specified, so we \cs{let}
+% \cs{marginpoints} to \cs{@empty}
+% \begin{macrocode}
+ \let\marginpoints\@empty
+ \else
+% \end{macrocode}
+% Points are displayed in margins or inline
+% \begin{macrocode}
+ \ifx\argii\@empty
+% \end{macrocode}
+% \paragraph*{Total points specified}
+% \begin{macrocode}
+ \ifx\marginpoints\@empty\else
+ \if\@isitstar\eqe@One
+% \end{macrocode}
+% Points to appear ``in-line'' rather than in the margins
+% \begin{macrocode}
+ \addtocounter{eqpointvalue}{#1}%
+ \@marktotalvalue\ifdispl@yPoints
+ \def\marginparafterhook{\itemPTsFormated{%
+ \itemPTsTxt{\numpoints}}\space}\fi
+ \else
+% \end{macrocode}
+% Points appear in the margins
+% \begin{macrocode}
+ \def\marginparpriorhook{\noindent
+ \probvalue{\numpoints}{0}}%
+ \fi
+ \fi
+ \else
+% \end{macrocode}
+% \paragraph*{Points each specified}
+% \begin{macrocode}
+ \ifx\marginpoints\@empty\else
+ \if\@isitstar\eqe@One\ifdispl@yPoints
+% \end{macrocode}
+% Points to appear ``in-line'' rather than in the margins
+% \begin{macrocode}
+ \def\marginparafterhook{%
+ \itemPTsFormated{\itemPTsEaTxt{\argi}}\space}\fi
+ \else
+% \end{macrocode}
+% Points appear in the margins
+% \begin{macrocode}
+ \ifdispl@yPoints
+ \def\marginparpriorhook{\noindent
+ \marginpoints{\numpoints}{\argi}}\fi
+ \fi
+% \end{macrocode}
+% Don't remember why I named this command the way I did, but it is use to pass
+% the number of points, when there is a \cs{leadinitem}.
+% \begin{macrocode}
+ \edef\eqp@rtc@lcm@rk{\noexpand
+ \addtocounter{eqpointvalue}{\argi}%
+ \noexpand\@marktotalvalue}%
+ \fi
+ \fi
+ \fi
+ \fi
+ \ifnum\value{eq@count}=1\relax
+ \eqe@IWO\@auxout{\string\csarg\string
+ \gdef{pagenofirstprob\thisexamlabel}{\thepage}}%
+ \fi
+}
+% \end{macrocode}
+% \DescribeMacro{\autocalcparts} is the command that computes the total points when
+% the author specifies \cs{auto} as the optional argument of \texttt{problem*}. The
+% commands \cmd{\acp@mpah} and \cmd{\acp@mpph} were recently (2012/04/21) separated
+% out to allow for additional customization, without re-defining the whole of
+% \cs{autocalcparts}.
+% \begin{macrocode}
+\def\acp@mpah{\itemPTsFormated{\itemPTsTxt{\numpoints}}\space}
+\def\acp@mpph{\noindent\marginpoints{\numpoints}{0}}
+\def\autocalcparts{%
+ \setcounter{eq@count}{\value{eqquestionnoi}}%
+ \addtocounter{eq@count}{1}%
+ \csarg\ifx{prob\thisexamlabel.\theeq@count}\relax
+ \def\numpoints{0}% assume zero points until we get the total
+ \else
+ \edef\numpoints{\@nameuse{prob\thisexamlabel.\theeq@count}}%
+ \fi
+% \addtocounter{eqpointvalue}{\numpoints}\@marktotalvalue
+ \ifx\marginpoints\@empty\else
+ \ifdispl@yPoints
+ \if\@isitstar\eqe@One
+% \end{macrocode}
+% If we have \texttt{*\cs{auto}}, the total is to appear inline.
+% \begin{macrocode}
+ \def\marginparafterhook{\acp@mpah}\else
+% \end{macrocode}
+% Otherwise, the total will appear in the margin.
+% \begin{macrocode}
+ \def\marginparpriorhook{\acp@mpph}\fi
+ \fi
+ \fi
+ \setcounter{eq@count}{0}%
+}
+% \end{macrocode}
+% \begin{macro}{\forproblem}
+% \begin{macro}{\foritem}
+% \begin{macro}{\forleadinitem}
+% When typing solutions from assigned problems in a textbook, the problems
+% assigned are not consecutive. You can set the problem number before the problem
+% environments by using the \cs{forproblem} command. The one required argument is
+% the problem number: \verb!\forproblem{10)!.
+% \changes{v1.6h}{2007/01/24}
+% {
+% Added \cs{forproblem}, \cs{foritem}, \cs{aNewPage}
+% }
+% \changes{v3.6a}{2015/01/31}{Added \cs{eqe@fpmrk} to add to the uniqueness
+% of \cs{theHeqquestionnoi}.}
+% \begin{macrocode}
+\let\eqe@fpmrk\@empty
+\newcommand{\forproblem}[1]{\def\eqe@fpmrk{-\the@exno}%
+ \setcounter{eqquestionnoi}{#1 - 1}}
+% \end{macrocode}
+% A similar comment for \cs{item}. These are useful for making out solution
+% sets to homework assignments where problems are assigned from the textbook
+% and you want to give a solution to problem 12, part (b), An example of usage is
+%\begin{verbatim}
+%\forproblem{12}
+%\begin{problem*}
+%Factor each.
+%\begin{parts}
+% \foritem{b} $ x^2 + 2x + 1 = ( x + 1 )^2 $
+% \item $ x^2 - x - 2 = ( x - 2 )( x + 1) $ % this is part (c)
+% \foritem{e} $ x^2 + 7x + 10 = ( x - 2 )( x + 7) $
+% \item ... % this will be part (f)
+%\end{parts}
+%\end{problem*}
+%\end{verbatim}
+% \begin{macrocode}
+\newcommand{\foritem}[2][]{%
+ \setcounter{partno}{0}\def\@rgi{#1}\ifx\@rgi\@empty
+ \def\eqe@nextitem{\item}\else
+ \def\eqe@nextitem{\item[#1]}\fi
+ \foritem@cont{#2}}
+\newcommand{\forleadinitem}[2][]{%
+ \setcounter{partno}{0}\def\@rgi{#1}\ifx\@rgi\@empty
+ \def\eqe@nextitem{\leadinitem}\else
+ \def\eqe@nextitem{\leadinitem[#1]}\fi
+ \foritem@cont{#2}}
+% \end{macrocode}
+% (2017/01/04) Modified \cs{foritem@cont} to allow for numbering parts.
+% \changes{v4.7}{2017/01/04}{Modified \cs{foritem@cont} to allow for numbering parts}
+% \begin{macrocode}
+\def\foritem@cont#1{\ifuseNumForParts
+ \edef\fliPartNo{#1}\setcounter{partno}{#1-1}\else
+ \lowercase{\def\eq@selectedItem{#1}}%
+ \let\eq@initLoop\eqe@NO
+ \loop
+ \stepcounter{partno}\expandafter
+ \if\alph{partno}\eq@selectedItem
+ \let\eq@initLoop\eqe@YES\fi
+ \ifx\eq@initLoop\eqe@NO\repeat
+ \edef\fliPartNo{\the\c@partno}%
+ \addtocounter{partno}{-1}\fi\let\itsforleadinitem\eqe@YES
+ \eqe@nextitem}
+% \end{macrocode}
+% \end{macro}
+% \end{macro}
+% \end{macro}
+% The command \cs{eqe@insertContAnnot} attempts to insert a string just prior
+% to a part, if that part begins a new page. To get it right, it promotes a new
+% page using the default of .25in. The optional parameter allows you to insert
+% a new value; this may be needed to get the string \cs{annotContStr} placed properly.
+% The commands
+% \begin{macro}{\annotContStr}
+% \changes{v3.0l}{2011/08/22}{Defined \cs{eqe@insertContAnnot} and related commands}
+% The string that is typeset by the \cs{eqe@insertContAnnot} command.
+% \begin{macro}{\acvspace}
+% User access to changing the vertical spacing \cs{promoteNewPage} uses within
+% \cs{eqe@insertContAnnot}.
+% \begin{macro}{\resetacvspace}
+% Resets the vertical spacing back to its default.
+% \begin{macrocode}
+\newcommand{\annotContStr}{%
+ \textbf{Problem~{\eqeCurrProb} continued\strut}}
+\newcommand{\acvspace}[1]{\def\ic@vspace{#1}\setlength\iacvspace{#1}}
+% \end{macrocode}
+% \DescribeMacro{\ic@vspacedefault} is the default vertical spacing used
+% by \cs{eqe@insertContAnnot}
+% \begin{macrocode}
+\newlength\iacvspace
+\newcommand{\ic@vspacedefault}{1in} % changed .25in to 1in 2012/12/04
+\newcommand{\resetacvspace}{\setlength\iacvspace{\ic@vspacedefault}}
+\resetacvspace
+% \end{macrocode}
+% \cs{eqe@insertContAnnot} promotes a new page, and if the current
+% page is different than the starting page, \cs{eq@currProbStartPage}, we
+% insert \cs{annotContStr}.
+% \begin{macrocode}
+%\newcommand{\priorAnnotInsert}[1]{\def\eq@priorAnnotInsert{#1}}
+%\let\eq@priorAnnotInsert\relax
+\newcommand{\eqe@insertContAnnot}[1][\iacvspace]{\promoteNewPage[#1]%
+ \ifnum\arabic{page}>\eq@currProbStartPage
+ \xdef\eq@currProbStartPage{\arabic{page}}%
+ {\settowidth{\eq@tmplength}{\parts@indent\eqe@prtsepPrb}%
+ \xdef\eqe@partsIndent{\the\eq@tmplength}}%
+ \ifwithinparts
+% \end{macrocode}
+% \cs{eq@item} is the \texttt{list} definition of \cs{item} which has been
+% \cs{let} to \cs{eq@item} within the \texttt{parts} environment.
+% \begin{macrocode}
+ \@ifundefined{eq@item@latex}{\item[]\hspace*{-\eqemargin}%
+ \ifx\solutionparshape\@empty\else\hspace*{-\eqe@partsIndent}\fi}
+ {\eq@item@latex[]\hspace*{-\eqemargin}%
+ \hspace{-\eqe@partsIndent}}\else
+% \end{macrocode}
+% If placed between problem sets, we indent as appropriate.
+% \begin{macrocode}
+ \hspace*{-\eqemargin}\fi\annotContStr
+ \fi
+}
+\edef\eq@currProbStartPage{\arabic{page}}
+% \end{macrocode}
+% \end{macro}
+% \end{macro}
+% \begin{macro}{\turnContAnnotOff}
+% \begin{macro}{\turnContAnnotOn}
+% Turn off and on this feature. The default is off.
+% \begin{macrocode}
+%\newcommand{\@gobbloptone}[1][]{}
+\newcommand{\turnContAnnotOff}{\global\let\eq@insertContAnnot\relax}
+\newcommand{\turnContAnnotOn}{%
+ \global\let\eq@insertContAnnot\eqe@insertContAnnot}
+\turnContAnnotOff
+% \end{macrocode}
+% Used for manually inserting annot
+% \begin{macrocode}
+\def\insertContAnnot{\eq@insertContAnnot}
+% \end{macrocode}
+% \end{macro}
+% \end{macro}
+% \end{macro}
+% \begin{macro}{\aNewPage}
+% \begin{macro}{\qNewPage}
+% A simple command for inserting \cs{newpage}, only if the \cs{answerkey}
+% option has been taken.
+% \changes{v1.6h}{2007/01/24}
+% {
+% Added \cs{aNewPage} and \cs{qNewPage}
+% }
+% \begin{macrocode}
+\newcommand\aNewPage{\ifanswerkey\newpage\fi}
+\newcommand\qNewPage{\ifanswerkey\else\newpage\fi}
+% \end{macrocode}
+% \end{macro}
+% \end{macro}
+% \begin{macro}{\OnBackOfPage}
+%
+% In an effort to make maximum use of the paper, I sometimes ask the
+% students to solve the problem on the back of a page. The following
+% command is an automated instruction. Generally, we work on the back
+% of the previous page, unless we are on page 1, in this case we work
+% on the back of page 1.
+%
+% \begin{macrocode}
+\newcounter{backofpage}
+\newcommand\bopText{on the back of page~\boPage}
+\newcommand\bopCoverPageText{on the back of the cover page}
+\newcommand\OnBackOfPage[1][\bopText]{%
+ \refstepcounter{backofpage}\label{bop\thebackofpage}
+ \begingroup
+ \csarg\ifx{r@bop\thebackofpage}\relax
+ \def\boPage{??}\else
+ \edef\eqe@temp{\csname r@bop\thebackofpage\endcsname}%
+ \ifx\hyper@anchor\@undefined
+ \edef\boPage{\expandafter\@secondoftwo\eqe@temp}\else
+ \edef\boPage{\expandafter\@secondoffive\eqe@temp}\fi
+ \c@eq@count\boPage
+ \advance\c@eq@count-1\relax
+% \end{macrocode}
+% If on page 1, we work on the back of page 1, otherwise, we work on the
+% back of the previous page.
+% \begin{macrocode}
+ \edef\boPage
+ {%
+ \ifx\eqex@coverpage\relax
+ \ifnum\value{eq@count}=0
+ 1%
+ \else
+ \the\value{eq@count}%
+ \fi
+ \else
+ \ifnum\value{eq@count}=0
+ -1%
+ \else
+ \the\value{eq@count}%
+ \fi
+ \fi
+ }%
+ \fi
+ \csarg\ifx{r@bop\thebackofpage}\relax#1\else
+ \ifnum\boPage=-1\relax\bopCoverPageText\else#1\fi\fi
+ \endgroup
+}
+% \end{macrocode}
+% \end{macro}
+%
+%\subsection{Vertical Space Filling Options}
+%
+% When the \texttt{nosolutions} or the \texttt{vspacewithsolns} is used, a
+% vertical space is generated by the \texttt{solution} environment.
+% Previously, this has just been a vertical white space, now, we provide
+% the ability to fill the space with horizontal rules of different types.
+% Below is the implementation of this.
+% \begin{macro}{\eqWriteLineColor}
+% The color of the rule to use.
+% \begin{macrocode}
+\newcommand{\eqWriteLineColor}[1]{\def\eq@WriteLineColor{#1}}
+\eqWriteLineColor{gray}
+% \end{macrocode}
+% \end{macro}
+% \begin{macro}{\eqWLSpacing}
+% The line spacing between the rules.
+% \begin{macrocode}
+\newlength\wlVspace
+\newcommand{\eqWLSpacing}[1]{\setlength\wlVspace{#1}}
+\eqWLSpacing{14pt}
+% \end{macrocode}
+% \end{macro}
+% \paragraph*{Fill Types.} We have three types of line fill:
+% \cs{hrulefill}, \cs{dotfill}, and a custom rule \cs{eqdashrulefill}.
+% The commands three \cs{eqWriteLineFill}, \cs{eqWriteLineDots}, and
+% \cs{eqWriteLineDashFill} implements these three types. They are
+% \cs{let} to \cs{eqWriteLine}, which is used in \cs{vspaceFillerLines}.
+% \begin{macrocode}
+\newcommand{\eqWriteLineFill}{%
+ \textcolor{\eq@WriteLineColor}{\hrulefill}}
+%\newcommand{\eqWriteLineDots}{%
+% \textcolor{\eq@WriteLineColor}{\dotfill}}
+\def\eqdotrulefile{\leavevmode
+ \cleaders\hb@xt@ .44em{\hbox to0pt{\hss.\hss}\hss}\hfill\kern\z@}
+\newcommand{\eqWriteLineDots}{%
+ \textcolor{\eq@WriteLineColor}{\eqdotrulefile}}
+%\def\eqdashrulefill{\leavevmode
+% \cleaders\hb@xt@ .44em{\hss\rule{.22em}{.4pt}\hss}\hfill\kern\z@}
+\def\eqdashrulefill{\leavevmode%\kern-.11em
+ \cleaders\hb@xt@ .44em{\rule{.22em}{.4pt}\hss}\hfill\kern\z@}
+\newcommand{\eqWriteLineDashFill}{%
+ \textcolor{\eq@WriteLineColor}{\eqdashrulefill}}
+\newcommand{\eqWriteLineBlankFill}{\hfill}
+% \end{macrocode}
+% Use \DescribeMacro{\fillerLinesAlignDef}\cs{fillerLinesAlignDef} and
+% \DescribeMacro{\fillerLinesOnLeftMargin}\cs{fillerLinesOnLeftMargin} to adjust
+% the alignment of the rule lines for this feature. The first is the default,
+% the second one aligns rule lines to the left margin.
+% \begin{macrocode}
+\newif\if@equsedim \@equsedimtrue
+\newcommand{\useVspaceDimen}{\@equsedimtrue}
+\newcommand{\usenLineDimen}{\@equsedimfalse}
+\newif\if@eqalignfilllinestoleft\@eqalignfilllinestoleftfalse
+\newcommand{\fillerLinesOnLeftMargin}{\@eqalignfilllinestolefttrue}
+\newcommand{\fillerLinesAlignDef}{\@eqalignfilllinestoleftfalse}
+\newcommand\priorPageBreakMsg[1]{\def\priorP@geBre@kMsg{#1}}
+\let\priorP@geBre@kMsg\@empty
+\newcommand{\flPageBreakMsg}[1]{%\acvspace{2\wlVspace}%
+ \priorPageBreakMsg{\emitMessageNearBottom[2\wlVspace]
+ {\eqfititin{{\Large\strut}#1}}}%
+}
+\newcommand{\vspaceFillerLines}[1]{\begingroup\offinterlineskip
+ \parindent0pt\relax\parskip0pt
+ \@tempdima\wlVspace\eqetmplengtha0pt
+ \def\eqe@fillwidth{\linewidth+\eqetmplengtha}%
+ \settowidth{\eqetmplengthb}{\eqe@decPointPrb}%
+ \@whiledim\@tempdima<#1\relax\do{\priorP@geBre@kMsg
+ \eq@insertContAnnot\vskip\wlVspace\eqe@wrtLineKernal
+ \makebox[0pt][l]{\makebox[\eqe@fillwidth]{\eqWriteLine}}%
+ \addtolength{\@tempdima}{.4pt+\wlVspace}\par
+ }\endgroup
+}
+\def\eq@linesXPgs{\begingroup\offinterlineskip
+ \parindent0pt\relax\parskip0pt
+ \@tempcnta=0 \eqetmplengtha0pt
+ \settowidth{\eqetmplengthb}{\eqe@decPointPrb}%
+ \def\eqe@fillwidth{\linewidth+\eqetmplengtha}%
+ \@whilenum\@tempcnta<\soln@keys@nLines\relax\do{\priorP@geBre@kMsg
+ \eq@insertContAnnot\vskip\wlVspace\eqe@wrtLineKernal
+ \makebox[0pt][l]{\makebox[\eqe@fillwidth]{\eqWriteLine}}%
+ \advance\@tempcnta1\relax}\par\endgroup
+}
+\def\eqe@wrtLineKernal{%
+ \ifx\solutionparshape\@empty
+ \if@eqalignfilllinestoleft
+ \setlength{\eqetmplengtha}{\labelwidth+\eqemargin}%
+ \setlength{\eqetmplengtha}
+ {\eqetmplengtha+\eqetmplengthb}%
+ \ifwithinparts
+ \setlength{\eqetmplengtha}{\labelwidth}%
+ \setlength{\eqetmplengtha}
+ {\eqetmplengtha+\eqetmplengthb}%
+ \ifx\eq@item\item@part@tabular
+ \hspace*{-\eqemargin}\eqetmplengtha\eqemargin\else
+ \hspace*{-\eqetmplengtha}\fi
+ \else
+ \hspace*{-\eqemargin}\eqetmplengtha\eqemargin
+ \fi
+ \else
+ \ifwithinparts
+ \setlength{\eqetmplengtha}{\labelwidth}%
+ \setlength{\eqetmplengtha}
+ {\eqetmplengtha-\eqetmplengthb}%
+ \setlength{\eqetmplengtha}{\labelwidth}%
+ \setlength{\eqetmplengtha}
+ {\eqetmplengtha+\eqetmplengthb}%
+ \ifx\eq@item\item@part@tabular
+ \hspace*{\eqetmplengtha}%
+ \settowidth{\eqetmplengthb}{\eqe@prtsepPrb}%
+ \setlength{\eqetmplengtha}
+ {-\labelwidth-\eqetmplengthb}\else
+ \eqetmplengtha0pt\fi
+ \else
+ \eqetmplengtha0pt
+ \fi
+ \fi
+ \else
+ \if@eqalignfilllinestoleft
+ \setlength{\eqetmplengtha}
+ {\eqemargin+\leadinIndentPrtSep}%
+ \hspace*{-\eqetmplengtha}\else\hspace*{0pt}\fi
+ \fi
+}
+% \end{macrocode}
+% \begin{macro}{\useFillerLines}
+% When used, the vertical space is written with lines (rules, dashes, dots).
+%\changes{v2.0e}{2011/03/07}
+%{%
+% Added the feature of filling the vertical space with ruled lines of
+% different types. This feature is available for paper options and for
+% \texttt{nosolutions} and \texttt{vspacewithsolution} options.
+%}
+% \begin{macrocode}
+\newcommand{\useFillerLines}{\let\vspaceFiller\vspaceFillerLines
+ \fillTypeDefault\@eqlinedfillertrue}
+% \end{macrocode}
+% \end{macro}
+% \begin{macro}{\useFillerDefault}
+% Resets the vertical space to the original white space.
+% \begin{macrocode}
+\newcommand{\useFillerDefault}{\let\vspaceFiller\vspaceFillerDefault
+ \let\eqWriteLine\hfill\@eqlinedfillerfalse}
+% \end{macrocode}
+% \end{macro}
+% \begin{macro}{\fillTypeHRule}
+% Writes the line as a solid line (\cs{hrulefill}).
+% \begin{macrocode}
+\newcommand{\fillTypeHRule}{\let\eqWriteLine\eqWriteLineFill}
+% \end{macrocode}
+% \end{macro}
+% \begin{macro}{\fillTypeDots}
+% Writes the line as a dotted line (\cs{dotfill}).
+% \begin{macrocode}
+\newcommand{\fillTypeDots}{\let\eqWriteLine\eqWriteLineDots}
+% \end{macrocode}
+% \end{macro}
+% \begin{macro}{\fillTypeDashLine}
+% Writes the line as a dotted line (\cs{eqdashrulefill}).
+% \begin{macrocode}
+\newcommand{\fillTypeDashLine}{\let\eqWriteLine\eqWriteLineDashFill}
+% \end{macrocode}
+% \end{macro}
+% \begin{macro}{\fillTypeBlankLine}
+% Fills the line
+% \begin{macrocode}
+\newcommand{\fillTypeBlankLine}{\let\eqWriteLine\eqWriteLineBlankFill}
+% \end{macrocode}
+% \end{macro}
+% \begin{macro}{\fillTypeDefault}
+% Resets fill type back to the default, \cs{hrulefill}.
+% \begin{macrocode}
+\newcommand{\fillTypeDefault}{\let\eqWriteLine\eqWriteLineFill}
+% \end{macrocode}
+% \end{macro}
+% Set the \textsf{eqexam} page style, if not otherwise indicated.
+% \begin{macrocode}
+\ifeqfortextbook\else
+ \if@bypasseqexamheading\else
+\pagestyle{eqExamheadings}\fi\fi
+% \end{macrocode}
+% \begin{macrocode}
+%</package>
+%<*textbook>
+\ProvidesFile{eqtextb.def}
+ [2016/01/18 v4.6 Cmds used by the fortextbook option (dps)]
+% \end{macrocode}
+%
+% \section{Concerning the \protect\texttt{fortextbook} option}\label{fortextbook}
+%
+% What are my goals/desired features? Modern (U.S.) textbooks---at least
+% the ones I'm familiar with---consist of some or all of the following
+% resources:
+% \begin{itemize}
+% \item \textbf{Student Edition}: Answers to odd-numbered problems
+% appear in the back of the text.
+% \item[] We need to have a scheme where odd-numbered problems, under suitable options,
+% are compiled. \textbf{Goal:} It does not need to be restricted to odd-numbered, however, need to latex only
+% those problems that meet the ``include'' criteria.
+% \item[] For chapter review problem sets, odd-number problems are have solutions in the
+% back of the book.
+% \item[] For chapter quizzes, odd-numbered (optionally all) solutions
+% are in the back of the book.
+%
+% \item \textbf{Instructor Edition}: Answers to all problems appear in
+% the back of the book. Answers may also appear in the body of the text,
+% in the margins of the text, or immediately after the statement of the
+% problem. If the answer is too long, there is a cross-reference to the
+% solution in the appendix.
+% \item[] Some publishers I've seen have wide margins where additional material can be inserted
+% (historical sketches, instructor notes, pictures, etc.). In these margins, the answers to the problems
+% can appear. Other publishers put answer immediately
+% following the questions. The latter is easy to do; just have a macro, say \verb!\ANS{$12.5$}!, which only
+% expands when the ``instructor'' option is used.
+% \item \textbf{Student Solution Manual}: Contains solutions to all
+% odd-problems, as well as any review problems and chapter quizzes.
+% Some publishers include all solutions to chapter quizzes.
+% \item[] A solution manual is a separate publication. This document would be
+% created by latexing one or more of the auxiliary file (\texttt{.sol})
+% These files might have to be edited before the final compile. We include only the solutions
+% that meet the include criteria (i.e., odd-numbered ones).
+% \item[] The current features of \textsf{eqexam} is what is needed here. The authors need only
+% include solutions to each problem in a \texttt{solution} environment. Now, I realize that often times
+% the authors create the solutions, but someone else, possibly a grade student or contractor, solves the problems.
+% In the latter case, the authors would probably not like to turn over the source files to the one solving and typesetting
+% the problems.
+% \item \textbf{Instructor Solution Manual}: Contains solutions to all
+% problems, review problems, chapter quizzes.
+% \item[] Similar comments for the instructor solution manual.
+% \end{itemize}
+% Some other thoughts by a contributor:
+% \begin{itemize}
+%\item Often there is a diagram or graphic within the problem -- this has
+% some figure caption and after the running counter of the figure it is
+% named the NUMBER of the problem (cross-reference to the problem number)
+%
+%\item Often the probs with soln are setup in two-column style.
+%
+%\item Often the PROBLEM NUMBER has a special formatting (not only bold and
+% black), maybe with a colorframebox around or some special formatting
+% from the author
+%
+%\item Of course I have seen in some EXAMPLES that there is a wide margin
+% to put in additional graphics etc. setup in two-side style -- wide left
+% margin on even pages, wide right margins on odd pages. Here as well
+% are captions setup and cross-references.
+%\end{itemize}
+%
+%\subsection{Setting options with \texorpdfstring{\cs{textbookOpts}}{\textbackslash{textbookOpts}}}
+% \begin{macro}{\textbookOpts}
+% \begin{macro}{marginans}
+% \begin{macro}{inlineans}
+% \begin{macro}{marginsonleft}
+% \begin{macro}{ssols}
+% \begin{macro}{lsols}
+% We set up a command for setting the options for the \texttt{fortextbook} option.
+% \begin{macrocode}
+\define@boolkey{eqe@tbopts}[is]{instred}[true]{}
+\define@boolkey{eqe@tbopts}[is]{studented}[true]{%
+ \ifisstudented
+% \end{macrocode}
+% Now let's try to filter out the even-numbered problems for the student edition.
+% \begin{macrocode}
+ \tbfilterOutEvenNums
+% \end{macrocode}
+% The above command is normally \cs{let} to \cs{@gobble}.
+% \begin{macrocode}
+ \fi
+}
+% \end{macrocode}
+% This code is executed in \cs{exambegdef}, the start up code of the \texttt{exam} environment.
+% This enables problems with fill-ins, true/false, or multiple choice, to have the answer appear
+% in the space provided.
+% \begin{macrocode}
+\def\tb@beginexam@code{%
+ \ifisinstred\answerkeytrue\eq@proofingtrue\fi}
+% \end{macrocode}
+% \verb!\eqEXt{\theeqquestionnoi}! and \verb!\endeqEXt\tok1\tok2! enclose each
+% solution, \cs{tbfilterOutEvenNums} redefines \cs{eqEXt} to gobble everything,
+% when the page number is even, through \cs{endeqEXt} and the two tokens it follows.
+% This leaves only the odd-numbered problems.
+% \begin{macrocode}
+\newcommand{\tbfilterOutEvenNums}{%
+% \end{macrocode}
+%\changes{v3.3}{2013/04/07}{\textsf{exerquiz} changed \cs{eqEXt} to two variables, so
+% we make the same change here.}
+% \textsf{exerquiz} changed \cs{eqEXt} to two variables, so
+% we make the same change here
+% \begin{macrocode}
+ \def\eqEXt##1##2{\ifodd##1\let\eqe@next\relax\else
+ \def\eqe@next{\gobbletoEndEXt}\fi\eqe@next}%
+}
+\newcommand{\tballowAllNums}{%
+% \end{macrocode}
+%\changes{v3.3}{2013/04/07}{\textsf{exerquiz} changed \cs{eqEXt} to two variables, so
+% we make the same change here.}
+% \textsf{exerquiz} changed \cs{eqEXt} to two variables, so
+% we make the same change here
+% \begin{macrocode}
+% \let\eqEXt\@gobble
+ \let\eqEXt\@gobbletwo
+ \let\endeqEXt\relax
+}
+\define@boolkey{eqe@tbopts}[is]{marginans}[true]{}
+\define@boolkey{eqe@tbopts}[is]{inlineans}[true]{}
+\define@boolkey{eqe@tbopts}[]{marginsonleft}[true]
+% \end{macrocode}
+% If margins are always on left, we turn off switching of margin notes
+% as placed by \cs{marginpar}, and use \cs{reversemarginpar} to get them
+% on the left.
+% \begin{macrocode}
+ {\@mparswitchfalse\reversemarginpar}
+\define@boolkey{eqe@tbopts}[show]{ssols}[true]{}
+\define@boolkey{eqe@tbopts}[show]{lsols}[true]{%
+ \ifshowlsols\let\tb@soln@choice\tb@showlsols\fi}
+% \end{macrocode}
+% \end{macro}
+% \end{macro}
+% \end{macro}
+% \end{macro}
+% \end{macro}
+% The default settings are \texttt{true} for \texttt{studented} and
+% \texttt{false} for \texttt{instred}.
+%
+% \begin{macrocode}
+\newcommand{\textbookOpts}[1]{\setkeys{eqe@tbopts}{#1}%
+% \end{macrocode}
+% We do not allow both \texttt{instred} and \texttt{studented} to be true.
+% \begin{macrocode}
+ \ifisinstred\global\isstudentedfalse\else
+ \ifisstudented\global\isinstredfalse
+ \fi\fi
+% \end{macrocode}
+% \changes{v3.0v}{2012/03/14}{Include \cs{tbMakeFinalCalcs} at end of
+% \cs{textbookOpts}}
+% Added this part in in case \cs{textbookOpts} comes after \cs{marparboxwidth}.
+% \begin{macrocode}
+ \ifdim\tbmarparboxwidth=1sp\else
+ \expandafter\tbMakeFinalCalcs\fi
+}
+% \end{macrocode}
+% As mentioned above, the default settings are \texttt{true} for \texttt{studented} and
+% \texttt{false} for \texttt{instred}.
+% \begin{macrocode}
+\isstudentedtrue
+\isinstredfalse
+\ismarginansfalse
+\isinlineansfalse
+% \end{macrocode}
+% The command is available only in the preamble.
+% \begin{macrocode}
+\@onlypreamble{\textbookOpts}
+% \end{macrocode}
+% \end{macro}
+% \begin{macro}{\turnOffMarAnsOnAnsInline}
+% \begin{macro}{\turnOnMarAnsOffAnsInline}
+% \begin{macro}{\toggleInstrAns}
+% These three command may not be useful in the creation of a textbook, but
+% you never know, I used them in my demo doc \texttt{fortextbook.tex} to turn
+% off and on the display of the answers (change margin to inline, change inline to margin,
+% and toggle margin and inline).
+% \begin{macrocode}
+\newcommand{\turnOffMarAnsOnAnsInline}{%
+ \global\ismarginansfalse\global\isinlineanstrue
+ \insMidMarg{\global\ismarginansfalse
+ \global\isinlineanstrue}%
+}
+\newcommand{\turnOnMarAnsOffAnsInline}{%
+ \global\ismarginanstrue\global\isinlineansfalse
+ \insMidMarg{\global\ismarginanstrue
+ \global\isinlineansfalse}%
+}
+\newcommand{\toggleInstrAns}{%
+ \ifisinstred\ifismarginans
+ \global\ismarginansfalse\global\isinlineanstrue
+ \insMidMarg{\global\ismarginansfalse
+ \global\isinlineanstrue}%
+ \else
+ \global\ismarginanstrue\global\isinlineansfalse
+ \insMidMarg{\global\ismarginanstrue
+ \global\isinlineansfalse}%
+ \fi\fi
+}
+% \end{macrocode}
+% \end{macro}
+% \end{macro}
+% \end{macro}
+%
+% \subsection{Macros to display answers/shortsolns}
+% In this section, we develop some commands to display answers or short solutions. These
+% would appear if \texttt{instred=true}, in-line, or in the margins.
+% \begin{macro}{\ANS}
+% Let us begin by creating a simple macro for saving an answer. The answer is displayed ``in-line.''
+% No verbatim-type text allowed, no unbalanced braces unless escaped. \cs{ANS} displays the answer
+% if the \texttt{instred} option of the \texttt{eqe@tbopts} family, i.e., by executing
+%
+% \begin{macro}{\bGrpANS}
+% \begin{macro}{\eGrpANS}
+% Two macros used to group answers in the margins.
+%\changes{v3.0q}{2011/14/22}{Added \cs{bGrpANS} and \cs{eGrpANS}}
+% \begin{macrocode}
+\newif\ifWithinANSGrp\WithinANSGrpfalse
+\newif\ifftb@isANSListOpen\ftb@isANSListOpenfalse
+\newcommand{\bGrpANS}{%
+ \if\probstar*\else
+ \PackageError{eqexam}{Use of \string\bGrpANS\space
+ only applies\MessageBreak to the problem* environment}{Please
+ remove this \string\bGrpANS.}%
+ \fi
+ \ifWithinANSGrp
+ \global\WithinANSGrpfalse
+ \let\tb@next\relax
+ \PackageError{eqexam}{\string\bGrpANS\space already open}
+ {You issued an earlier \string\bGrpANS,
+ but did not close it.}%
+ \else
+ \global\WithinANSGrptrue
+ \global\ftb@isANSListOpenfalse
+ \def\tb@next{\ANS}%
+ \fi
+ \tb@next
+}
+\newcommand{\eGrpANS}{%
+ \if\probstar*\else
+ \PackageError{eqexam}{Use of \string\eGrpANS\space
+ only applies\MessageBreak to the problem* environment}{Please
+ remove this \string\eGrpANS.}%
+ \fi
+ \ifWithinANSGrp
+ \global\WithinANSGrpfalse
+ \def\tb@next{\ANS}%
+ \else
+ \let\tb@next\relax
+ \PackageError{eqexam}{\string\eGrpANS\space already closed}
+ {You've issued two consecutive \string\eGrpANS\space
+ commands,\MessageBreak either remove this one
+ or the previous one.}%
+ \fi
+ \tb@next
+}
+% \end{macrocode}
+% \end{macro}
+% \end{macro}
+% \cs{ANS} begin by checking to see if there is a star that follows the command,
+% this is used for inline answers. If \texttt{*} is present, we do not put the
+% answer inline, but will put it in the margins if the option call for it.
+% \begin{macrocode}
+\newcommand{\ANS}{\@ifstar{\let\tb@istart=1\tb@ANS}
+ {\let\tb@istart=0\tb@ANS}}
+% \end{macrocode}
+% (10/13/2011) The following is the original definition of \cs{tb@ANS} before the creation of
+% the commands \cs{bGrpANS} and \cs{bGrpANS}. We keep this to revert to this definition
+% if this new feature causes problems.
+%\begin{verbatim}
+%\newcommand{\tb@ANS}[1]{%
+% \ifisinstred
+% \ifisinlineans\if\tb@istart0\ANSFmt{\theeqquestionnoi}{#1}\fi\fi
+% \ifismarginans
+% \edef\eqe@prehold{\noexpand\par\kern0pt\noindent
+% \if\probstar*%
+% \noexpand\begin{eqeList}[\tb@wparts@len]{%
+% \noexpand\eqedsplyOnlyFrst{\theeqquestionnoi}%
+% {\thepartno}\noexpand\eqe@hspannerMrg
+% \noexpand\makebox[\noexpand\tbmrgpartwdth]%
+% {\noexpand\tb@mrgPartFmt{\thepartno}}}%
+% \else
+% \noexpand\begin{eqeList}%
+% {\noexpand\tb@mrgDigitFmt{%
+% \theeqquestionnoi\eqe@decPointMrg}}%
+% \fi
+% }\expandafter\insMidMarg%
+% \expandafter{\eqe@prehold#1\end{eqeList}}%
+% \fi
+% \fi
+%}
+%\end{verbatim}
+% \DescribeMacro{\ftb@defineInsSpan} is used when there is an optional
+% argument for \cs{ANS}. It formats the range of parts,
+% for example, (a)--(c). This macro can be redefined, I suppose, to meet
+% the needs of the author.
+% \begin{macrocode}
+\def\ftb@defineInsSpan#1{\def\ftb@argi{#1}\ifx\ftb@argi\@empty
+ \def\ftb@InsSpan{}\else\ftb@spanPrts{#1}%
+ \def\ftb@InsSpan{\noexpand\hspace{-\labelsep}%
+ \noexpand\textcolor{MRGPARTcolor}{--}\noexpand
+ \makebox[\noexpand\tbmrgpartwdth]{\noexpand
+ \tb@mrgPartFmt{\ftb@EndSpanPrts}}\eqe@hspannerMrg}\fi
+}
+% \end{macrocode}
+% \DescribeMacro{\ftb@spanPrts} calculates the letter of the end of the
+% range. \texttt{\#1} is passed by \cs{ANS} (\cs{tb@ANS}, actually). For
+% example if we have \verb!\ANS[2]{...}!, \texttt{\#1=2}.
+% \begin{macrocode}
+\def\ftb@spanPrts#1{{%
+ \advance\value{partno}by#1\relax
+ \xdef\ftb@EndSpanPrts{\thepartno}}%
+}
+% \end{macrocode}
+% \DescribeMacro{\ftb@EqeListPrtsFmt} is the internal formatting used within the \texttt{eqeList} for the part letter.
+% \begin{macrocode}
+\def\ftb@EqeListPrtsFmt{\noexpand
+ \makebox[\noexpand\tbmrgpartwdth]{\noexpand
+ \tb@mrgPartFmt{\thepartno}}\nobreak
+}
+% \end{macrocode}
+% \DescribeMacro{\ftb@OpenEqeListPrts} opens an \texttt{eqeList} environment,
+% and displays the question number (optionally) and the part number.
+% \begin{macrocode}
+\def\ftb@OpenEqeListPrts{\noexpand
+ \begin{eqeList}[\tb@wparts@len]{\noexpand
+ \eqedsplyOnlyFrst{\theeqquestionnoi}%
+ {\thepartno}\noexpand\eqe@hspannerMrg\ftb@EqeListPrtsFmt}%
+}
+% \end{macrocode}
+% \DescribeMacro{\ftb@CloseEqeList} closes the \texttt{eqeList} after
+% inserting \cs{qe@prehold} and the content, \texttt{\#1}.
+% \begin{macrocode}
+\def\ftb@CloseEqeList#1{\expandafter\insMidMarg%
+ \expandafter{\eqe@prehold#1\end{eqeList}}%
+}
+% \end{macrocode}
+% \DescribeMacro{\grpANSDelimiter} delimits the parts
+% when \cs{bGrpANS}/\cs{eGrpANS} is used. May be redefined.
+% \begin{macrocode}
+\newcommand{\grpANSDelimiter}{\textcolor{MRGPARTcolor}{,}\space}
+% \end{macrocode}
+% \DescribeMacro{\tb@ANS} does the main work of \cs{ANS}.
+% \begin{macrocode}
+\newcommand{\tb@ANS}[2][]{%
+ \ifisinstred
+ \ifisinlineans
+ \if\tb@istart0\ANSFmt{\theeqquestionnoi}{#2}\fi
+ \fi
+ \ifismarginans
+ \ftb@defineInsSpan{#1}%
+% \end{macrocode}
+% We create the code that we will introduce into \cs{insMidMarg}, this will
+% be introduced prior to \texttt{\#2}.
+% \begin{macrocode}
+ \edef\eqe@prehold{%
+ \if\probstar*%
+% \end{macrocode}
+% If this question is one with parts...
+% \begin{macrocode}
+ \ifftb@isANSListOpen
+% \end{macrocode}
+% If the list is already open (\cs{ifftb@isANSListOpen}),
+% we just add content to the \texttt{eqeList} environment.
+% \begin{macrocode}
+ \ftb@EqeListPrtsFmt\noexpand\eqe@hspannerMrg
+ \else
+% \end{macrocode}
+% If the list is not open, we start the \texttt{eqeList} environment
+% in the usual way, this also includes the case where \cs{bGrpAns} is
+% not uses, which is normally the case.
+%
+% \begin{macrocode}
+ \noexpand\par\kern0pt\noindent
+ \ftb@OpenEqeListPrts\ftb@InsSpan
+ \fi
+ \else
+% \end{macrocode}
+% This is a question without parts.
+% \begin{macrocode}
+ \noexpand\begin{eqeList}%
+ {\noexpand\tb@mrgDigitFmt{%
+ \theeqquestionnoi\eqe@decPointMrg}}%
+ \fi
+ }%
+% \end{macrocode}
+% We have finished constructing \cs{eqe@prehold}. We next set
+% \cs{ftb@isANSListOpen} to \texttt{true}, if \cs{WithinANSGrp} is \texttt{true}.
+% \begin{macrocode}
+ \ifWithinANSGrp\global\ftb@isANSListOpentrue\fi
+% \end{macrocode}
+% If we are within an open group, we emit \cs{insMidMarg} with the
+% \cs{eqe@prehold}, followed by \texttt{\#2}, and a comma-space combo,
+% but \emph{we do not close} the \texttt{eqeList} environment.
+% \begin{macrocode}
+ \ifWithinANSGrp
+ \expandafter\insMidMarg\expandafter
+ {\eqe@prehold#2\grpANSDelimiter}%
+ \else
+% \end{macrocode}
+% This is the normal case, we insert \cs{eqe@prehold}, \texttt{\#2}, and
+% close the \texttt{eqeList} environment.
+%
+% \begin{macrocode}
+ \expandafter\insMidMarg%
+ \expandafter{\eqe@prehold#2\end{eqeList}}%
+ \global\ftb@isANSListOpenfalse
+ \fi
+ \fi % \ifismarginans
+ \fi %\ifisinstred
+}
+% \end{macrocode}
+% End (10/13)
+% \begin{environment}{eqeList}
+% An environment used to format the answers in the margins, when
+% \texttt{marginans} is in effect.
+% \begin{macrocode}
+\newenvironment{eqeList}[2][\tb@woparts@len]{\begin{list}{#2}{%
+ \def\argi{#1}\setlength{\labelwidth}{#1}%
+ \ifx\argi\tb@wparts@len
+ \settowidth{\labelsep}{\eqe@prtsepMrg}\else
+ \settowidth{\labelsep}{\eqe@hspannerMrg}\fi
+ \setlength{\leftmargin}{\labelwidth+\labelsep}%
+ \setlength{\parskip}{0pt}\setlength{\partopsep}{0pt}%
+ \setlength{\topsep}{1pt}\setlength{\parsep}{0pt}%
+ \setlength{\itemindent}{0pt}\setlength{\itemsep}{3pt}%
+}\item\relax}{\end{list}}
+% \end{macrocode}
+% \end{environment}
+% \paragraph*{Formatting Answers and Solutions}
+% \begin{macro}{\mrgDigitFmt}
+% Format of the digit (and the decimal point) for the answers in the margins.
+%\begin{verbatim}
+%\mrgDigitFmt{\textbf{#1}}
+%\mrgPartFmt{\textbf{(\hfil#1\hfil)}}
+%\setMarIndents[\bfseries\normalsize\normalfont]{00}{(d)}
+%\end{verbatim}
+% \begin{macrocode}
+\newcommand{\mrgDigitFmt}[1]{\def\tb@mrgDigitFmt##1{#1}}
+\mrgDigitFmt{#1}
+% \end{macrocode}
+% \begin{macro}{\mrgPartFmt}
+% Format of the part (including possibly the parentheses), example give above.
+% \begin{macrocode}
+\definecolor{MRGPARTcolor}{named}{black}
+\newcommand{\mrgPartFmt}[1]{\def\tb@mrgPartFmt##1{#1}}
+\mrgPartFmt{\textcolor{MRGPARTcolor}{(\hfil#1\hfil)}}
+% \end{macrocode}
+% \end{macro}
+% \end{macro}
+% \end{macro}
+% \begin{macro}{ANScolor}
+% The default color of the answers that appear in the margins or inline.
+% \begin{macrocode}
+\definecolor{ANScolor}{rgb}{0,0,.8}
+% \end{macrocode}
+% \end{macro}
+% \begin{macro}{\ANSFmt}
+% The command that sets the format, may be redefined as needed. Used in the
+% \cs{ANS} command above.
+% \begin{macrocode}
+\newcommand{\ANSFmt}[2]{\textcolor{ANScolor}{#2}}
+% \end{macrocode}
+% \end{macro}
+% We have two environments that we use in three different situations:
+%\begin{itemize}
+% \item \texttt{eqequestions} environment: (1) Used to control the display of the
+% \texttt{probset} environment within the body of the textbook; (2) used
+% to control the display of the solutions ``in the back of the book.''
+% \item \texttt{eqeList} environment: Used for displaying answers in the margin of
+% the book, when the appropriate options allow it.
+%\end{itemize}
+% We want to be able to manipulate some of the parameters of these three
+% situation, independently of each other. There are several issues, setting
+% what I have been calling the gutter width, and the display of the problem
+% numbers.
+%\par\medskip\noindent
+% We define four commands for each of the three situations described above. The names
+% have a pattern to them, and similarly named commands have the same use.
+%
+% The numbering of the problems has the pattern: \verb*!dd. (a) !
+% We provide convenience commands to give these internal macros values
+% \begin{macro}{\prbDecPt}
+% \begin{macro}{\prbPrtsep}
+% \begin{macro}{\prbNumPrtsep}
+% Basic parameters for the problems in the body of the text.
+% \begin{macrocode}
+\def\eqe@decPointPrb{.} % decimal point of prob number
+\def\eqe@prtsepPrb{\ } % prob with parts, space after part
+\def\eqe@hspannerPrb{\ } % space after prob number
+\providecommand{\prbDecPt}[1]{\def\eqe@decPointPrb{#1}}
+\providecommand{\prbPrtsep}[1]{\def\eqe@prtsepPrb{#1}}
+\providecommand{\exPrtsep}[1]{\def\eqe@prtsepPrb{#1}}
+\providecommand{\prbNumPrtsep}[1]{\def\eqe@hspannerPrb{#1}}
+% \end{macrocode}
+% \end{macro}
+% \end{macro}
+% \end{macro}
+% \begin{macro}{\solDecPt}
+% \begin{macro}{\solPrtsep}
+% \begin{macro}{\solNumPrtsep}
+% Basic parameters for the problems in the solution sets.
+% \begin{macrocode}
+\def\eqedecPointSoln{.} % decimal point of prob number
+\def\eqe@prtsepSoln{\ } % prob with parts, space after part
+\def\eqe@hspannerSoln{\ } % space after prob number
+\newcommand{\solDecPt}[1]{\def\eqedecPointSoln{#1}}
+\newcommand{\solPrtsep}[1]{\def\eqe@prtsepSoln{#1}}
+\providecommand{\solNumPrtsep}[1]{\def\eqe@hspannerSoln{#1}}
+% \end{macrocode}
+% \end{macro}
+% \end{macro}
+% \end{macro}
+% \begin{macro}{\mrgDecPt}
+% \begin{macro}{\mrgPrtsep}
+% \begin{macro}{\mrgNumPrtsep}
+% Basic parameters for the problems in the margins.
+% \begin{macrocode}
+\def\eqe@decPointMrg{.} % decimal point of prob number
+\def\eqe@prtsepMrg{\ } % prob with parts, space after part
+\def\eqe@hspannerMrg{\ } % space after prob number
+\newcommand{\mrgDecPt}[1]{\def\eqe@decPointMrg{#1}}
+\newcommand{\mrgPrtsep}[1]{\def\eqe@prtsepMrg{#1}}
+\newcommand{\mrgNumPrtsep}[1]{\def\eqe@hspannerMrg{#1}}
+% \end{macrocode}
+% \end{macro}
+% \end{macro}
+% \end{macro}
+% \begin{macro}{\setMarIndents}
+% Sets some dimensions used by the \texttt{eqeList} environment.
+% \cs{tb@woparts@len} is calculated and
+% is used as the default gutter width in \texttt{eqeList}. \cs{tb@wparts@len}
+% is used for the gutter width for the gutter width when there is a problem
+% with parts. Finally, \cs{tbmrgpartwdth} in \cs{ANS} and is used for the width
+% of a \cs{makebox} that enclosed the part letter.
+% \begin{macrocode}
+\newcommand{\setMarIndents}[3][\normalsize\normalfont]{{%
+ \settowidth{\@tempdima}{#1#2\eqe@decPointMrg}%
+ \xdef\tb@woparts@len{\the\@tempdima}%
+ \settowidth{\@tempdima}%
+ {#1#2\eqe@decPointMrg\eqe@hspannerMrg#3}%
+ \xdef\tb@wparts@len{\the\@tempdima}%
+ \settowidth{\@tempdima}{#1#3}%
+ \xdef\tbmrgpartwdth{\the\@tempdima}%
+}}
+\setMarIndents{00}{(d)}
+% \end{macrocode}
+% \end{macro}
+% \begin{macro}{\setSolnIndent}
+% Used to set the some parameters used by \texttt{eqequestions}, in the solutions file.
+% \begin{macrocode}
+\newdimen\solnGutter
+\newcommand{\setSolnIndent}[3][\normalsize\normalfont\bfseries]{%
+ {\settowidth{\@tempdima}{#1#2\eqedecPointSoln\eqe@hspannerSoln}%
+ \global\solnGutter\@tempdima
+ \settowidth{\@tempdima}{#1#3}%
+ \xdef\tbsolnpartwdth{\the\@tempdima}%
+}}
+\setSolnIndent{00}{(d)}
+% \end{macrocode}
+% \end{macro}
+% \begin{macro}{\setSolnMargins}
+% This command is written to the solution file, and expanded when that file
+% is input back in. If \cs{solnGutter} is not \texttt{0pt}, we set the length
+% of \cs{eqemargin} using the current value; otherwise, we use the value
+% determined by \cs{setSolnIndent}, above.
+% \begin{macrocode}
+\renewcommand{\setSolnMargins}[1]{%
+ \ifdim\solnGutter=0pt \setlength\eqemargin{#1}\else
+ \setlength\eqemargin{\solnGutter}\fi}
+%\newcommand{\defaultSolnIndent}{\gdef\solnGutter{0pt}}
+\newcommand{\defaultSolnIndent}{\global\solnGutter=0pt}
+\defaultSolnIndent
+% \end{macrocode}
+% \end{macro}
+% \begin{macro}{\prbNumFmt}
+% \begin{macro}{\solWoPrtsFmt}
+% \begin{macro}{\solWPrtsFmt}
+% We redefine \cs{exlabelformat}, \cs{exsllabelformat}, and
+% \cs{exsllabelformatwp}. They are defined in such a way as
+% to simply their modification through a series of simple
+% formatting commands. The defaults are
+%\begin{verbatim}
+%\prbNumFmt{\textbf{#1}}
+%\solWoPrtsFmt{\textbf{#1}}
+%\solWPrtsFmt{\textbf{#1}}{(\hfil#2\hfil)}
+%\end{verbatim}
+% \begin{macrocode}
+\renewcommand{\exlabelformat}{%
+ \tbprbNumFmt{\theeqquestionnoi\eqe@decPointPrb}}
+% \end{macrocode}
+% \cs{prbNumFmt} is the format for the number of the problems
+% in the body of the text. The argument \texttt{\#1} is a symbolic
+% argument for the question number.
+% \begin{macrocode}
+\newcommand{\prbNumFmt}[1]{\def\tbprbNumFmt##1{#1\eqe@hspannerPrb}}
+\prbNumFmt{\textbf{#1}}
+% \end{macrocode}
+% Redefine \cs{exsllabelformat}, and \cs{exsllabelformatwp}
+% \begin{macrocode}
+\renewcommand{\exsllabelformat}{\string\tbsolWoPrtsFmt{%
+ \theeqquestionnoi\string\eqedecPointSoln}}
+\renewcommand{\exsllabelformatwp}{\string\tbsolWPrtsFmt%
+ {\string\eqedsplyOnlyFrst{\theeqquestionnoi}{\thepartno}}%
+ {\thepartno}%
+}
+% \end{macrocode}
+% \cs{solWoPrtsFmt} is the format for the number of the problems
+% in the solution set. The argument \texttt{\#1} is a symbolic
+% argument for the question number. \cs{solWPrtsFmt} is the format
+% for a problem with parts in the solution file. \texttt{\#1} is
+% symbolically the question number, and \texttt{\#2} is a
+% symbolic for the part letter.
+% \begin{macrocode}
+\newcommand{\solWoPrtsFmt}[1]{\def\tbsolWoPrtsFmt##1{%
+ \makebox[0pt][r]{#1\eqe@hspannerSoln}}}
+\solWoPrtsFmt{\textbf{#1}}
+\newcommand{\solWPrtsFmt}[2]{\def\tbsolWPrtsFmt##1##2{%
+ \makebox[0pt][r]{#1\eqe@hspannerSoln}%
+ \makebox[\tbsolnpartwdth][l]{#2}\eqe@prtsepSoln%
+}}
+\solWPrtsFmt{\textbf{#1}}{(\hfil#2\hfil)}
+% \end{macrocode}
+% An alternate definition for \cs{solWPrtsFmt}, used by \cs{hangSolWPrtsFmt}.
+% \begin{macrocode}
+\newcommand{\solWPrtsFmt@hang}[2]{%
+ \def\tbsolWPrtsFmt##1##2{%
+ \makebox[0pt][r]{#1\eqe@prtsepSoln%
+ \makebox[\tbsolnpartwdth][l]{#2}\eqe@hspannerSoln}%
+}}
+% \end{macrocode}
+% \end{macro}
+% \end{macro}
+% \end{macro}
+% \begin{macro}{\hangSolWPrtsFmt}
+% The command takes two arguments, the same as \cs{solWPrtsFmt}. When this
+% command is executed in the preamble, we get hanging indentation for problems
+% with parts.
+%\changes{v3.0g}{2011/08/15}{Use this to use ``hanging indentation'' for the
+% parts for problems with parts in the solutions file.}
+% \begin{macrocode}
+\let\bpartsmrk\relax
+\let\epartsmrk\relax
+\newcommand{\hangSolWPrtsFmt}[2]{%
+% \end{macrocode}
+% At the beginning and ending of a parts environment, we begin and end
+% a special \texttt{eqepartsquestions} environment, designed to give
+% the desired indentation.
+% \begin{macrocode}
+ \def\prior@parts@hook{%
+ \ifisleadin\else
+ \writeToSolnFile{^^J\protect\bpartsmrk}\fi}%
+ \def\post@parts@hook{%
+ \writeToSolnFile{\protect\epartsmrk^^J}}%
+ \def\bpartsmrk{\global\firstitemtrue\begin{eqepartsquestions}}%
+ \def\epartsmrk{\end{eqepartsquestions}\global\firstitemfalse}%
+% \end{macrocode}
+% We must also redefine \cs{solWPrtsFmt} by letting it to
+% \cs{solWPrtsFmt@hang}, then executing it using the parameters passed.
+% \begin{macrocode}
+ \let\solWPrtsFmt\solWPrtsFmt@hang
+ \solWPrtsFmt{#1}{#2}%
+}
+%\@onlypreamble\hangSolWPrtsFmt
+% \end{macrocode}
+% \end{macro}
+% Define some switches, token registers, and boxes for managing
+% the answers and marginal notes.
+% \begin{macrocode}
+\newif\ifexamenv \examenvfalse
+\newif\iffirstemit \firstemittrue
+\newtoks\txtbkt@ks \txtbkt@ks={}
+\newtoks\txtbkt@ksi \txtbkt@ksi={}
+\newbox\txtbkb@xb@t
+\newbox\txtbkb@xt@p
+\newbox\txtbkb@xh@ld
+\let\tbTopMargin\relax
+\let\tbBotMargin\relax
+\long\def\tb@addtoTopMargin#1{\txtbkt@ksi={#1}%
+ \edef\eqe@tmphold{\the\txtbkt@ksi\the\txtbkt@ks}%
+ \global\txtbkt@ks=\expandafter{\eqe@tmphold}%
+}
+\newcommand{\tb@addtoMargin}[1]{%
+ \edef\eqe@tmphold{\the\txtbkt@ks}%
+ \global\txtbkt@ks=\expandafter{\eqe@tmphold#1}%
+}
+% \end{macrocode}
+% As my first attempt, let's create two comment environmets to be used within
+% the \texttt{solution} environment.
+%\begin{verbatim}
+%\begin{solution}
+%\begin{ssol}
+% <short solution/answer>
+%\end{ssol}
+%\begin{lsol}
+% <long solution>
+%\end{lsol}
+%\end{solution}
+%\end{verbatim}
+% The control of these environments are made through
+% \begin{environment}{lsol}
+% \begin{macro}{\tb@showlsols}
+% Place full (or long) solutions in this environment.
+% \begin{macrocode}
+\newcommand{\tb@showlsols}{\includecomment{lsol}\excludecomment{ssol}}
+% \end{macrocode}
+% \end{macro}
+% \end{environment}
+% \begin{environment}{ssol}
+% \begin{macro}{\tb@showssols}
+% Place short solutions in this environment.
+% \begin{macrocode}
+\newcommand{\tb@showssols}{\includecomment{ssol}\excludecomment{lsol}}
+% \end{macrocode}
+% \end{macro}
+% \end{environment}
+% The default is to show the short solutions.
+% \begin{macrocode}
+\let\tb@soln@choice\tb@showssols
+%\let\tb@sols@choice\tb@showssols
+% \end{macrocode}
+% \subsection{Marginal Matter.} There are three levels in the margins:
+% \begin{enumerate}
+% \item \textbf{Top level}: This is a command \cs{tbTopMargin} with may be
+% redefined between pages. It should have the width of the \cs{parbox}
+% that contains all the content of the margin, this width is \cs{tb@marparboxwidth}
+% (\texttt{\cs{oddsidemargin}-\cs{marginparsep}}). The content \emph{must} be
+% unbreakable across pages. The content of \cs{tbTopMargin} will appear \emph{on
+% every page subsequent to its definition}.
+% \item[] \DescribeMacro{\clearTopMargin} We can clear the top level using the following command
+% \begin{macrocode}
+\newcommand{\clearTopMargin}{\global\let\tbTopMargin\relax}
+% \end{macrocode}
+% \item[] Clearing will take effect on the following page.
+% \item[] \DescribeMacro{\setTopMargin} As a convenience macro, we can create top margin content.
+% Redefinitions will appear on the next page from where the definition was made.
+% \begin{macrocode}
+\newcommand{\setTopMargin}[1]{%
+ \gdef\tbTopMargin{\color@begingroup\normalcolor
+ #1\color@endgroup}%
+ \gdef\tbSaveTopMargin{\color@begingroup\normalcolor
+ #1\color@endgroup}}
+\let\tbTopMargin\@empty
+\let\tbSaveTopMargin\@empty
+% \end{macrocode}
+% \item \textbf{Middle level}: The middle level is the most interesting. You write to it
+% using \cs{insMidMarg}. Normally, this is text. If there is too much text,
+% it will be split off and placed in the middle level of the next page. The command
+% \cs{ANS} also writes to the middle level when the \texttt{instred} and \texttt{marginans} options are
+% taken.
+% \item \textbf{Bottom level}: This is similar to the top level, but on the bottom. The
+% command is named \cs{tbBotMargin} and follows the same rules as \cs{tbTopMargin}.
+% Again, the content of \cs{tbBotMargin} will appear \emph{on every
+% page subsequent to its definition}.
+% \item[] \DescribeMacro{\clearBotMargin} We can clear the bottom level using the following command
+% \begin{macrocode}
+\newcommand{\clearBotMargin}{\global\let\tbBotMargin\relax}
+% \end{macrocode}
+% \item[] Clearing will take effect on the following page.
+% \item[] \DescribeMacro{\setBotMargin} As a convenience macro, we can create bottom margin content.
+% Redefinitions will appear on the next page from where the definition was made.
+% \begin{macrocode}
+\newcommand{\setBotMargin}[1]{\gdef\tbBotMargin{#1}%
+ \gdef\tbSaveBotMargin{#1}}
+\let\tbBotMargin\@empty
+\let\tbSaveBotMargin\@empty
+% \end{macrocode}
+% \begin{macrocode}
+\newcommand{\restoreLastTopMargin}{\expandafter\setTopMargin
+ \expandafter{\tbSaveTopMargin}}
+\newcommand{\restoreLastBotMargin}{\expandafter\setBotMargin
+ \expandafter{\tbSaveBotMargin}}
+% \end{macrocode}
+% \end{enumerate}
+%
+% \begin{macro}{\insMidMarg}
+% \cs{insMidMarg} is a \cs{parbox} that will hold the material in the margin.
+% \begin{macro}{\MarParBoxFmt}
+% The formatting for the marginal \cs{parbox}
+% \begin{macrocode}
+\newcommand{\MarParBoxFmt}{\normalsfcodes
+ \normalfont\normalsize\normalbaselines\parindent0pt
+ \vbadness\@Mi \hbadness5000 \tolerance9999
+ \parskip0pt\raggedright %\spaceskip=0pt\xspaceskip=0pt
+ \setlength{\linewidth}{\tbmarparboxwidth}%
+}
+% \end{macrocode}
+% \end{macro}
+% \begin{macro}{\tbmarparboxwidth}
+% The width of the margin box. Initial value of \texttt{1sp}, if the user does not
+% reset the value, it is a package error.
+% \begin{macrocode}
+\newlength\tbmarparboxwidth
+\setlength\tbmarparboxwidth{1sp}
+% \end{macrocode}
+% \end{macro}
+% \begin{macro}{MidMargcolor}
+% The default color of text of the middle level
+% \begin{macrocode}
+\definecolor{MidMargcolor}{rgb}{0,0,.8}
+\newcommand{\midMargFmt}[1]{%
+ \def\tb@midMargFmt{\normalfont\normalsize\normalcolor#1}}
+\midMargFmt{\color{MidMargcolor}}
+% \end{macrocode}
+% \end{macro}
+% \begin{macro}{\eqe@MarParBox}
+% This is the actual \cs{parbox} that holds the marginal material. I have two versions
+% of this box, the first one has height \cs{textheight}, the second one has height
+% \texttt{\cs{textheight}+\cs{footskip}}.
+% \begin{macrocode}
+%\def\eqe@MarParBox#1{\parbox[b][\textheight][t]%
+% {\tbmarparboxwidth}{\color{MidMargcolor}#1}}
+\def\eqe@MarParBox#1{\lower\footskip\hbox{%
+ \leavevmode\parbox[b][\textheight+\footskip][t]%
+ {\tbmarparboxwidth}{\tb@midMargFmt#1}}} %
+% \end{macrocode}
+% \end{macro}
+% Finally, we get to the \cs{insMidMarg}, this is used to write to the middle
+% level.
+% \begin{macrocode}
+\newcommand{\insMidMarg}[1]{%
+ \let\eqe@margininsert\@empty
+ \expandafter\tb@addtoMargin\expandafter{\eqe@margininsert#1}%
+}
+% \end{macrocode}
+% \end{macro}
+% \begin{macro}{\tbPreMarginHeader}
+% Executed prior to the marginal heading
+% \begin{macro}{\tbPostMarginHeader}
+% Executed after the marginal heading
+% \begin{macro}{HEADERcolor}
+% Default color of a marginal header
+% \begin{macro}{\cngMargHeadColorTo}
+% Changes the marginal header to a named color
+%\changes{v3.0o}{2011/09/20}{Added \cs{cngMargHeadColorTo} and
+% \cs{resetMargHeadColor} to make it easier to change the color
+% of the header globally, or just once.}
+% \begin{macro}{\resetMargHeadColor}
+% Reset the marginal header color to the default, \texttt{HEADERcolor}
+% \begin{macro}{\tbMarginHeaderFmt}
+% Formatting for a marginal header.
+% Format the marginal header, the default is \texttt{HEADERcolor} in bold
+% \begin{macrocode}
+\newcommand{\tbPreMarginHeader}{\par\penalty0 \kern3pt}
+\newcommand{\tbPostMarginHeader}{\par\nobreak}
+\definecolor{HEADERcolor}{named}{black}
+\newcommand{\cngMargHeadColorTo}[1]{\insMidMarg{\gdef\tb@MHC{#1}}}
+\newcommand{\resetMargHeadColor}{\insMidMarg{\gdef\tb@MHC{HEADERcolor}}}
+\resetMargHeadColor
+\newcommand{\tbMarginHeaderFmt}[1]{\textcolor{\tb@MHC}{\textbf{#1}}}
+% \end{macrocode}
+% \end{macro}
+% \end{macro}
+% \end{macro}
+% \end{macro}
+% \end{macro}
+% \end{macro}
+% \begin{macro}{\insMargHead}
+% Used to insert a general marginal heading into the middle level. The
+% optional parameter allows you to set a mark.
+%
+% \begin{macro}{\insProbHead}
+% Used to insert a marginal heading for a problem set into the middle level.
+% The optional parameter allows you to insert a mark, the default mark is
+% \verb!#1 \tbcontinued!.
+% \begin{macrocode}
+\newcommand{\insMargHead}[2][]{% dps
+ \insMidMarg{\tb@marginHeader{#1}{#2}}}
+\newcommand{\insProbHead}[2][]{%
+ \def\tb@argi{#1}\ifx\tb@argi\@empty
+ \protected@xdef\currProbHead{#2 \tbcontinued}\else
+ \protected@xdef\currProbHead{#1}\fi
+ \ifisinstred\ifismarginans
+ \insMidMarg{\tb@marginProbHeader{#1}{#2}}\fi\fi
+}
+\newcommand{\tb@marginProbHeader}[2]{%
+ \def\tb@argi{#1}\ifx\tb@argi\@empty
+ \tb@marginHeader{#2 \tbcontinued}{#2}\else
+ \tb@marginHeader{#1}{#2}\fi
+}
+\newcommand{\tb@marginHeader}[2]{\tbPreMarginHeader
+ \tbMarginHeaderFmt{#2}\def\tb@argi{#1}\ifx\tb@argi\@empty
+ \mark{#2}\else\mark{#1}\fi\tbPostMarginHeader
+}
+% \end{macrocode}
+% \end{macro}
+% \end{macro}
+% \begin{macro}{\tbcontinued}
+% The continue annot that appear when a problem set flows over to the next page.
+% \begin{macrocode}
+\newcommand{\tbcontinued}{(cont.)}
+% \end{macrocode}
+% \end{macro}
+% \begin{macro}{\tbplaceMargins}
+% Redefine this macro to set the locations of the margins we are writing to.
+% \begin{macrocode}
+\newcommand{\marparboxwidth}[1]{%
+ \setlength\tbmarparboxwidth{#1}%
+ \setlength{\marginparwidth}{\tbmarparboxwidth}%
+ \tbMakeFinalCalcs
+}
+\@onlypreamble\marparboxwidth
+\newcommand{\chkmarginboxwidth}{%
+ \ifdim\tbmarparboxwidth=1sp \PackageError{eqexam}%
+ {You have not set the value of\MessageBreak
+ \string\marparboxwidth}%
+ {Define the \string\marparboxwidth\space command}\fi
+}
+% \end{macrocode}
+% \begin{macro}{\ifmarginsonleft}
+% A Boolean switch, if true, all margins are on the left; otherwise, they alternate
+% \begin{macrocode}
+\newif\ifmarginsonleft \marginsonleftfalse
+% \end{macrocode}
+% \end{macro}
+% \begin{macro}{\tbSetupForMargins}
+% We compute \cs{oddsidemargin}, \cs{evensidemargin}, and \cs{textwidth}
+% \begin{macrocode}
+\newcommand{\tbSetupForMargins}{%
+ \ifmarginsonleft
+ \setlength{\oddsidemargin}{\tbmarparboxwidth+\marginparsep}%
+ \setlength{\evensidemargin}{\oddsidemargin}%
+ \setlength{\textwidth}{\paperwidth-2in-\oddsidemargin}%
+ \else
+ \setlength{\oddsidemargin}{0pt}%
+ \setlength{\evensidemargin}{\tbmarparboxwidth+\marginparsep}%
+ \setlength{\textwidth}{%
+ \paperwidth-2in-\oddsidemargin-\evensidemargin}%
+ \fi
+}
+% \end{macrocode}
+% \end{macro}
+% \begin{macro}{\tbplaceMargins}
+% We calculate the coordinates of the lower left hand corner of the margin \cs{parbox}
+% depending on the value of \cs{ifmarginsonleft}.
+% \begin{macrocode}
+\newcommand{\tbplaceMargins}{{%
+ \setlength{\@tempdima}{%
+ \paperheight-1in-\topmargin-\headheight-\headsep-\textheight}%
+ \xdef\@evenlly{\strip@pt\@tempdima}%
+ \xdef\@oddlly{\@evenlly}%
+ \setlength{\@tempdima}{1in}%
+ \xdef\@evenllx{\strip@pt\@tempdima}%
+ \ifmarginsonleft\else
+ \setlength{\@tempdima}{1in+\textwidth+\marginparsep}\fi
+ \xdef\@oddllx{\strip@pt\@tempdima}%
+}}
+% \end{macrocode}
+% \end{macro}
+% \end{macro}
+% \begin{macro}{\tbMakeFinalCalcs}
+% Executed by \cs{marparboxwidth}
+% \begin{macrocode}
+\newcommand{\tbMakeFinalCalcs}{%
+ \tbSetupForMargins
+ \tbplaceMargins
+}
+% \end{macrocode}
+% \end{macro}
+% \begin{macro}{\tbminskipbtnlayers}
+% \cs{tbminskipbtnlayers} is the minimum skip between layers (top, middle, bottom)
+% Executed by \cs{marparboxwidth}
+% \begin{macrocode}
+\newlength\tbminskipbtnlayers
+\setlength{\tbminskipbtnlayers}{6pt}
+% \end{macrocode}
+% \end{macro}
+% \begin{macrocode}
+\newif\ifiscarryover \iscarryoverfalse
+% \end{macrocode}
+% \begin{environment}{carryoverFmt}
+% is a work-around for the color problem
+% experienced with carry over text: Suppose there is a change of
+% color of the text on the previous page, the carry over text will naturally be
+% colored the default color, \texttt{MidMargcolor}. To continue the text with the same color
+% as the one the previous page, we enclose the text in the
+% \texttt{carryoverFmt} environment.
+% \begin{macrocode}
+\newenvironment{carryOverFmt}[1]{#1\let\tb@carryoverFmt\@empty
+ \c@rryoverFmt{#1}}{}
+% \end{macrocode}
+% \end{environment}
+% This command is called by the \texttt{carryOverFmt} environment.
+% it takes its argument, which is a change in color or style, and
+% defines \cs{tb@carryoverFmt}, which will be executed on the next page.
+% \begin{macrocode}
+\def\c@rryoverFmt#1{%
+ \ifx\tb@carryoverFmt\@empty
+ \global\let\tb@carryoverFmt\@empty
+ \xdef\tb@co@page{\thepage}%
+ \gdef\tb@carryoverFmt{\ifnum\thepage>\tb@co@page\relax
+ #1\global\let\tb@carryoverFmt\@empty\fi}%
+ \fi
+}
+\let\tb@carryoverFmt\@empty
+% \end{macrocode}
+% \cs{tb@insertCarryOver} takes its argument, that is always
+% \verb!\unvbox\txtbkb@xb@t}!, and if there is any carryover
+% content, will insert its argument followed by a copy,
+% \cs{tb@rest@reMarginFmt} of the default margin format. This seems
+% to work for recovering from a change of text or style over a page
+% boundary.
+% \begin{macrocode}
+\let\tb@rest@reMarginFmt\relax
+\def\tb@insertCarryOver#1{%
+ \let\tb@rest@reMarginFmt\relax
+ \ifiscarryover\ifx\tb@carryoverFmt\@empty\else
+ \let\tb@rest@reMarginFmt\tb@midMargFmt
+ \tb@carryoverFmt\fi\fi
+ #1 \tb@rest@reMarginFmt
+}
+% \end{macrocode}
+% \begin{macro}{\eqe@tb@shipout}
+% We define the shipout to the margins.\par\medskip\noindent
+% \textbf{Bug:} When I use \textsf{graphicxsp}, embed the picture (such as a logo),
+% and use that picture as the \cs{setTopMargin}, the shipout routine is executed
+% twice for each page. I haven't figured out what causes this, but here is a
+% work around. We record the most recent page number, if it equals the page number
+% of the last iteration of \cs{eqe@tb@shipout}, we do nothing; otherwise,
+% execute the shipout code.
+% \begin{macrocode}
+\newif\iftb@shipoutPermitted \tb@shipoutPermittedtrue
+\newcommand{\turnOnFTBShipout}{\global\tb@shipoutPermittedtrue}
+\newcommand{\turnOffFTBShipout}{\global\tb@shipoutPermittedfalse}
+% \end{macrocode}
+%\changes{v3.7a}{2015/02/26}{Added a new Boolean switch \cs{iftb@shipoutPermitted}
+% to turn off the shipout. Two convenience commands in support are also added,
+% \cs{turnOffFTBShipout} and \cs{turnOffFTBShipout}.}
+% \DescribeMacro{\turnOnFTBShipout}\cmd{\turnOnFTBShipout} turns on the shipout,
+% the default, and \DescribeMacro{\turnOffFTBShipout}\cmd{\turnOffFTBShipout}
+% turns it off.
+% \begin{macrocode}
+\newcommand{\eqe@tb@shipout}{\iftb@shipoutPermitted
+ \ifnum\arabic{page}=\tblastpageshipped
+ \let\tb@so@next\relax\else
+ \xdef\tblastpageshipped{\arabic{page}}%
+ \def\tb@so@next{\eqe@tb@ship@ut}\fi
+ \expandafter\tb@so@next\fi
+}
+\def\tblastpageshipped{-100}
+% \end{macrocode}
+% Here is the actual shipout code for writing to the margins.
+% \begin{macrocode}
+\newcommand{\eqe@tb@ship@ut}{%
+ \fboxsep=0pt\setlength{\unitlength}{1pt}%
+ \global\setbox\txtbkb@xb@t=\vbox\bgroup
+ \color@begingroup
+ \hsize=\tbmarparboxwidth
+ \vsize=\textheight
+ \MarParBoxFmt
+ \csname tbTopMargin\endcsname
+ \vskip\tbminskipbtnlayers
+\set@typeset@protect
+ \the\txtbkt@ks
+ \color@endgroup\vfil
+ \egroup
+ \global\setbox\txtbkb@xt@p=\vsplit\txtbkb@xb@t to\textheight
+ \ifvoid\txtbkb@xb@t\global\iscarryoverfalse
+ \else\global\iscarryovertrue\fi
+% \end{macrocode}
+% We have three levels the top (\cs{tbTopMargin}), the bottom (\cs{tbBotMargin}),
+% and the middle (\cs{txtbkt@ks}). \cs{tbTopMargin} is no problem but \cs{tbBotMargin}
+% requires some special attention.
+% \begin{macrocode}
+ \ifx\tbBotMargin\relax\else
+% \end{macrocode}
+% If \cs{tbBotMargin} is not \cs{relax}, we begin by putting \cs{tbBotMargin}
+% into a \cs{vbox} under the same assumptions, and get its height.
+% \begin{macrocode}
+ \bgroup\setbox2=\vbox{%
+ \color@begingroup\normalcolor
+ \hsize=\tbmarparboxwidth\kern0pt
+ \MarParBoxFmt\csname tbBotMargin\endcsname
+ \color@endgroup
+ \kern0pt
+ }%
+% \end{macrocode}
+% We reduce \cs{textheight} by the height of \cs{tbBotMargin}
+% \begin{macrocode}
+ \dimen0=\textheight
+ \advance\dimen0-\ht\txtbkb@xh@ld
+ \advance\dimen0-\tbminskipbtnlayers
+% \end{macrocode}
+% We split off the top material by this amount, the new bottom
+% is in \cs{txtbkb@xt@p} the new top is in \cs{box0}
+% \begin{macrocode}
+ \setbox0=\vsplit\txtbkb@xt@p to \dimen0
+% \end{macrocode}
+% The new bottom (which will overflow to the next page) is the content
+% we clipped off bottom of \cs{txtbkb@xt@p} and the original overflow
+% material still in \cs{txtbkb@xb@t}.
+% \changes{v4.6}{2016/01/18}{Removed \cs{vfil} between unboxing, this allows
+% correct breaking of margin content across pages.}
+% \begin{macrocode}
+ \global\setbox\txtbkb@xb@t=\vbox{%
+ \unvbox\txtbkb@xt@p\unvbox\txtbkb@xb@t}%
+% \end{macrocode}
+% We then patch everything together the new top
+% is in \cs{txtbkb@xt@p} the new top is in \cs{@tempboxa} followed by
+% \cs{tbBotMargin} (in \cs{box}\cs{txtbkb@xh@ld}).
+% \begin{macrocode}
+ \global\setbox\txtbkb@xt@p=\vbox{\unvbox0
+ \vfill\vskip\tbminskipbtnlayers
+ \vfil\unvbox2\relax}\egroup
+ \fi
+ \ifodd\value{page}%
+ \put(\@oddllx,\@oddlly){%
+ \eqe@MarParBox{\unvbox\txtbkb@xt@p}}\else
+ \put(\@evenllx,\@evenlly){%
+ \eqe@MarParBox{\unvbox\txtbkb@xt@p}}\fi
+% \end{macrocode}
+% We see if there is any carry over, if yes, we insert into
+% \cs{txtbkt@ks} for use on the next page, along with a heading,
+% if any.
+% \begin{macrocode}
+ \global\txtbkt@ks={}\ifvoid\txtbkb@xb@t\else
+% \end{macrocode}
+% We test whether these is a \cs{splitbotmark}, if yes, then we will
+% insert it at the top of the next page with formatting.
+% \begin{macrocode}
+ \if!\splitbotmark!\global\let\tb@sbm@exp\relax\else
+ \xdef\tb@sbm@exp{\noexpand\tbPreMarginHeader
+ \noexpand\tbMarginHeaderFmt{\splitbotmark}%
+ \noexpand\tbPostMarginHeader
+ \noexpand\par\kern3pt}%
+ \fi
+% \end{macrocode}
+% Here is the content that will be carried over to the next page,
+% we insert a \cs{splitbotmark} if it is non-empty (\cs{tb@tmp@exp}).
+% \begin{macrocode}
+ \global\txtbkt@ks=\expandafter{\tb@sbm@exp
+ \tb@insertCarryOver{\unvbox\txtbkb@xb@t}}%
+ \fi
+}
+% \end{macrocode}
+% \end{macro}
+% \begin{macro}{\insertpageifcarryover}
+% This macro is use to generate a blank page if there is carry over from the
+% previous page. It is place just after the exercises, and before a new chapter of section.
+% The optional argument allows you to insert something into the new page, if one is
+% automatically created. The default is \cs{null}.
+% \begin{macrocode}
+\newcommand{\insertpageifcarryover}[1][\null]{%
+% \end{macrocode}
+% We begin by starting a new page, the shipout routine of previous page
+% will be initialized and can then get an accurate result for
+% \cs{ifiscarryover}.
+% \begin{macrocode}
+ \newpage
+% \end{macrocode}
+% If there is carryover, we create a new page by inserting
+% a content into the page. If there is no carry over, we do
+% now insert any content, and the page will not be created.
+% \begin{macrocode}
+ \ifiscarryover\def\eqeifnext{\csname iftrue\endcsname}%
+ \PackageInfo{eqexam}{Carry over of content in margin
+ from page \thepage.\MessageBreak Creating a blank page}\else
+ \def\eqeifnext{\csname iffalse\endcsname}\fi\eqeifnext#1\fi}
+% \end{macrocode}
+% \end{macro}
+% \begin{macro}{\setFullWidthHeader}
+% Makes the running header full width.
+% \begin{macrocode}
+\newcommand{\setFullWidthHeader}{%
+ \setlength{\@tempdima}{%
+ \evensidemargin+\tbmarparboxwidth+\marginparsep}%
+ \edef\@headoffset{\the\@tempdima}%
+ \def\@evenhead{\makebox[0pt]{\makebox[0pt][l]
+ {\thepage}\hspace{\@headoffset}}\hfil\slshape\leftmark}%
+ \ifmarginsonleft
+ \def\@oddhead{\makebox[0pt]{\makebox[0pt][l]
+ {\slshape\rightmark}\hspace{\@headoffset}}\hfil\thepage}%
+ \else
+ \def\@oddhead{{\slshape\rightmark}\hfil\makebox[0pt]
+ {\hspace{\@headoffset}\makebox[0pt][r]{\thepage}}}%
+ \fi
+}
+% \end{macrocode}
+% \end{macro}
+%
+% \subsection{In support of solutions at end of document and chapter}
+%
+% A feature that may not be used much is to have solutions at the end of each chapter.
+% \begin{macro}{\chaptersolutions}
+% If \cs{tb@EndOfChapterExercises} is executed, and
+% \cs{chaptersolutions} is placed between chapters, we can generate
+% solutions at the end of the chapters, instead of at the end of the book.
+% \cs{chaptersolutions} is \cs{let} to \cs{relax} unless
+% \cs{tb@EndOfChapterExercises} is executed. In this case
+% \cs{chaptersolutions} inputs the the \texttt{.sol} file, then
+% then opens it
+% \begin{macrocode}
+\newif\ifchapterexercises \chapterexercisesfalse
+\let\chaptersolutions\relax
+\def\tb@EndOfChapterExercises{%
+ \let\include@solutions@chapter\include@solutions
+ \def\includeexersolutions{%
+ \include@solutions@chapter
+ \global\let\include@solutions\relax
+ }%
+% \end{macrocode}
+% \cs{chaptersolutions} is redefined from \cs{relax}. Input current solutions,
+% close stream, open stream.
+% \begin{macrocode}
+ \def\chaptersolutions{%
+ \includeexersolutions
+ \immediate\closeout\ex@solns
+ \newwrite \ex@solns \global\let\quiz@solns\ex@solns
+ \immediate\openout \ex@solns \jobname.sol
+ \ifvspacewithsolns\writeAllAnsAtEnd\fi
+ }%
+}
+% \end{macrocode}
+% \end{macro}
+% \begin{macrocode}
+\def\writeallsolutions{\let\chaptersolutions\relax}
+% \end{macrocode}
+% \begin{macro}{\exercisesAtEndOfChapter}
+% If you want solutions at the end of each chapter, you'll have to
+% execute this command in the preamble. See \cs{initChapAfterSolns} for an
+% example of usage.
+% \begin{environment}{afterChapSolns}
+% This comment environment is a convenience for placing content between
+% chapters.
+% \begin{macrocode}
+\excludecomment{afterChapSolns}
+%\includecomment{solnsAtEnd}
+% \end{macrocode}
+% (2014/05/08) There is a problem with nested comment environments when \texttt{solnsAtEnd}
+% contains within it the \cs{includeexersolutions} command, especially when
+% \texttt{multicols} is used. The fix seems to redefine things so that
+% \texttt{solnsAtEnd} writes to a different CUT file
+% \begin{macrocode}
+\def\NewCommentCutFile{\def\CommentCutFile{solnsAtEnd.cut}}
+\def\RestoreCommentCutFile{\def\CommentCutFile{comment.cut}}
+\@ifundefined{BeforeIncludedComment}{%
+\long\def\solnsAtEndcomment
+ #1{\message{Special comment '#1'}%
+ \csarg\def{#1}{\endgroup \message{Processing '#1' comment.}%
+ \NewCommentCutFile\SetUpCutFile
+ % #2 before SetUp, so we can do renaming.
+ \message{Comment '#1' writing to \CommentCutFile.}%
+ \ProcessComment{#1}}%
+ \csarg\def{After#1Comment}{\immediate\closeout\CommentStream
+ \RestoreCommentCutFile\input{solnsAtEnd.cut}\relax}%
+ \CommentEndDef{#1}}
+}{\long\def\solnsAtEndcomment
+ #1{\message{Special comment '#1'}%
+ \csarg\def{After#1Comment}{\immediate\closeout\CommentStream
+ \RestoreCommentCutFile\input{solnsAtEnd.cut}\relax}%
+ \csarg\def{#1}{\NewCommentCutFile\BeforeIncludedComment\relax
+ \ProcessComment{#1}}%
+ \CommentEndDef{#1}}
+ }
+\solnsAtEndcomment{solnsAtEnd}
+\newcommand{\exercisesAtEndOfChapter}{%
+ \ifeq@nosolutions\else
+ \typeout{^^J!!!!!Executing in chapter solutions!!!!!^^J}
+ \chapterexercisestrue\tb@EndOfChapterExercises
+ \ifchapterexercises
+ \csarg\let{solnsAtEnd}\@gobble
+ \excludecomment{solnsAtEnd}%
+ \csarg\let{AftersolnsAtEndComment}\relax
+ \includecomment{afterChapSolns}\else
+ \excludecomment{afterChapSolns}\fi
+ \fi
+}
+\@onlypreamble\exercisesAtEndOfChapter
+% \end{macrocode}
+% \end{environment}
+% \end{macro}
+% \subsection{Modifying and restoring the Layout}
+% The book may need a wide page format and use multi-columns to display homework sets, or
+% solutions at the end if the book.
+% \begin{macro}{\setFullWidthLayout}
+% A command to set the page layout for the solutions in the back of the book. Typically,
+% we do away with the wide margins. We also save the current values of the parameters
+% we are changing so we can restore them later.
+% \begin{macrocode}
+\newcommand{\setFullWidthLayout}{%
+ \saveBasicLayoutParams
+ \setlength{\oddsidemargin}{0in}%
+ \setlength{\evensidemargin}{\oddsidemargin}%
+ \setlength{\textwidth}{\paperwidth-2in}%
+ \setlength{\linewidth}{\paperwidth-2in}%
+ \setlength{\columnseprule}{0pt}%
+ \def\@evenhead{\thepage\hfil\slshape\leftmark}%
+ \def\@oddhead{{\slshape\rightmark}\hfil\thepage}%
+}
+% \end{macrocode}
+% \begin{environment}{fullwidthtext}
+% When \cs{setFullWidthLayout} is in effect, we have the problem of writing text.
+% Originally, I used a \cs{parbox} with width of \cs{linewidth}, but this has it problems
+% when breaking across pages. We have instead an environment for writing; the list environment
+% obeys the current \cs{linewidth}, which is set to \cs{paperwidth-2in}, this latter value
+% may not always be correct (especially when the margins are smaller than 2in.
+% \begin{macrocode}
+\newenvironment{fullwidthtext}{%
+\begin{list}{}{%
+ \setlength{\labelwidth}{0pt}\setlength{\labelsep}{0pt}%
+ \setlength{\itemindent}{0pt}\setlength{\itemsep}{0pt}%
+ \setlength{\topsep}{0pt}\setlength{\parsep}{0pt}%
+ \setlength{\listparindent}{\parindent}%
+ \setlength{\leftmargin}{0pt}\setlength{\rightmargin}{0pt}
+}\item\relax}{\end{list}}
+% \end{macrocode}
+% \begin{macro}{\restorePageLayout}
+% Restore the last saved page parameters.
+% \begin{macrocode}
+\newcommand{\restorePageLayout}{\newpage
+ \setlength{\oddsidemargin}{\tb@osms}
+ \setlength\evensidemargin{\tb@esms}
+ \setlength{\textwidth}{\tb@tws}
+ \setlength{\linewidth}{\tb@lws}
+ \setlength{\columnseprule}{\tb@csr}
+}
+% \end{macrocode}
+% Used by \cs{setFullWidthLayout} just before the page layout parameters are changed.
+% \begin{macrocode}
+\newcommand{\saveBasicLayoutParams}{%
+ \xdef\tb@osms{\the\oddsidemargin}%
+ \xdef\tb@esms{\the\evensidemargin}%
+ \xdef\tb@tws{\the\textwidth}%
+ \xdef\tb@lws{\the\linewidth}%
+ \xdef\tb@csr{\the\columnseprule}%
+}
+% \end{macrocode}
+% \begin{macro}{\initChapAfterSolns}
+% Initializes the environment when solutions appear after each chapter.
+% Example of usage, taken from fortextbook.ltx,
+%\begin{verbatim}
+%\begin{afterChapSolns}
+%\initChapAfterSolns
+%\section{Solutions to Chapter Exercises}
+%\begin{fullwidthtext}
+%We present short solutions to the problems.
+%We present short solutions to the problems.
+%We present short solutions to the problems.
+%We present short solutions to the problems.
+%\end{fullwidthtext}
+%\bigskip
+%\begin{multicols}{2}\forceNoColor
+%\chaptersolutions
+%\end{multicols}
+%\restoreFromChapAfterSolns
+%\end{afterChapSolns}
+%\end{verbatim}
+% \begin{macrocode}
+\newcommand{\initChapAfterSolns}{\newpage
+ \clearTopMargin\clearBotMargin
+ \setFullWidthLayout
+}
+% \end{macrocode}
+% \begin{macro}{\restoreFromChapAfterSolns}
+% Restores the saved parameters at the end of the chapter solutions, see
+% above for an example.
+% \begin{macrocode}
+\newcommand{\restoreFromChapAfterSolns}{\newpage
+ \restorePageLayout\setFullWidthHeader
+}
+% \end{macrocode}
+% \end{macro}
+% \end{macro}
+% \end{macro}
+% \end{environment}
+% \end{macro}
+% \begin{macrocode}
+%</textbook>
+%<*package>
+% \end{macrocode}
+% \subsection{We shipout in support of \texttt{fortextbook}}
+% We shipout \cs{eqe@tb@shipout} to be placed in the margins on every page.
+% \begin{macrocode}
+\ifeqfortextbook
+\AtBeginDocument{\tb@soln@choice
+ \ifeqwritetomargins\chkmarginboxwidth
+ \AddToShipoutPicture{\eqe@tb@shipout}\fi}
+\fi
+%</package>
+%<*textbook>
+% \end{macrocode}
+%
+% \subsection{Modify \texttt{eqequestions} environment}
+%
+% We adjust the \texttt{eqequestions} environment to minimize spacing between problems.
+% \begin{macrocode}
+\eqequestopsep{0pt}
+\eqequesparsep{0pt}
+\eqequesitemsep{0pt}
+\eqequeslistparindent{0pt}
+\renewenvironment{eqequestions}{%
+ \begin{list}{}{%
+ \ifwithsoldoc\let\solnItemMngt\eqeSolnItemMngt\fi
+ \setlength{\labelwidth}{\eqemargin}%
+ \setlength{\parsep}{\eqeques@parsep}%
+ \setlength{\itemsep}{\eqeques@itemsep}
+ \setlength{\topsep}{\eqeques@topsep}%
+ \setlength{\itemindent}{0pt}%
+ \setlength{\listparindent}{\eqeques@listparindent}%dps%
+ \ifwithsoldoc\settowidth{\labelsep}{\eqe@hspannerSoln}\else
+ \settowidth{\labelsep}{\eqe@hspannerPrb}\fi
+ \setlength{\leftmargin}{\labelwidth}%
+ }\ifwithsoldoc\global\firstitemtrue\fi\item\relax}{\end{list}}
+% \end{macrocode}
+% \begin{environment}{eqepartsquestions}
+% This environment is used in the SOL file with problems with parts to hang indent
+% the solutions with parts.
+% \begin{macrocode}
+\newcommand{\eqepquestopsep}[1]{\def\eqepques@topsep{#1}}
+\newcommand{\eqepquesparsep}[1]{\def\eqepques@parsep{#1}}
+\newcommand{\eqepquesitemsep}[1]{\def\eqepques@itemsep{#1}}
+\eqepquestopsep{\eqeques@itemsep}
+\eqepquesparsep{\eqeques@parsep}
+\eqepquesitemsep{\eqeques@itemsep}
+\newenvironment{eqepartsquestions}{%
+ \begin{list}{}{%
+ \settowidth{\labelwidth}{\eqe@prtsepSoln\hspace{\tbsolnpartwdth}}
+ \setlength{\parsep}{\eqepques@parsep}%
+ \setlength{\itemsep}{\eqepques@itemsep}%
+ \setlength{\topsep}{\eqepques@topsep}%
+ \setlength{\itemindent}{0pt}%
+ \settowidth{\labelsep}{\eqe@hspannerSoln}
+ \setlength{\leftmargin}{\labelwidth}%
+ }\item\relax}{\end{list}}
+% \end{macrocode}
+% \end{environment}
+%
+% \subsection{Modifications for solutions page}
+%
+% \DescribeMacro{\gobbletoEndEXt} is a command to gobble all content from the current position \cs{eqEXt}
+% down to \cs{endeqEXt}. In the solutions file ends with \cs{par}\cs{medskip}, which
+% we gobble up too. We define \DescribeMacro{\eqExtArg}\cs{eqExtArg} to \cs{thequestionno} so we can use the problem
+% number to filter out the even-problems.
+% \begin{macrocode}
+\long\def\gobbletoEndEXt#1\endeqEXt{\@gobbletwo}
+\def\eqExtArg{\theeqquestionnoi}
+% \end{macrocode}
+% \begin{macrocode}
+\if\load@exerquiz\eqe@NO\DoNotFitItIn\fi
+\let\fillInFormatDefault\@empty
+\def\exerSolnsHeadnToc{}
+\renewcommand{\exerSolnInput}{%
+ \let\webnewpage\relax
+ \ifsolutionsonly\else\immediate\closeout\ex@solns\fi
+ \ifeq@nosolutions\else\newpage % 2012-03-14
+ \iftherearesolutions\eq@solutionshook\eqsolutionshook
+ \ifsolutionsonly\else\newpage\eq@solutionshook
+ \eqsolutionshook\fi
+ \ifx\webnewpage\relax
+ \def\webnewpage{\let\webnewpage\newpage}%
+ \fi
+ \priorexsectitle\exerSolnsHeadnToc\priorexslinput
+ \InputIfFileExists{\jobname.sol}{}{\PackageWarning{exerquiz}
+ {!!! Solutions to exercises not found}}%
+ \fi
+ \fi
+}
+% \end{macrocode}
+% \begin{macro}{\eqedsplyOnlyFrst}
+% The default listing of a problem with multiple parts is to typeset
+% \texttt{<num>.}~\texttt{(<part>)}. Here, we do not typeset the number after
+% the first time.
+% \begin{macrocode}
+\setcounter{partno}{1}\edef\firstPartLtr{\thepartno}
+% \end{macrocode}
+% ???? 6/2/11 When part (a) is hidden we need to generate the questions number
+% for the the first non-hidden part. Created \cs{iffrstProbNumShown} to help
+% but it not working yet.
+% \begin{macrocode}
+\newif\iffrstProbNumShown\frstProbNumShownfalse
+\def\tb@insertDecPoint{\ifwithsoldoc\eqedecPointSoln\else
+ \eqe@decPointMrg\fi}
+\newcommand{\eqedsplyOnlyFrst}[2]{\def\thisPart{#2}%
+ \ifx\thisPart\firstPartLtr\global\frstProbNumShowntrue
+ \tb@mrgDigitFmt{#1}\tb@insertDecPoint\else
+ \iffrstProbNumShown\tb@GenProbNum{#1}\else
+ \global\frstProbNumShowntrue\tb@mrgDigitFmt{#1}%
+ \tb@insertDecPoint\fi\fi\global\eqeGenProbNumfalse
+}
+% \end{macrocode}
+% \end{macro}
+% \begin{macro}{\displayProbNumOnce}
+% If a part is carried over to the next page, it may be necessary to manually
+% force the display of the first digit.
+%\begin{verbatim}
+%\insMidMarg{\displayProbNumOnce}
+%\end{verbatim}
+% \begin{macrocode}
+\newif\ifeqeGenProbNum \eqeGenProbNumfalse
+\newcommand{\displayProbNumOnce}{\global\eqeGenProbNumtrue} %
+%\def\tb@GenProbNum#1{\ifeqeGenProbNum#1\eqe@decPointMrg\else
+\def\tb@GenProbNum#1{\ifeqeGenProbNum#1\tb@insertDecPoint\else
+ \phantom{#1\tb@insertDecPoint}\fi}%
+% \end{macrocode}
+% \end{macro}
+% \begin{macrocode}
+\def\sq@priorhook{\medskip}
+% \end{macrocode}
+% Adjustments of spacing between problems \cs{eqexerskip}, and the check for enough
+% room for the next problem.
+% \begin{macrocode}
+\def\default@fvsizeskip{.1}
+% \end{macrocode}
+% The skip prior to the beginning of an exercise
+% \begin{macrocode}
+\aboveexskip{0pt}
+% \end{macrocode}
+% The skip after the end of an exercise
+% \begin{macrocode}
+\belowexskip{0pt}
+% \end{macrocode}
+% The skip in the solutions file following an exercise OR a part of an exercise
+% The text of this command should be a single token, that's why I've enclosed
+% it in braces. (There is a \cs{@gobbletwo} that gobbles it up for the \texttt{studented} option.)
+% \begin{macrocode}
+\renewcommand\belowexsolnskip{{}}
+% \end{macrocode}
+% We remove the \cs{mark} from this definition, see original definition in \texttt{eqexam.def}
+% \begin{macrocode}
+\renewcommand\exerSolnHeader[3]{%
+ \ifeqforpaper\else\webnewpage\fi%\par
+ \noindent\@ifundefined{hypertarget}
+ {#3}{\hypertarget{#2}{#3}\relax}\solnhspace
+}
+% \end{macrocode}
+% This causes the \texttt{eqexam} environment to write the user friendly name of the exam
+% even if there is only one exam.
+% \begin{macrocode}
+\def\nNumberOfP@rts{0}
+% \end{macrocode}
+%
+% \subsection{Some Convenience/Formatting Commands}
+%
+% \begin{macro}{\preExamSolnHead}
+% \begin{macro}{\examSolnHeadFmt}
+% \begin{macro}{\postExamSolnHead}
+% These are redefinitions of commands defined in \texttt{eqexam},
+% They control the vertical spacing before and after a heading in the
+% solutions at the end of the book, as well as the formatting.
+% \begin{macrocode}
+\renewcommand{\preExamSolnHead}{\medbreak\noindent}
+\renewcommand{\examSolnHeadFmt}[1]{\textbf{#1}}
+\renewcommand{\postExamSolnHead}{\smallskip}
+% \end{macrocode}
+% \end{macro}
+% \end{macro}
+% \end{macro}
+% \begin{macro}{\wrtChapSolnHead}
+% Writes a chapter heading to the solution file, usage,
+%\begin{verbatim}
+%\wrtChapSolnHead{The New {\eqexam}}
+%\end{verbatim}
+% \begin{macrocode}
+\newcommand{\wrtChapSolnHead}[1]{%
+ \writeToSolnFile{%
+ \protect\preChapSolnHead
+ \protect\chapHeadSolnFmt{\protect\ftbFmtChapter{\thechapter}#1}%
+ \protect\postChapSolnHead
+}}
+% \end{macrocode}
+% \begin{macro}{\preChapSolnHead}
+% \begin{macro}{\chapHeadSolnFmt}
+% \begin{macro}{\postChapSolnHead}
+% Same as above, except for chapter headings.
+% \begin{macrocode}
+\newcommand{\preChapSolnHead}{\bigbreak\noindent}
+\newcommand{\chapHeadSolnFmt}[1]{{\large\textbf{#1}}}
+\newcommand{\postChapSolnHead}{\medbreak}
+% \end{macrocode}
+% \begin{macro}{\ftbFmtChapter}
+% This command may (optionally) insert the chapter number into the chapter title passed
+% to \cs{wrtChapSolnHead}. The default is to pass the chapter name (``Chapter'') and chapter number.
+% If you say \verb!\let\ftbFmtChapter\@gobble!, the chapter name and number will not appear.
+% You can redefine this command as desired.
+% \begin{macrocode}
+\newcommand{\ftbFmtChapter}[1]{\chaptername\space#1.\space\ignorespaces}
+% \end{macrocode}
+% In the solution manual, all these
+%chapter commands may be redefined like so
+%\begin{verbatim}
+%\let\preChapSolnHead\relax
+%\let\chapHeadSolnFmt\chapter
+%\let\ftbFmtChapter\@gobble
+%\let\postChapSolnHead\relax
+%\end{verbatim}
+% In fact, let's make this into a command.
+% \begin{macro}{\convertChapHeadToChapters}
+%In the solutions manual, the chapter headings will become chapters of the manual, rather than
+%just a bold faced heading.
+% \begin{macrocode}
+\newcommand{\convertChapHeadToChapters}{%
+ \let\preChapSolnHead\relax
+ \let\chapHeadSolnFmt\chapter
+ \let\ftbFmtChapter\@gobble
+ \let\postChapSolnHead\relax
+}
+% \end{macrocode}
+% \end{macro}
+% \end{macro}
+% \end{macro}
+% \end{macro}
+% \end{macro}
+% \end{macro}
+% \begin{macro}{\probSet}
+% A simple command to announce the problem set.
+%\begin{verbatim}
+%\subsection*{\probSet{\thesection}}
+%\end{verbatim}
+% See also the definition for the \texttt{probset} environment below.
+% \begin{macrocode}
+\newcommand{\probSet}[1]{Problem Set #1}
+% \end{macrocode}
+% \end{macro}
+% \begin{macro}{\annotPage}
+% Use to annotation the page number onto a solution heading, for example,
+%\begin{verbatim}
+%\begin{exam}[\thesection. Another Section\annotPage]{\autoExamName}
+%\end{verbatim}
+% or using the \texttt{probset} environment defined below
+%\begin{verbatim}
+%\begin{probset}{{\thesection} Setting the page layout\annotPage}
+%\end{verbatim}
+% \begin{macrocode}
+\newcommand{\annotPage}{\protect\annotThePage{\thepage}}
+\newcommand{\annotThePage}[1]{\space(page\protect~#1)}
+% \end{macrocode}
+% \end{macro}
+% \subsection{The \texttt{probset} and \texttt{example} environments}
+% We define two environments based. The first (\texttt{probset}) is based on the
+% \texttt{exam} environment; the second (example) is based on the \texttt{exercise} environment.
+% \begin{environment}{probset}
+% A convenience environment, it is the \texttt{exam} environment, renamed, with
+% different arguments. \texttt{\#1} is the heading that will appear in the margins,
+% and \texttt{\#2} is the heading to appear in the back of the book.
+%\changes{v3.0n}{2011/09/18}{Added an \cs{edef} in case \cs{thesection} does not get
+% expanded early enough to display correctly in the margins.}
+% \begin{macrocode}
+\def\noProbHeader{NPH}
+\newenvironment{probset}[2][\probSet{\thesection}]{%
+ \exam[#2]{\autoExamName}\ifx#1\noProbHeader\else
+ \protected@edef\ftb@tmp@exp{\noexpand\insProbHead{#1}}%
+ \ftb@tmp@exp\fi}{\endexam}
+% \end{macrocode}
+% \end{environment}
+% \begin{macrocode}
+\newcounter{exampleno}[section]
+\renewcommand{\theexampleno}{\arabic{section}.\arabic{exampleno}}
+% \end{macrocode}
+% \textbf{Note:} The counter is \texttt{exampleno} and is designed to show the section
+% number and example number, and to reset at each section. To change the definition
+% of \cs{theexampleno} to reflect the chapter number followed by the example number, and
+% resetting at the beginning of each new chapter, the following code is needed.
+%\begin{verbatim}
+%\usepackage{remreset}
+%\@removefromreset{exampleno}{section}
+%\renewcommand{\theexampleno}{\arabic{chapter}.\arabic{exampleno}}
+%\@addtoreset{exampleno}{chapter}
+%\end{verbatim}
+%\DescribeMacro{\examplenoname} is the label placed on the example.
+% \begin{macrocode}
+\newcommand{\examplenoname}{Example}
+% \end{macrocode}
+% \begin{environment}{example}
+% A simple example environment, based on the \texttt{exercise} environment.
+% \begin{macrocode}
+\newenvironment{example}{%\medskip
+ \belowexskip{\medskipamount}\aboveexskip{\medskipamount}%
+ \makeRoomForProb{\@nbaselineskip\baselineskip}{}%
+ \renewcommand\exlabel{Example}%
+ \renewcommand\exlabelformat{\textbf{\exlabel~\theexampleno.}}%
+ \let\eq@fititin\eqfititin
+ \renewcommand\exrtnlabelformat{$\square$}%
+ \def\eqexheader@wrapper{\eqexheader}%
+ \SolutionsAfter
+ \begin{exercise}[exampleno]}{\end{exercise}}
+% \end{macrocode}
+% \end{environment}
+% \begin{environment}{example*}
+% An example environment with parts.
+% \begin{macrocode}
+\newenvironment{example*}{%\medskip
+ \belowexskip{\medskipamount}\aboveexskip{\medskipamount}%
+ \makeRoomForProb{\@nbaselineskip\baselineskip}{}%
+ \renewcommand\exlabel{Example}%
+ \renewcommand\exlabelformat{\textbf{\exlabel~\theexampleno.}}%
+ \let\eq@fititin\eqfititin
+ \renewcommand\exrtnlabelformat{$\square$}%
+ \def\eqexheader@wrapper{\eqexheader}%
+ \SolutionsAfter
+ \begin{exercise*}[exampleno]}{\end{exercise*}}
+% \end{macrocode}
+% \end{environment}
+% We set some parameters, to values better suited for the option.
+% \begin{macrocode}
+\setDefaultfvsizeskip{.1}
+\nbaselineskip{4}
+% \end{macrocode}
+% \subsection{Commands in support of Solution Manuals}
+% Generally, the solution manual source file should have the same
+% packages as the source file for the book itself, perhaps with a few exceptions,
+% but definitely the \textsf{eqexam} package is required with its \texttt{fortextbook} option.
+%
+% At this time, we provide only two commands, these are \cs{ftbInputBookAux} and
+% \cs{ftbInputSolnFiles}.
+% \begin{macro}{\ftbInputBookAux}
+% This command is used to input the auxiliary files of the master source file. It takes
+% one argument, the name of the master source file (\texttt{myBook.ltx} or \texttt{myBook.tex}).
+% If the extension is not present, it is assumed to be \texttt{.tex}.
+%\changes{v3.0f}{2011/08/13}{Added \cs{ftbInputBookAux} to support solution manual}
+% \begin{macrocode}
+\newcommand{\ftbInputBookAux}[1]{%
+ \filename@parse{#1}\@ifundefined{filename@ext}%
+ {\def\filename@ext{tex}}{}%
+ \xdef\tbBaseName{\filename@base}%
+ \xdef\tbSourceFile{\filename@base.\filename@ext}%
+% \end{macrocode}
+% In the next 4 lines, we save \cs{@writefile} and \cs{@setckpt}, and \cs{let}
+% them to \cs{@gobbletwo}. We restore their definitions after we input the aux files.
+% We include the aux files of the source file in case there are some cross references
+% in the solution files, or the body of the text would like to refer back to the
+% original book. (Seems unlikely.)
+% \begin{macrocode}
+ \let\save@writefile\@writefile
+ \let\@writefile\@gobbletwo
+ \let\save@setckpt\@setckpt
+ \let\@setckpt\@gobbletwo
+ \makeatletter
+ \InputIfFileExists{\tbBaseName.aux}{%
+ \PackageInfo{eqexam}
+ {Inputting auxiliary files of\MessageBreak\tbSourceFile}%
+ }{%
+ \PackageError{eqexam}
+ {Auxiliary files for \tbSourceFile\space were not found}
+ {Compile the source file \tbSourceFile\space
+ three times\MessageBreak%
+ to create the required auxiliary files.}%
+ }%
+ \makeatother
+% \end{macrocode}
+% The solution files really shouldn't have a label, but if we do
+% we'll save the {\LaTeX} definition of \cs{label}, and \cs{let}
+% it two \cs{@gobble}. Within the body of the solutions, the
+% command \cs{ftblabel} may be used to cross reference, if needed.
+%
+% \begin{macrocode}
+ \global\let\ftblabel\label
+ \let\label\@gobble
+ \let\@writefile\save@writefile
+ \let\@setckpt\save@setckpt
+}
+\@onlypreamble\ftbInputBookAux
+% \end{macrocode}
+% \begin{macro}{\restorelabel}
+% \begin{macro}{\gobblelabel}
+% These two are used to restore the usual definition of \cs{label}, and to
+% cancel it out by letting it to \cs{@gobble}.
+% \begin{macrocode}
+\newcommand{\restorelabel}{\global\let\label\ftblabel}
+\newcommand{\gobblelabel}{\let\label\@gobble}
+% \end{macrocode}
+% \end{macro}
+% \end{macro}
+% \end{macro}
+% \begin{macro}{\ftbInputSolnFiles}
+% In the body of the text, place \cs{ftbInputSolnFiles} in vertical mode.
+% This will input the \texttt{.sol} file of the master source document.
+% The optional argument is the name of the solution file. The default name
+% is \verb!\tbBaseName.sol!, where \cs{tbBaseName} was defined in
+% \cs{ftbInputBookAux}. If no extension is specified, an extension of \texttt{.sol}
+% is assumed. The original \texttt{.sol} may have changed its name, if someone
+% renamed it (to keep it from being overwritten). The solution file may be editing (by hand)
+% as needed.
+%\changes{v3.0f}{2011/08/13}{Added \cs{ftbInputSolnFiles} to support solution manual}
+% \begin{macrocode}
+\newcommand{\ftbInputSolnFiles}[1][\tbBaseName.sol]{%
+ \filename@parse{#1}\@ifundefined{filename@ext}%
+ {\def\filename@ext{sol}}{}%
+ \xdef\tbBaseName{\filename@base}%
+ \xdef\tbSourceFile{\filename@base.\filename@ext}%
+ \InputIfFileExists{\tbBaseName.sol}{%
+ \PackageInfo{eqexam}
+ {Inputting solutions file \tbBaseName.sol\MessageBreak}%
+ }{%
+ \PackageError{eqexam}
+ {Solutions file for \tbSourceFile\space was not found}%
+ {Compile the source files three times}%
+ }%
+}
+% \end{macrocode}
+% \end{macro}
+% \begin{macrocode}
+%</textbook>
+%<*ftbsty>
+% \end{macrocode}
+% \section{\textsf{fortextbook} Style File}\label{fortextbookstyle}
+% One person said it would be nice to separate \textsf{eqexam} from the \texttt{fortextbook} option, and
+% have \textsf{fortextbook} as a \texttt{separate} style (package). Rather than spending tens of hours separating them
+% I create a simple ``wrapper'' package, which simply calls \textsf{eqexam} with the \texttt{fortextook} option along
+% with all the recommended options.
+%\changes{v3.0p}{2011/09/22}{Added the wrapper package fortextbook.}
+%\par\medskip\noindent
+% \textbf{Usage:}
+%\begin{verbatim}
+%\documentclass[twoside,letterpaper]{book}
+%\usepackage[fleqn]{amsmath}
+%\usepackage{fortextbook}
+%...
+%\end{verbatim}
+% Below is the style.
+% \begin{macrocode}
+\NeedsTeXFormat{LaTeX2e}
+\ProvidesPackage{fortextbook}
+ [2012/03/14 v1.0 A fortextbook Package (dps)]
+\DeclareOption*{\PassOptionsToPackage{\CurrentOption}{eqexam}}
+\ProcessOptions
+\RequirePackage[%
+ ftbsolns,fortextbook,usecustomdesign,
+ forcolorpaper,noseparationrule,usexkv
+]{eqexam}
+% \end{macrocode}
+% In support of this style, I've also defined \cs{NoSolutions} to compile the document
+% without creating the solutions at the end of the file (this reduces the amount if IO
+% when compiling). I've also defined a special option \texttt{nocustomdesign} which
+% cancels out the \texttt{usecustomdesign} option.
+% \begin{macrocode}
+%</ftbsty>
+%<*package>
+% \end{macrocode}
+% \begin{center}
+% \rule{.67\linewidth}{.4pt}
+% \end{center}
+% \paragraph*{Input \texttt{eqtextb.def}.}
+% Back in the main package, we choose this point to input the
+% \texttt{fortextbook} code (\texttt{eqtextb.def}) if the
+% \texttt{fortextbook} option is taken.
+% \begin{macrocode}
+\edef\ftbInputEqTextb{\ifeqfortextbook\noexpand
+ \InputIfFileExists{eqtextb.def}{}{}\fi}
+\ftbInputEqTextb
+% \end{macrocode}
+% \begin{center}
+% \rule{.67\linewidth}{.4pt}
+% \end{center}
+%
+% \section{\textsf{xkeyval} Extensions}
+%
+% We load this material if \textsf{xkeyval} exists, and if the document author has specified
+% the \texttt{usexkv} option.
+%
+% \texttt{2014/12/19} Now, the \texttt{usexkeys} is on by default.
+% \begin{macrocode}
+%\IfFileExists{xkeyval}{%
+% \if\eq@usexkeys\eqe@YES\RequirePackage{xkeyval}\else
+% \endinput\fi}{\endinput}
+% \end{macrocode}
+% We redefine selected commands if the user has specified the \texttt{usexkv} option.
+%
+%\paragraph*{New options for \cs{fillin}}
+% \begin{macro}{underline}
+% Underline the fillin
+% \begin{macro}{u,b}
+% Legacy parameters, underlines (\texttt{u}) or leaves a blank space (\texttt{b})
+% \begin{macro}{boxed}
+% Boxes in the response region
+% \begin{macro}{boxpretext}
+% When boxed is use, use this to insert text in front of the answer, for example, \texttt{x=}
+% \begin{macro}{boxsize}
+% When boxed is taken, use boxsize to set the size of the box; permissible choices are
+% tiny, scriptsize, footnotesize, small, normalsize, large, Large, LARGE, huge, Huge
+% \begin{macro}{align}
+% Align the answer within the response region, permissible values are \texttt{l}, \texttt{c}, \texttt{r}.
+% \begin{macro}{color}
+% The color of the response (named color)
+% \begin{macro}{format}
+% Special formatting for the answer, the default is \cs{bfseries}
+% \begin{macro}{enclosesoln}
+% This Boolean key only takes effect when the
+% \texttt{boxed} key is used, and when either the \texttt{nosolutions} or the
+% \texttt{vspacewithsolns} option is taken. When these conditions are
+% met, a box is created around the solution (the third parameter of \cs{fillin}); the solution
+% is enclosed in a \cs{phantom} so it is not seen, but the dimensions of the solution are used.
+% This key allows you to create a box or arbitrary dimension.
+%\changes{v2.0j}{2011/04/19}{added the \texttt{enclosesoln} key to \texttt{eqFillin} family.}
+% \begin{macro}{fitwidth}
+%\changes{v3.0i}{2011/08/18}{added the \texttt{fitwidth} key to \texttt{eqFillin} family.}
+% The \texttt{fitwidth} option uses the natural width of the answer to create the fillin
+% when the \texttt{answerkey} option is in effect; otherwise it uses the second parameter \texttt{\#2}.
+% \begin{macro}{parbox}
+% The \texttt{parbox} parameter may be used to create a multiline \cs{fillin}
+% box. The value of \texttt{parbox} is the same as the first three parameters
+% of the {\LaTeX} command \cs{parbox}, e.g., \verb!parbox={[t][.5in][t]}!.
+% The value needs to be enclosed in braces.
+% \changes{v3.0w}{2012/03/27}{Added \texttt{parbox}}%
+% \begin{macro}{hiddenbox}
+% When the \texttt{boxed} option is used, this option resets the \cs{fbox}
+% parameters to \texttt{0pt}, making the box ``hidden.''
+%\changes{v3.0w}{2012/03/27}{Added \texttt{hiddenbox} options}
+%\par\medskip\noindent
+% Below are the \textsf{xkeyval} definitions of the keys recognized by \cs{fillin}.
+%\changes{v4.5a}{2015/11/10}{Added some logic to the underline key}
+% Add some logic to the \texttt{underline} key, now it is equivalent to the
+% \texttt{b} key.
+% \begin{macrocode}
+\define@boolkey{eqFillin}{underline}[true]{}
+\define@key{eqFillin}{u}[]{\KV@eqFillin@underlinetrue}
+\define@key{eqFillin}{b}[]{\KV@eqFillin@underlinefalse}
+\define@boolkey{eqFillin}{boxed}[true]{}
+\define@key{eqFillin}{boxpretext}[]{\def\eq@fillintext{#1}}
+\let\eq@fillintext\@empty
+% \end{macrocode}
+% If the user just says \texttt{parbox,...} the value of
+% \cs{eq@fillinparbox} is \cs{relax}. If \texttt{parbox}
+% does not appear in the option list, \cs{eq@fillinparbox}
+% has a default value of \cs{@empty}. In this way, we can
+% distinguish between \texttt{parbox} with the empty value,
+% and \texttt{parbox} not present at all.
+% \begin{macrocode}
+\define@key{eqFillin}{parbox}[\relax]{\def\eq@fillinparbox{#1}}
+\let\eq@fillinparbox\@empty
+\define@key{eqFillin}{hiddenbox}[]{%
+ \def\eq@fillinhiddenbox{%
+ \setlength{\fboxrule}{0pt}\setlength{\fboxsep}{0pt}}}
+\let\eq@fillinhiddenbox\@empty
+\define@boolkey{eqFillin}{enclosesoln}[true]{}
+\define@choicekey+{eqFillin}{boxsize}{tiny,scriptsize,footnotesize,%
+ small,normalsize,large,Large,LARGE,huge,Huge}[normalsize]{%
+ \def\eq@eqFillin@boxsize{\text{\csname#1\endcsname\strut}}%
+}{\PackageWarning{eqexam}{Bad choice for boxsize, permissible values
+ are tiny, scriptsize, footnotesize, small, normalsize,
+ large, Large, LARGE, huge and Huge. Try again}}
+\def\eq@eqFillin@boxsize{\text{\normalsize\strut}}
+\define@key{eqFillin}{color}[\eq@fillinColor]{\edef\eq@fillin@color{#1}}
+% \end{macrocode}
+% \changes{v3.0x}{2012/04/03}{Added \cs{eqe@align@hfill} to \texttt{align} property.
+% used to set position of content when \texttt{parbox} is used.}
+% \begin{macrocode}
+\define@choicekey+{eqFillin}{align}[\val\nr]%
+ {l,r,c}[\eq@eqFillin@align@default]{%
+ \def\eq@eqFillin@align{#1}%
+ \ifcase\nr\relax
+ \def\eqe@align@hfill{}\or
+ \def\eqe@align@hfill{\hfill}\or
+ \def\eqe@align@hfill{\hfil}\fi
+ }{%
+ \PackageWarning{eqexam}{Bad choice for align, permissible values
+ are l, r, and c. Try again}}
+\let\eqe@align@hfill\relax
+% \end{macrocode}
+% \DescribeMacro{defaultalign} is used to change the values of the default macros
+% \cs{eq@eqFillin@align@default} and \cs{eqe@align@hfill@default} for the \texttt{align} key together.
+% \begin{macrocode}
+\define@choicekey+{eqFillin}{defaultalign}[\val\nr]{l,r,c}[c]{%
+ \def\eq@eqFillin@align@default{#1}%
+ \ifcase\nr\relax
+ \def\eqe@align@hfill@default{}\or
+ \def\eqe@align@hfill@default{\hfill}\or
+ \def\eqe@align@hfill@default{\hfil}\fi
+ }{%
+ \PackageWarning{eqexam}{Bad choice for defaultalign, permissible
+ values are l, r, and c. Try again}}
+\setkeys{eqFillin}{defaultalign=c}
+% \end{macrocode}
+% \DescribeMacro{\fillInFormatDefault} is the default fill-in format
+% \begin{macrocode}
+\renewcommand{\fillInFormatDefault}{\normalfont}
+\define@key{eqFillin}{format}[\fillInFormatDefault]{%
+ \def\eq@fillin@format{#1}}
+\def\eq@fillin@format{\bfseries}
+\def\eqe@fbox@corr#1{#1-2\fboxsep-2\fboxrule}
+\define@boolkey{eqFillin}{fitwidth}[true]{} %
+% \end{macrocode}
+% \begin{macro}{boxcmd}
+% The \texttt{boxcmd} key is used to define a boxing command. The default
+% is either \cs{boxed} or \cs{fbox}. You can say
+% |boxcmd={\fboxcolor{blue}{yellow}}| to obtain a box with a blue frame
+% and yellow background.
+%\changes{v3.1c}{2012/07/30}{Added boxcmd to \cs{fillin}}
+% \begin{macrocode}
+\@ifundefined{boxed}{%
+ \def\eq@fillin@defaultbox{\fbox}%
+ \def\eq@fillin@boxcmd{\fbox}%
+ }{%
+ \def\eq@fillin@defaultbox{\boxed}%
+ \def\eq@fillin@boxcmd{\boxed}%
+ }
+% \end{macrocode}
+% \begin{macro}{ulcmd}
+% The \texttt{ulcmd} key is used to define a underlining command. The default
+% is either \texttt{underline} or \texttt{underbar}. You can say
+% |ulcmd=underline| to obtained an underline using \cs{underline}.
+%\changes{v3.1c}{2012/07/30}{Added ulcmd to \cs{fillin}}
+% \begin{macrocode}
+\define@key{eqFillin}{boxcmd}%
+ [\eq@fillin@defaultbox]{\def\eq@fillin@boxcmd{#1}}
+\@ifundefined{underbar}{%
+ \def\eq@fillin@defaultul{underline}%
+ \def\eq@fillin@ulcmd{\underline}%
+ }{%
+ \def\eq@fillin@defaultul{underbar}%
+ \def\eq@fillin@ulcmd{\underbar}%
+ }
+% \end{macrocode}
+% (2017/01/28) Added custom underline option, the author must define \cs{ulcustom} and specify
+% \texttt{ulcmd=custom}.
+% \changes{v4.6c}{2017/01/28}{added custom underline option}
+% \begin{macrocode}
+\edef\ulcustom{\expandafter\noexpand\eq@fillin@ulcmd}
+\edef\temp@exp{\noexpand
+\define@choicekey+{eqFillin}{ulcmd}
+ {underbar,underline,custom}[\eq@fillin@defaultul]}
+\temp@exp{\def\@rgi{#1}\def\eq@custom{custom}\ifx\@rgi\eq@custom
+ \def\eq@fillin@ulcmd{\@nameuse{ulcustom}}\else
+ \def\eq@fillin@ulcmd{\@nameuse{#1}}\fi
+}{\PackageWarning{aeb}{Bad choice for ulcmd, permissible values
+ are underbar and underline. Try again}}
+% \end{macrocode}
+% (2013/02/16) \DescribeMacro{lift}\texttt{lift} lifts (actually lowers) the underline by the amount specified.
+% \DescribeMacro{autolift}\texttt{autolift} measures the depth of the content and lifts
+% (actually lowers) the underline by that amount. \DescribeMacro{addtoautolift}\texttt{addtoautolift}
+% works with \texttt{autolift} to add the specified amount to the amount of lift as calculated
+% by \texttt{autolift}.
+% \begin{macrocode}
+\define@key{eqFillin}{lift}[-1sp]{\def\eq@fillin@lift{#1}}
+\define@boolkey{eqFillin}{autolift}[true]{} %
+\define@key{eqFillin}{addtoautolift}[0pt]{%
+ \def\eq@fillin@addtoautolift{#1}}
+% \end{macrocode}
+% \end{macro}
+% \end{macro}
+% \end{macro}
+% \end{macro}
+% \end{macro}
+% \end{macro}
+% \end{macro}
+% \end{macro}
+% \end{macro}
+% \end{macro}
+% \end{macro}
+% \end{macro}
+% \end{macro}
+% \end{macro}
+% The macro \cs{eqe@getiiiOpts} is based on early parsing code of \cs{parbox}.
+% It picks up three optional parameters and saves their values under the
+% commands \cs{eqe@opts@argi}, \cs{eqe@opts@argii}, \cs{eqe@opts@argiii}.
+% We are interested in \cs{eqe@opts@argiii}, which specifies the depth of
+% the \cs{parbox}. If the \texttt{boxed} option is taken, we reduce the value
+% of \cs{eqe@opts@argiii} by \texttt{2\string\fboxsep+2\string\fboxrule} so
+% that the height will be exactly as specified. The macro \cs{eqe@getiiiOpts}
+% is used with the \texttt{parbox} option of \cs{fillin}.
+% The macro \cs{eqe@getiiiOpts} has syntax:
+%\begin{quote}
+% \cs{eqe@getiiiOpts[\meta{pos}][\meta{height}][\meta{inner-pos}]}
+%\end{quote}
+% \begin{macrocode}
+\def\eqe@getiiiOpts{%
+ \@ifnextchar[%]
+ \i@eqe@getiiiOpts
+ {\iii@eqe@getiiiOpts{c}{\relax}[s]}}
+% \end{macrocode}
+% Get \meta{pos}
+% \begin{macrocode}
+\def\i@eqe@getiiiOpts[#1]{%
+ \@ifnextchar[%]
+ {\ii@eqe@getiiiOpts{#1}}%
+ {\iii@eqe@getiiiOpts{#1}{\relax}[s]}}
+% \end{macrocode}
+% Get \meta{height}
+% \begin{macrocode}
+\def\ii@eqe@getiiiOpts#1[#2]{%
+ \@ifnextchar[%]
+ {\iii@eqe@getiiiOpts{#1}{#2}}%
+ {\iii@eqe@getiiiOpts{#1}{#2}[#1]}}
+% \end{macrocode}
+% Get \meta{inner-pos}
+% \begin{macrocode}
+\def\iii@eqe@getiiiOpts#1#2[#3]{%
+ \def\eqe@opts@argi{#1}%
+ \def\eqe@opts@argii{#2}%
+ \def\eqe@opts@argiii{#3}}
+% \end{macrocode}
+% \paragraph*{Redefine the \cs{fillin} command}
+% \begin{macro}{\fillin}
+% Re-worked \cs{fillin} to have \textsf{xkeyval} in the optional first parameter.
+% The syntax is illustrated below.
+%\begin{verbatim}
+% \fillin[
+% underline=true|false,u,b,boxed=true|false,boxpretext=<text>,
+% align=l|r|c,boxsize=\tiny|..\normalsize|\large|...|\Huge,
+% color=<namedcolor>,format=<\bfseries|\ttfamily|\Large|whatever>
+% ]{<width>}{<ans>}
+%\end{verbatim}
+% \changes{v4.5}{2015/11/10}{Added \cs{setfillinDefaults}}
+% \DescribeMacro{\setfillinDefaults}\cmd{\setfillinDefaults} sets any default
+% options for \cs{fillin} the document author wants.
+% \begin{macrocode}
+\newcommand{\setfillinDefaults}[1]{\def\eqe@argi{#1}\ifx\eqe@argi\@empty
+ \let\eqe@setfillinDefaults\@empty\else
+ \def\eqe@setfillinDefaults{#1}\fi}
+\let\eqe@setfillinDefaults\@empty
+% \end{macrocode}
+% \begin{macrocode}
+\renewcommand{\fillin}[3][]{\begingroup%
+% \end{macrocode}
+% \cs{ifsp@expand} is defined in \textsf{spdef} package. This is a version
+% if \cs{ifsp} that expands correctly in an \cs{edef}.
+% \begin{macrocode}
+ \expandafter\let\expandafter\ifsp\csname ifsp@expand\endcsname
+% \end{macrocode}
+% Get the keys indicated by the document author.
+% \begin{macrocode}
+ \setkeys{eqFillin}{boxsize,underline=true,boxed=false,%
+ boxpretext,color,format,enclosesoln=false,fitwidth=false,lift,%
+ autolift=false,addtoautolift}%
+ \ifx\eqe@setfillinDefaults\@empty\else
+ \protected@edef\eq@temp@exp{\noexpand
+ \setkeys{eqFillin}{\eqe@setfillinDefaults}}%
+ \eq@temp@exp
+ \fi
+ \protected@edef\eq@temp@exp{\noexpand\setkeys{eqFillin}{#1}}%
+ \eq@temp@exp
+% \end{macrocode}
+% If boxed, we turn underlining off
+% \begin{macrocode}
+ \ifKV@eqFillin@boxed\KV@eqFillin@underlinefalse\fi
+% \end{macrocode}
+% Put \cs{eq@fillin@lift} to \texttt{-2sp} as a signal not to use
+% the \texttt{lift} value in the case the author specified \texttt{autofill}
+% and \texttt{lift}.
+% \begin{macrocode}
+ \ifKV@eqFillin@autolift\def\eq@fillin@lift{-2sp}\fi
+% \end{macrocode}
+% Get the second parameter.
+% \begin{macrocode}
+ \edef\eqe@argii{#2}%
+% \end{macrocode}
+% We reset \cs{fboxrule} and \cs{fboxsep} as needed.
+% \begin{macrocode}
+ \eq@fillinhiddenbox
+% \end{macrocode}
+% If the document author uses the \texttt{hiddenbox} option,
+% this option assumes the \texttt{boxed} option as well so we'll
+% set \cs{KV@eqFillin@boxedtrue} to signal the \texttt{boxed} option.
+% \begin{macrocode}
+ \ifx\eq@fillinhiddenbox\@empty\else
+ \KV@eqFillin@boxedtrue\fi
+% \end{macrocode}
+% If the \texttt{parbox} option is taken, we define the third parameter
+% to be wrapped in a \cs{parbox}.
+% \begin{macrocode}
+ \ifx\eq@fillinparbox\@empty\def\eqe@argiii{#3}\else
+% \end{macrocode}
+% If \texttt{parbox} is specified, we make \texttt{align=l} the default.
+% \begin{macrocode}
+ \ifx\eqe@align@hfill\relax
+ \def\eq@eqFillin@align{l}\def\eqe@align@hfill{}\fi
+% \end{macrocode}
+% If \texttt{parbox} is specified, we get its three optional
+% parameters so we can manipulate the width parameter.
+% \begin{macrocode}
+ \expandafter\eqe@getiiiOpts\eq@fillinparbox\relax
+% \end{macrocode}
+% Now, if this is to be \texttt{boxed}, we reduce the height
+% of the box (\cs{boxed} increases the height by
+% \texttt{2\string\fboxrule+2\string\fboxrule}
+% \begin{macrocode}
+ \ifKV@eqFillin@boxed
+% \end{macrocode}
+% \cs{eqe@opts@argii} has a value of \cs{relax} if the document author
+% did not specify a height for the box.
+% \begin{macrocode}
+ \expandafter\ifx\eqe@opts@argii\relax\else
+ \edef\eqe@opts@argii{\expandafter
+ \eqe@fbox@corr\expandafter{\eqe@opts@argii}}\fi
+ \fi
+% \end{macrocode}
+% We need to feed \cs{parbox} the parameters it expects, so, if the
+% height parameter is not given, we just pass the first argument;
+% otherwise, we pass all three parameters.
+% \begin{macrocode}
+ \edef\eqe@parboxOptArgs{[\eqe@opts@argi]%
+ \expandafter\ifx\eqe@opts@argii\relax\else
+ [\eqe@opts@argii][\eqe@opts@argiii]\fi}%
+% \end{macrocode}
+% Now we build the third parameter, \cs{eqe@argiii}.
+% \begin{macrocode}
+ \def\eqe@argiii{\expandafter\parbox\eqe@parboxOptArgs{\eqe@bw}%
+% \end{macrocode}
+% We insert \cs{eqe@align@hfill}, which is synchronized to the value of
+% the \texttt{align} key to move the \cs{parbox} contents to left aligned, centered,
+% or right aligned. \cs{eqe@align@hfill} will only be effective if \texttt{\#3} is
+% enclosed in a narrower box.
+% \begin{macrocode}
+ {\eqe@align@hfill\ifKV@eqFillin@boxed\eq@fillintext\fi#3}}%
+ \fi
+% \end{macrocode}
+% If \cs{eqe@align@hfill} is still equal to \cs{relax}, give it the default
+% value.
+% \begin{macrocode}
+ \ifx\eqe@align@hfill\relax
+ \def\eq@eqFillin@align{c}%
+ \edef\eqe@align@hfill{\eqe@align@hfill@default}\fi
+ \ifmmode\let\@eqmath\ensuremath\else\let\@eqmath\text\fi
+% \end{macrocode}
+% We re-calculate the width of the formatted box
+% \begin{macrocode}
+ \ifx\eq@fillinparbox\@empty
+ \ifx\eqe@argii\@empty
+% \end{macrocode}
+% If no \texttt{parbox} option and if the second argument is empty,
+% we set width based on the natural width of \texttt{\#3}
+% \begin{macrocode}
+ \settowidth{\eqetmplengthb}{\@eqmath{\eq@fillin@format
+ \ifKV@eqFillin@boxed\eq@fillintext\fi\eqe@argiii}}%
+ \ifKV@eqFillin@boxed
+ \setlength{\eqetmplengthb}{%
+ \eqetmplengthb+2\fboxsep+2\fboxrule}%
+ \fi
+ \else
+% \end{macrocode}
+% If \texttt{\#2} is nonempty, we use this value.
+% \begin{macrocode}
+ \setlength{\eqetmplengthb}{#2}%
+ \fi
+ \else
+% \end{macrocode}
+% \texttt{parbox} option with empty second argument, use \cs{linewidth}.
+% for width
+% \begin{macrocode}
+ \ifx\eqe@argii\@empty
+ \setlength{\eqetmplengthb}{\linewidth}%
+ \PackageWarning{eqexam}{Parameter \#2
+ is empty with parbox option,\MessageBreak
+ using \string\linewidth\space for width%
+ }%
+ \else
+% \end{macrocode}
+% \texttt{parbox} option with second argument, use \texttt{\#2}
+% for width
+% \begin{macrocode}
+ \setlength{\eqetmplengthb}{#2}%
+ \fi
+ \fi
+% \end{macrocode}
+% Return \cs{ifsp} to its default definition.
+% \begin{macrocode}
+ \expandafter\let\expandafter\ifsp\csname ifsp@default\endcsname
+% \end{macrocode}
+% Save the final calculated width as \cs{eqe@bw}.
+% \begin{macrocode}
+ \edef\eqe@bw{\the\eqetmplengthb}%
+% \end{macrocode}
+% Set the underline option, \dots
+% \begin{macrocode}
+ \ifKV@eqFillin@underline\let\@fillinFmt\eq@fillin@ulcmd
+ \else\let\@fillinFmt\relax\fi
+% \end{macrocode}
+% however, if \texttt{parbox} is specified, we remove the underlining,
+% if any.
+% \begin{macrocode}
+ \ifx\eq@fillinparbox\@empty\else
+ \ifKV@eqFillin@underline\let\@fillinFmt\relax
+% \ifx\@fillinFmt\underbar\let\@fillinFmt\relax
+ \PackageInfo{eqexam}{Removing underline option, not permissible
+ \MessageBreak with parbox option}%
+ \fi\fi
+% \end{macrocode}
+% \paragraph*{Build the \cs{fillin} box.} After the preliminaries, we
+% create the requested answer field. We begin by building the answer
+% field for the case of \cs{ifeq@proofing} is true (which occurs when
+% the \texttt{answerkey} is used.
+% \begin{macrocode}
+ \ifeq@proofing
+ \ifKV@eqFillin@fitwidth
+% \end{macrocode}
+% If the \texttt{fitwidth} option is taken, we measure the width
+% of the box. Ignored when the \texttt{parbox} option is used.
+% \begin{macrocode}
+ \settowidth{\eqetmplengthb}{\@eqmath{\eq@fillin@format
+ \ifx\eq@fillinparbox\@empty\ifKV@eqFillin@boxed
+ \eq@fillintext\fi\fi\eqe@argiii}}%
+% \end{macrocode}
+% If boxed, we increase the width by
+% \texttt{2\string\fboxsep+2\string\fboxrule}; when content is \cs{boxed},
+% the dimensions are reduced.
+% \begin{macrocode}
+ \ifKV@eqFillin@boxed
+ \setlength{\eqetmplengthb}{%
+ \eqetmplengthb+2\fboxsep+2\fboxrule}%
+ \fi
+ \edef\eqe@bw{\the\eqetmplengthb}%
+ \fi
+% \end{macrocode}
+% We build the fill-in field for the case of \texttt{boxed}.
+% \begin{macrocode}
+ \ifKV@eqFillin@boxed
+ \ifmmode\let\@eqmath\ensuremath\else\let\@eqmath\text\fi
+% \mbox{\eq@fillin@format\ensuremath{\boxed{%
+ \setbox\z@\hbox{\@eqmath{\eq@fillin@boxcmd{%
+% \eq@fillin@format\ensuremath{\eq@fillin@boxcmd{%
+ \eq@eqFillin@boxsize
+ \@fillinFmt{%
+ \ifKV@eqFillin@boxed
+ \edef\eqe@bw{\eqe@fbox@corr{\eqe@bw}}%
+ \fi
+% \end{macrocode}
+% \changes{v2.0h}{2011/04/14}{Modified the calculation of the width
+% of \cs{fillin}, the width of enclosing box now equals the requested
+% width}
+% When the boxed option is taken, we adjust the width of the \cs{makebox}
+% to get the desired width \texttt{\#2}.
+% \begin{macrocode}
+ \makebox[\eqe@bw][\eq@eqFillin@align]{\strut
+ \@eqmath{\eq@fillin@format\color{\eq@fillin@color}%
+ \ifx\eq@fillinparbox\@empty
+ \eq@fillintext\fi\eqe@argiii}}%
+ }% end \@fillinFmt
+ }}}% end \mbox
+ \setlength{\@tempdima}{\ht0+\dp0}%
+ \xdef\fillinTotalHeight{\the\@tempdima}%
+ \mbox{\unhbox\z@}%
+ \else
+% \end{macrocode}
+% The content is not to be boxed.
+% \begin{macrocode}
+ \ifmmode\let\@eqmath\ensuremath\else\let\@eqmath\relax\fi
+ \setbox\z@\hbox{%
+% \end{macrocode}
+% A value of \texttt{-1sp} signals that \texttt{lift} has not been specified,
+% nor has \texttt{autofill} been specified. So we use the usual code for underlining.
+% \begin{macrocode}
+ \ifdim\eq@fillin@lift=-1sp\relax
+ \@fillinFmt{\makebox[\eqe@bw][\eq@eqFillin@align]{\strut
+ \color{\eq@fillin@color}%
+ \@eqmath{\eq@fillin@format\eqe@argiii}}}%
+ \else
+% \end{macrocode}
+% (2014/02/16) The \texttt{autolift} or \texttt{lift} keys are specified.
+% If \texttt{autofill}, put contents in a box. Set \cs{@tempdima} to
+% \texttt{\cs{dp2}+\cs{eq@fillin@addtoautolift}}, the latter normally has
+% a value of \texttt{0pt} unless specified on the option list.
+% \begin{macrocode}
+ \ifKV@eqFillin@autolift
+ \setbox2=\hbox{\@eqmath{\eq@fillin@format\eqe@argiii}}%
+ \setlength{\@tempdima}{\dp2+\eq@fillin@addtoautolift}%
+ \edef\eq@fillin@lift{\the\@tempdima}\fi
+% \end{macrocode}
+% (2014/02/16) We lower by an amount of \cs{eq@fillin@lift}, but raise the context
+% by that same amount.
+% \begin{macrocode}
+ \raisebox{-\eq@fillin@lift}{\@fillinFmt{%
+ \makebox[\eqe@bw][\eq@eqFillin@align]{\strut
+ \color{\eq@fillin@color}%
+ \raisebox{\eq@fillin@lift}{\@eqmath{\eq@fillin@format
+ \eqe@argiii}}}}}%
+ \fi
+ }\setlength{\@tempdima}{\ht0+\dp0}%
+ \xdef\fillinTotalHeight{\the\@tempdima}%
+ \mbox{\unhbox\z@}%
+ \fi
+ \else
+% \end{macrocode}
+% We begin the case of not \cs{ifeq@proofing}, that is, the document author
+% is not compiling with the \texttt{answerkey} option.
+% \begin{macrocode}
+ \ifKV@eqFillin@boxed
+% \mbox{\eq@fillin@format\ensuremath{\boxed{%
+% \eq@fillin@format\ensuremath{\eq@fillin@boxcmd{%
+ \setbox\z@\hbox{\@eqmath{\eq@fillin@format
+ \eq@fillin@boxcmd{\eq@eqFillin@boxsize\ifeq@nosolutions
+ \rlap{\@eqmath{\eq@fillintext}}\fi
+ \ifvspacewithsolns\rlap{\@eqmath{\eq@fillintext}}\fi
+ \@fillinFmt{%
+% \end{macrocode}
+% We do a similar thing if proofing is not active (\texttt{nosolutions} is taken).
+% \begin{macrocode}
+ \makebox[\eqe@fbox@corr{\eqe@bw}]{%
+ \ifKV@eqFillin@enclosesoln\phantom
+ {\setlength\eqetmplengthb{\eqe@bw-2\fboxsep}%
+ \edef\eqe@bw{\the\eqetmplengthb}%
+ \@eqmath{\eqe@argiii}}\else
+ \strut\hfill\fi
+ }%
+ }%end \@fillinFmt
+ }}}% end \hbox
+ \setlength{\@tempdima}{\ht0+\dp0}%
+ \xdef\fillinTotalHeight{\the\@tempdima}%
+ \mbox{\unhbox\z@}%
+ \else
+% \end{macrocode}
+% This is the case where the field is \emph{not} boxed.
+% \begin{macrocode}
+ \setbox\z@\hbox{%
+ \ifdim\eq@fillin@lift=-1sp\relax
+ \@fillinFmt{\makebox[\eqe@bw]{%
+% \phantom{\@eqmath{\eqe@argiii}}
+ \strut\hfil}}%
+ \else
+ \ifKV@eqFillin@autolift
+ \setbox2=\hbox{\@eqmath{\eq@fillin@format
+ \eqe@argiii}}%
+ \setlength{\@tempdima}%
+ {\dp2+\eq@fillin@addtoautolift}%
+ \edef\eq@fillin@lift{\the\@tempdima}\fi
+ \raisebox{-\eq@fillin@lift}{\@fillinFmt{%
+ \makebox[\eqe@bw]{\raisebox{\eq@fillin@lift}
+ {\phantom{\@eqmath{\eq@fillin@format
+ \eqe@argiii}}\strut\hfil}}}}%
+ \fi
+ }\setlength{\@tempdima}{\ht0+\dp0}%
+ \xdef\fillinTotalHeight{\the\@tempdima}%
+ \mbox{\unhbox\z@}%
+ \fi
+% \end{macrocode}
+% \paragraph*{Online Code.} If the \texttt{quiz} environment is defined,
+% and the user has asked for \texttt{online} option we build a text field.
+% \begin{macrocode}
+ \@ifundefined{@quiz}{}{%
+ \if\eq@online\eqe@YES\relax
+ \ifeq@nosolutions
+ \ifeq@solutionsafter\else
+ \ifx\eq@insertverticalspace\eqe@YES\relax
+% \end{macrocode}
+% OK, we get this far if we choose \texttt{online} (or higher) and
+% if \texttt{nosolutions} (which includes the \texttt{vspacewithsolns}
+% option). We require \cs{eq@insertverticalspace} to be \texttt{y}.
+% This last value is the default (\cs{SpaceToWork}).
+% \begin{macrocode}
+ \stepcounter{@cntfillin}%
+ \edef\fieldName{%
+ \if\probstar*eqexam.\curr@quiz.fillin.%
+ \theeqquestionnoi.part\thepartno.%
+ fi\the@cntfillin%
+ \else
+ eqexam.\curr@quiz.fillin.%
+ \theeqquestionnoi.fi\the@cntfillin%
+ \fi
+ }\ifx\eq@fillinparbox\@empty
+% \end{macrocode}
+% If the \texttt{parbox} option is not taken, we build a text field with height \texttt{11bp}
+% \begin{macrocode}
+ \raisebox{-1bp}{\makebox[0pt][r]{%
+ \textField[\BC{}\presets{\eqe@optsFillIn}]
+ {\fieldName}{#2}{\fillinTotalHeight}}}\else
+% \end{macrocode}
+% If the user has taken the \texttt{parbox} option, then the text field becomes a multiline
+% field, with height equal to the requested height.
+% \begin{macrocode}
+ \setlength{\@tempdima}%
+ {\eqe@opts@argii+2\fboxrule+2\fboxsep}%
+ \raisebox{-1bp}{\makebox[0pt][r]{%
+ \textField[\BC{}\presets{\eqe@optsFillIn}
+ \Ff{\FfMultiline}]{\fieldName}{#2}
+ {\fillinTotalHeight}}}\fi
+ \fi
+ \fi
+ \fi
+ \fi
+ }%
+ \fi\endgroup\space\ignorespaces}
+% \end{macrocode}
+% \end{macro}
+% \begin{macro}{\TF}
+% The \cs{TF} command depends on \cs{fillin}, so we make the appropriate changes.
+% \begin{macrocode}
+\renewcommand\TF[2][\defaultTFwidth]{%
+ \def\eqe@next{\fillin[underline]{#1}{#2}}%
+ \ifdim\eq@extralabelsep=0pt\relax\else
+ \if\probstar*\relax\if\exerwparts@cols0
+ \def\eqe@next{\makebox[0pt][r]{%
+ \fillin[underline]{#1}{#2}}\ignorespaces}%
+ \fi\fi\fi\eqe@next
+}
+% \end{macrocode}
+% \end{macro}
+% This marks the end of the \textsf{eqexam} package. dps
+% \begin{macrocode}
+%</package>
+% \end{macrocode}
+\endinput