%% %% This is file `exerquiz.sty', %% generated with the docstrip utility. %% %% The original source files were: %% %% exerquiz.dtx (with options: `copyright,package') %% %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% %% Exerquiz.sty package, %% %% Copyright (C) 1999-2020 D. P. Story %% %% dpstory@uakron.edu %% %% %% %% This program can redistributed and/or modified under %% %% the terms of the LaTeX Project Public License %% %% Distributed from CTAN archives in directory %% %% macros/latex/base/lppl.txt; either version 1 of the %% %% License, or (at your option) any later version. %% %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% \NeedsTeXFormat{LaTeX2e} \ProvidesPackage{exerquiz} [2021/01/20 v8.6.2 % Exerquiz: Exercises and Quizzes for LaTeX/PDF package (dps)] \usepackage{keyval} \RequirePackage{ifpdf}[2006/02/20] \RequirePackage{ifxetex}[2006/08/21] \RequirePackage{ifluatex} \@ifundefined{exqtable}{\def\exqtable{table}}{} \IfFileExists{xcolor.sty}{% \def\eq@ColorPackage{xcolor}% \PassOptionsToPackage{\exqtable,hyperref}{xcolor}} {\def\eq@ColorPackage{color}} \DeclareOption{noxcolor}{\def\eq@ColorPackage{color}} \DeclareOption{forpaper}{% \eqforpapertrue\PassOptionsToPackage{monochrome}{\eq@ColorPackage} \AtBeginDocument{\ifnum\eq@drivernum=4 \else\AllowPeeking\fi} } \DeclareOption{forcolorpaper}{\eqforpapertrue % for print \AtBeginDocument{\ifnum\eq@drivernum=4 \else\AllowPeeking\fi} } \DeclareOption{preview}{\PassOptionsToPackage{preview}{eforms}} \DeclareOption{nosolutions}{\eq@nosolutionstrue\eq@nolinktrue} \DeclareOption{noquizsolutions}{\eq@noquizsolutionstrue\eq@nolinktrue} \let\eq@YES=y \let\eq@NO=n \let\eq@One=1 \let\eq@Zero=0 \def\eq@r{r}\let\eq@f=f \let\eq@l=l \DeclareOption{online}{\let\eq@online\eq@YES} \let\eq@online\eq@NO \DeclareOption{nohiddensolutions}{\eq@globalshowsolutionstrue} \DeclareOption{noHiddensolutions}% {\eq@globalshowsolutionstrue\AtBeginDocument{\def\Hidesymbol{h}}} \DeclareOption{solutionsafter}{\eq@solutionsaftertrue\eq@nolinktrue} \DeclareOption{solutionsonly}{\solutionsonlytrue\answerkeytrue \therearesolutionstrue\AtEndOfPackage{\let\exerSolnsHeadnToc\relax}} \newif\ifsolutionsonly\solutionsonlyfalse \@ifundefined{ifanswerkey}{\newif\ifanswerkey\answerkeyfalse}{} \DeclareOption{contsolns}{\AtEndOfPackage{\InputIfFileExists {contsolns.def}{\contsolnsInputMsg}{\contsolnsErrorMsg}}} \def\contsolnsInputMsg{\PackageInfo{exerquiz}{contsolns option, inputting file contsolns.def}} \def\contsolnsErrorMsg{\PackageWarning{exerquiz}{contsolns option, cannot find file contsolns.def}} \DeclareOption{nocorrections}{\nocorrectionstrue} \DeclareOption{proofing}{\eq@proofingtrue} \newif\ifaebshowgrayletters\aebshowgraylettersfalse \DeclareOption{showgrayletters}{\aebshowgrayletterstrue} \@ifundefined{ifvspacewithsolns}{% \DeclareOption{vspacewithsolns}{\vspacewithsolnstrue} \newif\ifvspacewithsolns\vspacewithsolnsfalse }{} \@ifundefined{ifdisplayworkarea}{\newif\ifdisplayworkarea \displayworkareafalse}{} \providecommand\displayworkareaOn{\displayworkareatrue} \providecommand\displayworkareaOff{\displayworkareafalse} \DeclareOption{nodljs}{\PassOptionsToPackage{nodljs}{insdljs}% \AtEndOfPackage{\let\importdljs\eq@YES}} \DeclareOption{execJS}{\PassOptionsToPackage{execJS}{insdljs}} \DeclareOption{exercisesonly}{\PassOptionsToPackage{nodljs}{insdljs}} \DeclareOption{debug}{\PassOptionsToPackage{debug}{insdljs}} \DeclareOption{allowrandomize}{\AtEndOfPackage{\inputRandomizeChoices}} \def\inputRandomizeChoices{\InputIfFileExists{aebrandom.def} {\PackageInfo{exerquiz}{inputting aebrandom.def}} {cannot find aebrandom.def}} \newif \ifusesumrytbls \usesumrytblsfalse \DeclareOption{usesumrytbls}{\usesumrytblstrue \def\inputSumryTblCode{\InputIfFileExists{aebsumrytbls.def} {\PackageInfo{exerquiz}{inputting aebsumrytbls.def}}% {cannot find aebsumrytbls.def}}} \let\inputSumryTblCode\relax \DeclareOption{usemcfi}{% \def\inputMCFICode{\InputIfFileExists{usemcfi.def} {\PackageInfo{exerquiz}{inputting usemcfi.def}}% {cannot find usemcfi.def}}} \let\inputMCFICode\relax \newif\ifwithinMCFI\withinMCFIfalse \DeclareOption{dvipsone}{% \def\eq@drivernum{0}\def\eq@driver{dvipsone}% \PassOptionsToPackage{dvipsone}{eforms} } \DeclareOption{dvips}{% \def\eq@drivernum{0}\def\eq@driver{dvips}% \PassOptionsToPackage{dvips}{eforms} } \DeclareOption{pdftex}{% \def\eq@drivernum{1}\def\eq@driver{pdftex}% \PassOptionsToPackage{pdftex}{\eq@ColorPackage} \PassOptionsToPackage{pdftex}{eforms} } \DeclareOption{luatex}{% \def\eq@drivernum{1}\def\eq@driver{luatex}% \PassOptionsToPackage{luatex}{\eq@ColorPackage} \PassOptionsToPackage{luatex}{eforms} } \DeclareOption{dvipdfm}{% \def\eq@drivernum{2}\def\eq@driver{dvipdfm}% \PassOptionsToPackage{dvipdfm}{\eq@ColorPackage}% \PassOptionsToPackage{dvipdfm}{eforms}% } \DeclareOption{dvipdfmx}{% \def\eq@drivernum{2}\def\eq@driver{dvipdfmx}% \PassOptionsToPackage{dvipdfmx}{\eq@ColorPackage}% \PassOptionsToPackage{dvipdfmx}{eforms}% } \DeclareOption{xetex}{% \def\eq@drivernum{2}\def\eq@driver{xetex}% \PassOptionsToPackage{xetex}{\eq@ColorPackage} \PassOptionsToPackage{xetex}{eforms}% } \DeclareOption{textures}{\def\eq@drivernum{3}% \def\eq@driver{textures}% \PassOptionsToPackage{textures}{\eq@ColorPackage}% \PassOptionsToPackage{textures}{eforms}% } \DeclareOption{dviwindo}{\def\eq@drivernum{4}\def\eq@driver{dviwindo}% \eq@noformstrue\PassOptionsToPackage{nodljs}{insdljs}} \DeclareOption{unicode}{\PassOptionsToPackage{unicode}{hyperref}} \DeclareOption{useui}{\PassOptionsToPackage{useui}{eforms}} \let\LangRedefinitions\relax \DeclareOption{french}{% \def\LangRedefinitions{\InputIfFileExists{eqfr.def}% {\PackageInfo{exerquiz}{Inputting French Option}}% {\PackageInfo{exerquiz}{French Option: Cannot find the file eqfr.def, using the default, English.}}}} \DeclareOption{german}{% \def\LangRedefinitions{\InputIfFileExists{eqde.def}% {\PackageInfo{exerquiz}{Inputting German Option}}% {\PackageInfo{exerquiz}{German Option: Kann die Datei eqde.def nicht finden, benutze Default, Englisch.}}}} \DeclareOption{norsk}{% \def\LangRedefinitions{\InputIfFileExists{eqno.def}% {\PackageInfo{exerquiz}{Inputting Norsk Option}}% {\PackageInfo{exerquiz}{Norsk Option: Cannot find the file eqno.def, using the default, English.}}}} \DeclareOption{dutch}{% \def\LangRedefinitions{\InputIfFileExists{eqnl.def}% {\PackageInfo{exerquiz}{Inputting Dutch Option}}% {\PackageInfo{exerquiz}{Dutch Option: Kan bestand eqnl.def niet vinden, gebruik default, Engels.}}}} \DeclareOption{spanish}{% \def\LangRedefinitions{\InputIfFileExists{eqes.def}% {\PackageInfo{exerquiz}{Inputting Spanish Option}}% {\PackageInfo{exerquiz}{Spanish Option: Opci\'on Espa\~nola: no puede encontrar el fichero eqes.def, usar\'a por defecto, English.}}}} \DeclareOption{italian}{% \def\LangRedefinitions{\InputIfFileExists{eqit.def}% {\PackageInfo{exerquiz}{Opzione Lingua Italiana}}% {\PackageInfo{exerquiz}{pzione Italiano: Non trovo il file eqit.def, utilizzo quello di default, English.}}}} \DeclareOption{russian}{% \@ifpackageloaded{hyperref}{% \ifHy@unicode\else\PackageWarning{exerquiz}{% The unicode option recommended for hyperref\MessageBreak}\fi }{\PassOptionsToPackage{unicode}{hyperref}} \def\LangRedefinitions{\InputIfFileExists{eqru.def}% {\PackageInfo{exerquiz}{Inputting Russian Option}}% {\PackageInfo{exerquiz}{Russian Option: Cannot find the file eqru.def, using the default, English.}}}} \DeclareOption{dansk}{% \def\LangRedefinitions{\InputIfFileExists{eqda.def}% {\PackageInfo{exerquiz}{Inputting Dansk Option}}% {\PackageInfo{exerquiz}{Dansk Option: Cannot find the file eqda.def, using the default, English.}}}} \DeclareOption{polish}{% \def\LangRedefinitions{\InputIfFileExists{eqpo.def}% {\PackageInfo{exerquiz}{Inputting Polish Option}}% {\PackageInfo{exerquiz}{Polish Option: Cannot find the file eqpo.def, using the default, English.}}}} \DeclareOption{finnish}{% \def\LangRedefinitions{\InputIfFileExists{eqfin.def}% {\PackageInfo{exerquiz}{Inputting Finnish Option}}% {\PackageInfo{exerquiz}{Finnish Option: Cannot find the file eqfin.def, using the default, English.}}}} \DeclareOption{catalan}{% \def\LangRedefinitions{\InputIfFileExists{eqcat.def}% {\PackageInfo{exerquiz}{Inputting Catalan Option}}% {\PackageInfo{exerquiz}{Catalan Option: Cannot find the file eqcat.def, using the default, English.}}}} \DeclareOption{czech}{% \def\LangRedefinitions{\InputIfFileExists{eqcz.def}% {\PackageInfo{exerquiz}{Inputting Czech Option}}% {\PackageInfo{exerquiz}{Czech Option: Cannot find the file eqcz.def, using the default, English.}}}} \DeclareOption{brazil}{% \def\LangRedefinitions{\InputIfFileExists{eqbr.def}% {\PackageInfo{exerquiz}{Inputting Brazilian Portuguese Option}}% {\PackageInfo{exerquiz}{Portuguese Option: Opc\~ao Portugu\^es: n\~ao foi poss\'ivel encontrar o arquivo eqbr.def, usaremos o padr\~ao, English.}}}} \DeclareOption{turkish}{% \@ifpackageloaded{hyperref}{% \ifHy@unicode\else\PackageWarning{exerquiz}{% The unicode option recommended for hyperref\MessageBreak}\fi }{\PassOptionsToPackage{unicode}{hyperref}} \def\LangRedefinitions{\InputIfFileExists{eqtr.def}% {\PackageInfo{exerquiz}{Inputting Turkish Option}}% {\PackageInfo{exerquiz}{Cannot find the file eqtk.def, using the default, English.}}}} \DeclareOption*{\PassOptionsToPackage{\CurrentOption}{\eq@ColorPackage}} \@ifpackageloaded{xcolor}% {% \@ifpackagelater{xcolor}{2004/07/04}{} {% \PackageError{exerquiz}{% *************************************************\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]{exerquiz}\MessageBreak *************************************************}{}% }% }{} \let\iterate\relax \newif\ifeq@solutionsafter \eq@solutionsafterfalse \def\ifsolutionsafter{\csname ifeq@solutionsafter\endcsname} \let\solutionsaftertrue\eq@solutionsaftertrue \let\solutionsafterfalse\eq@solutionsafterfalse \newif\ifeq@hidesolution \eq@hidesolutionfalse \newif\ifeq@globalshowsolutions \eq@globalshowsolutionsfalse \newif\ifeq@nosolutions \eq@nosolutionsfalse \newif\ifeq@proofing \eq@proofingfalse \providecommand\turnProofingOn{\eq@proofingtrue} \providecommand\turnProofingOff{\eq@proofingfalse} \newif\ifeqforpaper \eqforpaperfalse \newif\ifeq@noforms \eq@noformsfalse \newif\ifeq@noquizsolutions \eq@noquizsolutionsfalse \newif\ifnocorrections \nocorrectionsfalse \@ifundefined{ifeqe@flextended}{\newif\ifeqe@flextended \eqe@flextendedfalse}{} \@ifundefined{ifcont@nnot}{\newif\ifcont@nnot \cont@nnotfalse}{} \@ifundefined{if@eqalignfilllinestoleft} {\newif\if@eqalignfilllinestoleft\@eqalignfilllinestoleftfalse}{} \newif\ifkeepdeclaredvspacing \keepdeclaredvspacingfalse \newif\ifeq@nolink \eq@nolinkfalse \def\eq@ckglobalhide{\ifeq@globalshowsolutions\eq@hidesolutionfalse\fi} \def\hidesymbol{h}\def\Hidesymbol{H} \newif\iftherearesolutions \therearesolutionsfalse \newif\ifIsRespBox \global\IsRespBoxfalse \def\SolutionsAfter{\solutionsAtEndfalse\eq@solutionsaftertrue \displayworkareafalse\eq@proofingfalse\eq@nolinktrue} \newif\ifcqSA\cqSAfalse \def\SolutionsAtEnd{\solutionsAtEndtrue\vspacewithsolnstrue \eq@solutionsafterfalse\eq@nolinkfalse \displayworkareafalse\ifvspacewithsolns\eq@nosolutionsfalse\else \eq@nosolutionstrue\fi\eq@proofingfalse\answerkeyfalse} \def\NoSpaceToWork{\let\eq@insertverticalspace\eq@NO} \def\SpaceToWork{\let\eq@insertverticalspace\eq@YES} \SpaceToWork \long\def\ifNoSolutions#1#2{% \ifeq@nosolutions\expandafter#1\else \expandafter#2\fi} \newif\ifeq@randomizeChoices \eq@randomizeChoicesfalse \newif\ifeq@randomizeallChoices \eq@randomizeallChoicesfalse \newif\if@DoNotRandomize \@DoNotRandomizefalse \def\turnOnRandomize{\eq@randomizeallChoicestrue} \def\obeyLocalRandomize{\eq@randomizeallChoicesfalse} \def\doNotRandomizeChoices{\@DoNotRandomizetrue} \def\allowRandomizedChoices{\@DoNotRandomizefalse} \let\saveRandomSeed\relax \let\inputRandomSeed\relax \def\CorrectionsOn{\global\nocorrectionsfalse} \def\CorrectionsOff{\global\nocorrectionstrue} \AtBeginDocument{\ifeq@noforms\else\Form\fi} \AtEndDocument{% \include@solutions \ifeq@noforms\else\include@quizsolutions\fi \clearpage \csname endForm\endcsname \if\eq@drivernum2\else\clearpage\fi} \InputIfFileExists{exerquiz.cfg}{}{} \let\bWebCustomize\endinput \let\eWebCustomize\relax \@ifpackageloaded{web}{% \ExecuteOptions{\eq@driver@name}% }{% \ifluatex\ExecuteOptions{luatex}\else \ifpdf\ExecuteOptions{pdftex}\else \ifxetex\ExecuteOptions{xetex}\else \InputIfFileExists{web.cfg}{} {\@ifundefined{l@tex@@@@driver}{\ExecuteOptions{dvips}} {\ExecuteOptions{dvipsone}}}\fi\fi\fi } \ProcessOptions \RequirePackage{array} \RequirePackage{\eq@ColorPackage} \RequirePackage{aeb-comment} \def\eq@commentChkMsg{\@ifpackageloaded{comment} {\PackageWarningNoLine{exerquiz} {The comment package is incompatible with the\MessageBreak aeb-comment package, do not use the comment package}}{}} \AtBeginDocument{\eq@commentChkMsg} \RequirePackage{verbatim} \RequirePackage{hyperref} \RequirePackage{amssymb}% used for return symbols \RequirePackage{eforms}[2019/10/23] \dlSetPkgInfo \@ifundefined{eq@drivernum}{% \PackageError{exerquiz}% {You have not specified dvips, dvipsone, pdftex, dvipdfm, dvipdfmx, or xetex \MessageBreak in the option list of the exerquiz package} {Place one of the drivers dvips, dvipsone, pdftex, dvipdfm, dvipdfmx, or xetex \MessageBreak in the option list of the exerquiz package.} }{} \edef\eq@restoreCats{% dps17 \catcode`\noexpand\"=\the\catcode`\"\relax \catcode`\noexpand\'=\the\catcode`\'\relax \catcode`\noexpand\,=\the\catcode`\,\relax \catcode`\noexpand\(=\the\catcode`\(\relax \catcode`\noexpand\!=\the\catcode`\!\relax \catcode`\noexpand\_=\the\catcode`\_\relax } \@makeother\"\@makeother\'\@makeother\,% \@makeother\(\@makeother\!\@makeother\_ \@ifundefined{ifsolutionsAtEnd} {\newif\ifsolutionsAtEnd\solutionsAtEndtrue}{} \ifeq@nosolutions\solutionsAtEndfalse\fi \ifeq@solutionsafter\solutionsAtEndfalse\fi \@ifundefined{if@fleqn}{\let\fleqnOn\relax\let\fleqnOff\relax} {\def\fleqnOn{\@fleqntrue}\def\fleqnOff{\@fleqnfalse}} \@ifundefined{if@inclkey}{\newif\if@inclkey\@inclkeytrue}{} \def\eqretnSymb{$\blacksquare$}%{\rule{6bp}{6.8bp}} \newcommand\exlabel{Exercise} \newcommand\exlabelsol{\exlabel} \newcommand\exsectitle{Solutions to \exlabel s} \newcommand\exsecrunhead{\exsectitle} %% change to @ form \newcommand{\exsolafter}{\eq@exsolafterDefault} \newcommand{\resetSolnAfterToDefault}{% \def\exsolafter{\eq@exsolafterDefault}} \newcommand{\exsolafterDefault}[1]{\def\eq@exsolafterDefault{#1}% \def\exSolafterDefault{#1}\resetSolnAfterToDefault} \exsolafterDefault{\textit{Solution}:} \newcommand{\renameSolnAfterTo}[1]{\def\exsolafter{#1}} \newcommand{\adjDisplayBelow}{\vskip-\lastskip\vskip-\baselineskip} \newcommand{\adjDisplayBelowPlus}{\adjDisplayBelow\recoverDisplayBelow} \def\recoverDisplayBelow{\vskip\belowdisplayskip} \newcommand\eq@sqslsectitle{Solutions to Quizzes} \newcommand\sqslsectitle{\eq@sqslsectitle} \newcommand\eq@sqslsecrunhead{Solutions to Quizzes} \newcommand\sqslsecrunhead{\eq@sqslsecrunhead} \newcommand\eq@sqsllabel{\protect\textbf{Solution to Quiz:}} \newcommand\sqsllabel{\eq@sqsllabel} \newcommand\sqsolafter{\textit{Solution}:} \newcommand{\sqDefaultFmtTitle}[1]% {\def\eq@sqlabel{#1}\def\sqlabel{#1}} \newcommand\sqlabel{\eq@sqlabel} \sqDefaultFmtTitle{\textcolor{red}{Quiz}} \newcommand\eq@sqslrtnlabel{\protect\eqretnSymb} \newcommand\sqslrtnlabel{\eq@sqslrtnlabel} \newcommand\eqsqrtmsg{"Right!"} \newcommand\eqsqwgmsg{"Wrong!"} \newcommand\doNotShowAgainMsg{Do not show this message again} \newcommand\eq@bqlabel{Begin Quiz} \newcommand\bqlabel{\eq@bqlabel} \newcommand\eq@bqlabelISO{\eq@bqlabel} \newcommand\bqlabelISO{\eq@bqlabelISO} \newcommand\setDefShortQuizLabelName[1]% {\def\eq@defaultShortQuizLabelName{#1}} \setDefShortQuizLabelName{Quiz} \newcommand\setDefQuizLabelName[1] {\def\eq@defaultQuizLabelName{#1}} \setDefQuizLabelName{Quiz} \newcommand\eq@eqlabel{End Quiz} \newcommand\eqlabel{\eq@eqlabel} \newcommand\eq@Score{Score:}\newcommand\eq@OutOf{out of} \newcommand\eq@ptScore{Score:} \newcommand\stOutOf{of} \newcommand\eqScore{\eq@Score}\newcommand\eqOutOf{\eq@OutOf} \newcommand\eqptScore{\eq@ptScore} \newcommand\eqInitQuizMsg{% "You must initialize the Quiz! Click on "+msg+"."} \newcommand\eqQuizTotalMsg{% "\eqScore\space"+Score+" \eqOutOf\space"+nQuestions} \newcommand\eqQuizPointsMsg{% "\eqptScore\space"+ptScore+" \eqOutOf\space"+nPointTotal} \newcommand\eqQuizPercentMsg{pcScore+"\%"} \newcommand\eqQuizGradeMsg{quizGrade} \newcommand\eqMadeChoice{% "You have already made a choice." + " Your choice was ("+Responses[probno]+")." + " Do you want to change it?"} \newcommand\eq@local@CA{Correct} \newcommand\eq@local@RC{My Answers!} \newcommand\eq@local@AC{Please!} \newcommand\eq@local@CorrAnsButton{Ans} \newcommand{\eq@local@sqClearButton}{Clear} \newcommand\eqerrABS{"Absolute values not balanced. Please correct."} \dlJSStr[noquotes]\eqerrBadMathFunc{"The expression \""+aF[i] +"\" is neither a defined function nor a valid math expression."} \newcommand\eqParens{"Parentheses"} \newcommand\eqBrackets{"Brackets"} \newcommand\eqBraces{"Braces"} \newcommand\eqerrDelimNotBal{aGroup[i][2] + " not balanced. Please correct."} \newcommand\eqerrBadExp{"Invalid mathematical expression. A problem with one of the exponents. Please correct."} \newcommand\eqerrUnfinishQuiz{"There is an unfinished quiz, please finish before moving on to another."} \newcommand\noPeekMsg{"Viewing Solutions to quizzes is not allowed until you take or finish this quiz!"} \newcommand\highThresholdMsg{"You are required to respond to all questions before the quiz is evaluated."} \newcommand\eqSyntaxErrorUndefVar{"Syntax Error: Possibly an undefined variable present, or an expression is not written in an expected format."} \dlJSStr[noquotes]{\eqSyntaxErrorComma}{% "Syntax Error: A comma was found" + " in your response \"" + UserAns + "\". Please remove the comma, or this answer" + " will be marked as wrong."} \newcommand{\limSelWarningMsg}{"For this question, you are allowed to make at most " + n + " selections."} \newcommand{\defaultReqFormMsg}{% "The expression is not in the expected form."} \PackageInfo{exerquiz}{* Using \eq@driver\space option *} \newcommand{\writeToExSolns@}[1]{% \ifsolutionsonly\else \ifOKToWriteExamData \set@display@protect \immediate\write\ex@solns{#1}\set@typeset@protect \fi\fi}% \ifsolutionsonly \InputIfFileExists{\jobname_xdefs.cut}{% \typeout{^^JExerquiz|Eqexam: Reading \jobname_xdefs.cut^^J}} {\PackageWarningNoLine{exerquiz|eqexam}{% \jobname_xdefs.cut not found.\MessageBreak Recompile file under the vspacewithsolns\MessageBreak option, then compile with the solutionsonly\MessageBreak option}} \let\writeToExSolns\@gobble \else \newwrite\ex@solns \immediate\openout \ex@solns \jobname.sol \let\writeToExSolns\writeToExSolns@ \newwrite\eq@xrefdefns \immediate\openout\eq@xrefdefns\jobname_xdefs.cut \fi \let\writeT@ExSolns\writeToExSolns \newwrite\quiz@solns \immediate\openout \quiz@solns \jobname.qsl \newcommand{\writeToQzSolns}[1]{\ifOKToWriteExamData\set@display@protect \immediate\write\quiz@solns{#1}\set@typeset@protect\fi} \let\writeT@QzSolns\writeToQzSolns \def\eq@IWAuxOut#1{\immediate\write\@auxout{#1}} \def\eq@IWDefs#1{\immediate\write\eq@xrefdefns{#1}} \@ifundefined{ifOKToWriteExamData}{\newif\ifOKToWriteExamData \OKToWriteExamDatatrue}{} \def\noSolnWrites{\OKToWriteExamDatafalse} \def\normalSolnWrites{\OKToWriteExamDatatrue} \def\bHideSolnIn#1{#1{\protect\iffalse}\noSolnWrites} \def\eHideSolnIn#1{\normalSolnWrites#1{\protect\fi^^J}} \newcounter{eqexno} \setcounter{eqexno}{0} \newcounter{@exno} \setcounter{@exno}{0} % running exno \newcounter{quizno} \setcounter{quizno}{0} \renewcommand\thequizno{\alph{quizno}} \newcount\eqtmpcnta \def\theHquizno{\curr@quiz.\theeqquestionnoi.% \ifcase\@eqquestiondepth\or\or\arabic{eqquestionnoii}.% \or\arabic{eqquestionnoii}.\roman{eqquestionnoiii}.% \else\fi\alph{quizno}} \newlength\eqemargin \eqemargin=0pt \newcounter{eqpointvalue} \setcounter{eqpointvalue}{0} \newlength\eq@tmplength \newlength\eqtmplength \newcounter{questionno} \newcounter{eqquestionnoi} \newcounter{eqquestionnoii} \newcounter{eqquestionnoiii} \newcount\@eqquestiondepth \@eqquestiondepth=0 \newcounter{grpquestionno} \newcounter{partno} \newif\ifuseNumForParts\useNumForPartsfalse \def\alphaParts{\def\partnoFmt{\alph}\useNumForPartsfalse}\alphaParts \def\numberParts{\def\partnoFmt{\arabic}\useNumForPartstrue} \renewcommand\thepartno{\partnoFmt{partno}} \newtoks\eq@scratchtoks \def\theHpartno{partno\the@exno\thepartno} \def\verbatimwrite{\@bsphack \let\do\@makeother\dospecials \catcode`\^^M\active \catcode`\^^I=12 \def\verbatim@processline{% \immediate\write\verbatim@out {\the\verbatim@line}}% \verbatim@start} \def\endverbatimwrite{\@esphack} \providecommand\PBS[1]{\let\temp=\\#1\let\\=\temp} \newcommand\exlabelformat{{\scshape\exlabel\ \theeqexno.}} \newcommand\exlabelformatwp{\exlabelformat} \newcommand\exsllabelformat{\protect\textbf{\exlabelsol\ \theeqexno.}} \newcommand\exsllabelformatwp {\protect\textbf{\exlabelsol\ \theeqexno(\thepartno)}} \newcommand\exrtnlabelformat{$\square$} \newcommand\exrtnlabelformatwp{$\square$} \newcommand{\belowexskip}[1]{\setlength{\eq@tmplength}{#1}% \edef\eq@exerskip{\noexpand\removelastparskip \noexpand\vskip\the\eq@tmplength\relax\kern0pt}} \let\eqexerskip\belowexskip \belowexskip{\medskipamount} \newcommand{\aboveexskip}[1]{\setlength{\eq@tmplength}{#1}% \edef\eq@priorexskip{\noexpand\vskip\the\eq@tmplength\relax \kern0pt}} \let\priorexskip\aboveexskip \aboveexskip{\medskipamount} \let\eq@postexerciseHook\relax \newcommand\belowexsolnskip{\protect\medskip} \def\removelastparskip{\ifdim\parskip>0pt\vskip-\parskip\fi} \newcommand{\nolinkcolor}[1]{\def\@nolinkcolor{#1}} \nolinkcolor{blue} \newcommand{\exerSolnsInExtFile}[2][] {\let\exerSolns@ExtFile\eq@YES\gdef\eq@exerSolns@fileName{#2}% \gdef\exerSolns@ReturnPath{#1}} \let\exerSolns@ExtFile\eq@NO \def\exerSolns@ReturnPath{} \let\marginparpriorhook\@empty % used to material before the exercise \let\marginparafterhook\@empty % used to material after the exercise \let\afterlabelhskip\space \let\exersolnheadhook\@empty \let\exer@solnheadhook\@empty \newcommand{\eqexheader} {% \ifeq@nolink % no link to solution \mbox{\color{\@nolinkcolor}\if\exerstar*\exlabelformatwp\else \exlabelformat\fi}% \else \if\exerSolns@ExtFile\eq@YES \mbox{\href{\eq@exerSolns@fileName\#ex.\the@exno}% {\exlabelformat}}% \else \mbox{\hyperlink{ex.\the@exno}{\exlabelformat}}% \fi \fi } \def\eqexheader@wrapper{\hypertarget{qex.\the@exno}{\eqexheader}} \newcommand{\partsformat}[1]{\def\eq@partsformat{#1}} \partsformat{(\hfil\thepartno\hfil)} \newcommand{\defaultpartsformat}{% \partsformat{(\hfil\thepartno\hfil)}} \let\exlisttabheaderpriorhook\@empty \let\exlisttabheaderafterhook\@empty \newcommand{\eqexlisttabheader} {% \exlisttabheaderpriorhook \ifeq@nolink \color{\@nolinkcolor}\eq@partsformat \else \if\exerSolns@ExtFile\eq@YES \href{\eq@exerSolns@fileName\#ex.\the@exno\thepartno}% {\eq@partsformat}% \else \hyperlink{ex.\the@exno\thepartno}{\eq@partsformat}% \fi \fi } \newcount\cq@Cnt \def\cq@CutName{cq-\the\cq@Cnt.cut} \let\cq@star\eq@NO \newif\ifcqqs \cqqstrue \newif\ifcqIsActive \cqIsActivefalse \def\cqQS{\@ifstar{\cqQSV}{\cqQSA}} \def\cqQSA#1#2{\ifcqqs#1\else#2\fi} \@ifpackageloaded{web}{\@ifundefined{IF@AorBswitch}{% \PackageWarningNoLine{A version of the web package dated\MessageBreak 2016/11/03 or later is required for \string\cqQS}}}{}% \@ifundefined{webtempboxi}{\newbox\webtempboxi \newbox\webtempboxii}{} \providecommand\SHOWTEMPBOXi{\unhbox\webtempboxi} \providecommand\TRUEACTIONi{\aftergroup\SETTEMPBOXii} \providecommand\TRUEACTIONia{\aftergroup\SHOWTEMPBOXi} \providecommand\FALSEACTIONii{\aftergroup\SETTEMPBOXi} \providecommand\FALSEACTIONiia{\aftergroup\SHOWTEMPBOXi} \providecommand\SETTEMPBOXi{\IF@AorBswitch\else \afterassignment\TRUEACTIONia\fi \setbox\webtempboxi=\hbox} \providecommand\SETTEMPBOXii{\IF@AorBswitch \afterassignment\FALSEACTIONiia\fi \setbox\webtempboxii=\hbox} \def\cqQSV{\let\IF@AorBswitch\ifcqqs \IF@AorBswitch \def\eq@next{\afterassignment\TRUEACTIONi\SETTEMPBOXi}\else \def\eq@next{\afterassignment\FALSEACTIONii\SETTEMPBOXii}\fi \eq@next} \def\eq@turnMessageOff{\let\save@message\message \let\message\@gobble} \def\eq@turnMessageOn{\let\message\save@message} \def\eqCQDeclarations{\cqqsfalse\eq@turnMessageOff \includecomment{sPage}\excludecomment{qPage}% \eq@turnMessageOn} \def\eqTopOfSolnPage{\withinsoldoctrue\cqSAfalse \eqCQDeclarations} \def\eqTopOfQslPage{\withinqsldoctrue} \eq@turnMessageOff \includecomment{qPage}\excludecomment{sPage} \eq@turnMessageOn \def\writecqQSfalse{% \writeT@ExSolns{\protect\eqTopOfSolnPage}} \def\writeTopOfQslPage{\writeT@QzSolns{\protect\eqTopOfQslPage}} \AtBeginDocument{\writecqQSfalse\writeTopOfQslPage} \newenvironment{cq@CQ} {% \global\cqIsActivetrue \global\advance\cq@Cnt1\relax \immediate\openout\CommentStream=\cq@CutName \let\verbatim@out\CommentStream \verbatimwrite }{% \endverbatimwrite \immediate\closeout\CommentStream \ifx\cq@star\eq@YES \xdef\cq@INPUTCUT{\noexpand\cqqstrue \noexpand\input{\cq@CutName}\noexpand \def@QuesToSoln}\else \xdef\cq@INPUTCUT{\noexpand\cqqstrue \noexpand\input{\cq@CutName}\noexpand \p@ssQuesToSoln}\fi \aftergroup\cq@INPUTCUT } \newenvironment{cqs@CQ}{\let\cq@star\eq@YES\cq@CQ}{\endcq@CQ} \def\declCQQuesStr#1{\def\cqQStr{#1}} \declCQQuesStr{Question} \def\declCQSolStr#1{\def\cqSStr{#1}} \declCQSolStr{Solution} \newcommand\declCQPre[1]{\def\cq@Pre{#1}} \declCQPre{\emph{\cqQStr}:\space} \newcommand\declCQPost[1]{\def\cq@Post{#1}} \declCQPost{\par\medskip\noindent\emph{\cqSStr}:\space\ignorespaces} \def\cqFmtPasteQues#1{\cq@Pre\input{#1}\cq@Post} \def\p@ssQuesToSoln{\ifeq@hidesolution\else \global\terminexchangedtrue % dps cq \ifeq@solutionsafter\else \writeT@ExSolns{\protect\decleqterminex{\protect \cqFmtPasteQues{\cq@CutName}}\eq@commentchar}\fi\fi} \def\declCopyQues#1{\def\cqCopiedQues{#1}} \def\def@QuesToSoln{\restoreNormalSolns \global\terminexchangedfalse % dps cq \ifeq@hidesolution\else\writeT@ExSolns{\protect \declCopyQues{\protect\input{\cq@CutName}}}\fi} \newcommand\restoreNormalSolns{\ifeq@solutionsafter\else \writeT@ExSolns{\protect\decleqterminex{\protect \eqterminexDEF}\eq@commentchar}\fi} \newcommand{\eq@CommonCmd}[1]{\def\eq@@CommonCmd{#1}#1} \let\eq@@CommonCmd\@empty \newcommand\gExCommonCmd[1]{\gdef\gEx@CommonCmd{\eq@CommonCmd{#1}}} \let\gEx@CommonCmd\@empty \let\endexerhook\@empty \newenvironment{exercise} {% \let\cq\cq@CQ\let\endcq\endcq@CQ \csarg\let{cq*}\cqs@CQ \csarg\let{endcq*}\endcqs@CQ \par\removelastskip\eq@priorexskip\noindent \let\eqCommonCmd\eq@CommonCmd \def\eq@argi{eqexno}%% use eqexno counter \if\eq@exerstarEnv*\def\exerstar{*}\else\def\exerstar{x}\fi \def\currhideopt{x}% \@ifnextchar[{\exercise@}% {\if\exerstar*\def\eq@next{\@exercise}\else \def\eq@next{\exercise@@}\fi\eq@next}% }{\eq@postexerciseHook\endexerhook\par \global\let\insE@rlyAtQues\@empty \global\eq@exerciseheadingtrue\removelastskip\eq@exerskip} \def\exercise@[#1]{\edef\eq@arg{#1}% \if\eq@arg h\def\currhideopt{h}% \eq@hidesolutiontrue\eq@nolinktrue% \ifeq@globalshowsolutions \eq@hidesolutionfalse\eq@nolinkfalse\fi \def\eq@next{\@exercise}% h, no *, no counter \else \if\eq@arg H% \edef\currhideopt{\Hidesymbol}% \eq@hidesolutiontrue\eq@nolinktrue% \ifeq@globalshowsolutions \eq@hidesolutionfalse\eq@nolinkfalse \fi \def\eq@next{\@exercise}% H, no *, no counter \else \def\currhideopt{x}% \ifx\eq@arg\@empty\else\def\eq@argi{#1}\fi \if\exerstar*\def\eq@next{\@exercise}\else \def\eq@next{\exercise@@}\fi \fi \fi \eq@next} \def\exercise@@{\@ifstar{\def\exerstar{*}\@exercise}{\exercise@@@}} \def\exercise@@@{\@ifnextchar[{\exercise@@@@}{\@exercise}} \def\exercise@@@@[#1]{\edef\eq@arg{#1}% \if\eq@arg h\def\currhideopt{h}% \eq@hidesolutiontrue\eq@nolinktrue \ifeq@globalshowsolutions \eq@hidesolutionfalse\eq@nolinkfalse\fi \def\eq@next{\@exercise}% h, no *, no counter \else \if\eq@arg H\edef\currhideopt{\Hidesymbol}% \eq@hidesolutiontrue\eq@nolinktrue% \def\eq@next{\@exercise}% h, no *, no counter \else \def\currhideopt{x}% \PackageWarning{exerquiz}{The option #1 is not recognized} \let\eq@next\relax \fi \fi \eq@next} \newif\ifeq@exerciseheading \eq@exerciseheadingtrue \let\prior@exerSolnHeaderHook\@empty \newcommand\exerSolnHeader[3]{% \prior@exerSolnHeaderHook \ifeqforpaper\else\webnewpage\fi\markright{#1}%\par\noindent% \priorexlabelheader \noindent\hypertarget{#2}{#3}\global\let\priorexlabelheader\relax \solnhspace } \let\solnItemMngt\relax \let\eqEXt\@gobbletwo \let\endeqEXt\relax \let\eqExtArg\@empty \let\eqFilterArg\@empty \let\eqExerSolnHeader\@empty \let\solutionparshape\@empty \def\eq@pslnaindnt{0pt} \let\eq@setPrbSolnAftrIndnt\relax \newcommand{\setPrbSolnAftrIndent}[1]{\ifdim#1=0pt \def\eq@pslnaindnt{0pt}\let\eq@setPrbSolnAftrIndnt\relax\else \edef\eq@pslnaindnt{#1}\edef\eq@setPrbSolnAftrIndnt{\expandafter \noexpand\expandafter\parindent#1\noexpand\relax}\fi} \newif\if@restorejustify \@restorejustifyfalse \newcommand\restoreJustifyOn{\@restorejustifytrue} \newcommand\restoreJustifyOff{\@restorejustifyfalse} \def\restorejustify{\if@restorejustify \@rightskip\z@skip \rightskip\@rightskip \leftskip\z@skip \let\\\@normalcr\fi} \def\@exercise{% \global\let\solutionparshape\@empty \let\verbatim@out=\ex@solns \if\eq@argi0\else\refstepcounter{\eq@argi}\fi\stepcounter{@exno}% \if\exerstar*% if exercise with parts \eq@nolinktrue \else \if\currhideopt H% \else \ifeq@solutionsafter \eq@nolinktrue % no link to solution \else \eq@ckglobalhide % \ifeq@hidesolution\else \global\let\eqExerSolnHeader\eq@@writeexheader \fi \fi \fi \fi \ifvmode\ifdim\lastskip>\z@ \vskip-\lastskip \fi\fi \if\exerstar*% \let\solution\solnexer@woparts \let\endsolution\endsolnexer@woparts \let\parts\exercise@parts \let\endparts\endexercise@parts \else \let\solution\solnexer@woparts \let\endsolution\endsolnexer@woparts \let\parts\relax \let\endparts\relax \if\Hidesymbol h\eq@nolinkfalse\ifeq@solutionsafter \eq@nolinktrue\fi\fi \fi \eq@initializeContAnnot \ifeq@exerciseheading \prior@questionsHook \insE@rlyAtQues\marginparpriorhook\noindent\eqexheader@wrapper \afterlabelhskip\marginparafterhook\gEx@CommonCmd \eq@setPrbSolnAftrIndnt\ignorespaces\fi} \newif\ifterminexchanged \terminexchangedfalse % dps cq \newcommand\decleqterminex[1]{\def\eqterminex{#1}} \def\eqterminexDEF{\relax\ignorespaces} \decleqterminex{\eqterminexDEF} \newif\ifmakeExSlLocal \makeExSlLocalfalse \def\makeExSolnsLocalOn{\makeExSlLocaltrue} \def\makeExSolnsLocalOff{\makeExSlLocalfalse} \let\eqMrkSoln\@gobble \let\priorexlabelheader\relax \def\eqExerSolnHeaderSngl{% \ifmakeExSlLocal\protect\begingroup^^J\fi \ifx\eqMrkCpyArg\@empty\else \protect\eqMrkSoln{\eqMrkCpyArg}\fi \protect\eqEXt{\eqExtArg}{\eqFilterArg}\protect \solnItemMngt\protect\exerSolnHeader{\exsecrunhead}{ex.\the@exno}% {\exsllabelformat}\exer@solnheadhook \exersolnheadhook\protect\eqterminex} \def\eq@@writeexheader{\ifeq@hidesolution\else\ifOKToWriteExamData \set@display@protect \immediate\write\verbatim@out{\eqExerSolnHeaderSngl}% \set@typeset@protect\fi\fi} \def\eqExerSolnHeaderList{% \ifmakeExSlLocal\protect\begingroup^^J\fi \ifx\eqMrkCpyArg\@empty\else \protect\eqMrkSoln{\eqMrkCpyArg}\fi \protect\eqEXt{\eqExtArg}{\eqFilterArg}\protect \solnItemMngt\protect\exerSolnHeader{\exsecrunhead}% {ex.\the@exno\thepartno}{\exsllabelformatwp}% \exer@solnheadhook\exersolnheadhook\protect\eqterminex} \def\eq@@writeexheaderlist{\ifeq@hidesolution\else\ifOKToWriteExamData \set@display@protect\immediate \write\verbatim@out{\eqExerSolnHeaderList}\set@typeset@protect\fi\fi} \long\def\setsolnspace#1{\def\newsolnspace{#1}% \let\solnspace\newsolnspace} \newif\ifeq@ckSolnVspace \eq@ckSolnVspacetrue \def\ckSolnOpt{\global\eq@ckSolnVspacetrue} \def\noSolnOpt{\global\eq@ckSolnVspacefalse} \let\solnhspace\space \let\solnspace\space \let\exsolnonceonlytophook\relax \def\solnexer@woparts{% \ifanswerkey\ifeqe@flextended\ifcont@nnot \ifx\solutionparshape\@empty\else % dpsj8 \pushEnvir \everypar{}\if@eqalignfilllinestoleft\else \parshape=1 \leadinIndent \linewidth\fi \popEnvir \fi\fi\fi\fi\def\bLeaveVspace{x}% = no vertical space added \exsolnonceonlytophook % dps27 \global\let\exsolnonceonlytophook\relax \@ifundefined{KV@eqefillLines@bgonly}{} {\ifKV@eqefillLines@bgonly\ifvmode\else \par\leavevmode\strut\fi\fi \ifKV@eqefillLines@outlineonly\leavevmode\strut\fi}% \ifeq@ckSolnVspace \def\eq@next{\@ifnextchar[{\solnexer@@woparts}%] {\solnexer@@woparts[\null]}}\else \def\eq@next{\solnexer@@woparts[\null]}\fi \eq@next} \let\eqPriorVspace\@gobble \newif\if@eqlinedfiller \@eqlinedfillerfalse \newcommand{\vspaceFiller}[1]{\vfill} \newcommand{\vspaceFillerDefault}[1]{\vfill} \def\eqWriteLine{\hfill} \def\eq@linesXPgs{% \begingroup\offinterlineskip\parskip0pt \@tempcnta=0 \@whilenum\@tempcnta<\soln@keys@nLines\relax\do {\vskip0pt\penalty-50\vglue\wlVspace\eqWriteLine \advance\@tempcnta1\relax}\par\endgroup} \let\leavevspace\relax % dpsj5 \newcommand{\vspaceFmt}[1]{% \ifx\solutionparshape\@empty\else \advance\linewidth-\leadinIndentPrtSep\fi \ifdim\sameVspace>0pt \let\bLeaveVspace\@empty \def\leavevspace{% \ifx\eq@insertverticalspace\eq@YES\par\eq@quessolskip \eqPriorVspace{#1}{\nobreak\noindent \if@eqlinedfiller \ifx\soln@keys@nLines\@empty \def\eq@lines@next{\vspaceFiller{#1}}\else \def\eq@lines@next{\eq@linesXPgs}\fi \else \def\eq@lines@next{\parbox[b][#1][t]{\linewidth} {\vspaceFiller{#1}}}% \fi\eq@lines@next}% \fi }\expandafter\leavevspace \fi} \define@key{soln@keys}{nLines}[]{\def\soln@keys@nLines{#1}} \let\soln@keys@nLines\@empty \def\eqKV@errx#1{\xdef\XKV@rm{\@tempa}} \def\eqSolnForEqexam#1{% \let\soln@keys@nLines\@empty \setkeys*{soln@keys}{#1}% \ifx\soln@keys@nLines\@empty \ifx\minVspacet@bs\@empty\xdef\sameVspace{\XKV@rm}\else \xdef\sameVspace{\minVspacet@bs}\fi \else \@tempdima\wlVspace \@tempdima=\soln@keys@nLines\@tempdima \xdef\sameVspace{\the\@tempdima}% \ifx\XKV@rm\@empty\else \if@equsedim\let\soln@keys@nLines\@empty \xdef\sameVspace{\XKV@rm}\fi \fi \fi \ifx\sameVspace\@empty\gdef\sameVspace{0pt}\fi } \def\solnexer@@woparts[#1]{% \ifcqIsActive\else\ifterminexchanged \restoreNormalSolns\fi\fi % dps cq \global\cqIsActivefalse \def\eq@argi{#1}\def\eq@null{\null}% \ifx\eq@argi\@empty\gdef\sameVspace{0pt}\else \ifx\eq@argi\eq@null\gdef\sameVspace{0pt}\else \@ifundefined{PointsOnLeft}{% \let\eqKV@errx@SAVE\KV@errx \let\KV@errx\eqKV@errx\let\XKV@rm\@empty \edef\temp@exp{\noexpand\setkeys*{soln@keys}{#1}}\temp@exp \let\KV@errx\eqKV@errx@SAVE \ifx\soln@keys@nLines\@empty\else \PackageInfo{exerquiz}{% nLines key detected in solution environment,\MessageBreak is not not recognized without eqexam,\MessageBreak will remove it}% \let\soln@keys@nLines\@empty\fi \xdef\sameVspace{\XKV@rm}% }{\eqSolnForEqexam{#1}}% \fi\fi \solnexer@@@woparts } \def\solnsafterSkip#1{\setlength{\@tempdima}{#1}% \edef\solnsafterSkipAmt{\the\@tempdima}% \def\solutionsafterSkip{\vskip\solnsafterSkipAmt\relax}} \solnsafterSkip{\smallskipamount} \def\@solnafterSkipOnce#1{\setlength{\@tempdima}{#1}% \xdef\@solnafterSkipOnceAmt{\the\@tempdima}}% \def\@@solnafterSkipOnce{\vskip\@solnafterSkipOnceAmt\relax %dpsj3 \gdef\@solnafterSkipOnceAmt{0pt}} \def\@solnafterSkipOnceAmt{0pt} \def\quessolSkip#1{\setlength{\@tempdima}{#1}% \edef\eq@quessolskip{\noexpand\vskip\the\@tempdima\relax}} \def\eq@quessolskip{\vskip\smallskipamount} \def\eqe@debugVertSkip#1{} \def\eqe@showEndHere#1{#1} \def\eqe@setStartSolns{% \xdef\eq@startSoln{\the\pagetotal}% \eqe@debugVertSkip{\marginpar{\smash{b[\sameVspace]}}}% } \let\eqSavedComment\dlcomment \let\endeqSavedComment\enddlcomment \def\setTabulrSolnEnv{% \@ifundefined{@listii@SAVE}{\global\let\@listii@SAVE\@listii}{}% \expandafter\def\expandafter\@listii\expandafter{\@listii@SAVE \leftmargin\leftmarginii \labelwidth\leftmarginii \advance\labelwidth-\labelsep}% \def\everyparShape{\everypar{\parshape \@ne 0pt \linewidth}}% \reset@doendpe{\parshape \@ne 0pt \linewidth}% \parshape \@ne 0pt \linewidth \everyparShape } \newif\ifthereissolution \let\priorexsolafterList\@empty \let\priorexsolafterTab\@empty \let\priorexsolafterSngl\@empty \def\eq@Hid{H}\def\eq@hid{h} \def\solutionafterExCmds#1{\def\@rgi{#1}\ifx\@rgi\@empty \let\eqSolnExCmds\relax\else \def\eqSolnExCmds{#1}\fi} \let\eqSolnExCmds\relax \def\eq@b@ddCodeSpecialDef#1{#1}% \let\eq@b@ddCodeSpecial\eq@b@ddCodeSpecialDef \def\solnexer@@@woparts{\ifeq@solutionsafter\else \expandafter\begingroup\fi \global\thereissolutiontrue \global\let\procsoln\relax \global\let\endprocsoln\relax \def\exerwparts@cols{0}% \let\verbatim@out\ex@solns \if\currhideopt\eq@Hid \let\minVspacet@bs\@empty \let\procsoln\eqSavedComment \let\endprocsoln\endeqSavedComment \def\eq@next{\procsoln}% \else \eq@ckglobalhide \ifeq@hidesolution \let\procsoln\eqSavedComment \let\endprocsoln\endeqSavedComment \else \ifeq@solutionsafter\else \ifx\eq@@CommonCmd\@empty\else \set@display@protect \immediate\write\verbatim@out{\eq@@CommonCmd}% \set@typeset@protect \fi \fi \let\procsoln\verbatimwrite \let\endprocsoln\endverbatimwrite \fi \def\eq@next{% \ifeq@solutionsafter \let\procsoln\relax \let\endprocsoln\relax \removelastskip\removelastparskip \cqSAtrue\eqCQDeclarations \declCopyQues{\input{\cq@CutName}}% \ifx\exsolafter\@empty \ifdim\sameVspace=0pt\eqe@setStartSolns \else \solutionsafterSkip \@@solnafterSkipOnce \eqe@setStartSolns \fi \else\par\kern0pt \solutionsafterSkip \@@solnafterSkipOnce \noindent\strut\eqe@setStartSolns \fi \parskip\eqeques@parsep \ifx\endparts\endexercise@parts@tabular \eq@setPrbSolnAftrIndnt \restorejustify \fi \ifx\endparts\endexercise@parts@tabular\expandafter \priorexsolafterTab\else \ifx\endparts\endexercise@parts@list\expandafter \priorexsolafterList\else\expandafter \priorexsolafterSngl\fi\fi \exsolafter\space\ignorespaces \solutionparshape \else \eqExerSolnHeader \global\therearesolutionstrue\expandafter\procsoln \fi }% \fi \eq@b@ddCodeSpecial{\eq@next}% }% dpsj4 \let\endsolnexerhook\@empty \let\pkg@endsolnexerhook\@empty \let\endsolnexerhookaux\@empty \def\eq@fititin#1{\noindent\unskip\nobreak\hfill\penalty100 \hskip1em\hbox{}\nobreak\hfill#1}% \let\eqfititin\eq@fititin \def\ReturnTo#1#2{\eq@fititin{\hyperlink{#1}{#2}}} \def\xReturnTo#1#2{\eq@fititin{\href{#1}{#2}}} \bgroup\catcode`\%=12\relax \gdef\eq@commentchar{%}\egroup \newcommand\eqExerSolnTrailer{% \if\exerSolns@ExtFile\eq@YES\protect\xReturnTo {\exerSolns@ReturnPath\jobname\#qex.\the@exno}% \else\protect\ReturnTo{qex.\the@exno}\fi {\protect\mbox{\if\exerstar*\exrtnlabelformatwp\else \exrtnlabelformat\fi}}% \protect\endeqEXt\ifeqforpaper\protect\par{\belowexsolnskip}\fi \eq@commentchar^^J% %dpsd03 \ifmakeExSlLocal\protect\endgroup^^J\fi } \let\eq@e@ddCodeSpecialDef\relax % dpsj4 \let\eq@e@ddCodeSpecial\eq@e@ddCodeSpecialDef % dpsj6 \let\kdvsp@Restore\relax \def\eq@clearMrkCpy{\if@targetforextr \global\let\eqMrkCpyArg\@empty \global\@targetforextrfalse\fi } \def\endsolnexer@woparts{\endprocsoln\eq@e@ddCodeSpecial \pkg@endsolnexerhook \eq@clearMrkCpy \ifeq@solutionsafter\else \expandafter\endgroup\fi % from \begingroup at \solnexer@@@woparts \global\let\exsolnonceonlytophook\relax \ifx\sameVspace\@empty\gdef\sameVspace{0pt}\fi \ifvspacewithsolns\vspaceFmt{\sameVspace}\else \ifeq@nosolutions\ifeq@solutionsafter\else \vspaceFmt{\sameVspace}\fi\fi\fi \if\currhideopt H% \ifkeepdeclaredvspacing\vskip\sameVspace\fi \else \ifeq@solutionsafter \ifx\isitleadin\eq@YES\parshape=0 \fi \if\exerstar*% \eq@fititin{\mbox{\exrtnlabelformatwp}}\else \eq@fititin{\mbox{\exrtnlabelformat}}\fi \ifx\istabularexer\eq@YES\unskip\kern0pt\else\par\fi \ifx\minVspacet@bs\@empty \ifkeepdeclaredvspacing \@tempdima\pagetotal \advance\@tempdima-\eq@startSoln \@tempdimb\sameVspace\relax \ifdim\@tempdimb>1sp\relax \advance\@tempdimb-\@tempdima \ifdim\@tempdimb>0pt\vglue\@tempdimb\kern0pt \let\eqe@showEndHere\@gobble \edef\tmp@exp{\noexpand\marginpar{\noexpand \smash{e: adj \the\@tempdimb}}}% \eqe@debugVertSkip{\tmp@exp}% \fi \fi \fi \eqe@showEndHere{\eqe@debugVertSkip{\marginpar{\smash{e}}}}% \fi \else \eq@ckglobalhide \ifeq@hidesolution\else \endsolnexerhookaux \writeT@ExSolns{\eqExerSolnTrailer}% \fi \fi \fi \kdvsp@Restore \endsolnexerhook\penalty0\relax} \let\eq@exerstarEnv\relax \newenvironment{exercise*}{\def\eq@exerstarEnv{*}\exercise} {\global\let\insE@rlyAtQues\@empty\endexercise} \def\exerwparts@cols{0} \let\topofpartshook\relax \let\@listiiredefined\eq@NO \let\itsExerParts\eq@NO \newif\if@tableadinitem\@tableadinitemfalse \newcommand{\tableadin@external}{\PackageError{exerquiz/eqexam} {The \string\tableadin\space command is designed\MessageBreak for the problem* environment of eqexam}{Use \string\tableadin\space in the problem* environment of eqexam.}% } \let\tableadin\tableadin@external \newcommand{\eq@tableadinparts}{\item\relax \PackageError{exerquiz/eqexam}{The \string\tableadin\space command is not allowed in the\MessageBreak parts environment}{Use \string\tableadin\space in the problem* environment of eqexam.}% } \let\istabularexer\eq@NO \def\exercise@parts{\let\rlspar\relax \ifx\solutionparshape\@empty \let\isitleadin\eq@NO \if@tableadinitem\let\rlspar\@gobbletwo\fi \else\let\isitleadin\eq@YES\fi \rlspar\removelastskip\par \if\isitleadin\eq@YES \def\eqparts@topsep{0pt}% \vskip\eqparts@itemsep\relax\fi \topofpartshook \let\itsExerParts\eq@YES \global\let\@listiiredefined\eq@NO \def\exerwparts@cols{0}\@ifnextchar[% {% \if@tableadinitem\else\removelastparskip\fi \let\endparts\endexercise@parts@tabular\exercise@parts@tabular@}% {\let\endparts\endexercise@parts@list\exercise@parts@list}} \def\eq@extralabelsep{0pt} \newcommand{\setPartsWidth}[1]{\def\parts@indent{\normalfont#1}% \bgroup\settowidth{\eq@tmpdima}{\parts@indent}% \xdef\widthOfParts{\the\eq@tmpdima}\egroup} \setPartsWidth{(d)} \def\eqe@prtsepPrb{\ } \providecommand{\prbPrtsep}[1]{\def\eqe@prtsepPrb{#1}} \providecommand{\exPrtsep}[1]{\def\eqe@prtsepPrb{#1}} \providecommand{\eqequesparsep}[1]{\def\eqeques@parsep{#1}} \eqequesparsep{0pt} \let\prior@parts@hook\@empty \let\post@parts@hook\@empty \let\abovepartshook\@empty \let\belowpartshook\@empty \let\eqp@rtc@lcm@rk\relax \let\eq@insertContAnnot\relax \def\eq@item@common{\eq@insertContAnnot\eqp@rtc@lcm@rk \global\let\probInMinip@ge\relax \def\currhideopt{x}\eq@hidesolutionfalse\eq@nolinkfalse \@ifnextchar[{\@ckhide}{\eq@item}} \newcommand{\partsitemsep}[1]{{% \setlength{\@tempdima}{#1}% \xdef\eqparts@itemsep{\the\@tempdima}}} \let\eqpartsitemsep\partsitemsep \def\eqparts@itemsep{0pt} \newcommand\partsparsep[1]{{% \setlength{\@tempdima}{#1}% \xdef\eqparts@parsep{\the\@tempdima}}} \def\eqparts@parsep{0pt} \newcommand\partstopsep[1]{{% \setlength{\@tempdima}{#1}% \xdef\eqparts@topsep{\the\@tempdima}}} \def\eqparts@topsep{3pt} \newcommand{\leadinitem@external}{\PackageError{exerquiz/eqexam} {The \string\leadinitem\space command is designed to be\MessageBreak the first item in the problem*\MessageBreak environment above the parts environment} {Use \string\leadinitem\space in the problem* environment.}} \let\leadinitem\leadinitem@external \let\itsforleadinitem\eq@NO \newcommand{\eq@leadinitemparts}{\item\relax \PackageError{exerquiz/eqexam}{The \string\leadinitem\space command is not allowed in the\MessageBreak parts environment} {Use \string\leadinitem\space in the problem* environment.}} \def\eq@handleOptArg[#1]{\def\eq@optArg{[#1]}\eq@handleOptArgi} \def\eq@handleOptArgi{\expandafter \eq@item@latex\eq@optArg\exlisttabheaderafterhook} \newif\ifwithinparts \let\ex@listtabheader@fterhook\@empty \let\probInMinip@ge\relax \newenvironment{exercise@parts@list}{% \settowidth{\eq@tmplength}{\parts@indent}% \edef\widthOfParts{\the\eq@tmplength}% \global\let\eqExerSolnHeader\eq@@writeexheaderlist \eq@initializeContAnnot\eq@nolinkfalse\prior@parts@hook \abovepartshook\list{\normalfont \if\Hidesymbol h\eq@nolinkfalse\ifeq@solutionsafter \eq@nolinktrue\fi\fi \if\currhideopt H% \else \ifeq@solutionsafter \eq@nolinktrue % no link to solution \else \ifeq@nosolutions \eq@nolinktrue % no link to solution \else \eq@ckglobalhide \ifeq@hidesolution\eq@nolinktrue\else \global\let\eqExerSolnHeader\eq@@writeexheaderlist \fi \fi \fi \fi \makebox[\widthOfParts][r]{\eqexlisttabheader}% }{% \usecounter{partno}% \if\isitleadin\eq@YES \settowidth{\eq@tmplength}{\parts@indent\eqe@prtsepPrb}% \xdef\prtsIndntSep{\the\eq@tmplength}% \if\itsforleadinitem\eqe@YES\setcounter{partno}{\fliPartNo}\else \setcounter{partno}{1}\fi\fi \let\leadinitem\eq@leadinitemparts \let\tableadin\eq@tableadinparts \global\let\solutionparshape\@empty \setlength{\topsep}{\eqparts@topsep}% \setlength{\parskip}{0pt}% \setlength{\partopsep}{0pt plus 1pt minus 1pt}% \ifdim\eqeques@parsep=0pt \setlength{\parsep}{\eqparts@parsep}% \else \setlength{\parsep}{\eqeques@parsep}% \fi \setlength{\itemsep}{\eqparts@itemsep-\parsep}% \setlength{\itemindent}{0pt}% \setlength{\listparindent}{\parindent}% \settowidth{\labelsep}{\normalfont\eqe@prtsepPrb}% \addtolength{\labelsep}{\eq@extralabelsep}% \settowidth{\labelwidth}{\parts@indent}% \setlength{\leftmargin}{\labelwidth}% \addtolength{\leftmargin}{\labelsep}% \let\eq@item@latex\item \def\eq@item{\@ifnextchar[{\eq@handleOptArg} {\eq@item@latex\ex@listtabheader@fterhook \exlisttabheaderafterhook}}% \def\eqthisenv{parts}\withinpartstrue \def\item{\ifx\probInMinip@ge\relax \ifx\@currenvir\eqthisenv \def\eq@next{\eq@item@common}\else \def\eq@next{\eq@item}\fi \else\def\eq@next{\eq@item@common}\fi \eq@next}% }}{\endlist\global\let\leadinitem\leadinitem@external \post@parts@hook\belowpartshook} \def\eq@initializeContAnnot{\@ifundefined{eqequestions} {\global\let\eqeCurrProb\relax} {\xdef\eqeCurrProb{\theeqquestionnoi}}% \xdef\eq@currProbStartPage{\arabic{page}}} \define@key{tabp@rts}{nCols}{\def\exerwparts@cols{#1}} \define@key{tabp@rts}{minVspace}{\def\minVspacet@bs{#1}} \let\minVspacet@bs\@empty \def\minVspacetabs#1{\def\minVspacet@bs{#1}} \def\priorexsolafterTab{\ifkeepdeclaredvspacing \ifeq@solutionsafter\ifx\minVspacet@bs\@empty\else \priorexsolafterTab@cont\fi\fi\fi} \def\priorexsolafterTab@cont{\let\exsolafter@save\exsolafter \let\exsolafter\@empty \makebox[0pt][r]{\parbox[t][\minVspacet@bs][t]{0pt} {\strut\hfill\vfill\strut}}% \minipage[t]{\linewidth}\exsolafter@save} \def\pkg@endsolnexerhook{\ifkeepdeclaredvspacing \ifeq@solutionsafter\ifx\minVspacet@bs\@empty\else \endminipage\fi\fi\fi} \def\exercise@parts@tabular@[#1]{% \inittabMark \let\eq@insertContAnnot\relax \let\exerwparts@cols\@empty \setkeys*{tabp@rts}{#1}\ifx\exerwparts@cols\@empty \edef\exerwparts@cols{\XKV@rm}\fi \ifx\minVspacet@bs\@empty\keepdeclaredvspacingfalse\fi \let\istabularexer\eq@YES \@tempcnta\exerwparts@cols\relax \ifnum\@tempcnta<2\relax \PackageError{exerquiz}{% The number of columns for parts\MessageBreak needs to be an integer greater than 1} {Enter an integer, 2 or larger}\fi \exercise@parts@tabular} \newcount\eq@extabColCnt \def\autotabOn{\let\eq@tabMarkChk\relax% \PackageInfo{exerquiz/eqexam}{Executing \string\autotabOn}} \def\autotabOff{\let\eq@tabMarkChk\@gobble \PackageInfo{exerquiz/eqexam}{Executing \string\autotabOff}} \autotabOff \def\inittabMark{\global\eq@extabColCnt=0 } \def\resettabMark{\global\eq@extabColCnt=1 } \newcommand\autotabnewline[1][\eqparts@tabrowsep]{% \ifnum\exerwparts@cols>0\relax \ifx\eq@tabMarkChk\@gobble \def\eq@atnext{\expandafter \tabularnewline\expandafter[#1]}\else \def\eq@atnext{\resettabMark\tabularnewline \noalign{\expandafter\kern#1}}\fi \expandafter\eq@atnext\fi} \def\eq@tabMark{% \ifnum\eq@extabColCnt=0\relax \global\advance\eq@extabColCnt1\relax \let\eq@next\relax \else \ifnum\eq@extabColCnt=1\relax \let\eq@next\relax \else \ifnum\eq@extabColCnt>\exerwparts@cols \let\eq@next\autotabnewline \else\def\eq@next{&}\fi \fi \fi \eq@next \global\advance\eq@extabColCnt1\relax} \newcommand\partstabcolsep[1]{\def\eq@partstabcolsep{#1}} \partstabcolsep{1.5pt} \newcommand\partstabtopsep[1]{\def\eq@partstabtopsep{#1}} \partstabtopsep{3pt} \def\eq@vpartstabtopsep{\vskip\eq@partstabtopsep\relax} \newcommand\partstabrowsep[1]{\setlength{\@tempdima}{#1}% \edef\eqparts@tabrowsep{\the\@tempdima}} \partstabrowsep{0pt} \newenvironment{exercise@parts@tabular}{% \setcounter{partno}{0}% \global\let\eqExerSolnHeader\eq@@writeexheaderlist \def\tablrIndent{\hglue\prtsIndntSep\relax}% \if\isitleadin\eq@YES \if$\the\everypar$\let\tablrIndent\relax\fi \setcounter{partno}{1}\fi \let\leadinitem\eq@leadinitemparts \let\tableadin\eq@tableadinparts \global\let\solutionparshape\@empty \settowidth{\eq@tmplength}{\parts@indent\eqe@prtsepPrb}% \xdef\prtsIndntSep{\the\eq@tmplength}% \sbox{\eq@tmpbox}{\parts@indent}% \let\eq@item@latex\item \let\eq@item\item@part@tabular \def\eqthisenv{parts}\withinpartstrue \def\item{\ifx\@currenvir\eqthisenv \def\eq@next{\eq@tabMarkChk\eq@tabMark\eq@item@common}\else \def\eq@next{\eq@item@latex}\fi \eq@next}\eq@nolinkfalse \@ifundefined{@xtabularcr}{\let\@xarraycr\eq@xtabularcr} {\let\@xtabularcr\eq@xtabularcr}% \eq@tmpdima=\linewidth \advance\eq@tmpdima-\prtsIndntSep\relax \@tempcnta\exerwparts@cols\relax \advance\@tempcnta-1\relax \multiply\@tempcnta2\relax \@tempdima\prtsIndntSep\relax \divide\@tempdima 2\relax \edef\halfWidth{\the\@tempdima}% \advance\@tempdima\eq@partstabcolsep\relax \tabcolsep\@tempdima \multiply\@tempdima\@tempcnta \advance\eq@tmpdima-\@tempdima \divide\eq@tmpdima by\exerwparts@cols\relax %dpsj3 \edef\widthOfPartsBox{\the\eq@tmpdima}% dpsj2 \if@tableadinitem\else\vskip\eq@partstabtopsep\relax\fi \noindent\normalbaselines\kern0pt \prior@parts@hook\abovepartshook \tablrIndent\tabular[t]{@{}*{\exerwparts@cols}{>{\setTabulrSolnEnv \parskip\eqeques@parsep\relax \parindent0pt\relax\strut}p{\eq@tmpdima}}@{\hidewidth}}% }{\endtabular\kern0pt \@ifundefined{@listii@SAVE}{}{\global\let\@listii\@listii@SAVE \global\let\@listii@SAVE\relax}% \post@parts@hook\belowpartshook \aftergroup\eqe@innermarkpts \aftergroup\eq@vpartstabtopsep} \let\eqe@innermarkpts\relax \def\item@part@tabular{\refstepcounter{partno}% \ifeq@solutionsafter \eq@nolinktrue % no link to solution \else\ifeq@nosolutions \eq@nolinktrue % no link to solution \else \eq@ckglobalhide \ifeq@hidesolution\eq@nolinktrue\else \gdef\eqExerSolnHeader{\eq@@writeexheaderlist}% \fi\fi\fi \if@restorejustify\restorejustify\else\PBS\raggedright\fi \settowidth{\eq@tmplength}{\parts@indent\eqe@prtsepPrb}% \xdef\prtsIndntSep{\the\eq@tmplength}% \sbox{\eq@tmpbox}{\parts@indent}% \eq@tmpdima=\wd\eq@tmpbox \addtolength\eq@tmplength{\eq@extralabelsep}% \xdef\partshangamount{\the\eq@tmplength}% \parshape \@ne 0pt \linewidth \everypar{\parshape \@ne 0pt \linewidth}% \eq@setPrbSolnAftrIndnt \makebox[0pt][r]{\eqexlisttabheader\eqe@prtsepPrb}% \ex@listtabheader@fterhook \exlisttabheaderafterhook\ignorespaces} \def\@ckhide[#1]{\edef\eq@arg{#1}% \def\currhideopt{x}% \ifx\eq@arg\@empty\else \if\eq@arg\eq@Hid \eq@hidesolutiontrue\eq@nolinktrue% \edef\currhideopt{\Hidesymbol}% \else \ifeq@globalshowsolutions\else \if\eq@arg\eq@hid \eq@hidesolutiontrue\eq@nolinktrue% \def\currhideopt{h}% \fi \fi \fi\fi \eq@item} \def\tabControlOn{\@ifundefined{@xtabularcr} {\let\save@@xtabularcr\@xarraycr} {\let\save@@xtabularcr\@xtabularcr}} \def\tabControlOff{\@ifundefined{@xtabularcr} {\let\@xarraycr\save@@xtabularcr} {\let\@xtabularcr\save@@xtabularcr}} \AtBeginDocument{\tabControlOn} \def\eq@xtabularcr{\@ifnextchar[{\save@@xtabularcr} {\eqe@tab@parts@rowsep}}% \def\eqe@tab@parts@rowsep{\save@@xtabularcr \noalign{\expandafter\kern\eqparts@tabrowsep}}% \let\eqgrii\relax \let\eqgriii\relax \define@key{exEnum}{labelwidthTo}[\normalsize\normalfont\bfseries00.\ ]% {\def\exE@labelwidthTo{#1}} \define@key{exEnum}{labelwidth}[\@empty]{\def\exE@labelwidth{#1}} \let\exE@labelwidth\@empty \define@key{exEnum}{topsep}[3pt]{\def\exE@topsep{#1}} \define@key{exEnum}{parsep}[3pt]{\def\exE@parsep{#1}} \define@key{exEnum}{itemsep}[0pt]{\def\exE@itemsep{#1}} \define@key{exEnum}{labelsep}[\normalsize\normalfont\ ]% {\settowidth{\@tempdima}{#1}\edef\exE@labelsep{\the\@tempdima}} \define@key{exEnum}{continue}[]{\let\eq@ExEnumResetCnt\@empty} \def\eq@ExEnumResetCnt{\setcounter{questionno}{0}} \setkeys{exEnum}{labelwidthTo,topsep,parsep,itemsep,labelsep}% \newenvironment{exEnumerate}[1][]{\everypar{}% \toks@=\expandafter{#1}% \edef\tempexp{\noexpand\setkeys{exEnum}{\the\toks@}}\tempexp \eq@ExEnumResetCnt \let\afterlabelhskip\@empty \let\solnhspace\@empty \aboveexskip{0pt}\belowexskip{\exE@parsep}%\belowexskip{0pt}% \def\eqexheader@wrapper{\makebox[0pt][r]{% \hypertarget{qex.\the@exno}{\eqexheader}\hspace{\labelsep}}}% \def\exbookmarkfmt{\thequestionno.\space} \def\partbookmarkfmt{(\thepartno)\space} \def\setENum{\Elabel\if\exerstar*\thequestionno(\thepartno)\else \thequestionno\fi}% \ifExSolutionsSet\else\writeT@ExSolns{^^J\string\eqgrii \protect\begin{exEnumerate}\eq@commentchar^^J}\fi \list{}{% \ifx\exE@labelwidth\@empty \settowidth{\labelwidth}{\exE@labelwidthTo}\else \setlength{\labelwidth}{\exE@labelwidth}\fi \setlength{\topsep}{\exE@topsep}% \ifdim\parskip>\z@\addtolength{\topsep}{-\parskip}\fi \setlength{\parsep}{\exE@parsep}% \setlength{\itemsep}{\exE@itemsep}% \setlength{\itemindent}{0pt}% \setlength{\listparindent}{0pt}% \setlength{\itemindent}{0pt}% \settowidth{\labelsep}{\normalfont\ }% \setlength{\leftmargin}{\labelwidth}% }\item\relax}{\ifExSolutionsSet\else \writeT@ExSolns{\string\eqgrii \protect\end{exEnumerate}\eq@commentchar^^J}\fi \endlist} \newenvironment{enumex}{% \renewcommand\exlabelformat{\textbf{\thequestionno.}}% \renewcommand\exsllabelformat {\protect\makebox[0pt][r]{\protect\textbf{\thequestionno.\ }}}% \begin{exercise}[questionno]}{\end{exercise}} \newenvironment{enumex*}{% \renewcommand\exlabelformatwp{\textbf{\thequestionno.}}% \renewcommand\exsllabelformatwp {\protect\makebox[0pt][r]{\protect\textbf{\thequestionno.}\ }% \protect\textbf{(\thepartno)}\ }% \begin{exercise*}[questionno]}{\end{exercise*}} \def\includeexersolutions{\@ifstar {\let\resetEXsolns\relax\includeexersolutionsi} {\def\resetEXsolns{\global\let\include@solutions\relax}% \includeexersolutionsi}} \newcommand{\includeexersolutionsi}[1][]{% \filterFor{#1}\includeexersolutionsii} \def\includeexersolutionsii{% \if\exerSolns@ExtFile\eq@NO \include@solutions \resetEXsolns \let\eqFilterArg\@empty \fi } \long\def\gobbleToEndEXt#1\endeqEXt{\ifeqforpaper \expandafter\@gobbletwo\fi} \newif\if@targetforextr \@targetforextrfalse \newcommand\filterFor[1]{\def\eqFilterArg{#1}} \newcommand{\mrkForIns}[1]{\def\eqMrkCpyArg{#1}\global \@targetforextrtrue\@ifundefined{#1@mfc} {\global\@namedef{#1@mfc}{}} {\PackageWarning{exerquiz/eqexam} {The name '#1' has already been used.\MessageBreak Please choose another, otherwise results may\MessageBreak be as unexpected}}\ignorespaces} \let\eqMrkCpyArg\@empty \newcommand\inclEXtFilter[2]{\def\eqargii{#2}\ifx\eqargii\eqFilterArg \else\expandafter\gobbleToEndEXt\fi} \newcommand\useEXtFilter{\let\eqEXt\inclEXtFilter} \let\eqsolutionshook\@empty \let\eq@solutionshook\@empty \let\priorexsectitle\@empty \let\priorexslinput\@empty \def\InputExrSolnsLevel{\@ifstar {\def\eq@ExrSolnsStar{*}\InputExrSolnsLevel@i} {\let\eq@ExrSolnsStar\@empty\InputExrSolnsLevel@i}} \newcommand{\InputExrSolnsLevel@i}[2][]{% \def\eq@ExrSolnsLabel{#1}\def\eq@ExrSolnsLevel{#2}} \InputExrSolnsLevel*{section} \def\exerSolnsHeadnToc{% \edef\eq@mkCmd{\expandafter\noexpand \csname\eq@ExrSolnsLevel\endcsname\eq@ExrSolnsStar}% \eq@mkCmd{\exsectitle}\if!\eq@ExrSolnsLabel!\else \label{\eq@ExrSolnsLabel}\fi \if\eq@ExrSolnsStar*% \addcontentsline{toc}{\eq@ExrSolnsLevel}{% \@ifundefined{web@latextoc}{}{% \ifx\web@latextoc\eq@YES\else \protect\numberline{}\fi }\exsectitle }% \fi } \@ifpackageloaded{web}{\def\eq@normallheader{\lheader{\rightmark}}} {\let\eq@normallheader\relax} \@ifpackageloaded{web}{\def\eq@defaultlheader{\lheader{\aeb@setmarks}}} {\let\eq@defaultlheader\relax} \newif\ifExSolutionsSet \ExSolutionsSetfalse \def\eqExSolFileName{\jobname.sol} \newcommand{\exerSolnInput} {% \@ifundefined{eqe@IWO}{}{\ifsolutionsAtEnd \eqe@IWO\@auxout{\string\csarg\string\gdef {eqExamQuesLastPage}{\arabic{page}}}\fi}\let\webnewpage\relax \ifsolutionsonly\else \bgroup\OKToWriteExamDatatrue \writeT@ExSolns{\string\endinput}\egroup \immediate\closeout\ex@solns\fi \ifeq@nosolutions\else \iftherearesolutions \ifsolutionsonly\eq@solutionshook \eqsolutionshook \else \newpage\eq@solutionshook \eqsolutionshook\markright{}\eq@normallheader \fi \markright{\exsectitle}% \ifx\webnewpage\relax \def\webnewpage{\global\let\webnewpage\newpage}\fi \priorexsectitle\exerSolnsHeadnToc\priorexslinput \InputIfFileExists{\eqExSolFileName} {\global\ExSolutionsSettrue}{\PackageWarning{exerquiz} {!!! Solutions to exercises not found}}% \global\ExSolutionsSetfalse \newpage\eq@defaultlheader \fi \fi } \def\include@solutions{% \if\exerSolns@ExtFile\eq@NO \exerSolnInput \fi } \let\eqexpdfentry=0 \let\eq@postexerciseHook\relax \def\eq@postexerciseHook@BM{% \xdef\Hy@currentbookmarklevel{\eq@currentbookmarklevel}} {\eqtmpcnta\value{tocdepth} \advance\eqtmpcnta\tw@ \xdef\eqbmkmrkdepth{\the\eqtmpcnta}} \@ifundefined{Hy@bookmarksdepth} {\setcounter{tocdepth}{\eqbmkmrkdepth}} {\hypersetup{bookmarksdepth=\eqbmkmrkdepth}} \newcommand{\exbookmarkfmt}{\exlabel\space\theeqexno.\space} \newcommand{\partbookmarkfmt}{(\thepartno)\space} \newcommand{\expdfbookmark}[1]{\relax \def\expdfbookmarktitle{#1}% \ifx\eq@postexerciseHook\relax \let\eq@postexerciseHook\eq@postexerciseHook@BM \else \let\eq@postexerciseHook@save\eq@postexerciseHook \def\eq@postexerciseHook@BM@plus{\eq@postexerciseHook@save \eq@postexerciseHook@BM}% \let\eq@postexerciseHook\eq@postexerciseHook@BM@plus \fi \if\exerstar*% \if\eqexpdfentry0\let\eqexpdfentry=1 \xdef\eq@currentbookmarklevel{\Hy@currentbookmarklevel}% \def\eqex@next{\subpdfbookmark{\exbookmarkfmt#1}% {qex.\the@exno}}% \else \def\eqex@next{\belowpdfbookmark{\partbookmarkfmt#1}% {qex.\the@exno.\thepartno}}% \fi \else \xdef\eq@currentbookmarklevel{\Hy@currentbookmarklevel}% \def\eqex@next{\subpdfbookmark{\exbookmarkfmt#1}% {qex.\the@exno}}% \fi \eqex@next\ignorespaces} \ifeq@noforms\endinput\fi \definecolor{webgreen}{rgb}{0,.6,0} \newcommand{\proofingsymbolColor}[1]{\def\@proofingsymbolColor{#1}} \proofingsymbolColor{red} \let\@proofsymbolredefined=0 \newcommand{\proofingsymbol}[1]{\let\@proofsymbolredefined=1% \def\@proofingsymbol{\textcolor{\@proofingsymbolColor}{#1}}} \def\@proofingsymbol{\textcolor{\@proofingsymbolColor}{\ding{52}}} \def\setproofingsymbol{% \if\@proofsymbolredefined1\else \@ifpackageloaded{pifont}{\proofingsymbol{\ding{52}}} {\proofingsymbol{$\bullet$}}\fi} \AtBeginDocument{\setproofingsymbol} \newcommand{\prior@questionsHook}{} \let\insE@rlyAtQues\@empty \let\qMark@Hook\@empty \let\aebtitleQuiz\@empty \newcommand{\post@questionsHook}{} \newcommand{\quesNumColor}[1]{\def\eq@quesNumCol{#1}} \quesNumColor{blue} \renewcommand{\theeqquestionnoi}{\arabic{eqquestionnoi}} \newcommand{\labeleqquestionnoi}{% \color{\eq@quesNumCol}\bfseries\theeqquestionnoi.} \renewcommand\theeqquestionnoii{(\alph{eqquestionnoii})} \newcommand{\labeleqquestionnoii}{% \color{\eq@quesNumCol}\bfseries\theeqquestionnoii} \renewcommand\theeqquestionnoiii{(\roman{eqquestionnoiii})} \newcommand{\labeleqquestionnoiii}{% \color{\eq@quesNumCol}\bfseries\theeqquestionnoiii} \define@key{props@ques}{labelwidthTo}% [\normalsize\normalfont\bfseries00.]% {\def\propQ@labelwidthTo{#1}} \define@key{props@ques}{labelwidth}[]{\def\propQ@labelwidth{#1}} \let\propQ@labelwidth\@empty \define@key{props@ques}{topsep}[\the\topsep]{\edef\propQ@topsep{#1}} \define@key{props@ques}{partopsep}[\the\partopsep]% {\edef\propQ@partopsep{#1}} \define@key{props@ques}{parsep}[\the\parsep]{\edef\propQ@parsep{#1}} \define@key{props@ques}{itemsep}[\the\itemsep]{\edef\propQ@itemsep{#1}} \define@key{props@ques}{labelsepTo}[\normalsize\normalfont\ ]% {\def\propQ@labelsepTo{#1}} \define@key{props@ques}{labelsep}[\@empty]{\def\propQ@labelsep{#1}} \let\propQ@labelsep\@empty \define@key{props@ques}{color}[blue]{\quesNumColor{#1}} \setkeys{props@ques}{labelwidthTo,topsep,partopsep,parsep,% itemsep,labelsepTo,color}% \newenvironment{questions}[1][]{% \ifnum\@eqquestiondepth>\tw@\@toodeep\else \advance\@eqquestiondepth\@ne\fi \def\@quesctr{eqquestionno\romannumeral\the\@eqquestiondepth}% \toks@=\expandafter\expandafter\expandafter{#1}\expandafter \xdef\csname quesOpts\@quesctr\endcsname{\the\toks@}% \edef\tempexp{\noexpand\setkeys{props@ques}{\the\toks@}}\tempexp \list{\qMark@Hook\prior@questionsHook \insE@rlyAtQues\gdef\eqPTs{1}% \global\let\eqQT\eq@na% {\@tempcnta=0 \let\@thispr@b\@empty \@whilenum\@tempcnta<\@eqquestiondepth\do{\advance\@tempcnta\@ne \ifx\@thispr@b\@empty\edef\@thispr@b{% \csname theeqquestionno\romannumeral\the\@tempcnta\endcsname}\else \edef\@thispr@b{\@thispr@b% \csname theeqquestionno\romannumeral\the\@tempcnta\endcsname}\fi }\xdef\@currentQues{\@thispr@b}}% \makebox[\labelwidth][r]{\normalfont\@nameuse{label\@quesctr}}% \xdef\eq@pageThisQ{\the\c@page}% \post@questionsHook}{\usecounter{\@quesctr}% \ifx\propQ@labelsep\@empty \settowidth{\labelsep}{\propQ@labelsepTo}\else \setlength{\labelsep}{\propQ@labelsep}\fi \ifx\propQ@labelwidth\@empty \settowidth{\labelwidth}% {\propQ@labelwidthTo\hspace{\labelsep}}\else \settowidth{\labelwidth}{\hspace{\propQ@labelwidth}% \hspace{\labelsep}}\fi \setlength{\topsep}{\propQ@topsep}% \setlength{\partopsep}{\propQ@partopsep}% \ifdim\parskip>\z@\addtolength{\topsep}{-\parskip}\fi \setlength{\parsep}{\propQ@parsep}% \setlength{\itemsep}{\propQ@itemsep}% \setlength{\itemindent}{0pt}% \setlength{\leftmargin}{\labelwidth}% }% }{\endlist} \def\pushquestions{\expandafter\xdef\csname save\@quesctr\endcsname {\expandafter\the\csname c@\@quesctr\endcsname}\end{questions}} \def\popquestions{% \begin{questions}[\csname quesOpts\@quesctr\endcsname]% \setcounter{\@quesctr}{\csname save\@quesctr\endcsname}% \@ifnextchar\popquestions{\item[]}{\@ifnextchar\begin{\item[]}{}}} \newcommand{\priorsqhook}[1]{\def\sq@priorhook{#1}} \priorsqhook{} \newcommand{\abovesqskip}[1]{\def\sq@aboveskip{#1}} \abovesqskip{\par\medskip} \long\def\endsqhook#1{\def\sq@afterhook{#1}} \endsqhook{} \def\@shortquizCnt{0} \def\@sqGenBaseName{eqSqBn\@shortquizCnt} \let\sqhspace\space \let\ListOfSQuizNames\@empty \newenvironment{shortquiz} {% \xdef\eq@pageThisQ{\the\c@page}% \let\@currentQues\@empty {\eqtmpcnta\@shortquizCnt\relax\advance\eqtmpcnta\@ne \xdef\@shortquizCnt{\the\eqtmpcnta}}% \goodbreak\@ifstar{\sqForms\@shortquiz}% {\if\aeb@FLOverride\eq@f\def\sqstar{*}\else \def\sqstar{}\sqLinks\fi\@shortquiz}% }{\aeb@endshortquiz} \newenvironment{shortquiz*} {% \xdef\eq@pageThisQ{\the\c@page}% {\eqtmpcnta\@shortquizCnt\relax\advance\eqtmpcnta\@ne \xdef\@shortquizCnt{\the\eqtmpcnta}}% \sqForms\@shortquiz }{\aeb@endshortquiz} \def\@shortquiz{\@ifnextchar[% {\@@shortquiz}{\@@shortquiz[\@sqGenBaseName]}} \def\sq@setCLN#1{\ifx\aebTitleQuiz\@empty \protected@edef\@currentlabelname{#1}\else \protected@edef\@currentlabelname{\@currentlabelname}\fi } \let\isQZ=q \let\isSQZ=s \def\sq@IDTxtField{\makebox[0pt][l]{% \textField[\autoCenter{n}\BC{}\BG{} \S{S}\textSize{0}\Ff{\FfReadOnly} \AA{\AAFormat{% if\eqSP(typeof\eqSP\oField=="undefined")\eqSP var\eqSP\oField=new\eqSP Object;\r \oField.Grp={};% \ifx\defaultColorJSLoc\@empty\else\r \oField.DefaultColorJSLoc=\defaultColorJSLoc;\fi \ifx\rghtColorJSLoc\@empty\else\r \oField.RightColorJSLoc=\rghtColorJSLoc;\fi \ifx\wrngColorJSLoc\@empty\else\r \oField.WrongColorJSLoc=\wrngColorJSLoc;\fi \ifx\rghtAnsSymbJSLoc\@empty\else\r \oField.RightAnsSymbJSLoc=\rghtAnsSymbJSLoc;\fi \ifx\wrngAnsSymbJSLoc\@empty\else\r \oField.WrongAnsSymbJSLoc=\wrngAnsSymbJSLoc;\fi }}]{sqID\oField}{2bp}{2bp}}% } \begin{defineJS}[\makeesc\!\makecmt\%]{\qzIDFmt} if(typeof aQuizzesInDoc=="undefined") var aQuizzesInDoc=new Array(); if (aQuizzesInDoc.indexOf("!oField")) aQuizzesInDoc.push("!oField"); if (typeof !oField=="undefined") var !oField=new Object; \end{defineJS} \def\qz@IDTxtField{\makebox[0pt][l]{\textField[\autoCenter{n}\BC{}\BG{} \S{S}\textSize{0}\Ff{\FfReadOnly} \AA{\AAFormat{\qzIDFmt}}]{qzID\oField}{2bp}{2bp}}} \let\eqQuizType\relax \def\@@shortquiz[#1]{%\begingroup \gdef\oField{#1}\gdef\curr@quiz{#1}\gdef\currQuiz{#1}% \edef\tmp@Exp{\noexpand\g@addto@macro\noexpand \ListOfSQuizNames{,#1}}\tmp@Exp \global\let\eqQzQuesList\@empty \let\eq@AddProbToQzQuesList\relax \edef\@currentlabel{\@shortquizCnt}% \edef\@currentHref{shortquiz.\@shortquizCnt}% \global\let\eqQuizType\isSQZ\let\@qzsolndest\@empty \if\sqstar*\relax \let\@Ans\Ans@sq@f \ifx\oField\@empty \typeout{^^JExerquiz: Base field name required when using shortquiz with '*' option}% \PackageInfo{exerquiz}{Assuming link style^^J}% \let\@Ans\Ans@sq@l \fi \else \let\@Ans\Ans@sq@l \fi \setcounter{questionno}{0}% \let\answers\answers@sq \let\endanswers\endanswers@sq \let\manswers\manswers@sq \let\endmanswers\endmanswers@sq \let\solution\solution@sq \let\endsolution\endsolution@sq \let\ifstaroption\eq@ifstaroption \if\eq@tq@star*% \def\sqlabel{\aebtitleQuiz\@gobbletwo}% \fi \sq@aboveskip\sq@priorhook \@ifundefined{PointsOnLeft}% {\sq@setCLN{\eq@defaultShortQuizLabelName}% \ifx\sqlabel\@empty\else\noindent\fi \hypertarget{sqH\@currentHref}{}\sq@IDTxtField \ifx\sqlabel\@empty\else\expandafter \sqlabel\expandafter\sqhspace\fi {\set@typeset@protect\aebtitleQuiz}}{}\ignorespaces } \newcommand\belowsqskip[1]{\def\aftershortquizskip{#1}} \belowsqskip{\medskip} \def\aeb@endshortquiz{\setcounter{quizno}{0}% \sq@afterhook \global\let\aebtitleQuiz\@empty \global\let\aebTitleQuiz\@empty \global\let\eq@tq@star\relax \global\let\sqlabel\eq@sqlabel \global\let\sqslrtnlabel\eq@sqslrtnlabel \global\let\sqsllabel\eq@sqsllabel \par\aftershortquizskip } \def\sqLinks{\def\sqstar{}}\sqLinks \def\sqForms{\def\sqstar{*}} \let\eq@tq@star\relax \def\qzPriorSolutionAfterHook{\smallskip} \let\sqPostHeaderHook\@empty \let\qPostHeaderHook\@empty \let\eq@sqPostHeaderHook\@empty \let\eq@qPostHeaderHook\@empty \let\prior@eqQt\@empty \let\prior@eqSQt\@empty \def\sqsolafterhspace{\space} \newif\ifmakeQzSlLocal \makeQzSlLocalfalse \def\makeQzSolnsLocalOn{\makeQzSlLocaltrue} \def\makeQzSolnsLocalOff{\makeQzSlLocalfalse} \def\solution@sq{\let\eq@next\relax \ifx\@qzsolndest\@empty \PackageWarning{exerquiz}% {* Solutions unexpected here, will *\MessageBreak * assume solutionsafter option *}% \eq@solutionsaftertrue \fi \ifeq@solutionsafter \par\qzPriorSolutionAfterHook\noindent \if!\sqsolafter!\else \sqsolafter\sqsolafterhspace\fi\ignorespaces \else \global\therearequizsolutionstrue\let\verbatim@out\quiz@solns \set@display@protect \immediate\write\verbatim@out{% \ifmakeQzSlLocal\protect\begingroup^^J\fi \if\eqQuizType\isQZ \ifx\prior@eqQt\@empty\else\prior@eqQt\fi \ifx\eqMrkCpyArg\@empty\else \protect\eqMrkSoln{\eqMrkCpyArg}\fi \protect\eqQt{\eqFilterArg}\else \ifx\prior@eqSQt\@empty\else\prior@eqSQt\fi \ifx\eqMrkCpyArg\@empty\else \protect\eqMrkSoln{\eqMrkCpyArg}\fi \protect\eqSQt{\eqFilterArg}\fi \protect\quizSolnHeader\if\eqQuizType\isQZ\ifx\allow@peek\eq@NO [{\curr@quiz}{\currQuizStartPage}]\fi\fi {\@qzsolndest}{\sqsllabel}\protect\eqterminex \if\eqQuizType\isQZ\expandafter\eq@qPostHeaderHook \expandafter\qPostHeaderHook\else \expandafter\eq@sqPostHeaderHook \expandafter\sqPostHeaderHook\fi}% \set@typeset@protect \expandafter\verbatimwrite\fi } \let\qzSolutionsAfterHook\@empty \def\endsolution@sq {% \ifeq@solutionsafter \eq@fititin{\mbox{\sqslrtnlabel}}\par\qzSolutionsAfterHook \aftergroup\ignorespaces \else \endverbatimwrite \eq@clearMrkCpy \ifx\@qzsolndest\@empty\else\set@display@protect \immediate\write\verbatim@out{\eqSqSolnTrailer}% \set@typeset@protect \fi \fi \global\let\@qzsolndest\@empty } \newcommand\pnphDflt{.1\textheight} \newcommand{\promoteNewPageHere}[1][\pnphDflt]{% \@ifnextchar\bgroup{\eq@promoteNewPageHere} {\eq@promoteNewPageHere{#1}}% } \def\eq@promoteNewPageHere#1{\setlength{\@tempdimb}{#1}% \ifdim\@tempdima>\z@\par \bgroup\@nobreakfalse\addpenalty{-500}% \@tempdima \pagegoal \advance \@tempdima -\pagetotal \ifdim \@tempdima<\@tempdimb\ifnum\col@number>\@ne\columnbreak \else\newpage\penalty1\fi\fi\egroup\fi } \newcommand{\saveDest}[1][]{% \def\sd@arg{#1}\ifx\sd@arg\@empty \xdef\holdDest{\@qzsolndest}\else \xdef\@qzsolndest{#1}\xdef\holdDest{#1}\fi} \def\useDest{\def\@qzsolndest{\holdDest}} \let\holdDest\@empty \def\fpAfterSolutionsSkip{\par\medskip} \let\eqSqSolnTrailerHook\@empty \let\eqQzSolnTrailerHook\@empty \newcommand\eqSqSolnTrailer{% \if\eqQuizType\isQZ \eqQzSolnTrailerHook \protect\ReturnTo{page.\eq@pageThisQ}% {\protect\mbox{\sqslrtnlabel}}\string\endeqQt \else \eqSqSolnTrailerHook \protect\ReturnTo{page.\eq@pageThisQ}% {\protect\mbox{\sqslrtnlabel}}\string\endeqSQt% \fi \ifeqforpaper\protect\fpAfterSolutionsSkip\fi^^J% \ifmakeQzSlLocal\protect\endgroup^^J\fi } \let\eqSQt\@gobble \let\endeqSQt\relax \let\eqQt\@gobble \let\endeqQt\relax \let\prior@quizSolnHeaderHook\@empty \newcommand\quizSolnHeader[3][]{% \prior@quizSolnHeaderHook \ifeqforpaper\else\webnewpage\fi\noindent \def\eq@argi{#1}% \ifx\eq@argi\@empty\else\noPeek#1\fi \hypertarget{#2}{#3}\relax \solnspace } \def\AllowPeeking{\global\let\allow@peek\eq@YES}\AllowPeeking \def\NoPeeking{\global\let\allow@peek\eq@NO} \def\noPeekAction#1#2{% /AA <> >> } \newif\iftherearequizsolutions \therearequizsolutionsfalse \let\aeb@FLOverride\relax \def\includequizsolutions{\@ifstar {\let\resetQZtsolns\relax\includequizsolutionsi} {\def\resetQZtsolns{\global\let\include@quizsolutions\relax}% \includequizsolutionsi}} \newcommand{\includequizsolutionsi}[1][]{% \filterFor{#1}\includequizsolutionsii} \def\includequizsolutionsii{\include@quizsolutions \resetQZtsolns \let\eqFilterArg\@empty} \let\eqqzsolutionshook\@empty \let\priorsqslsectitle\@empty \let\priorsqslinput\@empty \def\InputQzSolnsLevel{\@ifstar {\def\eq@QzSolnsStar{*}\InputQzSolnsLevel@i} {\let\eq@QzSolnsStar\@empty\InputQzSolnsLevel@i}} \newcommand{\InputQzSolnsLevel@i}[2][]{% \def\eq@QzSolnsLabel{#1}\def\eq@QzSolnsLevel{#2}} \InputQzSolnsLevel*{section} \def\quizSolnsHeadnToc {% \edef\eq@mkCmd{\expandafter\noexpand \csname\eq@QzSolnsLevel\endcsname\eq@QzSolnsStar}% \eq@mkCmd{\sqslsectitle}\if!\eq@QzSolnsLabel!\else \label{\eq@QzSolnsLabel}\fi \if\eq@QzSolnsStar*% \addcontentsline{toc}{\eq@QzSolnsLevel}{% \@ifundefined{web@latextoc}{}{% \ifx\web@latextoc\eq@YES\else \protect\numberline{}\fi }\sqslsectitle }% \fi } \newcommand{\quizSolnInput} {% \global\let\webnewpage\relax \bgroup\OKToWriteExamDatatrue \writeT@QzSolns{\string\endinput}\egroup \immediate\closeout\quiz@solns \ifeq@noquizsolutions\else \iftherearequizsolutions\newpage\markright{}% \eq@normallheader\markright{\sqslsecrunhead}% \ifx\webnewpage\relax \def\webnewpage{\global\let\webnewpage\newpage}\fi \priorsqslsectitle\quizSolnsHeadnToc\priorsqslinput \InputIfFileExists{\jobname.qsl}{}% {!!! Solutions to quizzes not found} \eqqzsolutionshook \newpage\eq@defaultlheader \fi \fi } \def\include@quizsolutions{\quizSolnInput} \newcommand{\priorqhook}[1]{\def\q@priorhook{#1}} \priorqhook{} \newcommand{\aboveqskip}[1]{\def\q@aboveskip{#1}} \aboveqskip{\par\medskip} \newcommand{\qhspace}{\space} \def\endqhook#1{\def\eq@prior@endQuiz{#1}} \endqhook{} \newcommand{\belowqHooknSkip}[1]{\def\eq@belowqskip{#1}} \belowqHooknSkip{\medskip} \def\belowqskip{\belowqHooknSkip} \let\eq@initializeServerSubmit\@empty \newcommand{\quiztype}[1]{% \def\@quiztype{#1}\def\aeb@FLOverride{#1}} \let\@quiztype\@empty \newcommand{\defaultquiztype}{\let\@quiztype\@empty \let\aeb@FLOverride\relax} \let\aeb@FLOverride\relax \def\@setFormLinkType{% \if\qstar*% \ifx\aeb@FLOverride\relax% \def\@@quiztype{f}% \else \if\aeb@FLOverride l\def\@@quiztype{l}\else \def\@@quiztype{f}\fi \fi \else \ifx\aeb@FLOverride\relax \def\@@quiztype{l}% \else \if\aeb@FLOverride f\def\@@quiztype{f}\else \def\@@quiztype{l}\fi \fi \fi } \def\setdefault@Ans{\@setFormLinkType \expandafter\global\expandafter \let\expandafter\@Ans\expandafter=\csname Ans@\@@quiztype\endcsname } \newcommand\useForms{\def\aeb@FLOverride{f}} \newcommand\useLinks{\def\aeb@FLOverride{l}} \newcommand\restoreFLTypeDefault{\global\let\aeb@FLOverride\relax} \let\aeb@FLOverride\relax \newenvironment{quiz} {\goodbreak\@ifstar{\gdef\qstar{*}\@quiz*f}{\gdef\qstar{x}\@quiz*l}} {\aeb@endquiz} \def\@quizCnt{0} \let\ListOfQuizNames\@empty \def\@quiz*#1#2{% \xdef\eq@pageThisQ{\the\c@page}% \let\@currentQues\@empty \global\let\eqQzQuesList\@empty \global\let\pointValuesArray\@empty \global\let\ptypeArray\@empty \global\let\corrAnsArray\@empty {\eqtmpcnta\@quizCnt\advance\eqtmpcnta\@ne \xdef\@quizCnt{\the\eqtmpcnta}}% \edef\@currentlabel{\@quizCnt}% \edef\@currentHref{quiz.\@quizCnt}% \sq@setCLN{\eq@defaultQuizLabelName}% \setcounter{eqpointvalue}{0}\setcounter{questionno}{0}% \eq@initializeServerSubmit \global\let\eqQuizType\isQZ %\tabcolsep=0pt \gdef\eqPTs{1}\global\let\eqQT\eq@na \g@addto@macro\ListOfQuizNames{,#2}% \gdef\quiz@total{#2}\xdef\curr@quiz{#2}\xdef\oField{#2}% \xdef\currQuiz{#2}\xdef\currQuizStartPage{\thepage}% \xdef\aPointType{0}% \def\fieldJSStr@CMD{\flJSStr*[noquotes]\bqlabelISO}% \expandafter\fieldJSStr@CMD\expandafter{\bqlabelISO}% \ifx\@quiztype\@empty\gdef\@@quiztype{#1}\else \xdef\@@quiztype{\@quiztype}\fi \let\@qzsolndest\@empty \let\answers\answers@q\let\endanswers\endanswers@q \let\manswers\manswers@q\let\endmanswers\endanswers@q \let\solution\solution@sq\let\endsolution\endsolution@sq \expandafter \xdef\csname titleOf\currQuiz\endcsname{\aebTitleQuiz}% \q@aboveskip\q@priorhook\noindent\hypertarget{qzH\@currentHref}{}% \eq@beginQuiz\qhspace{\set@typeset@protect\aebtitleQuiz}% \ignorespaces } \def\aeb@endquiz {% \eq@prior@endQuiz\noindent\eq@endQuiz \global\let\eqQuizType\relax \global\let\aebtitleQuiz\@empty \global\let\aebTitleQuiz\@empty \global\let\bqlabel\eq@bqlabel % reset beginning label to default \global\let\eqlabel\eq@eqlabel % reset ending label to default \global\let\sqsllabel\eq@sqsllabel \global\let\sqslrtnlabel\eq@sqslrtnlabel \global\let\bqlabelISO\eq@bqlabelISO \eq@belowqskip } \newenvironment{quiz*}{\goodbreak\gdef\qstar{*}\@quiz*f}{\aeb@endquiz} \newcommand\eq@beginQuiz{\eq@BeginQuizLink} \newcommand\eq@endQuiz{\eq@EndQuizLink} \newcommand\useBeginQuizButton[1][] {\renewcommand\eq@beginQuiz{\eq@BeginQuizButton[#1]}} \newcommand\useEndQuizButton[1][] {\renewcommand\eq@endQuiz{\eq@EndQuizButton[#1]}} \newcommand\useBeginQuizLink {\renewcommand\eq@beginQuiz{\eq@BeginQuizLink}} \newcommand\useEndQuizLink {\renewcommand\eq@endQuiz{\eq@EndQuizLink}} \newcommand\@initQuiz{% var\eqSP\curr@quiz=new Object();\jsR lstOfQuizzes["\curr@quiz"]=\curr@quiz;\jsR \curr@quiz.oAlertCheck={bAfterValue:false};\jsR \curr@quiz.Grp={};% \ifx\defaultColorJSLoc\@empty\else\jsR \oField.DefaultColorJSLoc=\defaultColorJSLoc;\fi \ifx\rghtColorJSLoc\@empty\else\jsR \oField.RightColorJSLoc=\rghtColorJSLoc;\fi \ifx\wrngColorJSLoc\@empty\else\jsR \oField.WrongColorJSLoc=\wrngColorJSLoc;\fi \ifx\partialColorJSLoc\@empty\else\jsR \oField.PartialColorJSLoc=\partialColorJSLoc;\fi \ifx\rghtAnsSymbJSLoc\@empty\else\jsR \oField.RightAnsSymbJSLoc=\rghtAnsSymbJSLoc;\fi \ifx\wrngAnsSymbJSLoc\@empty\else\jsR \oField.WrongAnsSymbJSLoc=\wrngAnsSymbJSLoc;\fi \ifx\corrAnsSymbJSLoc\@empty\else\jsR \oField.CorrAnsSymbJSLoc=\corrAnsSymbJSLoc;\fi \ifx\eqGradeScaleLoc\@empty\else\jsR \oField.GradeScaleLoc=new Array(\eqGradeScaleLoc);\fi \ifx\eqCorrLocalChoiceFully\@empty\else\jsR \oField.fullyCorrectLoc=\eqCorrLocalChoiceFully;\fi \if$\priorInitQuiz$\else\jsR\priorInitQuiz\fi\jsR InitializeQuiz("\curr@quiz",\ifnocorrections0\else1\fi);% \ifx\eq@CGI\@empty\jsR\curr@quiz.isSubmitted=false;\else \jsR\curr@quiz.isSubmitted=true;\fi \jsR\curr@quiz.initializeWith=% 'InitializeQuiz("\curr@quiz",\ifnocorrections0\else1\fi);';% \if$\postInitQuiz$\else\jsR\postInitQuiz\fi% } \newcommand{\priorInitQuiz}{} \newcommand{\postInitQuiz}{} \let\eq@submitURL\@empty \let\eq@insertHiddenFields\@empty \newcommand\priorSubmitQuiz{} \newcommand\postSubmitQuiz{} \def\eq@@BeginQuizLinkActions{\A{\JS{\@initQuiz}}} \def\eq@BeginQuizLinkDefaults{\Border{0 0 0}} \let\bqlabelFmt\@empty \def\eq@BeginQuizLink{\qz@IDTxtField \set@@Link{}{}{}{\color{\@linkcolor}\bqlabelFmt\bqlabel}{}% {\eq@setWidgetProps\setLink@driver}% {\eq@BeginQuizLinkDefaults\eq@@BeginQuizLinkActions\every@Link}% \space\ignorespaces} \def\eq@@EndQuizLinkActions{\A{\JS{\eQzBtnActns}}} \def\eq@EndQuizLinkDefaults{\Border{0 0 0}} \let\eqlabelFmt\@empty \def\eq@EndQuizLink{% \ifx\eq@CGI\@empty \let\eq@submitURL\@empty \let\eq@insertHiddenFields\@empty\fi \set@@Link{}{}{}{\color{\@linkcolor}\eqlabelFmt\eqlabel}{}% {\eq@setWidgetProps\setLink@driver}% {\eq@EndQuizLinkDefaults\eq@@EndQuizLinkActions\every@Link}% \makebox[0pt][r]{\textField[\BC{}\autoCenter{n}]% {htxtfld.\curr@quiz}{2bp}{2bp}}% \makebox[0pt][r]{\eq@hiddenScoreData\eq@insertHiddenFields}% \global\let\eq@CGI\@empty\ignorespaces } \def\BeginQuizButtonDefaults{% \CA{\bqlabel}\H{P}\F{\FPrint} \BC{1 0 0}\BG{.7529 .7529 .7529}\W{1}\S{B}} \def\eq@@BeginQuizButtonActions{\A{\JS{\@initQuiz}}} \newcommand\eq@BeginQuizButton[1][]{% \mbox{\qz@IDTxtField\push@@Button{#1}{beginQuiz.\curr@quiz}{}% {\DefaultHeightOfWidget}{\eq@protect\A}% {\eq@setButtonProps\eq@Button@driver}% {\BeginQuizButtonDefaults\eq@@BeginQuizButtonActions \every@ButtonField\every@BeginQuizButton}}} \begin{defineJS}[\makeesc\*\makecmt\%]{\eQzBtnActns} if (!isQuizInitialized("*curr@quiz")) eqAppAlert(InitMsg("*bqlabelISO"),3); else { if (*minQuizResp(*thequestionno)&&_ModalNotOn){ *curr@quiz.PtValues=new Array(*pointValuesArray); ProbType=[*ptypeArray];% *if@inclkey *curr@quiz.CorrAns=new Array(*corrAnsArray);*fi DisplayQuizResults("*curr@quiz",*theeqpointvalue,% *thequestionno); var h=this.getField("ScoreData.*curr@quiz"); h.value=Score+";"+NQuestions+";"% +ptScore+";"+NPointTotal;% *ifx*eq@submitURL*empty*else *eq@submitURL*fi% *if$*postSubmitQuiz$*else *postSubmitQuiz*fi resetQuiz("*curr@quiz"); } } \end{defineJS} \def\EndQuizButtonDefaults{% \CA{\eqlabel}\F{\FPrint}\BC{1 0 0} \BG{.7529 .7529 .7529}\W{1}\S{B}\H{P}} \def\eq@@EndQuizButtonActions{% \A{\JS{\eQzBtnActns}}} \newcommand{\eq@hiddenScoreData}{\makebox[0pt][r]{% \textField[\BC{}\F{\FHidden}]{ScoreData.\curr@quiz}{2bp}{2bp}}} \newcommand\eq@EndQuizButton[1][]{% \ifx\eq@CGI\@empty \let\eq@submitURL\@empty \let\eq@insertHiddenFields\@empty\fi \mbox{\push@@Button{#1}{endQuiz.\curr@quiz}{}% {\DefaultHeightOfWidget}{\eq@protect\A}% {\eq@setButtonProps\eq@Button@driver}% {\EndQuizButtonDefaults\eq@@EndQuizButtonActions \every@ButtonField\every@EndQuizButton}}% \makebox[0pt][r]{\eq@hiddenScoreData\eq@insertHiddenFields}% \global\let\eq@CGI\@empty} \newcommand\databaseName[1]{\gdef\db@Name{#1}}\def\db@Name{} \newcommand\tableName[1]{\gdef\db@Table{#1}}\def\db@Table{} \newcommand\eqCGI{\definePath{\eq@CGI}}\def\eq@CGI{} \newcommand\eqSubmit{\hyper@normalise\eqSubmiti} \def\eqSubmiti#1{\xdef\eq@CGI{"#1"}\eqSubmitii} \def\eqSubmitii#1#2{\databaseName{#1}\tableName{#2}} \providecommand{\rtnURL}{\definePath{\thisRtnURL}} \let\thisRtnURL\@empty \newcommand\addHiddenTextField[3][]{} \newcommand\populateHiddenField[2]{} \def\eqButtonDefaults{% \CA{\eq@local@CA}\AC{}\H{P}\W{1}\S{B} \BC{1 0 0}\BG{.7529 .7529 .7529}} \begin{defineJS}[\makeesc\@]{\CorrBtnActionsJS} if (isEndQuizPushed("@eqBaseName")){ correctQuiz("@eqBaseName",@thequestionno); if (typeof correctSumryTbl == "function") correctSumryTbl("@eqBaseName",@thequestionno); } \end{defineJS} \def\@@eqButtonActions{\A{\JS{\CorrBtnActionsJS}}} \newcommand\eqButton[2][]{% \ifnocorrections\else \def\eqBaseName{#2}% \mbox{\push@@Button{#1}{correct.#2}{}{\DefaultHeightOfWidget}% {\eq@protect\A}{\eq@setButtonProps\eq@Button@driver}% {\eqButtonDefaults\@@eqButtonActions\every@ButtonField \every@eqButton}}% \fi } \def\CorrButton{\eqButton} \def\rbMarkup@Defaults{% \BC{}\F{\FHidden}\Ff{\FfReadOnly}\textSize{12} \textColor{0 g}\symbolchoice{check}\W{}} \newcommand\rbMarkup[1][]{% \ifx\grpquestions\eq@One \def\Fld@name{% \oField.\thequestionno.\thegrpquestionno}\else \def\Fld@name{\oField.\thequestionno}\fi \mbox{\check@@Box{#1\V{Yes}\DV{Yes}}% {rbmarkup.\Fld@name}% {\RadioFieldSize}{\RadioFieldSize}{Yes}{}% {\eq@setWidgetProps\eq@Check@driver}% {\rbMarkup@Defaults\every@CheckBox\every@rbMarkup}}} \newcommand\minQuizResp{lowThreshold} \newcommand\PTs{\@ifstar{\def\eq@star{*}\@PTs}{\def\eq@star{x}\@PTs}} \def\@PTs#1{\gdef\eq@PTs{#1}\ifx\eq@PTs\@empty\gdef\eq@PTs{1}\fi \global\let\eqPTs\eq@PTs\global\let\eq@PTs\@empty \if\eq@star*\else\PTs@Hook\fi} \def\eq@PTs{0} % initialize this variable \newcommand\QT[1]{% \gdef\eq@qT{#1}\ifx\eq@qT\@empty\global\let\eq@qT\eq@na\fi \global\let\eqQT\eq@qT\global\let\eq@qT\eq@na} \def\eq@na{na} % not applicable \let\eq@qT\eq@na \newcommand\PTsHook[1]{\def\PTs@Hook{#1}} \let\PTs@Hook\@empty \let\eq@PTs\@empty \newcommand\eqGradeScale{% "A",[90, 100],"B",[80,90],"C",[70,80],"D",[60,70],"F",[0,60]} \let\eqGradeScaleLoc\@empty \newcommand{\resetGradeScaleLoc}{\global\let\eqGradeScaleLoc\@empty} \def\tallywidth#1{\def\TBW{#1}} \def\TBW{15bp} \def\DefaultHeightOfWidget{11bp} \def\RadioFieldSize{11bp} \def\RBW{2in} % Response Box width (math,txt, txtpc, answer field) \def\SFW{1.5in} % Score Field Width \def\GFW{20pt} % Grade Field Width \def\PtFW{1.5in} % Point Field Width \def\PcFW{1.5in} % Percent Field Width \def\ScoreFieldDefaults {% \Ff{\FfReadOnly}\BC{1 0 0}\BG{}\S{S} \DV{\eqScore}\V{\eqScore}\W{1} } \newcommand\ScoreField[2][]{% \mbox{\text@@Field{#1}{ScoreField.#2}{\SFW}% {\DefaultHeightOfWidget}{}{\eq@setWidgetProps\eq@TextField}% {\ScoreFieldDefaults\every@eqTextField\every@ScoreField}}} \def\GradeFieldDefaults{% \textColor{0 0 1 rg}\BC{1 0 0}\BG{1 1 1}\S{S} \Ff{\FfReadOnly}\Q{1}\W{1}} \newcommand\GradeField[2][]{% \mbox{\text@@Field{#1}{GradeField.#2}{\GFW}% {\DefaultHeightOfWidget}{}{\eq@setWidgetProps\eq@TextField}% {\GradeFieldDefaults\every@eqTextField\every@GradeField}}} \def\AnswerFieldDefaults{% \BC{0 0 0}\S{S}\Ff{\FfReadOnly}\W{1} \presets{\eq@resetAnsFieldOnClose}} \let\eq@resetAnsFieldOnClose\@empty \newcommand{\noResetAnsFieldOnClose}{% \global\let\eq@resetAnsFieldOnClose\@empty} \newcommand{\resetAnsFieldOnClose}{% \gdef\eq@resetAnsFieldOnClose{% \AApageclose{this.resetForm(["\Fld@name"]);}}} \newcommand\AnswerField[2][]{% \mbox{\text@@Field{#1}{Ans.#2}{\RBW}{\DefaultHeightOfWidget}% {}{\eq@setWidgetProps\eq@TextField}% {\AnswerFieldDefaults\every@eqTextField\every@AnswerField}}} \newcommand\autoAnswerField{% \@ifundefined{lfooter}{\def\eq@next{\eq@autoAnswerFieldgobble}% \PackageError{exerquiz}{The \string\autoAnswerField\space command\MessageBreak requires the web package}{Use web package} }{% \PackageInfo{exerquiz}{% For this auto answer field feature to run\MessageBreak the webheadings pagestyle of the web package\MessageBreak is required}\def\eq@next{\eq@autoAnswerField}% \ifx\web@lfoot\@empty\else \PackageWarning{exerquiz}{The left running footer already in use\MessageBreak Will overwrite what is there now. Better fix it.}\fi }% \eq@next} \newcommand\eq@autoAnswerFieldgobble[1][]{\relax} \newcommand\autoAnsFldRaiseBox[1]{\def\ef@aAFRB{#1}} \autoAnsFldRaiseBox{0pt} \let\autoAFOpts\@empty \newcommand\eq@autoAnswerField[1][]{\gdef\autoAFOpts{#1}% \def\eq@insertAnswerField{\AnswerField[#1]{\currQuiz}}% \eq@@autoAnswerField} \newcommand\eq@@autoAnswerField{\lfooter{\ifIsRespBox \raisebox{\ef@aAFRB}{\eq@insertAnswerField}% \global\IsRespBoxfalse\fi}} \newcommand\manualAnswerField[1][\autoAFOpts]{% \expandafter\AnswerField\expandafter[#1]{\currQuiz}} \def\PointsFieldDefaults{% \rawPDF{}\BC{1 0 0}\BG{}\W{1}\S{S}\Ff{\FfReadOnly}} \newcommand\PointsField[2][]{% \mbox{\text@@Field{#1}{PointsField.#2}{\PtFW}% {\DefaultHeightOfWidget}{}{\eq@setWidgetProps\eq@TextField}% {\PointsFieldDefaults\every@eqTextField\every@PointsField}}} \def\PercentFieldDefaults{% \rawPDF{}\BC{1 0 0}\BG{}\W{1}\S{S}\Ff{\FfReadOnly}} \newcommand\PercentField[2][]{% \mbox{\text@@Field{#1}{PercentField.#2}{\PcFW}% {\DefaultHeightOfWidget}{}{\eq@setWidgetProps\eq@TextField}% {\PercentFieldDefaults\every@eqTextField\every@PercentField}}} \newcommand\RestoreScoreField{% \global\let\eqScore\eq@Score \global\let\eqOutOf\eq@OutOf} \def\DeclareQuiz#1{\edef\oField{#1}% \edef\thisQuiz{#1}\edef\curr@quiz{#1}% \edef\currQuiz{#1}} \let\Quiz\DeclareQuiz \def\aeb@noindgobble{\noindent\@gobbletwo} \let\startQuizHere\relax \let\endQuizHere\relax \let\dockQuiz\relax \newcommand\floatQuiz{% \global\let\eq@beginQuiz@saved\eq@beginQuiz \global\let\eq@endQuiz@saved\eq@endQuiz \global\let\startQuizHere\eq@beginQuiz \global\let\endQuizHere\eq@endQuiz \global\let\eq@beginQuiz\aeb@noindgobble \global\let\eq@endQuiz\@empty \global\let\dockQuiz\eq@dockQuiz } \newcommand\eq@dockQuiz{% \global\let\eq@beginQuiz\eq@beginQuiz@saved \global\let\eq@endQuiz\eq@endQuiz@saved \global\let\startQuizHere\relax \global\let\endQuizHere\relax \global\let\eq@beginQuiz@saved\relax \global\let\eq@endQuiz@saved \global\let\dockQuiz\relax } \def\fancyQuizHeaders{% \global\let\eq@sqsllabel@fancy@save\eq@sqsllabel \gdef\eq@sqsllabel{\eq@fancyQuizHeaders}} \def\eq@fancyQuizHeaders{% \if\eqQuizType\isQZ\expandafter\eq@fancyQuizHeadersfmt\else \expandafter\eq@fancyShrtQuizHeadersfmt\fi} \let\eq@sqsllabel@fancy@save\@empty \def\restoreDefaultQuizHeaders{% \global\let\eq@sqsllabel\eq@sqsllabel@fancy@save} \newcommand\fncyQHdrsColor{blue} \newcommand\FncyHdrsFmtNoTitleQuiz{Solution to Quiz:} \newcommand\FncyHdrsFmtQuestion{Question} \newcommand\dfltFncyQHdrsFmt{% \protect\bfseries\protect\color{\fncyQHdrsColor}% \ifx\aebTitleQuiz\@empty \ifnum\@eqquestiondepth>0\relax\FncyHdrsFmtNoTitleQuiz\fi \else\aebTitleQuiz:\ifnum\@eqquestiondepth=0\else\protect\ % \FncyHdrsFmtQuestion\fi\fi\ifcase\@eqquestiondepth \ifx\aebTitleQuiz\@empty\FncyHdrsFmtNoTitleQuiz\fi \or\space\arabic{eqquestionnoi}.% \or\space\arabic{eqquestionnoi}(\alph{eqquestionnoii})% \or\space\arabic{eqquestionnoi}(\alph{eqquestionnoii})% (\roman{eqquestionnoiii})\fi} \newcommand\dclrFncyQzHdrsFmt[1]{% \def\eq@fancyQuizHeadersfmt{{#1}}% } \dclrFncyQzHdrsFmt{\dfltFncyQHdrsFmt} \newcommand\dclrFncySqHdrsFmt[1]{% \def\eq@fancyShrtQuizHeadersfmt{{#1}}% } \dclrFncySqHdrsFmt{\dfltFncyQHdrsFmt} \let\tqhspace\space \newcommand\titleQuiz[1][]{#1\@titleQuizi} \def\@titleQuizi{\makeatletter \@ifstar{\def\eq@tq@star{*}\eq@titleQuiz}% {\def\eq@tq@star{x}\eq@titleQuiz}} \def\eq@titleQuiz#1{% \gdef\aebTitleQuiz{#1}\def\@currentlabelname{#1}% \gdef\aeb@@titleQuiz{#1}% \gdef\aebtitleQuiz{\mbox{\titleQuizfmt{#1}}\tqhspace}% \makeatother} \let\aebtitleQuiz\@empty \let\aebTitleQuiz\@empty \newcommand\titleQuizfmt{\bfseries} \def\ifQuizType#1#2{\if\eqQuizType\isQZ\def\qt@next{#1}% \else\def\qt@next{#2}\fi\qt@next} \def\eq@ifstaroption#1#2{\if\eq@tq@star*\def\sq@next{#1}% \else\def\sq@next{#2}\fi\sq@next} \let\eq@tq@star\relax \def\ifstaroption{\PackageWarning{exerquiz} {\protect\ifstaroption\space is only defined within the\MessageBreak shortquiz environment. Gobbling up its two\MessageBreak arguments, sorry. This occurred}% \@gobbletwo} \newcounter{qMarkCnt} \def\multipartquestion{\global\let\aeb@multipart\eq@One} \providecommand{\ptsLabel}[1]{\def\eqptsLabel{#1}}\ptsLabel{pts} \providecommand{\ptLabel}[1]{\def\eqptLabel{#1}}\ptLabel{pt} \let\aeb@multipart\eq@Zero \newcommand\pcMarkupColor{red} \def\markupWidth{12bp}\def\markupHeight{8bp}\def\markupTextSize{0} \newcommand{\aeb@creditmarkup}{% \textField[\Ff\FfReadOnly\BC{}\F\FHidden \textColor{\pcMarkupColor}\textSize{\markupTextSize}\autoCenter{n}% \DV{0 \eqptsLabel}\V{0 \eqptsLabel}]% {qMark.\currQuiz.\thequestionno.\arabic{qMarkCnt}}% {\markupWidth}{\markupHeight}% } \def\showCreditMarkup{% \def\qMark{\if\aeb@multipart\eq@Zero\aeb@creditmarkup \stepcounter{qMarkCnt}\else\global\let\aeb@multipart\eq@Zero\fi}% \def\qMark@Hook{\aeb@creditmarkupfmt}} \def\hideCreditMarkup{\global\let\qMark@Hook\@empty} \newcommand{\aeb@creditmarkupfmt}{\makebox[0pt][r]{\qMark\hspace{-2bp}}} \long\def\gobbleToEndQt#1\endeqQt{\ifeqforpaper\expandafter\@gobble\fi} \long\def\gobbleToEndSQt#1\endeqSQt{% \ifeqforpaper\expandafter\@gobble\fi} \newcommand\inclQtFilter[1]{\def\eqarg{#1}\ifx\eqarg\eqFilterArg \else\expandafter\gobbleToEndQt\fi} \newcommand{\exclQt}[1]{\gobbleToEndQt} \newcommand{\useQtFilter}{\let\eqQt\inclQtFilter \let\eqSQt\exclSQt} \newcommand\inclSQtFilter[1]{\def\eqarg{#1}\ifx\eqarg\eqFilterArg \else\expandafter\gobbleToEndSQt\fi} \newcommand{\exclSQt}[1]{\gobbleToEndSQt} \newcommand{\useSQtFilter}{\let\eqSQt\inclSQtFilter\let\eqQt\exclQt} \newcommand{\sqbookmarkfmt}{Short Quiz \@shortquizCnt.\space} \newcommand{\qzbookmarkfmt}{Quiz \@quizCnt.\space} \newcommand{\quizpdfbookmark}[1]{\relax\def\argi{#1}% \if\eqQuizType\isSQZ\edef\aeb@bmmrkdest{sqbm.\@shortquizCnt}% \def\aeb@thisbkmrkfmt{\sqbookmarkfmt}\else \edef\aeb@bmmrkdest{qzbm.\@quizCnt}% \def\aeb@thisbkmrkfmt{\qzbookmarkfmt}\fi \def\quizpdfbookmarktitle{#1}% \def\eqex@next{\belowpdfbookmark{\aeb@thisbkmrkfmt#1}% {\aeb@bmmrkdest}}% \ifx\aebTitleQuiz\@empty\else\ifx\argi\@empty \def\quizpdfbookmarktitle{\aebTitleQuiz}% \def\eqex@next{\belowpdfbookmark{\aebTitleQuiz}% {\aeb@bmmrkdest}}\fi\fi \eqex@next\ignorespaces } \def\pushEnvir{\xdef\eq@currenvir{\@currenvir}\endgroup} \def\popEnvir{\begingroup\@endpefalse \edef\@currenvir{\eq@currenvir}% \edef\@currenvline{\on@line}% } \def\answers@sq{\parindent0pt \ifx\solutionparshape\@empty\else \pushEnvir\par\noindent\expandafter\popEnvir\fi \stepcounter{questionno}% \if\sqstar*\relax \if\aeb@FLOverride\eq@l \let\@Ans\Ans@sq@l\else \let\@Ans\Ans@sq@f\fi \else \if\aeb@FLOverride\eq@f \let\@Ans\Ans@sq@f\else \let\@Ans\Ans@sq@l\fi \fi \def\aeb@answerType{r}\@ifnextchar[{\answers@@sq}% {\@ifstar{\answers@@sq[\curr@quiz.\thequestionno]}{\answers@@sq[]}}} \def\manswers@sq{\parindent0pt \@ifundefined{ifuserectforms}{} {\if\aeb@FLOverride\eq@f\ifuserectforms \useRectForMC\else\useCircForMC\fi\fi}% \ifx\solutionparshape\@empty\else \pushEnvir\par\noindent\expandafter\popEnvir\fi \stepcounter{questionno}% \if\sqstar*\relax \if\aeb@FLOverride\eq@l \let\@Ans\Ans@ck@sq@l\else \let\@Ans\Ans@ck@sq@f\fi \else \if\aeb@FLOverride\eq@f \let\@Ans\Ans@ck@sq@f\else \let\@Ans\Ans@ck@sq@l\fi \fi \def\aeb@answerType{c}\@ifnextchar[{\answers@@sq}% {\@ifstar{\answers@@sq[\curr@quiz.\thequestionno]}{\answers@@sq[]}}} \let\sq@hwdest\@empty % hard-wired destination \def\answers@@sq[#1]#2{% \xdef\aeb@numCols{#2}% \ifx\sq@hwdest\@empty \xdef\@qzsolndest{#1}\else \gdef\@qzsolndest{\sq@hwdest}\fi \if\aeb@numCols1\gdef\eq@listType{1}\expandafter\answers@sq@list \else \gdef\eq@listType{0}\expandafter\answers@@sq@tabular \fi{\aeb@numCols}} \def\setMClabelsepDefault#1{\def\eq@hspanner@default{#1}} \def\setMClabelsep#1{\def\eq@hspanner{#1}} \setMClabelsep{\ }\setMClabelsepDefault{\ } \def\resetMClabelsep{\expandafter\setMClabelsep\expandafter {\eq@hspanner@default}} \def\eq@lw@l{\eq@l@l\eq@hspanner} \def\eq@l@l{\normalsize\normalfont(d)} \def\eq@lw@f{\kern\RadioFieldSize\eq@hspanner} \@ifundefined{ifwithinsoldoc}{\newif\ifwithinsoldoc\withinsoldocfalse}{} \@ifundefined{ifwithinqsldoc}{\newif\ifwithinqsldoc\withinqsldocfalse}{} \let\eq@ansChoiceArray\@empty \def\eq@recordAnsChoice{% \ifx\eq@ansChoiceArray\@empty \edef\tmp@exp{\noexpand\g@addto@macro \noexpand\eq@ansChoiceArray{"\alph{quizno}"}}\else \edef\tmp@exp{\noexpand\g@addto@macro \noexpand\eq@ansChoiceArray{,"\alph{quizno}"}}\fi \tmp@exp} \newcommand\Ans@list[2][0]{\gdef\eq@pPTs{#1}\xdef\Ans@choice{#2}% \item\relax\noindent\if\eq@listType\eq@One \addtocounter{quizno}{-1}\@ifundefined{ifwithinsoldoc} {\refstepcounter{quizno}}{\ifwithinsoldoc\stepcounter{quizno}\else \refstepcounter{quizno}\fi}\fi \ignorespaces} \newenvironment{answers@sq@list}[1]{% \ifx\aeb@answerType\eq@r \let\endanswers\endanswers@sq@list\else \let\endmanswers\endanswers@sq@list\fi \list{\strut\@Ans}{% \if\sqstar*\relax \settowidth{\labelwidth}{\eq@lw@f}\else \settowidth{\labelwidth}{\eq@lw@l}\fi \setlength{\topsep}{-\parskip+\aboveanswersSkip}% \setlength{\parsep}{0pt}\setlength{\itemindent}{0pt}% \setlength{\itemsep}{0pt}\setlength{\partopsep}{0pt}% \setlength{\listparindent}{\parindent}% \ifnum\exerwparts@cols>1\relax \ifx\itsExerParts\eq@YES \setlength{\leftmargin}{\labelwidth}\else \setlength{\leftmargin}{\labelwidth+\eqemargin}\fi \else \ifx\solutionparshape\@empty \setlength{\leftmargin}{\labelwidth}\else \setlength{\leftmargin}{\labelwidth+\eqemargin}\fi \fi \setlength{\labelsep}{0pt}% \def\Ans{\Ans@list}% }% list }{\endlist\setcounter{quizno}{0}\eq@answersEndHook} \newcommand\Ans@tabular[2][0]{\gdef\eq@pPTs{#1}\xdef\Ans@choice{#2}% \leavevmode\@Ans } \newcommand\sqtabsep[1]{\def\eq@argi{#1}\ifx\eq@argi\@empty \def\sq@tabsep{1.5pt}\else\def\sq@tabsep{#1}\fi} \sqtabsep{1.5pt} \def\sqTabPos#1{\def\sq@TabPos{[#1]}}\sqTabPos{} \def\answers@@sq@tabular#1{% \ifinner \ifx\itsExerParts\eq@YES\par\removelastskip \removelastparskip\vskip\aboveanswersSkip\fi \else\par\removelastskip\removelastparskip \vskip\aboveanswersSkip\fi \noindent\ifnum\exerwparts@cols>1\relax\parshape=0\fi \tabcolsep=0pt \eq@tmpdima=\linewidth \@tempcnta#1\relax \advance\@tempcnta-1\relax \multiply\@tempcnta by2 \@tempdima\sq@tabsep\relax \multiply\@tempdima\@tempcnta \advance\eq@tmpdima-\@tempdima \divide\eq@tmpdima by#1 \def\Ans{\Ans@tabular}% \tabcolsep\sq@tabsep\relax \expandafter\tabular\sq@TabPos{@{}*{#1}{p{\eq@tmpdima}}@{}}}% \let\eq@save@doendpe\@doendpe \def\reset@doendpe#1{\global\eq@scratchtoks=\expandafter{#1}% \gdef\@doendpe{\par\@endpetrue\global\let\@doendpe\eq@save@doendpe \def\par{\@restorepar \expandafter\everypar \expandafter{\the\eq@scratchtoks}\par\@endpefalse}% \everypar{{\setbox\z@\lastbox}% \everypar{}\@endpefalse}\the\eq@scratchtoks }% } \newcommand\answersEndHook[1]{\def\eq@answersEndHook{#1}} \let\eq@answersEndHook\@empty \def\endanswers@sq{\endtabular\setcounter{quizno}{0}% \eq@answersEndHook\reset@doendpe{\the\everypar}% \ifinner\else%\par \removelastskip \vspace{\aboveanswersSkip}\@endpetrue\fi } \def\endmanswers@sq{\endtabular\setcounter{quizno}{0}% \eq@answersEndHook\reset@doendpe{\the\everypar}% \ifinner\else%\par \removelastskip \vspace{\aboveanswersSkip}\@endpetrue\fi } \def\popiiictm{\special{CTM: pop pop pop}} \def\sqWrongRespJS{OnBlurRespBox(false,"\oField");} \def\sqRightRespJS{OnBlurRespBox(true,"\oField");} \def\Ans@sq@l@Actions {% \A{\if\Ans@choice\eq@One\JS{\sqRightRespJS} \ifx\@qzsolndest\@empty\else \ifeq@solutionsafter\else /Next <> \fi \fi \else \JS{\sqWrongRespJS\jsR \ifx\oField\@empty\else updateTally("\oField.\thequestionno");\fi}% \fi }% } \def\linkContentFormat{\alph{quizno}} \def\aebChoiceAltFmt{\noexpand\ifaebshowgrayletters \Alph{quizno}\noexpand\else\linkContentFormat\noexpand\fi} \def\linkContentWrapper{(\hfil\linkContentFormat\hfil)}% \def\Ans@sq@l{% \leavevmode\if\eq@listType\eq@One\stepcounter{quizno}\else \@ifundefined{ifwithinsoldoc}{\refstepcounter{quizno}} {\ifwithinsoldoc\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 \set@@Link{}{}{}% {\makebox[\eq@tmpdima]{\color{\@linkcolor}\link@@Content}} {\eq@protect\A}{\eq@setWidgetProps\setLink@driver}% {\set@LinkTextDefaults\Ans@sq@l@Actions\every@Link}% \Ans@proofing{\eq@tmpdima}% \eq@hspanner\ignorespaces} \def\Ans@ck@sq@l{\Ans@ck@sq@f} \def\@@Ans@sq@f@Defaults {% \BC{0 0 0}\Ff{\FfNoToggleToOff}\W{1} \textSize{12}\textColor{0 g} } \def\sqTurnOffAlerts{\let\@sqTurnOffAlerts\eq@Zero} \def\sqTurnOnAlerts{\let\@sqTurnOffAlerts\eq@One} \sqTurnOnAlerts \def\sqNoCorrections{\let\@sqAlertsOnly\eq@One} \def\sqCorrections{\let\@sqAlertsOnly\eq@Zero} \sqNoCorrections \begin{defineJS}[\makeesc\*\makecmt\%]{\Ans@sq@f@ActionsTrue} *ifx*@sqTurnOffAlerts*eq@One% OnBlurRespBox(true,"*oField"); *fi% var qzSolnDest="*@qzsolndest"; var solnAfter=*ifeq@solutionsafter% true*else% false*fi; if ((qzSolnDest!="") && !solnAfter) % jmpToNamedDest("*oField","*@qzsolndest",% *ifx*@sqTurnOffAlerts*eq@Zero0*else1*fi);% *ifx*eqAddAAMouseUpMC*empty*else *eqAddAAMouseUpMC*fi \end{defineJS} \begin{defineJS}[\makeesc\*\makecmt\%]{\Ans@sq@f@ActionsFalse} *ifx*@sqTurnOffAlerts*eq@One% OnBlurRespBox(false,"*oField"); *fi% var qzSolnDest="*@qzsolndest"; if( qzSolnDest!="") updateTally("*oField.*thequestionno");% *ifx*eqAddAAMouseUpMC*empty*else *eqAddAAMouseUpMC*fi \end{defineJS} \def\Ans@sq@f@Actions{\AAmouseup{\if\Ans@choice\eq@One \Ans@sq@f@ActionsTrue\else\Ans@sq@f@ActionsFalse\fi} \AAmousedown{updateTally.downState=!!event.target.isBoxChecked% (\arabic{quizno}-1);}} \def\Ans@proofing#1{\ifeq@proofing\if\Ans@choice1\relax \llap{\@proofingsymbol\,\hskip#1\relax}\fi\fi} \def\sqRghtSymbChoice#1{\chooseJSsymbol*{#1}% \ifx\eq@retnStyle\@empty \edef\sq@corrsymch{\sqRghtSymbChoiceDef}\else \edef\sq@corrsymch{#1}\fi} \def\sqRghtSymbColor#1{\edef\eq@arg{#1}\ifx\eq@arg\@empty \edef\sq@corrsymcol{\sqRghtSymbColorDef}\else \edef\sq@corrsymcol{#1}\fi} \def\sqWrngSymbChoice#1{\chooseJSsymbol*{#1}% \ifx\eq@retnStyle\@empty \edef\sq@wrgsymch{\sqWrngSymbChoiceDef}\else \edef\sq@wrgsymch{#1}\fi} \def\sqWrngSymbColor#1{\edef\eq@arg{#1}\ifx\eq@arg\@empty \edef\sq@wrgsymcol{\sqWrngSymbColorDef}\else \edef\sq@wrgsymcol{#1}\fi} \def\sqRghtSymbChoiceDef{check} \def\sqRghtSymbColorDef{0 .6 0 rg} \def\sqWrngSymbChoiceDef{cross} \def\sqWrngSymbColorDef{1 0 0 rg} \edef\sq@corrsymch{\sqRghtSymbChoiceDef} \edef\sq@corrsymcol{\sqRghtSymbColorDef} \edef\sq@wrgsymch{\sqWrngSymbChoiceDef} \edef\sq@wrgsymcol{\sqWrngSymbColorDef} \def\sqResetSymbToDef{% \sqRghtSymbChoice{}\sqRghtSymbColor{}% \sqWrngSymbChoice{}\sqWrngSymbColor{}% } \def\qChoiceSymb#1{\chooseJSsymbol*{#1}% \ifx\eq@retnStyle\@empty \edef\qz@chksymb{\qChoiceSymbDef}\else \edef\qz@chksymb{#1}\fi} \def\qChoiceColor#1{\edef\eq@arg{#1}\ifx\eq@arg\@empty \edef\qz@chksymbcol{\qChoiceColorDef}\else \edef\qz@chksymbcol{#1}\fi} \def\qChoiceSymbDef{check} \def\qChoiceColorDef{0 0 0 rg} \edef\qz@chksymb{\qChoiceSymbDef} \edef\qz@chksymbcol{\qChoiceColorDef} \let\rbf@Opts\@empty \def\Ans@sq@f{\if\eq@listType\eq@One \stepcounter{quizno}\else \@ifundefined{ifwithinsoldoc}{\refstepcounter{quizno}} {\ifwithinsoldoc\stepcounter{quizno}\else \refstepcounter{quizno}\fi}\fi \PBS\raggedright \if\Ans@choice\eq@One \def\rbf@Opts{\symbolchoice{\sq@corrsymch}% \textColor{\sq@corrsymcol}}\else \def\rbf@Opts{\symbolchoice{\sq@wrgsymch}% \textColor{\sq@wrgsymcol}}\fi \settowidth{\eq@tmplength}{\eq@lw@f}% \eq@tmpdima=\wd\eq@tmpbox% \hangindent=\eq@tmplength\hangafter=1\relax \insertGrayLetters \mbox{\expandafter\radio@@Button\expandafter{\rbf@Opts}% {mc.\oField.\thequestionno}% {\RadioFieldSize}{\RadioFieldSize}% {\Ans@choice\alph{quizno}}{\eq@protect\A}% {\eq@setWidgetProps\eq@Radio@driver}% {\@@Ans@sq@f@Defaults\Ans@sq@f@Actions\every@RadioButton \every@sqRadioButton}}% \Ans@proofing{\RadioFieldSize}% \eq@hspanner\ignorespaces} \def\@@Ans@ck@sq@f@Defaults{% \BC{0 0 0}\Ff{\FfNoToggleToOff} \F{\FPrint}\textSize{12}\textColor{0 g}\W{1} } \begingroup \catcode`\&=12 \gdef\eq@AND{&&} \endgroup \begin{defineJS}[\makeesc\*\makecmt\%]{\Ans@ck@sq@f@ActionsTrue} var fName=event.target.name; var g=this.getField("mc.*oField.*thequestionno"); var a=g.getArray(); for (var i=0; i=a.length) jmpToNamedDest("*oField","*@qzsolndest",% *ifx*@sqTurnOffAlerts*eq@Zero0*else1*fi);% *ifx*eqAddAAMouseUpMS*empty*else *eqAddAAMouseUpMS*fi \end{defineJS} \begin{defineJS}[\makeesc\*\makecmt\%]{\Ans@ck@sq@f@ActionsFalse} var fName=event.target.name; var g=this.getField("mc.*oField.*thequestionno"); var a=g.getArray(); for (var i=0; i> } \def\Ans@c@f@Defaults{% \BC{0 0 0}\S{S}\W{1}\F{\FHidden}\textSize{12} \textColor{0 g}\symbolchoice{circle} } \let\bottomOfAnsfStack\relax \providecommand\graylettersColor{gray} \def\insertGrayLetters{\ifaebshowgrayletters \rlap{\makebox[\RadioFieldSize]% {\textcolor{\graylettersColor}{\Alph{quizno}}}}\else\relax\fi} \def\Ans@@f{% \settowidth{\eq@tmplength}{\eq@lw@f}% \hangindent=\eq@tmplength\hangafter=1 \bottomOfAnsfStack\insertGrayLetters \edef\rbf@Opts{\ifaeb@usecircles\else \noexpand\symbolchoice{\qz@chksymb}\fi \noexpand\textColor{\qz@chksymbcol}}% \if\Ans@choice\eq@One\eq@recordAnsChoice\fi \mbox{\expandafter\radio@@Button\expandafter{\rbf@Opts}% {mc.\curr@quiz.\thequestionno}% {\RadioFieldSize}{\RadioFieldSize}{\Ans@choice\alph{quizno}}% {\eq@protect\A}{\eq@setWidgetProps\eq@Radio@driver}% {\Ans@r@f@Defaults\Ans@r@f@Actions\every@RadioButton \every@qRadioButton\insert@circlesymbol}}% \let\late@options\@empty \ifnocorrections\else \if\Ans@choice\eq@One \edef\Ans@c@f@Choice{\noexpand\DV{Yes}% \ifx\@qzsolndest\@empty\noexpand\Ff{\FfReadOnly}\else \ifeq@noquizsolutions \noexpand\Ff{\FfReadOnly}\else \noexpand\A{\noexpand\quiz@SolutionActionHook}\fi \fi }% \else \def\Ans@c@f@Choice{\Ff{\FfReadOnly}}% \fi \ifaeb@usecircles\def\late@options{\BC{}}\fi \if\Ans@choice\eq@One \ifx\@qzsolndest\@empty\else \ifeq@noquizsolutions\else \edef\late@options{\noexpand\BC{\solution@Color}}% \fi \fi \fi \makebox[0pt][r]{\check@@Box{}% {mcq.\curr@quiz.\thequestionno.\arabic{quizno}}% {\RadioFieldSize}{\RadioFieldSize}{Yes}{}% {\eq@setWidgetProps\eq@Check@driver}% {\Ans@c@f@Defaults\Ans@c@f@Choice\every@CheckBox \every@qCheckBox\late@options}}% \fi \Ans@proofing{\RadioFieldSize}\eq@hspanner \ignorespaces } \def\limitSelectionTo#1{\def\eqlimselTo{#1}} \let\eqlimselTo\@empty \def\Ans@ck@f{\leavevmode \if\eq@listType1\stepcounter{quizno}% \else\refstepcounter{quizno}\fi \if\Ans@choice\eq@One\eq@recordAnsChoice\fi \PBS\raggedright\Ans@@ck@f} \def\Ans@ck@f@Defaults{% \BC{0 0 0}\S{S}\W{1}\Ff{\FfNoToggleToOff} \textSize{12}\textColor{0 g} } \def\Ans@ck@f@Actions{% \A{\JS{% var\eqSP_bOK=true;\jsR \ifx\eqlimselTo\@empty\else _bOK\eqSP=\eqSP LimitSelection(\eqlimselTo,% "mck.\curr@quiz.\thequestionno","\arabic{quizno}");\jsR\fi if(_bOK)\eqSP{\jsR\jsT var aPMSretn=ProcessMultiSelection(\Ans@choice,"\alph{quizno}",% \thequestionno,\arabic{quizno},"\curr@quiz",% \eqPTs,\eq@pPTs);\jsR\jsT RecordProblemType("\eqQT",\thequestionno);\jsR\jsT ProcessQuestion(aPMSretn[0],aPMSretn[1],\thequestionno,% \arabic{quizno},"\curr@quiz",0,\ifnocorrections0\else1\fi,% "\bqlabelISO"\if\eqQuizType\isQZ\ifx\eq@online\eq@YES \ifeq@noquizsolutions\else,1\fi\fi\fi);\jsR }}}% } \def\quiz@SolutionActionHook{/S/GoTo/D(\@qzsolndest)% /Next<<\JS{this.resetForm([% "mcq.\curr@quiz.\thequestionno.\arabic{quizno}"]);}>> } \def\Ans@@ck@f{% \settowidth{\eq@tmplength}{\eq@lw@f}% \hangindent\eq@tmplength\hangafter\@ne \bottomOfAnsfStack\insertGrayLetters \bottomOfAnsfStack\insertGrayLetters \def\cbf@Opts{\symbolchoice{\qz@chksymb}% \textColor{\qz@chksymbcol}}% \mbox{\expandafter\check@@Box\expandafter{\cbf@Opts}% {mck.\curr@quiz.\thequestionno.\arabic{quizno}}% {\RadioFieldSize}{\RadioFieldSize}{\Ans@choice\alph{quizno}}% {\eq@protect\A}{\eq@setWidgetProps\eq@Check@driver}% {\Ans@ck@f@Defaults\Ans@ck@f@Actions\every@RadioButton \every@qckCheckbox}}% \ifnocorrections\else \if\Ans@choice\eq@One \edef\Ans@c@f@Choice{\noexpand\DV{Yes}% \ifx\@qzsolndest\@empty\noexpand\Ff{\FfReadOnly}\else \ifeq@noquizsolutions \noexpand\Ff{\FfReadOnly}\else \noexpand\A{\noexpand\quiz@SolutionActionHook}\fi \fi }% \else \def\Ans@c@f@Choice{\Ff{\FfReadOnly}}% \fi \let\late@options\@empty \if\Ans@choice\eq@One \ifx\@qzsolndest\@empty\else \ifeq@noquizsolutions\else \edef\late@options{\noexpand\BC{\solution@Color}}\fi \fi \fi \makebox[0pt][r]{\check@@Box{}% {mcq.\curr@quiz.\thequestionno.\arabic{quizno}}% {\RadioFieldSize}{\RadioFieldSize}{Yes}{}% {\eq@setWidgetProps\eq@Check@driver}% {\Ans@c@f@Defaults\Ans@c@f@Choice\every@CheckBox \every@qCheckBox\late@options}}% \fi \Ans@proofing{\RadioFieldSize}\eq@hspanner \ignorespaces } \newcount\eq@tabColCnt \define@key{bchoice}{nCols}{\def\bChoiceNumCols{#1}} \@for\eqi:=1,2,3,4,5,6,7,8,9,10 \do{\edef\temp@expand@def{% \noexpand\define@key{bchoice}{\eqi}[\eqi]{% \noexpand\def\noexpand\bChoiceNumCols{\eqi}}% }\temp@expand@def } \def\bChoiceNumCols{\aeb@numCols} \define@key{bchoice}{random}[true]{% \csname if#1\endcsname\eq@randomizeChoicestrue \else\eq@randomizeChoicesfalse\fi } \define@key{bchoice}{label}[]{\xdef\bChoiceLabel{#1}} \def\bChoices{\@ifnextchar[{\@ansChoices}{\@ansChoices[\aeb@numCols]}} \def\@ansChoices[#1]{% \global\let\@tempholdSaveAns\@empty %4/5 \global\let\@tempholdSaveChoice\@empty %4/5 \global\let\bChoiceLabel\@empty %4/5 \setkeys{bchoice}{#1}% \global\eq@tabColCnt=\z@ \ifnum\aeb@numCols=\@ne % list mode \def\eq@next{\@layoutListAns}\else % tabular mode \def\eq@next{\@layoutTabularAns{\bChoiceNumCols}}\fi \eq@next } \let\eChoices\relax \def\@layoutListAns{\@ifnextchar\Ans{\@getListAns}% {\@lookforendansChoices{\@layoutListAns}}% } \newcommand{\eq@saveAns}[2][]{% \let\eq@next\@@@SaveAnsGobbleAns \ifx\bChoiceLabel\@empty\else \def\eq@savedAnsOpt{#1}\def\eq@savedAnsZO{#2}% \if\eq@savedAnsZO1\let\eq@next\@@@SaveAns\fi \fi\eq@next } \long\def\@@@SaveAns#1\eAns{% 4/5 \g@addto@macro\@tempholdSaveAns{\\{\ignorespaces#1}}% \addtocounter{quizno}{1}% \edef\temp@expand{\noexpand\g@addto@macro\noexpand \@tempholdSaveChoice{% \noexpand\\{\ifx\sqstar\@empty\aebChoiceAltFmt\else \ifaebshowgrayletters\Alph{quizno}\else \linkContentFormat\fi\fi}}}\temp@expand \addtocounter{quizno}{-1}% } \newif\ifoxfordcomma \oxfordcommatrue \def\oxfordCommaOn{\oxfordcommatrue} \def\oxfordCommaOff{\oxfordcommafalse} \def\eq@insertComma{% \ifx\eq@comma\@empty \ifnum\@nameuse{NumAns\eq@namearg}>\tw@ \def\eq@comma{,}\fi \else\ifx\eq@insertAnd\@empty\eq@comma\space \else\ifnum\@tempcnta=\@nameuse{NumAns\eq@namearg}% \ifoxfordcomma\eq@comma\fi\else\eq@comma\fi\space \fi \fi } \newcommand\eqAnd{and}\def\eq@insertAnd{% \ifnum\@nameuse{NumAns\eq@namearg}<\tw@\else \ifnum\@nameuse{NumAns\eq@namearg}>\tw@\relax \else\leavevmode\space\fi\eqAnd\space\fi } \long\def\eq@displayAns#1{\advance\@tempcnta\@ne \eq@insertComma \ifnum\@tempcnta=\@nameuse{NumAns\eq@namearg}\eq@insertAnd\fi#1} \def\eq@displayAlts#1{\advance\@tempcnta1 \eq@insertComma \ifnum\@tempcnta=\@nameuse{NumAns\eq@namearg}\eq@insertAnd\fi \savedAltFmt{#1}} \def\eq@displayAltsAns#1{\advance\@tempcnta1\relax \eq@insertComma \ifnum\@tempcnta=\@nameuse{NumAns\eq@namearg}\eq@insertAnd\fi#1} \newcommand{\savedAltFmt}[1]{(#1)} \newcommand{\useSavedAns}{\bgroup\@ifstar{\useSavedAns@i} {\let\eq@insertAnd\@empty\useSavedAns@i}} \newcommand{\useSavedAns@i}[2][]{\@tempcnta=0\relax \def\eq@namearg{#2}\let\label\@gobble \def\eq@argi{#1}\ifx\eq@argi\@empty \let\eq@comma\@empty \let\\\eq@displayAns\@nameuse{SavedAns#2}\else \@nameuse{SavedAns#2-Idx#1}\fi \egroup } \newcommand{\useSavedAlts}{\bgroup\@ifstar{\useSavedAlts@i} {\let\eq@insertAnd\@empty\useSavedAlts@i}} \newcommand{\useSavedAlts@i}[2][]{\@tempcnta=0\relax \def\eq@namearg{#2}\@nameuse{caseFor#2}% \def\eq@argi{#1}\ifx\eq@argi\@empty \let\eq@comma\@empty \let\\\eq@displayAlts\@nameuse{SavedAlts#2}\else \savedAltFmt{\@nameuse{SavedAlts#2-Idx#1}}\fi \egroup } \newcommand{\useSavedAltsAns}{\bgroup\@ifstar{\useSavedAltsAns@i} {\let\eq@insertAnd\@empty\useSavedAltsAns@i}} \newcommand{\useSavedAltsAns@i}[2][]{\@tempcnta=0\relax \def\eq@namearg{#2}\@nameuse{caseFor#2}\let\label\@gobble \def\eq@argi{#1}\ifx\eq@argi\@empty \let\eq@comma\@empty \let\\\eq@displayAltsAns\@nameuse{SavedAltsAns#2}\else \savedAltFmt{\@nameuse{SavedAlts#2-Idx#1}} \@nameuse{SavedAns#2-Idx#1}\fi \egroup } \newcommand{\useSavedNumAns}[1]{\@nameuse{NumAns#1}} \long\def\@@@SaveAnsGobbleAns#1\eAns{} \long\def\@getListAns\Ans#1\eAns{%\@@par \eq@saveAns#1\eAns \Ans#1\vspace{\@rowskip}% \@layoutListAns } \long\def\@lookforendansChoices#1{% \@ifnextchar\eChoices{\rowsep{\rowsep@default}% \expandafter\@findendans\@gobble}{\expandafter#1\@gobble}% } \def\@layoutTabularAns#1{% \let\eq@tabSep\@empty \xdef\numShortCols{#1}% \ifnum#1>\aeb@numCols \xdef\numShortCols{\aeb@numCols}\fi \@@layoutTabularAns } \def\@@layoutTabularAns{% \@ifnextchar\Ans{\@getTabAns}% {\@lookforendansChoices{\@@layoutTabularAns}}% } \def\rowsep#1{\gdef\@rowsep{[#1]}\gdef\@rowskip{#1}}% \rowsep{\rowsep@default} \def\rowsepDefault#1{\def\rowsep@default{#1}} \def\rowsep@default{0pt} \long\def\@getTabAns\Ans#1\eAns{% \eq@saveAns#1\eAns \global\advance\eq@tabColCnt1 \let\@save@tabSep=\eq@tabSep \ifnum\eq@tabColCnt=\numShortCols \global\eq@tabColCnt=0 \xdef\eq@tabSep{\noexpand\\\noalign{\kern\@rowskip\relax}}% \else \gdef\eq@tabSep{&}% \fi \@ifnextchar\eChoices{\@save@tabSep\Ans#1\rowsep{\rowsep@default} \expandafter\@findendans\@gobble}% {\@save@tabSep\Ans#1\@@layoutTabularAns}% } \def\@findendans{\@ifnextchar\end{% \ifx\bChoiceLabel\@empty\else \processLabeledAns\fi }{\expandafter\@findendans\@gobble}}% \def\defineEachAns#1{\advance\eqtmpcnta\@ne \@temptokena={#1}\csarg\xdef {SavedAns\bChoiceLabel-Idx\the\eqtmpcnta}{\the\@temptokena}% \ifsolutionsonly\else {\let\\\relax\eq@IWDefs{\string \csarg\string\gdef{SavedAns\bChoiceLabel-Idx\the\eqtmpcnta}% {\the\@temptokena}}}% \fi } \def\defineEachChoice#1{\advance\eqtmpcnta\@ne \@temptokena={#1}\csarg\xdef {SavedAlts\bChoiceLabel-Idx\the\eqtmpcnta}% {\the\@temptokena}\ifsolutionsonly\else {\let\\\relax\eq@IWDefs{\string \csarg\string \gdef{SavedAlts\bChoiceLabel-Idx\the\eqtmpcnta}% {\the\@temptokena}}}\fi } \def\processLabeledAns{% \bgroup \let\label\@gobble \if\aeb@FLOverride\eq@l \global\@namedef{caseFor\bChoiceLabel}{\graylettersOff}\else \ifaebshowgrayletters \global\@namedef{caseFor\bChoiceLabel}{\graylettersOn}\else \global\@namedef{caseFor\bChoiceLabel}{\graylettersOff}\fi \fi \toks@=\expandafter{\@tempholdSaveAns}\csarg \xdef{SavedAns\bChoiceLabel}{\the\toks@}% \ifsolutionsonly\else{\let\\\relax\eq@IWDefs{\string \csarg\string\gdef{SavedAns\bChoiceLabel}{\the\toks@}}}\fi \eqtmpcnta\z@\let\\\defineEachAns\the\toks@ \xdef\@currNCntAns{\the\eqtmpcnta}\csarg \xdef{NumAns\bChoiceLabel}{\@currNCntAns}% \ifsolutionsonly\else{\eq@IWDefs{\string \csarg\string\gdef{NumAns\bChoiceLabel}{\the\eqtmpcnta}}}\fi \toks@=\expandafter{\@tempholdSaveChoice}\csarg \xdef{SavedAlts\bChoiceLabel}{\the\toks@}% \ifsolutionsonly\else{\let\\\relax\eq@IWDefs{\string \csarg\string\gdef{SavedAlts\bChoiceLabel}{\the\toks@}}}\fi \eqtmpcnta\z@\relax\let\\\defineEachChoice\the\toks@ \eqtmpcnta\@ne\toks@={}%{\ignorespaces\@gobble}% \loop \edef\temp@exp{\the\toks@\noexpand\\{% \noexpand\useSavedAlts[\the\eqtmpcnta]{\bChoiceLabel} \noexpand\useSavedAns[\the\eqtmpcnta]{\bChoiceLabel}}}% \toks@=\expandafter{\temp@exp}% \ifnum\eqtmpcnta<\@currNCntAns\relax \advance\eqtmpcnta\@ne \repeat \csarg\xdef{SavedAltsAns\bChoiceLabel}{\the\toks@}% \ifsolutionsonly\else{\let\\\relax\eq@IWDefs{\string \csarg\string\gdef{SavedAltsAns\bChoiceLabel}{\the\toks@}}}\fi \egroup } \def\graylettersOn{\aebshowgrayletterstrue} \def\graylettersOff{\aebshowgraylettersfalse} \def\aeb@exiii{\expandafter\expandafter\expandafter} \def\REF{\@ifstar{\let\isREFstar\eq@One\aeb@REFstar} {\let\isREFstar\eq@Zero\aeb@REF}} \def\aeb@REFstar#1{\@ifundefined{r@#1}{\hbox{\reset@font\bfseries ??}} {\ifaebshowgrayletters\aeb@buildUpperCaseRef{#1}% \else\ref*{#1}\fi}% } \def\aeb@REF#1{\@ifundefined{r@#1}{\hbox{\reset@font\bfseries ??}} {\ifaebshowgrayletters\aeb@buildUpperCaseRef{#1}% \else\ref{#1}\fi}% } \def\aeb@buildUpperCaseRef#1{% \xdef\tmp@expand{\aeb@exiii\@firstoffive\csname r@#1\endcsname}% \xdef\tmp@expand{\uppercase{\tmp@expand}}% \if\isREFstar\eq@One\tmp@expand\else\hyperref[#1]{\tmp@expand}\fi } \newif\ifaeb@usecircles\aeb@usecirclesfalse \let\insert@circlesymbol\@empty \def\useMCCircles{\useForms \ifaeb@usecircles\else \global\aeb@usecirclestrue \gdef\insert@circlesymbol{\symbolchoice{circle}}% \fi } \def\useMCRects{\useForms \ifaeb@usecircles\global\aeb@usecirclesfalse \global\let\insert@circlesymbol\@empty \fi } \let\useMCCRects\useMCRects \let\oqpriorhook\@empty \newenvironment{oQuestion}[1]{% \let\@currentQues\@empty \xdef\eq@pageThisQ{\the\c@page}\global \let\eqQzQuesList\@empty \xdef\oField{#1}\xdef\curr@quiz{#1}\xdef\currQuiz{#1}% \g@addto@macro\ListOfSQuizNames{,#1}\let\@qzsolndest\@empty \let\eqQuizType\isSQZ\gdef\eqPTs{1}\global\let\eqQT\eq@na \let\answers\answers@sq \let\endanswers\endanswers@sq \let\manswers\manswers@sq \let\endmanswers\endmanswers@sq \let\solution\solution@sq \let\endsolution\endsolution@sq \noindent\oqpriorhook\sq@IDTxtField\ifx\aebTitleQuiz\@empty \else\aebtitleQuiz\fi\ignorespaces }{% \global\let\aebtitleQuiz\@empty \global\let\aebTitleQuiz\@empty \global\let\eq@tq@star\relax \aftergroup\ignorespaces } \def\oSolution#1{\edef\@qzsolndest{#1}} \def\replaceExclPt#1{\def\replaceexclaim{#1}} \replaceExclPt{false} \def\negPointsAllowed{\def\negpointsallowed{true}} \@onlypreamble{\negPointsAllowed} \def\negpointsallowed{false} \def\negPointsMarkupAllowed{\def\negpointsmarkupallowed{true}} \def\negpointsmarkupallowed{false} \@onlypreamble{\negPointsMarkupAllowed} \def\requireAlertBox{\def\bcheckboxused{false}} \def\allowNoAlertBox{\def\bcheckboxused{true}} \allowNoAlertBox \newcommand\RespBoxNT{\RespBoxMath} \newcommand\RespBox{\RespBoxMath} \def\eqsanitize{\@makeother\_\@makeother\^\@makeother\&} \newcommand\RespBoxMath{\def\rbFlag{0}\begingroup\Hy@unicodefalse \eqsanitize\@RespBox} \def\eq@rpl#1#2{_rplVarsBy('#1','#2')@} % dps17 \ifnum\eq@drivernum=\z@ \def\RorRT{\r\t}\else\def\RorRT{\r}\fi \def\toAltApprCnt{0}\def\toAltApprVar{_toAltAppr\toAltApprCnt} \def\toAltApprCntInc{{\@tempcnta=\toAltApprCnt\relax \advance\@tempcnta\@ne\xdef\toAltApprCnt{\the\@tempcnta}}} \def\setCoreInitAltAppr{% var\eqSP_substVars=\indepVars;\RorRT var\eqSP_mathVars=processMathVars(_substVars);\RorRT var\eqSP_substValue=getSubstValue(_substVars,event.value);\RorRT event.value=RespBoxAppr(event);\RorRT getSubstValue.aSubsts=[];% } \def\bInitAltAppr{\ifShowAppr \def\ShowApprSAVE{true}\toAltApprCntInc\ShowApprfalse \def\eqAddAAFormat{\ifnum\eq@drivernum=\z@ try\eqLBr\RorRT\fi \setCoreInitAltAppr\ifnum\eq@drivernum=\z@\r\eqRBr catch(e){\RorRT var\eqSP\toAltApprVar=% app.setTimeOut('this.resetForm("'+event.target.name+'");% app.clearTimeOut(\toAltApprVar);',250);\r}\fi}\else \def\ShowApprSAVE{false}\fi } \def\eInitAltAppr{\@nameuse{ShowAppr\ShowApprSAVE}% \ifShowAppr\altApprOn\let\eqAddAAFormat\@empty\fi} \begin{defineJS}[\makeesc\*\makecmt\%]{\AAKqRespBoxMath} if(event.willCommit){ RecordPointValue(*eqPTs,*thequestionno*ifx*grpquestions*eq@One,% *thegrpquestionno,*grpPointValue,*grpTotalWeight,% "*grpEvalFunction"*fi); RecordProblemType("*eqQT",*thequestionno); *ifSubstVars% var _substVars=*indepVars; var _mathVars=processMathVars(_substVars); var _substValue=getSubstValue(_substVars,event.value); var _substAns=getSubstValue(_substVars,"*eqCorrectAns"); var retn=*processJSfunc(*rbArgs,% *compareJSfunc,_substValue);*else% var _mathVars=*indepVars; var retn=*processJSfunc(*rbArgs,*compareJSfunc);*fi ProcUserResp(retn,event.value,*thequestionno,0% *ifx*grpquestions*eq@One,*thegrpquestionno*fi); } if (!isQuizInitialized("*currQuiz")) { *eqObjAlert*eqAppAlert(InitMsg("*bqlabelISO"),3); event.rc = false;% *ifx*eqAddAAKeystroke*@empty*else *eqAddAAKeystroke*fi } \end{defineJS} \def\RespBoxMathDefaults{% \BC{0 0 0}\S{S}\textColor{0 g}\F{\FPrint}\W{1} } \def\moreRespBoxMathDefaults{% \edef\@moreRespBoxMathDefaults{% \if\eqQuizType\isQZ\ifx\eq@online\eq@YES \ifeq@noquizsolutions \else\noexpand\Ff{\FfReadOnly}\fi\fi\fi }% } \let\eqAddAAFormat\@empty \def\eqSP{\string\040} \def\eqLBr{\string\173} \def\eqRBr{\string\175} \begin{defineJS}[\makeesc\!\makecmt\%]{\rbmAAKey} if(event.willCommit) { !ifSubstVars% var _substVars=!indepVars; var _mathVars=processMathVars(_substVars); var _substValue=getSubstValue(_substVars,event.value); var _substAns=getSubstValue(_substVars,"!eqCorrectAns"); var retn=!processJSfunc(!rbArgs,% !compareJSfunc,_substValue);!else% var _mathVars=!indepVars; var retn=!processJSfunc(!rbArgs,!compareJSfunc);!fi% !ifx!@sqTurnOffAlerts!eq@One OnBlurRespBox(retn,"!curr@quiz");!fi% !ifx!eqAddAAKeystroke!@empty!else !eqAddAAKeystroke!fi } \end{defineJS} \def\@@RespBoxMathActions{% \AA{\if\eqQuizType\isQZ \AAKeystroke{\AAKqRespBoxMath} \AAFormat{\ifShowAppr\ifSubstVars\ifarrowDelim try{event.value=RespBoxAppr(event);}catch(e){}\r \fi\fi\fi\eqAddAAFormat} \else \AAKeystroke{\rbmAAKey} \AAFormat{\ifShowAppr\ifSubstVars\ifarrowDelim try{event.value=RespBoxAppr(event);}catch(e){}\r\fi\fi\fi \eqAddAAFormat}% \AAOnFocus{\JS{var retn = null;}}% \AAOnBlur{\JS{OnBlurRespBox(null,"\curr@quiz");}}% \fi } } \def\annot@subtype@rbm{rbm} \newcommand\@RespBox[1][] {% \edef\annot@subtype{\annot@subtype@rbm}% \eq@AddProbToQzQuesList \smallskip\ifx\grpquestions\eq@Zero \addtocounter{eqpointvalue}{\eqPTs}\fi \if\eqQuizType\isQZ \def\rbFlag{1}\global\IsRespBoxtrue \ifx\grpquestions\eq@One \stepcounter{grpquestionno}% \def\Fld@name{% grpobj.\curr@quiz.\thequestionno.\thegrpquestionno}% \else \eq@recordThesePTs\eq@recordProbType \edef\eqtmp{\aPointType}% \xdef\aPointType{\eqtmp,[\eqPTs,"math"]}% \stepcounter{questionno}% \def\Fld@name{obj.\curr@quiz.\thequestionno}% \fi \else % shortquiz \ifx\grpquestions\eq@One \stepcounter{grpquestionno}% \def\Fld@name{% grpobj.\oField.\thequestionno.\thegrpquestionno}% \else \stepcounter{questionno}% \def\Fld@name{% obj.\oField.\thequestionno}% \fi \fi \let\Array\aeb@array \moreRespBoxMathDefaults \leavevmode\hbox\bgroup\let\rpl\eq@rpl \text@@Field{#1}{\Fld@name}% {\RBW}{\DefaultHeightOfWidget}% {\eq@protect\AA}{\eq@setWidgetProps\eq@RespBox}% {\RespBoxMathDefaults\@moreRespBoxMathDefaults \@@RespBoxMathActions\every@eqTextField\every@RespBoxMath}% } \def\eq@RespBox#1{\pdfstringdef\eqCorrectAns{#1}% \gdef\eqCorrectAnsTeX{#1}\if\grpquestions\eq@Zero \ifwithinMCFI\gdef\s@veCorrAnsMCFI{"#1"}\fi \else \eq@recordGrpAnsArray{"#1"}\fi \@ifnextchar({\@eq@RespBox{#1}}{\@eq@RespBox{#1}(x)}} \def\@eq@RespBox#1(#2){\@ifnextchar[{\@eq@RespB@x{#1}(#2)}% {\@ifstar{\@eq@RespB@x{#1}(#2)[\curr@quiz.\thequestionno]}% {\@eq@RespB@x{#1}(#2)[]}}} \def\eq@ZERO{0} \def\defaultRDPrecision#1{\def\eq@defaultRDPrecision{#1}} \defaultRDPrecision{1E-14} \newif\ifarrowDelim\arrowDelimfalse \def\rpl@#1#2{\rpl@i#1->\@nil} \def\rpl@i#1->#2\@nil{\def\argii{#2}\ifx\argii\@empty\else \global\arrowDelimtrue\fi} \def\GiiRpli#1{\global\arrowDelimfalse\GiiRplii#1\rpl{}{}\@nil} \def\GiiRplii#1\rpl#2#3#4\@nil{\def\argiv{#4}% \ifx\argiv\@empty\let\eq@next\relax\else \rpl@{#2}{#3}\ifarrowDelim\let\eq@next\relax\else \def\eq@next{\GiiRplii#4\@nil}\fi\fi \eq@next} \def\isAltApprSpec#1{\bgroup\if\frstIsrpl\eq@YES\GiiRpli{#1}\else \expandafter\GiiRpli\expandafter{#1}\fi\egroup} % dps17 \def\isFrstrpl#1#2\@nil{\ifx#1\rpl\let\frstIsrpl\eq@YES\else \let\frstIsrpl\eq@NO\fi} \def\cntComm@s#1{\@tempcnta\z@\expandafter\cntComm@si#1,,\@nil} \def\cntComm@si#1,#2,\@nil{\def\argii{#2}\ifx\argii\@empty \def\eq@next{\edef\nC{\the\@tempcnta}}\else \advance\@tempcnta\@ne\def\eq@next{\cntComm@si#2,\@nil}\fi \eq@next}\def\eq@SC{;}\def\rplSofT#1#2{#2} \def\cntVars#1{\let\rpl\rplSofT\edef\eV@rs{#1}\let\rpl\eq@rpl \cntComm@s{\eV@rs}\ifnum\nC>\z@ \@tempcnta\nC\relax\advance\@tempcnta\@ne \xdef\nV{\the\@tempcnta}\else\@tempcnta\z@ \expandafter\cntVarsi\eV@rs;\@nil\fi} \def\cntVarsi#1#2\@nil{\def\argii{#2}% \ifx\argii\eq@SC\def\eq@next{\advance\@tempcnta\@ne \edef\nV{\the\@tempcnta}}\else\advance\@tempcnta\@ne \def\eq@next{\cntVarsi#2\@nil}\fi \eq@next} \def\eq@X{x} \def\eq@isThereRept#1{\let\eq@isRept\eq@Zero\expandafter \eq@isThereRepti#1*\@nil} \def\eq@isThereRepti#1*#2\@nil{\def\argii{#2}\ifx\argii\@empty \let\eq@isRept\eq@Zero\else\let\eq@isRept\eq@One\fi} \def\eq@obeyReptOfIntrvls#1{% \expandafter\eq@isThereRept\expandafter{#1}% sets \eq@isRept \if\eq@isRept\eq@Zero\relax\let\eq@interv@ls\@empty\expandafter \g@addto@macro\expandafter\eq@interv@ls \expandafter{#1}\let\eq@next\relax\else\let\eq@interv@ls\@gobble \def\eq@next{\expandafter \eq@obeyReptOfIntrvlsi#1x[]x\@nil}\fi\eq@next} \def\eq@obeyReptOfIntrvlsi#1[#2]#3#4x#5\@nil{% \def\argi{#2}\def\argii{#3}\def\argiv{#5}% \ifx\argi\@empty\let\eq@next\relax\else \ifx\argii\eq@X\g@addto@macro\eq@interv@ls{x[#2]}% \def\eq@next{\eq@obeyReptOfIntrvlsi#4x#5x\@nil}\else % repetition of an interval \eq@ddtorepIntrvl{[#2]}{#4}% \def\eq@next{\eq@obeyReptOfIntrvlsi#5x\@nil}\fi \fi \eq@next } \def\eq@ddtorepIntrvl#1#2{\@tempcnta=#2 \eq@ddtorepIntrvli{#1}{#2}} \def\eq@ddtorepIntrvli#1#2{\@whilenum\@tempcnta>\z@\do {\g@addto@macro\eq@interv@ls{x#1}\advance\@tempcnta\m@ne}} \def\cntIv@ls#1{\@tempcnta\z@\expandafter\cntIv@lsi#1xxx\@nil}% \def\cntIv@lsi#1x#2x\@nil{\def\argii{#2}\ifx\argii\eq@X \advance\@tempcnta\@ne \edef\nI{\the\@tempcnta}\let\eq@next\relax\else \advance\@tempcnta\@ne\def\eq@next{\cntIv@lsi#2x\@nil}\fi \eq@next} \begingroup\@makeother\& \gdef\eq@ProcIntrvls#1{\expandafter \eq@ProcIntrvlsi#1&&\@nil} \gdef\eq@ProcIntrvlsi#1\@nil{\def\argii{#2}% \ifx\argii\@empty \eq@obeyReptOfIntrvls{#1}% \cntIv@ls{\eq@interv@ls}% \else \eq@obeyReptOfIntrvls{#1}% \edef\interv@ls{\eq@interv@ls}% \cntIv@ls{\eq@interv@ls}% \eq@obeyReptOfIntrvls{#2}% \edef\eq@interv@ls{\interv@ls&\eq@interv@ls}% \fi } \endgroup \def\@eq@RespB@x#1(#2)[#3]#4#5#6{\xdef\@qzsolndest{#3}% dps17 \gdef\indepVars{"#2"}\isFrstrpl#2\@nil \if\frstIsrpl\eq@YES \def\@IVi{#2}\else\expandafter\def\expandafter \@IVi\expandafter{#2}\fi \edef\@IVii{#2}% \ifx\@IVi\@IVii \global\SubstVarsfalse \else \global\SubstVarstrue \isAltApprSpec{#2}% \fi \cntVars{#2}\def\eq@precision{#5}% \ifx\eq@precision\eq@ZERO \def\eq@defaultCompare{reldiffCompare}% \def\rbArgstmp{\rbFlag,% \ifSubstVars_substAns\else"#1"\fi,#4,% \eq@defaultRDPrecision}% \else \def\eq@defaultCompare{diffCompare}% \def\rbArgstmp{\rbFlag,% \ifSubstVars_substAns\else"#1"\fi,#4,#5}% \fi \edef\eq@ixparam{#6}\expandafter\eq@chkivIntrvls\eq@ixparam\\% } \def\viidna{[0,1]} \def\eq@chkivIntrvls{\@ifnextchar[{\eq@chkivIntrvlsi}% {\eq@chkivIntrvlsii}} \def\eq@chkivIntrvlsi#1\\{\eq@ProcIntrvls{#1}% \def\rbArgs{\rbArgstmp,"\eq@interv@ls",_mathVars}% dps17 \@ifnextchar[{\@eq@@RespBox[ \expandafter\@gobble}% {\@eq@@RespBox[\eq@defaultCompare]}% } \def\eq@chkivIntrvlsii#1\\#2{\def\nI{1}% \def\rbArgs{\rbArgstmp,"[#1,#2]",_mathVars}% \@ifnextchar[{\@eq@@RespBox}{\@eq@@RespBox[\eq@defaultCompare]}% } \def\@eq@@RespBox[#1]{\@ifstar{\jsRespBox[#1]}% {\jsRespBox[#1]{ProcResp}}} \def\eq@ProcRespIntervals{ProcRespIntervals} \def\eq@ProcRespSetNum{ProcRespSetNum} \def\eq@ProcRespSetSym{ProcRespSetSym} \def\eq@ProcRespEvalEq{ProcRespEvalEq} \def\eq@ProcRespEvalEqNonZero{ProcRespEvalEqNonZero} \def\eq@ProcRespEvalEqList{ProcRespEvalEqList} \def\eq@ProcRespEvalEqListNonZero{ProcRespEvalEqListNonZero} \def\jsRespBox[#1]#2{\def\compareJSfunc{#1}% \def\processJSfunc{#2}\gdef\g@processJSfunc{#2}% 01/11 \ifnum\nV=\nI\relax\else \ifx\processJSfunc\eq@ProcRespSetNum\else \ifx\processJSfunc\eq@ProcRespSetSym\else \ifx\processJSfunc\eq@ProcRespEvalEq\else \ifx\processJSfunc\eq@ProcRespEvalEqNonZero\else \ifx\processJSfunc\eq@ProcRespEvalEqList\else \ifx\processJSfunc\eq@ProcRespEvalEqListNonZero\else \PackageWarning{exerquiz}{The number of variables does not match\MessageBreak the number of intervals. The problem\MessageBreak may not evaluate properly}\fi\fi\fi\fi\fi\fi\fi \ifx\eq@ProcRespIntervals\g@processJSfunc \let\@inmathwarn@SAVE\@inmathwarn\let\@inmathwarn\@gobble \pdfstringdef{\eqCorrectAns}{\eqCorrectAns}% \let\@inmathwarn\@inmathwarn@SAVE\fi \ifx\grpquestions\eq@Zero \eq@recordCorrAns{"\eqCorrectAns"}\fi \ifeq@proofing\makebox[0pt][l]{\space\math@correctAnswer}\fi \eq@TextField % send to the driver-dependent macro \egroup % hbox \endgroup % \RespBoxMath } \def\gobbleMacro#1>{} \gdef\math@correctAnswer{\ttfamily \color{\@proofingsymbolColor}\spaceskip=2pt\xspaceskip=2pt% \expandafter\gobbleMacro\meaning\eqCorrectAnsTeX } \newcommand\RespBoxTxtNT{\def\rbFlag{0}\@RespBoxTxt} \newcommand\RespBoxTxt{\def\rbFlag{0}\@RespBoxTxt} \def\RespBoxTxtOnBlur{OnBlurRespBox(% \ifx\@sqTurnOffAlerts\eq@One retn\else null\fi,"\curr@quiz");} \def\eqObjAlertIfFalse{if (false) } \def\eqObjAlert{% \ifx\eqQuizType\isQZ\ifx\eq@online\eq@YES\ifeq@noquizsolutions \else\eqObjAlertIfFalse\fi\fi\fi} \def\eqAppAlert{eqAppAlert} \begin{defineJS}[\makeesc\*\makecmt\%]{\AAKqRespBoxTxt} if(event.willCommit){ RecordPointValue(*eqPTs,*thequestionno*ifx*grpquestions*eq@One,% *thegrpquestionno,*grpPointValue,*grpTotalWeight,% "*grpEvalFunction"*fi); RecordProblemType("*eqQT",*thequestionno); var retn = ProcRespTxt(*rbTxtAlt); ProcUserResp(retn,event.value,*thequestionno,0% *ifx*grpquestions*eq@One,*thegrpquestionno*fi); } if (!isQuizInitialized("!currQuiz")) { *eqObjAlert*eqAppAlert(InitMsg("*bqlabelISO"),3); event.rc = false; } \end{defineJS} \def\RespBoxTxtDefaults{% \BC{0 0 0}\W{1}\S{S}\textColor{0 g}\F{\FPrint}% } \def\moreRespBoxTxtDefaults{% \edef\@moreRespBoxTxtDefaults{% \if\eqQuizType\isQZ\ifx\eq@online\eq@YES \ifeq@noquizsolutions\else \noexpand\Ff{\FfReadOnly}\fi\fi\fi }% } \begin{defineJS}[\makeesc\!\makecmt\%]{\rbtAAKey} if(event.willCommit) { var retn = ProcRespTxt(!rbTxtAlt);% !ifx!@sqTurnOffAlerts!eq@One !RespBoxTxtOnBlur!fi% !ifx!eqAddAAKeystroke!@empty!else !eqAddAAKeystroke!fi } \end{defineJS} \def\@@RespBoxTxtActions{% \AA{\if\eqQuizType\isQZ \AAKeystroke{\AAKqRespBoxTxt\eqAddAAKeystroke} \AAFormat{\eqAddAAFormat} \else \AAKeystroke{\rbtAAKey} \AAFormat{\eqAddAAFormat} \AAOnFocus{\JS{var\eqSP retn=null;}} \ifx\@sqTurnOffAlerts\eq@Zero \AAOnBlur{\JS{\RespBoxTxtOnBlur}}\fi \fi } } \def\annot@subtype@rbt{rbt} \newcommand\@RespBoxTxt[1][]{% \edef\annot@subtype{\annot@subtype@rbt}% \eq@AddProbToQzQuesList \ifx\grpquestions\eq@Zero\addtocounter{eqpointvalue}{\eqPTs}\fi \if\eqQuizType\isQZ \def\rbFlag{1}\global\IsRespBoxtrue \ifx\grpquestions\eq@One \stepcounter{grpquestionno}% \def\Fld@name{% grpobj.\curr@quiz.\thequestionno.\thegrpquestionno}% \else \eq@recordThesePTs\eq@recordProbType \edef\eqtmp{\aPointType}% \xdef\aPointType{\eqtmp,[\eqPTs,"text"]}% \stepcounter{questionno}% \def\Fld@name{obj.\curr@quiz.\thequestionno}% \fi \else \stepcounter{questionno}% \def\Fld@name{obj.\oField.\thequestionno}% \fi \moreRespBoxTxtDefaults \leavevmode\hbox\bgroup\text@@Field{#1}{\Fld@name}% {\RBW}{\DefaultHeightOfWidget}% {\eq@protect\AA}{\eq@setWidgetProps\@@RespBoxTxt}% {\RespBoxTxtDefaults\@moreRespBoxTxtDefaults \@@RespBoxTxtActions\every@eqTextField\every@RespBoxTxt}% } \def\@@RespBoxTxt#1#2{% \@ifnextchar[%] {\@@@RespBoxTxt{#1}{#2}} {\@ifstar{\@@@RespBoxTxt{#1}{#2}[\curr@quiz.\thequestionno]}% {\@@@RespBoxTxt{#1}{#2}[]}}} \def\eq@ZERO{0}\def\eq@ONE{1}\def\eq@TWO{2} \def\@@@RespBoxTxt#1#2[#3]#4{% \xdef\@qzsolndest{#3}% \def\eq@argi{#1}\ifx\eq@argi\eq@ZERO\else \ifx\eq@argi\eq@ONE\else\ifx\eq@argi\eq@TWO\else \def\eq@argi{-1}\fi\fi\fi \def\eq@argii{#2}\ifx\eq@argii\eq@ONE\else\def\eq@argii{0}\fi \begingroup \ifnum\eq@argii=\@ne \def\rexpStr##1{\eqbs\eqbs\eqbs\eqbs##1}% \def\\##1{\eqbs\eqbs\eqbs\eqbs##1}% \def\word##1{\\b##1\\b}\def\any{@any@}\fi \xdef\rbTxtAlt{\rbFlag,\eq@argi,\eq@argii}% \global\let\txtAltList\@empty \eqtmpcnta=#4\relax\ifnum\eqtmpcnta>\z@\expandafter\@argRead\else \PackageError{exerquiz}{% The fourth required parameter of \string\RespBoxTxt\MessageBreak is required to be a positive integer. You entered\MessageBreak #4\space instead}{Enter a positive integer.}\fi } \def\@argRead#1{\xdef\jsTempArgs{\txtAltList}% \ifx\txtAltList\@empty\xdef\txtAltList{"#1"}\else \xdef\txtAltList{\jsTempArgs,"#1"}\fi\@@argRead} \def\@@argRead{\advance\eqtmpcnta\m@ne \ifnum\eqtmpcnta=\z@ \def\eq@next{\endgroup \xdef\rbTxtAlt{\rbTxtAlt,\txtAltList}% \if\grpquestions\eq@Zero \ifwithinMCFI \xdef\s@veCorrAnsMCFI{[\txtAltList]}\else \eq@recordCorrAns{[\txtAltList]}\fi \else \eq@recordGrpAnsArray{[\txtAltList]}% \fi \eq@@RespBoxTxt }% \else \def\eq@next{\@argRead}% \fi\eq@next } \def\eq@@RespBoxTxt{% \ifeq@proofing\makebox[0pt][l]{\space\txt@correctAnswer}\fi \eq@TextField \egroup } \def\gobbleTxt#1>#2,#3,#4,{} \gdef\txt@correctAnswer{\ttfamily\color{\@proofingsymbolColor}% \spaceskip=2pt\xspaceskip=2pt \expandafter\gobbleTxt\meaning\rbTxtAlt } \begin{defineJS}[\makeesc\*\makecmt\%]{\AAKqRespBoxTxtPC} if(event.willCommit){ RecordPointValue(*eqPTs,*thequestionno*ifx*grpquestions*eq@One,% *thegrpquestionno,*grpPointValue,*grpTotalWeight,% "*grpEvalFunction"*fi); RecordProblemType("*eqQT",*thequestionno); var retn = ProcRespTxtPC(*rbTxtAlt); *ifx*grpquestions*eq@One% ProbValue[*thequestionno][3+*thegrpquestionno]% =ProcRespTxtPC.txtPCpCr;*else% ProbValue[*thequestionno]=ProcRespTxtPC.txtPCpCr;*fi ProcUserResp(retn,event.value,*thequestionno,0% *ifx*grpquestions*eq@One,*thegrpquestionno*fi); } if (!isQuizInitialized("*currQuiz")) { *eqObjAlert*eqAppAlert(InitMsg("*bqlabelISO"),3); event.rc = false; } \end{defineJS} \begin{defineJS}[\makeesc\!\makecmt\%]{\rbtPCAAKey} if(event.willCommit) { retn = ProcRespTxtPC(!rbTxtAlt);% !ifx!@sqTurnOffAlerts!eq@One !RespBoxTxtOnBlur!fi% } \end{defineJS} \def\@@RespBoxTxtPCActions{% \AA{% \if\eqQuizType\isQZ \AAKeystroke{\AAKqRespBoxTxtPC} \else \AAKeystroke{\rbtPCAAKey} \AAOnFocus{\JS{var\eqSP retn=null;}} \ifx\@sqTurnOffAlerts\eq@Zero \AAOnBlur{\JS{\RespBoxTxtOnBlur}}\fi \fi } } \newcommand{\RespBoxTxtPC}{\def\rbFlag{0}\@RespBoxTxtPC} \def\annot@subtype@rbtpc{rbtpc} \newcommand\@RespBoxTxtPC[1][]{% \edef\annot@subtype{\annot@subtype@rbtpc}% \eq@AddProbToQzQuesList \smallskip\ifx\grpquestions\eq@Zero \addtocounter{eqpointvalue}{\eqPTs}\fi \if\eqQuizType\isQZ\def\rbFlag{1}\global\IsRespBoxtrue \ifx\grpquestions\eq@One \stepcounter{grpquestionno}% \def\Fld@name{% grpobj.\curr@quiz.\thequestionno.\thegrpquestionno}% \else \eq@recordThesePTs\eq@recordProbType \edef\eqtmp{\aPointType}% \xdef\aPointType{\eqtmp,[\eqPTs,"text"]}% \stepcounter{questionno}% \def\Fld@name{obj.\curr@quiz.\thequestionno}% \fi \else \stepcounter{questionno}% \def\Fld@name{obj.\oField.\thequestionno}% \fi \moreRespBoxTxtDefaults \leavevmode\hbox\bgroup\text@@Field{#1}{\Fld@name}% {\RBW}{\DefaultHeightOfWidget}% {\eq@protect\AA}{\eq@setWidgetProps\@@RespBoxTxtPC}% {\RespBoxTxtDefaults\@moreRespBoxTxtDefaults \@@RespBoxTxtPCActions\every@eqTextField\every@RespBoxTxt}% } \def\@@RespBoxTxtPC#1{\@ifnextchar[{\@@@RespBoxTxtPC{#1}} {\@ifstar{\@@@RespBoxTxtPC{#1}[\curr@quiz.\thequestionno]}% {\@@@RespBoxTxtPC{#1}[]}}} \def\@@@RespBoxTxtPC#1[#2]#3{\xdef\@qzsolndest{#2}% \begingroup \def\rexpStr##1{\eqbs\eqbs\eqbs\eqbs##1}% \def\\##1{\eqbs\eqbs\eqbs\eqbs##1}% \def\word##1{\\b##1\\b}\def\any{@any@} \gdef\rbTxtAlt{\rbFlag,#1,1}% force sub-string match \global\let\txtAltList\@empty \eqtmpcnta=#3\relax\ifnum\eqtmpcnta>\z@\expandafter\@argReadPC\else \PackageError{exerquiz}{% The third required parameter of \string\RespBoxTxtPC\MessageBreak is required to be a positive integer. You entered\MessageBreak #3\space instead} {Enter a positive integer.}\fi } \newcommand\@argReadPC[2][0]{\xdef\jsTempArgs{\txtAltList}% \ifx\txtAltList\@empty\xdef\txtAltList{["#2",#1]}\else \xdef\txtAltList{\jsTempArgs,["#2",#1]}\fi\@@argReadPC} \def\@@argReadPC{\advance\eqtmpcnta\m@ne \ifnum\eqtmpcnta=\z@ \def\eq@next{\endgroup \xdef\rbTxtAlt{\rbTxtAlt,\txtAltList}% \if\grpquestions\eq@Zero \ifwithinMCFI \xdef\s@veCorrAnsFCFI{[\txtAltList]}\else \eq@recordCorrAns{[\txtAltList]}\fi \else \eq@recordGrpAnsArray{[\txtAltList]}% \fi \eq@@RespBoxTxtPC }% \else \def\eq@next{\@argReadPC}% \fi\eq@next } \def\eq@@RespBoxTxtPC{\ifeq@proofing \makebox[0pt][l]{\space\txt@correctAnswer}\fi \eq@TextField \egroup } \def\afterSplChkActn#1{\def\@fterSplChkActn{\r #1}} \let\@fterSplChkActn\@empty \newcommand{\splChkCA}{Check} \newcommand{\splChkTU}{Check spelling} \newcommand\SpellCheck[1][]{% \pushButton[\CA{\splChkCA}\TU{\splChkTU}\S{S} #1\A{\JS{% \ifx\grpquestions\eq@One var targetFldName=% "grpobj.\curr@quiz.\thequestionno.\thegrpquestionno"; \else \ifx\annot@subtype\annot@subtype@rbe var targetFldName="essay.\curr@quiz.\thequestionno"; \else var targetFldName="obj.\curr@quiz.\thequestionno"; \fi \fi\r var splErrors=checkTheSpelling(targetFldName);\@fterSplChkActn }}]{spl.\curr@quiz.\thequestionno}{}{11bp}} \def\RespBoxEssayDefaults {% \BC{0 0 0}\W{1}\S{S}\Ff{\FfMultiline}\rawPDF{}% } \def\@@RespBoxEssayActions{\AA{% \if\eqQuizType\isQZ \AAKeystroke{% if(event.willCommit){\jsR\jsT RecordPointValue(\eqPTs,\thequestionno);\jsR\jsT RecordProblemType("\eqQT",\thequestionno);\jsR %\jsT }\jsR if (!isQuizInitialized("\curr@quiz")) {\jsR\jsT \eqObjAlert\space eqAppAlert(% InitMsg("\bqlabelISO"),3);\jsR\jsT event.rc = false;\jsR }% }% \fi}% } \def\annot@subtype@rbe{rbe} \newcommand\RespBoxEssay[1][]{\edef\annot@subtype{\annot@subtype@rbe}% \def\rbe@rgi{#1}\RespBoxEssay@i} \def\RespBoxEssay@i{\@ifnextchar[%] {\RespBoxEssay@ii} {\@ifstar{\RespBoxEssay@ii[\curr@quiz.\thequestionno]}}% {\RespBoxEssay@ii[]}% } \newcommand\RespBoxEssay@ii[3][]{% \smallskip\addtocounter{eqpointvalue}{\eqPTs}% \eq@AddProbToQzQuesList \stepcounter{questionno}% \xdef\@qzsolndest{#1}% \edef\eqtmp{\aPointType}\xdef\aPointType{\eqtmp,[\eqPTs,"essay"]}% \expandafter\mbox\expandafter{\expandafter\text@@Field \expandafter{\rbe@rgi}{essay.\curr@quiz.\thequestionno}{#2}{#3}% {\eq@protect\AA}{\eq@setWidgetProps \eq@TextField}{\RespBoxEssayDefaults\@@RespBoxEssayActions \every@eqTextField}}% } \let\@@sqTallyBoxActions\@empty \@ifundefined{calcOrder}{% \ifpdf\def\@@sqTallyBoxActions{% \AA{\AAValidate{getTotalTally("\oField");}}}\fi}{} \def\sqTallyBoxDefaults{% \BC{0 0 0}\W{1}\textColor{1 0 0 rg}\S{I}\Q{2}\Ff{\FfReadOnly} } \ifpdf\def\@@sqTallyBoxActions{% \AA{\AAValidate{getTotalTally("\oField");}}}\else \let\@@sqTallyBoxActions\@empty \fi \newcommand\sqTallyBox[1][]{% \mbox{\text@@Field{#1}{tally.\oField.\thequestionno}% {\TBW}{\DefaultHeightOfWidget}% {}{\eq@setWidgetProps\eq@TextField}% {\sqTallyBoxDefaults\@@sqTallyBoxActions\every@eqTextField \every@sqTallyBox}}% } \def\sqTallyTotalDefaults{% \rawPDF{}\W{1}\BC{0 0 0}\S{I}\textColor{1 0 0 rg}% \Q{2}\Ff{\FfReadOnly}% } \def\@@sqTallyTotalActions{% \AA{% \AAKeystroke{AFNumber_Keystroke(0,0,0,0,"",true);} \AAFormat{AFNumber_Format(0,0,0,0,"",true);} \AACalculate{% AFSimple_Calculate("SUM",new Array("tally.\oField")); }}% } \newcommand\sqTallyTotal[1][]{% \mbox{\text@@Field{#1}{tallytotal.\oField}{\TBW}% {\DefaultHeightOfWidget}{\eq@protect\AA}% {\eq@setWidgetProps\eq@TextField}% {\sqTallyTotalDefaults\@@sqTallyTotalActions\every@eqTextField \every@sqTallyTotal}}% } \def\CorrAnsButtonDefaults{% \CA{\eq@local@CorrAnsButton}\W{1}\S{S} \BC{0 0 0}\BG{.7529 .7529 .7529}\H{P} } \def\normalCABtnBC{0 0 0} \def\qCorrAnsButtonActionHook{\JS{% \ifx\@qzsolndest\@empty\else if(event.shift)\jsR\jsT this.gotoNamedDest("\@qzsolndest");\jsR else {\jsR\jsT\fi \ifShowAppr \ifarrowDelim if(typeof event.target.appr=="undefined")\r\JST\t event.target.appr=false;\r\JST event.target.appr=!event.target.appr;\r\JST if(event.target.appr) {\r\t\JST var\eqSP_substVars=\indepVars;\r\t\JST var\eqSP_substAns=getSubstValue(_substVars,"\CorrectAns");\r\t\JST var\eqSP value=RespBoxAppr("\CorrectAns");\r\JST } else\eqSP var\eqSP value="\CorrectAns";\r\JST \else var\eqSP value="\CorrectAns";\r\JST \fi \else var\eqSP value="\CorrectAns";\r\JST \fi \processJSfunc("Ans.\curr@quiz",value,\currQuiz);\r \ifx\@qzsolndest\@empty\else }\fi }} \begin{defineJS}[\makeesc\!\makecmt\%]{\sqCorrAnsCode} !ifx!@qzsolndest!@empty% !processJSfunc("obj.!oField.!thequestionno","!CorrectAns",% !currQuiz);!else% if (event.shift) this.gotoNamedDest("!@qzsolndest"); else !processJSfunc("obj.!oField.!thequestionno","!CorrectAns",% !currQuiz);!fi \end{defineJS} \def\sqCorrAnsButtonActionHook{\JS{\sqCorrAnsCode}} \newcommand\CorrAnsButton[1][]{\eq@@CorrAnsButton{#1}} \def\eq@@CorrAnsButton#1#2{\bgroup\makeJSspecials % 1/12 \@ifstar{\eq@@@CorrAnsButton{#1}{#2}}{% \eq@@@CorrAnsButton{#1}{#2}{DisplayAnswer}}} \def\eq@@@CorrAnsButton#1#2#3{\gdef\CorrectAns{#2}% \def\processJSfunc{#3}\ifx\@qzsolndest\@empty\let\JST\@empty\else \let\JST\jsT\fi % dps17 \ifx\eq@ProcRespIntervals\g@processJSfunc % 01/11 \let\@inmathwarn@SAVE\@inmathwarn\let\@inmathwarn\@gobble \pdfstringdef{\CorrectAns}{\CorrectAns}% \let\@inmathwarn\@inmathwarn@SAVE\fi \if\eqQuizType\isQZ\def\Fld@name{corr.\curr@quiz.\thequestionno}% \else\def\Fld@name{corr.\oField.\thequestionno}\fi \if\eqQuizType\isQZ \edef\@@CorrAnsButtonActions{\noexpand\F{\FHidden}% \ifx\@qzsolndest\@empty%\noexpand\BC{\normalCABtnBC}% \else\noexpand\BC{\solution@Color}\fi \noexpand\A{\noexpand\qCorrAnsButtonActionHook}}% \ifeq@noquizsolutions\else % dps17 (\let\rpl\eq@rpl) \mbox{\let\rpl\eq@rpl \push@@Button{#1}{\Fld@name}{}{\DefaultHeightOfWidget}% {\eq@protect\A}{\eq@setButtonProps\eq@Button@driver}% {\CorrAnsButtonDefaults\@@CorrAnsButtonActions \every@ButtonField\every@CorrAnsButton}}% \fi \else \edef\@@CorrAnsButtonActions{% \ifx\@qzsolndest\@empty%\noexpand\BC{\normalCABtnBC} \else\noexpand\BC{\solution@Color}\fi \noexpand\A{\noexpand\sqCorrAnsButtonActionHook}}% \mbox{\push@@Button{#1}{\Fld@name}{}{\DefaultHeightOfWidget}% {\eq@protect\A}{\eq@setButtonProps\eq@Button@driver}% {\CorrAnsButtonDefaults\@@CorrAnsButtonActions \every@ButtonField\every@CorrAnsButton}}% \fi \egroup } \def\sqClearButtonDefaults {% \CA{\eq@local@sqClearButton}\textColor{0 g}\F{\FPrint} \BC{0 0 0}\BG{.7529 .7529 .7529}\W{1}\S{B}\Ff{\FfNoExport} } \begin{defineJS}[\makeesc\*\makecmt\%]{\@@sqClearButtonJSCode} ProcessIt = false; if ( typeof *oField == "undefined" ) *oField = new Object; if (typeof appAlerts["*oField"] == "undefined") appAlerts["*oField"] = new Object; this.resetForm(new Array("mc.*oField","obj.*oField",% "tally.*oField","grpobj.*oField")); var f = this.getField("obj.*oField"); if ( f != null ) f.strokeColor=*ifx*defaultColorJSLoc*@empty% *defaultColorJS*else*defaultColorJSLoc*fi; f = this.getField("grpobj.*oField"); if ( f != null ) f.strokeColor=*ifx*defaultColorJSLoc*@empty% *defaultColorJS*else*defaultColorJSLoc*fi; f = this.getField("rbmarkup.*oField"); if ( f != null ) f.display=display.hidden; *oField.Grp = {}; appAlerts["*oField"].bAfterValue=false; ProcessIt=true; \end{defineJS} \def\@@sqClearButtonActions{\A{\JS{\@@sqClearButtonJSCode}}} \newcommand\sqClearButton[1][]{% \mbox{\push@@Button{#1}{clear.\oField}{}{\DefaultHeightOfWidget}% {\eq@protect\A}{\eq@setButtonProps\eq@Button@driver}% {\sqClearButtonDefaults\@@sqClearButtonActions\every@ButtonField \every@sqClearButton}}% } \def\PromptButtonDefaults{% \CA{\eq@local@CorrAnsButton}\W{1}\S{S}\BC{0 0 0} \BG{.7529 .7529 .7529}\H{P} } \newcommand{\promptButtonMsg}{% "Would you like to see the correct answer at this time? "\r\t\t + "Your current answer will be the one that will be scored. "\r\t\t + "If you click on \\"Yes\\", you will not be able to change your answer." } \newcommand{\AnsPromptBtnStr}{Answer:\space} \begin{defineJS}[\makeesc\*\makecmt\%]{\PromptButtonActionCode} if (!isQuizInitialized("*currQuiz")) { eqAppAlert(InitMsg("*bqlabelISO"),3); event.rc=false; } else { if ( !*currQuiz.oAlertCheck.bAfterValue ) { var resp=eqAppAlert({ cMsg:*promptButtonMsg, nIcon: 2, nType: 2, cTitle: ("AcroTeX Prompt Message"), oCheckbox: *currQuiz.oAlertCheck }); } if ( promptQuiz.oAlertCheck.bAfterValue || resp==4 ) { var field=this.getField("obj.*currQuiz.*thequestionno"); field.readonly=true; field=this.getField("Ans.*currQuiz"); if (field!=null) field.value = ("*AnsPromptBtnStr*PromptAns"); } } \end{defineJS} \def\PromptButtonActionHook{\JS{\PromptButtonActionCode}} \newcommand\@PromptButton[2][]{% \def\PromptAns{#2}\if\eqQuizType\isQZ \def\Fld@name{promptButton.\curr@quiz.\thequestionno}% \else\def\Fld@name{promptButton.\oField.\thequestionno}\fi \if\eqQuizType\isQZ \def\@@PromptButtonActions{% \A{\PromptButtonActionHook}}% \mbox{\push@@Button{#1}{\Fld@name}{}% {\DefaultHeightOfWidget}{\eq@protect\A}% {\eq@setButtonProps\eq@Button@driver}% {\PromptButtonDefaults\@@PromptButtonActions \every@ButtonField\every@CorrAnsButton}}% \else\PackageWarning{exerquiz}{The \string\PromptButton is for quiz questions only.} \fi } \newcommand{\PromptButton}{\makebox[0pt][r] % assumes xcolor {\@PromptButton[\textColor{1 0 0 rg}]{\CorrectAns}}} \let\eq@ansGrpArray\@empty \def\eq@recordGrpAnsArray#1{% \ifx\eq@ansGrpArray\@empty \edef\tmp@exp{\noexpand\g@addto@macro \noexpand\eq@ansGrpArray{#1}}\else \edef\tmp@exp{\noexpand\g@addto@macro \noexpand\eq@ansGrpArray{,#1}}\fi \tmp@exp } \let\grpquestions\eq@Zero \def\mathGrp{\global\let\eq@ansGrpArray\@empty \@ifnextchar[{\@imathGrp}{\@imathGrp[groupEval]}} \def\@imathGrp[#1]{\def\argi{#1}% \@ifnextchar[{\@iimathGrp}{\@iimathGrp[]}} \def\@iimathGrp[#1]{\def\argii{#1}% \eq@AddProbToQzQuesList \global\let\grpquestions\eq@One \setcounter{grpquestionno}{0}% \stepcounter{questionno}% \xdef\beginGrp{\thequestionno}% \xdef\grpPointValue{\eqPTs}% \eq@recordThesePTs\eq@recordProbType \if\eqQuizType\isQZ \edef\eqtmp{\aPointType}% \xdef\aPointType{\eqtmp,[\eqPTs,"grp"]}\fi \addtocounter{eqpointvalue}{\eqPTs}% \ifx\argii\@empty \xdef\grpTotalWeight{\eqPTs}% \xdef\grpEvalFunction{\argi}% \else \xdef\grpTotalWeight{\argi}% \xdef\grpEvalFunction{\argii}% \fi } \def\endmathGrp{\global\let\grpquestions\eq@Zero \eq@recordCorrAns{[\eq@ansGrpArray]}% \xdef\endGrp{\thequestionno}} \def\CorrAnsButtonGrpDefaults{% \CA{\eq@local@CorrAnsButton}\W{1}\S{S}\BC{0 0 0} \BG{.7529 .7529 .7529}\H{P} } \begin{defineJS}[\makeesc\!\makecmt\%]{\cabGrpActn} !ifx!@qzsolndest!@empty!else% if (event.shift) this.gotoNamedDest("!@qzsolndest"); else !fi% { var aCorrectAns=!CorrectAns; var beginGrp=1; var grpOffset=beginGrp; if(!currQuiz.Grp==null)!currQuiz.Grp={}; if(typeof !currQuiz.Grp["!thequestionno"]=="undefined") { !currQuiz.Grp["!thequestionno"]={offset:0}; } else { !currQuiz.Grp["!thequestionno"].offset=% ++(!currQuiz.Grp["!thequestionno"].offset)!%aCorrectAns.length; grpOffset=beginGrp% +!currQuiz.Grp["!thequestionno"].offset; } var f=this.getField("grpobj.!curr@quiz.!thequestionno." % + grpOffset); if(f.readonly){ f.readonly=false; f.setFocus(); eqDelay=app.setTimeOut(% "f.readonly=true;app.clearTimeOut(eqDelay);",10); } else f.setFocus(); !if!eqQuizType!isQZ% DisplayAnswer("Ans.!curr@quiz",% aCorrectAns[!currQuiz.Grp["!thequestionno"].offset],!currQuiz);!else% DisplayAnswer("grpobj.!oField.!thequestionno."+ grpOffset,% aCorrectAns[!currQuiz.Grp["!thequestionno"].offset],!oField);!fi } \end{defineJS} \def\CorrAnsButtonGrpActionHook{\JS{\cabGrpActn}} \newcommand\CorrAnsButtonGrp[2][]{% \makeStringArray{#2}% \edef\CorrectAns{\stringArray}% \if\eqQuizType\isQZ\def\Fld@name{corr.\curr@quiz.\thequestionno}% \else\edef\currQuiz{\oField}% \def\Fld@name{corr.\oField.\thequestionno}\fi \if\eqQuizType\isQZ \edef\@@CorrAnsButtonGrpActions{\noexpand\F{\FHidden}% \ifx\@qzsolndest\@empty \else\noexpand\BC{\solution@Color}\fi \noexpand\A{\noexpand\CorrAnsButtonGrpActionHook}}% \ifeq@noquizsolutions\let\x\relax\else \def\x{\mbox{\push@@Button{#1}{\Fld@name}{}% {\DefaultHeightOfWidget}{\eq@protect\A}% {\eq@setButtonProps\eq@Button@driver}% {\CorrAnsButtonGrpDefaults\@@CorrAnsButtonGrpActions \every@ButtonField\every@CorrAnsButton}}}\fi\x \else \edef\@@CorrAnsButtonGrpActions{% \ifx\@qzsolndest\@empty%\noexpand\BC{\normalCABtnBC} \else\noexpand\BC{\solution@Color}\fi \noexpand\A{\noexpand\CorrAnsButtonGrpActionHook}}% \mbox{\push@@Button{#1}{\Fld@name}{}{\DefaultHeightOfWidget}% {\eq@protect\A}{\eq@setButtonProps\eq@Button@driver}% {\CorrAnsButtonGrpDefaults\@@CorrAnsButtonGrpActions \every@ButtonField\every@CorrAnsButton}}% \fi } \def\makeStringArray#1{\def\stringArray{[}\@makeStringArray#1,\@nil} \def\@makeStringArray#1,#2\@nil{% \edef\eq@temp{\stringArray}\def\argii{#2}% \ifx\argii\@empty \edef\stringArray{\eq@temp"#1"]}% \def\eq@next{}% \else \edef\stringArray{\eq@temp"#1",}% \def\eq@next{\@makeStringArray#2\@nil}% \fi \eq@next } \let\@eqListExp\relax \let\@currentQues\@empty \let\eqQzQuesList\@empty \def\eq@AddProbToQzQuesList{% \edef\eq@tmpExp{\noexpand\g@addto@macro% \noexpand\eqQzQuesList{\noexpand \@eqListExp{\@currentQues}{\the\c@page}}}% \ifx\grpquestions\eq@Zero\eq@tmpExp\fi } \LangRedefinitions \input{aebjs.def} \inputSumryTblCode \inputMCFICode \newcommand{\solutionColor}[1]{\def\eq@argi{#1}\ifx\eq@argi\@empty \def\solution@Color{\solutionColorDef}\else \def\solution@Color{#1}\fi} \newcommand{\solutionColorDef}{0 .6 0} \solutionColor{\solutionColorDef} \@ifundefined{jsColor}{% \InputIfFileExists{eqcolor.def}{\PackageInfo{exerquiz} {Inputting eqcolor.def}} {\PackageError{exerquiz}{cannot find eqcolor.def} {Refresh your file name database and try again.}} }{} \newcommand\rghtColorJSDef{["RGB", 0, .6, 0]} \newcommand\rghtColorJS{\rghtColorJSDef} \newcommand\wrngColorJSDef{color.red} \newcommand\wrngColorJS{\wrngColorJSDef} \newcommand\partialColorJSDef{color.blue} \newcommand\partialColorJS{\partialColorJSDef} \newcommand\defaultColorJSDef{color.black} \newcommand\defaultColorJS{\defaultColorJSDef} \let\defaultColorJSLoc\@empty \let\defaultColorJSLocDef\@empty \let\rghtColorJSLoc\@empty \let\rghtColorJSLocDef\@empty \let\wrngColorJSLoc\@empty \let\wrngColorJSLocDef\@empty \let\partialColorJSLoc\@empty \let\partialColorJSLocDef\@empty \def\chooseJSsymbol{\@ifstar{\let\eq@isstar\eq@YES\chooseJSsymboli} {\let\eq@isstar\eq@NO\chooseJSsymboli}} \def\chooseJSsymboli#1{\lowercase{\edef\eq@arg{#1}}% \def\eq@carg{check}\ifx\eq@arg\eq@carg \def\eq@retnStyle{style.ch}\else \def\eq@carg{cross}\ifx\eq@arg\eq@carg \def\eq@retnStyle{style.cr}\else \def\eq@carg{diamond}\ifx\eq@arg\eq@carg \def\eq@retnStyle{style.di}\else \def\eq@carg{circle}\ifx\eq@arg\eq@carg \def\eq@retnStyle{style.ci}\else \def\eq@carg{star}\ifx\eq@arg\eq@carg \def\eq@retnStyle{style.st}\else \def\eq@carg{square}\ifx\eq@arg\eq@carg \def\eq@retnStyle{style.sq}\else \let\eq@retnStyle\@empty \ifx\eq@isstar\eq@NO\PackageWarning{exerquiz} {Argument `#1' not recognized.\MessageBreak Permissible values are check, cross, diamond,\MessageBreak circle, star, square. Will use the default}\fi \fi\fi\fi\fi\fi\fi } \newcommand\setRghtAnsSymb[1]{\chooseJSsymbol{#1}% \ifx\eq@retnStyle\@empty\else \edef\rghtAnsSymbJS{\eq@retnStyle}% \edef\rghtAnsSymb{\eq@carg}\fi} \def\rghtAnsSymbJS{style.ch} \def\rghtAnsSymb{check} \newcommand\setCorrAnsSymb[1]{\chooseJSsymbol{#1}% \ifx\eq@retnStyle\@empty\else \edef\corrAnsSymbJS{\eq@retnStyle}% \edef\corrAnsSymb{\eq@carg}\fi} \def\corrAnsSymbJS{style.ci} \def\corrAnsSymb{circle} \newcommand\setWrngAnsSymb[1]{\chooseJSsymbol{#1}% \ifx\eq@retnStyle\@empty\else \edef\wrngAnsSymbJS{\eq@retnStyle}% \edef\wrngAnsSymb{\eq@carg}\fi} \def\wrngAnsSymbJS{style.cr} \def\wrngAnsSymb{cross} \def\setRghtAnsSymbLoc#1{\chooseJSsymbol*{#1}% \ifx\eq@retnStyle\@empty \let\rghtAnsSymbJSLoc\@empty\else \edef\rghtAnsSymbJSLoc{\eq@retnStyle}\fi } \def\setCorrAnsSymbLoc#1{\chooseJSsymbol*{#1}% \ifx\eq@retnStyle\@empty \let\corrAnsSymbJSLoc\@empty\else \edef\corrAnsSymbJSLoc{\eq@retnStyle}\fi } \def\setWrngAnsSymbLoc#1{\chooseJSsymbol*{#1}% \ifx\eq@retnStyle\@empty \let\wrngAnsSymbJSLoc\@empty\else \edef\wrngAnsSymbJSLoc{\eq@retnStyle}\fi } \let\rghtAnsSymbJSLoc\@empty \let\rghtAnsSymbJSLocDef\@empty \let\corrAnsSymbJSLoc\@empty \let\corrAnsSymbJSLocDef\@empty \let\wrngAnsSymbJSLoc\@empty \let\wrngAnsSymbJSLocDef\@empty \newcommand\everyeqTextField[1]{\def\every@eqTextField{#1}} \def\every@eqTextField{} \newcommand\everyRespBoxMath[1]{\def\every@RespBoxMath{#1}} \def\every@RespBoxMath{} \newcommand\everyRespBoxTxt[1]{\def\every@RespBoxTxt{#1}} \def\every@RespBoxTxt{} \newcommand\everyrbMarkup[1]{\def\every@rbMarkup{#1}} \def\every@rbMarkup{} \newcommand\everysqTallyBox[1]{\def\every@sqTallyBox{#1}} \def\every@sqTallyBox{} \newcommand\everysqTallyTotal[1]{\def\every@sqTallyTotal{#1}} \def\every@sqTallyTotal{} \newcommand\everyScoreField[1]{\def\every@ScoreField{#1}} \def\every@ScoreField{} \newcommand\everyAnswerField[1]{\def\every@AnswerField{#1}} \def\every@AnswerField{} \newcommand\everyPointsField[1]{\def\every@PointsField{#1}} \def\every@PointsField{} \newcommand\everyPercentField[1]{\def\every@PercentField{#1}} \def\every@PercentField{} \newcommand\everyGradeField[1]{\def\every@GradeField{#1}} \def\every@GradeField{} \newcommand{\everysqRadioButton}[1]{\def\every@sqRadioButton{#1}} \def\every@sqRadioButton{} \newcommand{\everyqRadioButton}[1]{\def\every@qRadioButton{#1}} \def\every@qRadioButton{} \newcommand{\everyqckCheckBox}[1]{\def\every@qckCheckbox{#1}} \def\every@qckCheckbox{} \newcommand{\everyqCheckBox}[1]{\def\every@qCheckBox{#1}} \def\every@qCheckBox{} \newcommand{\everysqCheckBox}[1]{\def\every@sqCheckBox{#1}} \def\every@sqCheckBox{} \let\everyeqButtonField\everyButtonField \newcommand\everyCorrAnsButton[1]{\def\every@CorrAnsButton{#1}} \def\every@CorrAnsButton{} \newcommand\everysqClearButton[1]{\def\every@sqClearButton{#1}} \def\every@sqClearButton{} \newcommand\everyeqButton[1]{\def\every@eqButton{#1}} \newcommand\everyCorrButton{\everyeqButton} \def\every@eqButton{} \newcommand\everyBeginQuizButton[1]{\def\every@BeginQuizButton{#1}} \def\every@BeginQuizButton{} \newcommand\everyEndQuizButton[1]{\def\every@EndQuizButton{#1}} \def\every@EndQuizButton{} \let\everyeqGenButton\everyPushButton \let\every@eqGenButton\every@PushButton \let\eqGenButton\pushButton \newcommand\everyeqIcon[1]{\def\every@eqIcon{#1}} \def\every@eqIcon{} \def\formatInitAltApprs{\formatInitAltApprs} \def\@eqAddAAFormat#1{\def\@rgi{#1}\ifx\@rgi\formatInitAltApprs \bInitAltAppr\else\def\eqAddAAFormat{#1}\fi} \def\eqAddAAFormat{} \def\formatAsSet{try{formatAsSet()}catch(e){}} \def\formatAsVector{try{formatAsVector()}catch(e){}} \def\eq@SupActnLst{{\AddAAKeystroke}{\AddAAMouseUpMC}% {\AddAAMouseUpMS}{\AddAAFormat}} \newcommand\setActionKeys{\edef\catOfAt{\the\catcode`@}% \ifnum\catOfAt=11 \let\eq@CatTail\relax\else \makeatletter\let\eq@CatTail\makeatother\fi\setActionKeysi} \def\setActionKeysi#1{\let\eq@itsGood\eq@One \def\setActionKeys@cont{\processAppArgs#1\end\@nil}% \begingroup\eq@checkivValidKeys#1\end\ef@nil\endgroup\eq@CatTail} \def\eq@checkivValidKeys#1#2{\def\eq@GOOD{good}\expandafter \@tfor\expandafter \@ction\expandafter:\expandafter=\eq@SupActnLst\do{% \expandafter\def\@ction{good}}% \ifx\end#1% if #1=\end, #2=\ef@nil. \def\eq@next{\aftergroup\setActionKeys@cont}% \else \if\eq@itsGood\eq@One \let\itp@ss0\let\@@next\relax \expandafter\@tfor\expandafter \@ction\expandafter:\expandafter=\eq@SupActnLst\do{% \expandafter\ifx\expandafter#1\@ction \let\itp@ss\eq@One\@break@tfor \fi}% do \if\itp@ss\eq@Zero\let\eq@itsGood\eq@Zero \def\eq@next{\def\eq@lastArg{#1}\expandafter \eq@sqkErrorMsg\ef@gobbletonil}\else \let\eq@next\eq@checkivValidKeys\fi \else\let\eq@next\ef@gobbletonil\fi \fi %\ifx\end \eq@next } \def\eq@sqkErrorMsg#1{\PackageError{exerquiz}{The key \expandafter \string\eq@lastArg\space is not supported by \string\setActionKeys.\MessageBreak Remove the key or correct the spelling of the key}{}} \def\addToAction{\makeatletter\@ifstar{\let\isSt@r\eq@YES\@ddToAction} {\let\isSt@r\eq@NO\@ddToAction}} \def\@ddToAction#1#2{\let\eq@itsGood\eq@One \def\setActionKeys@cont{\@@ddToAction{#1}{#2}}\begingroup \eq@checkivValidKeys{#1}{#2}\end\ef@nil\endgroup\makeatother} \def\@@ddToAction#1#2{\@getCmdName{#1}% \if\isSt@r\eq@YES\toks2={#2}% \toks@=\aeb@exiii{\csname eq\@CmdName\endcsname}% \edef\tmp@tokshold{\the\toks2 \the\toks@}% \toks@=\expandafter{\tmp@tokshold}\else \toks@=\aeb@exiii{\csname eq\@CmdName\endcsname#2}\fi \expandafter\edef\csname eq\@CmdName\endcsname{\the\toks@}% } \def\@eqAddAAKeystroke#1{\def\argi{#1}\ifx\argi\@empty \def\eqAddAAKeystroke{}\else\def\eqAddAAKeystroke{#1}\fi} %\r \def\eqAddAAKeystroke{} \def\@eqAddAAMouseUpMC#1{\def\argi{#1}\ifx\argi\@empty \def\eqAddAAMouseUpMC{}\else\def\eqAddAAMouseUpMC{#1}\fi} \def\eqAddAAMouseUpMC{} \def\@eqAddAAMouseUpMS#1{\def\argi{#1}\ifx\argi\@empty \def\eqAddAAMouseUpMS{}\else\def\eqAddAAMouseUpMS{#1}\fi} \def\eqAddAAMouseUpMS{} \def\eqIconDefaults{% \rawPDF{}\S{}\mkIns{/TP 1}\W{} \CA{}\RC{}\AC{}\BC{}\BG{}\H{N} \textColor{0 g}\Ff{\FfReadOnly} } \newcommand\eqIcon[4][]{% \mbox{\push@@Button{#1}{#2}{#3}{#4}{}{\eq@setButtonProps \eq@Button@driver}{\eqIconDefaults\every@ButtonField \every@eqIcon}}% } \eq@restoreCats \endinput %% %% End of file `exerquiz.sty'.