summaryrefslogtreecommitdiff
path: root/texmf-dist/tex/latex/acrotex/dljslib.sty
diff options
context:
space:
mode:
Diffstat (limited to 'texmf-dist/tex/latex/acrotex/dljslib.sty')
-rw-r--r--texmf-dist/tex/latex/acrotex/dljslib.sty170
1 files changed, 93 insertions, 77 deletions
diff --git a/texmf-dist/tex/latex/acrotex/dljslib.sty b/texmf-dist/tex/latex/acrotex/dljslib.sty
index 871720d7..67f0867b 100644
--- a/texmf-dist/tex/latex/acrotex/dljslib.sty
+++ b/texmf-dist/tex/latex/acrotex/dljslib.sty
@@ -8,7 +8,7 @@
%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%% dljsLib.sty package, %%
-%% Copyright (C) 2001-2016 D. P. Story %%
+%% Copyright (C) 2001-2018 D. P. Story %%
%% dpstory@uakron.edu %%
%% %%
%% This program can redistributed and/or modified under %%
@@ -19,7 +19,7 @@
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\NeedsTeXFormat{LaTeX2e}
\ProvidesPackage{dljslib}
- [2014/10/05 v2.0 Manage a Library of Document Level JavaScripts (dps)]
+ [2017/08/11 v2.1 Manage a Library of Document Level JavaScripts (dps)]
\newcommand\dljsRegister[2][n]
{\expandafter\let\csname checkout@#2\endcsname=#1}
\def\@ifcheckedout#1{\expandafter\if\csname checkout@#1\endcsname y}
@@ -48,6 +48,7 @@
\def\includeOptions#1{\@for\@option:=#1\do{\dljsRegister[y]{\@option}}}
\InputIfFileExists{libcusopt.opt}{}{}
\ProcessOptions
+\RequirePackage{exerquiz}[2017/08/04]
\RequirePackage{insdljs}
\def\setdecimalpoint#1{\def\aebdecimalpoint{\eqbs#1}}
\setdecimalpoint{.}
@@ -77,13 +78,14 @@ var dljslib = true;
\fi
\begin{library@holding}{equations}
\begin{newsegment}{dljslib: Equation Handling}
-function ProcRespEq(flag,CorrAns,n,epsilon,domain,indepVar,oComp)
+function ProcRespEq(flag,CorrAns,n,epsilon,domain,indepVars,oComp)
{
if (!ProcessIt) return null;
ok2Continue = true;
var success;
var fieldname = event.target.name;
- var UserAns = event.value;
+ var bSubstVars=(arguments.length>7); // dps17
+ var UserAns=(bSubstVars)?arguments[7]:event.value;
var CorrExpressions = CorrAns.split("=");
var zCorrAns = "("+CorrExpressions[0]+")-("+CorrExpressions[1] +")";
UserAns = stripWhiteSpace (UserAns);
@@ -123,13 +125,13 @@ function ProcRespEq(flag,CorrAns,n,epsilon,domain,indepVar,oComp)
}
zUserAns = ParseInput(zUserAns);
if (!ok2Continue) return null;
- indepVar = TypeParameters(indepVar);
- var lambda = getNonZeroRatio (domain, indepVar, zCorrAns, zUserAns);
+ indepVars = TypeParameters(indepVars);
+ var lambda = getNonZeroRatio (domain, indepVars, zCorrAns, zUserAns);
if ( lambda == null ) {
eqAppAlert(\eqSyntaxErrorUndefVar,3); return null; };
if ( !ok2Continue ) return notifyField(false, flag, fieldname);
zCorrAns = lambda + "*(" + zCorrAns + ")";
- success=randomPointCompare (n,domain,indepVar,epsilon,
+ success=randomPointCompare (n,domain,indepVars,epsilon,
zCorrAns,zUserAns,comp)
if ( success == null ) { eqAppAlert(\eqSyntaxErrorUndefVar,3);
return null; }
@@ -196,7 +198,7 @@ function getNonZeroRatio (_a, _v, _F, _G)
\fi
\begin{library@holding}{vectors}
\begin{newsegment}{dljslib: Vector Handling}
-function ProcVec (flag,CorrAns,n,epsilon,domain,indepVar,oComp)
+function ProcVec (flag,CorrAns,n,epsilon,domain,indepVars,oComp)
{
if (!ProcessIt) return null;
ok2Continue = true;
@@ -254,7 +256,7 @@ typeof oComp.priorParse != "undefined" ) {
return null;
}
// convert to new format, if needed
- indepVar = TypeParameters(indepVar);
+ indepVars = TypeParameters(indepVars);
for (i=0; i<aCorrAns.length; i++) {
aCorrAns[i] = ParseInput(aCorrAns[i]);
if (!ok2Continue) {
@@ -267,7 +269,7 @@ typeof oComp.priorParse != "undefined" ) {
return null;
}
if (!ok2Continue) return null;
- success=randomPointCompare (n,domain,indepVar,epsilon,
+ success=randomPointCompare (n,domain,indepVars,epsilon,
aCorrAns[i],aUserAns[i],comp)
if ( success == null ) {
eqAppAlert(\eqSyntaxErrorUndefVar,3); return null; }
@@ -285,12 +287,13 @@ typeof oComp.priorParse != "undefined" ) {
\fi
\begin{library@holding}{setSupport}
\begin{newsegment}{dljslib: Support for Sets}
-function ProcRespSetNum(flag,CorrAns,n,epsilon,domain,indepVar,oComp)
+function ProcRespSetNum(flag,CorrAns,n,epsilon,domain,indepVars,oComp)
{
ok2Continue = true;
if (!ProcessIt) return null;
var fieldname = event.target.name;
- var UserAns = event.value;
+ var bSubstVars=(arguments.length>7); // dps17
+ var UserAns=(bSubstVars)?arguments[7]:event.value;
UserAns = stripWhiteSpace(UserAns);
CorrAns = stripWhiteSpace(CorrAns);
if (!ok2Continue) return null;
@@ -324,7 +327,7 @@ function ProcRespSetNum(flag,CorrAns,n,epsilon,domain,indepVar,oComp)
return notifyField(false, flag, fieldname);
for ( var i=0; i< aCorrAns.length; i++) {
var retn = _ProcResp(%
-flag,aCorrAns[i],aUserAns[i],n,epsilon,domain,indepVar,oComp);
+flag,aCorrAns[i],aUserAns[i],n,epsilon,domain,indepVars,oComp);
if ( retn == -1 ) return null;
if ( retn == null ) return syntaxError(), null;
numCorrect += (retn) ? 1 : 0;
@@ -358,12 +361,13 @@ function formatAsVector() {
event.value = "< " + event.value + " >";
}
}
-function ProcRespSetSym(flag,CorrAns,n,epsilon,domain,indepVar,oComp)
+function ProcRespSetSym(flag,CorrAns,n,epsilon,domain,indepVars,oComp)
{
ok2Continue = true;
if (!ProcessIt) return null;
var fieldname = event.target.name;
- var UserAns = event.value;
+ var bSubstVars=(arguments.length>7); // dps17
+ var UserAns=(bSubstVars)?arguments[7]:event.value;
UserAns = stripWhiteSpace(UserAns);
CorrAns = stripWhiteSpace(CorrAns);
if (!ok2Continue) return null;
@@ -383,7 +387,7 @@ function ProcRespSetSym(flag,CorrAns,n,epsilon,domain,indepVar,oComp)
var retn=ck4Braces(UserAns);
if (retn==null) return null;
var aUserAns = UserAns.split(",");
- var _V = indepVar.split(",");
+ var _V = indepVars.split(",");
for ( var _i=0; _i < _V.length; _i++) {
eval ( "var "+ _V[_i] + " = \"" + _i + "\";");
}
@@ -397,8 +401,8 @@ function ProcRespSetSym(flag,CorrAns,n,epsilon,domain,indepVar,oComp)
for ( var _i=0; _i < aCorrAns.length; _i++) {
try {
if (isNaN(eval(aCorrAns[_i])))
- return eqAppAlert(
- "Author error, recheck your code",3), null;
+ return eqAppAlert(%
+"Author error, recheck your code",3), null;
aCorrAns[_i] = eval(aCorrAns[_i]);
} catch(e) { return eqAppAlert(
"Author error, recheck your code",3), null; }
@@ -421,11 +425,12 @@ flag,aCorrAns[_i],aUserAns[_i],n,epsilon,"[0,1]","i:_x",oComp);
return notifyField(success, flag, fieldname);
}
function ProcRespListFormula(flag,CorrAns,n,epsilon,domain,%
-indepVar,oComp) {
+indepVars,oComp) {
ok2Continue = true;
if (!ProcessIt) return null;
var fieldname = event.target.name;
- var UserAns = event.value;
+ var bSubstVars=(arguments.length>7); // dps17
+ var UserAns=(bSubstVars)?arguments[7]:event.value;
UserAns = stripWhiteSpace(UserAns);
CorrAns = stripWhiteSpace(CorrAns);
if (!ok2Continue) return null;
@@ -447,7 +452,6 @@ indepVar,oComp) {
UserAns = UserAns.replace(/,+/g, ",");
UserAns = UserAns.replace(/,$/, "");
UserAns = UserAns.replace(/^,/, "");
- event.value = UserAns;
CorrAns = stripWhiteSpace(CorrAns);
if (!ok2Continue) return null;
var aUserAns = UserAns.split(",");
@@ -457,7 +461,7 @@ indepVar,oComp) {
return notifyField(false, flag, fieldname);
for ( var i=0; i< aCorrAns.length; i++) {
var retn =_ProcResp(flag,aCorrAns[i],aUserAns[i],%
-n,epsilon,domain,indepVar,oComp);
+n,epsilon,domain,indepVars,oComp);
if ( retn == -1 ) return null;
if ( retn == null ) return syntaxError(), null;
numCorrect += (retn) ? 1 : 0;
@@ -466,11 +470,12 @@ n,epsilon,domain,indepVar,oComp);
return notifyField(success, flag, fieldname);
}
function ProcRespSetFormula(flag,CorrAns,n,epsilon,%
-domain,indepVar,oComp) {
+domain,indepVars,oComp) {
ok2Continue = true;
if (!ProcessIt) return null;
var fieldname = event.target.name;
- var UserAns = event.value;
+ var bSubstVars=(arguments.length>7); // dps17
+ var UserAns=(bSubstVars)?arguments[7]:event.value;
UserAns = stripWhiteSpace(UserAns);
CorrAns = stripWhiteSpace(CorrAns);
if (!ok2Continue) return null;
@@ -492,7 +497,6 @@ domain,indepVar,oComp) {
UserAns = UserAns.replace(/,+/g, ",");
UserAns = UserAns.replace(/,$/, "");
UserAns = UserAns.replace(/^,/, "");
- event.value = UserAns;
CorrAns = stripWhiteSpace(CorrAns);
if (!ok2Continue) return null;
var aUserAns = UserAns.split(",");
@@ -504,7 +508,7 @@ domain,indepVar,oComp) {
match = 0;
for ( var j=i; j< aUserAns.length; j++) {
var retn = _ProcResp(%
-flag,aCorrAns[i],aUserAns[j],n,epsilon,domain,indepVar,oComp);
+flag,aCorrAns[i],aUserAns[j],n,epsilon,domain,indepVars,oComp);
if ( retn == -1 ) return null;
if ( retn == null ) return syntaxError(), null;
if (retn==1) {
@@ -539,17 +543,18 @@ flag,aCorrAns[i],aUserAns[j],n,epsilon,domain,indepVar,oComp);
function cis(x,i) { return Math.cos(x) + i*Math.sin(x); }
JSfCustom.push("cis");
JSf = JSf.concat(JSfBuiltIn, JSfCustom);
-function ProcRespComplex(flag,CorrAns,n,epsilon,domain,indepVar,oComp)
+function ProcRespComplex(flag,CorrAns,n,epsilon,domain,indepVars,oComp)
{
if (!ProcessIt) return null;
ok2Continue = true;
var i, success;
var fieldname = event.target.name;
- var UserAns = event.value;
+ var bSubstVars=(arguments.length>7); // dps17
+ var UserAns=(bSubstVars)?arguments[7]:event.value;
CorrAns = stripWhiteSpace (CorrAns);
UserAns = stripWhiteSpace (UserAns); // sets ok2Continue
if ( !ok2Continue ) return null;
- indepVar+="i";
+ indepVars+="i";
domain+="x[0,1]";
if (/(\b|[^a-zA-Z])i\^/.test(UserAns)) {
eqAppAlert(\complexPowerAlertMsg,3);
@@ -588,20 +593,21 @@ function ProcRespComplex(flag,CorrAns,n,epsilon,domain,indepVar,oComp)
}
UserAns = ParseInput(UserAns);
CorrAns = ParseInput(CorrAns);
- indepVar = TypeParameters(indepVar);
+ indepVars = TypeParameters(indepVars);
if (!ok2Continue) return null;
success=randomPointCompare(
- n,domain,indepVar,epsilon,CorrAns,UserAns,comp);
+ n,domain,indepVars,epsilon,CorrAns,UserAns,comp);
if ( success == null ) { eqAppAlert(%
\eqSyntaxErrorUndefVar,3); return null; }
return notifyField(success, flag, fieldname);
}
function ProcRespListComplex(flag,CorrAns,n,epsilon,%
-domain,indepVar,oComp) {
+domain,indepVars,oComp) {
ok2Continue = true;
if (!ProcessIt) return null;
var fieldname = event.target.name;
- var UserAns = event.value;
+ var bSubstVars=(arguments.length>7); // dps17
+ var UserAns=(bSubstVars)?arguments[7]:event.value;
UserAns = stripWhiteSpace(UserAns);
CorrAns = stripWhiteSpace(CorrAns); // sets ok2Continue
if ( !ok2Continue ) return null;
@@ -621,7 +627,6 @@ domain,indepVar,oComp) {
UserAns = UserAns.replace(/,+/g, ",");
UserAns = UserAns.replace(/,$/, "");
UserAns = UserAns.replace(/^,/, "");
- event.value = UserAns;
var aUserAns = UserAns.split(",");
var aCorrAns = CorrAns.split(",");
if ( aUserAns.length != aCorrAns.length )
@@ -630,10 +635,8 @@ domain,indepVar,oComp) {
var match = 0;
for ( var i=0; i< aCorrAns.length; i++) {
match = 0;
- event.value = aUserAns[i];
- var retn = ProcRespComplex(
- flag,aCorrAns[i],n,epsilon,domain,indepVar,oComp);
- event.value = UserAns;
+ var retn = ProcRespComplex(%
+flag,aCorrAns[i],n,epsilon,domain,indepVars,oComp,aUserAns[i]);
if ( retn == null ) return null;
numCorrect += (retn) ? 1 : 0;
}
@@ -641,11 +644,12 @@ domain,indepVar,oComp) {
return notifyField(success, flag, fieldname);
}
function ProcRespSetComplex(flag,CorrAns,n,epsilon,%
-domain,indepVar,oComp) {
+domain,indepVars,oComp) {
ok2Continue = true;
if (!ProcessIt) return null;
var fieldname = event.target.name;
- var UserAns = event.value;
+ var bSubstVars=(arguments.length>7); // dps17
+ var UserAns=(bSubstVars)?arguments[7]:event.value;
UserAns = stripWhiteSpace(UserAns);
CorrAns = stripWhiteSpace(CorrAns); // sets ok2Continue
if ( !ok2Continue ) return null;
@@ -677,10 +681,8 @@ domain,indepVar,oComp) {
for ( var i=0; i< aCorrAns.length; i++) {
match = 0;
for ( var j=i; j< aUserAns.length; j++) {
- event.value = aUserAns[j];
var retn = ProcRespComplex(%
-flag,aCorrAns[i],n,epsilon,domain,indepVar,oComp);
- event.value = UserAns;
+flag,aCorrAns[i],n,epsilon,domain,indepVars,oComp,aUserAns[j]);
if ( retn == null ) return null;
if (retn==1) {
var temp=aUserAns[j];
@@ -727,21 +729,26 @@ function changeArgs4Cis(str) {
\begin{newsegment}
{dljslib: Support for n-tuple input to Satisfy an Equation}
var bNotifyWrngNumEntries=\satisfyEqNotify;
-function ProcRespEvalEq(flag,CorrAns,n,epsilon,domain,indepVar,oComp){
- var retn=_ProcRespEvalEq(true,flag,CorrAns,n,epsilon,indepVar);
+function ProcRespEvalEq(flag,CorrAns,n,epsilon,domain,indepVars,oComp){
+ var UserAns=(arguments.length>7)?arguments[7]:event.value;
+ var retn=_ProcRespEvalEq(true,flag,CorrAns,n,epsilon,%
+indepVars,UserAns);
return retn;
}
function ProcRespEvalEqNonZero(flag,CorrAns,n,epsilon,%
-domain,indepVar,oComp) {
- var retn=_ProcRespEvalEq(false,flag,CorrAns,n,epsilon,indepVar);
+domain,indepVars,oComp) {
+ var UserAns=(arguments.length>7)?arguments[7]:event.value;
+ var retn=_ProcRespEvalEq(false,flag,CorrAns,n,epsilon,
+indepVars,UserAns);
return retn;
}
-function _ProcRespEvalEq(allowzero,flag,CorrAns,n,epsilon,indepVar)
+function _ProcRespEvalEq(allowzero,flag,CorrAns,n,epsilon,indepVars)
{
ok2Continue = true;
if (!ProcessIt) return null;
var fieldname = event.target.name;
- var UserAns = event.value;
+ var bSubstVars=(arguments.length>6); // dps17
+ var UserAns=(bSubstVars)?arguments[6]:event.value;
UserAns = stripWhiteSpace(UserAns);
if (!ok2Continue) return null;
if ( (UserAns.charAt(0) != "\(") || %
@@ -756,7 +763,7 @@ function _ProcRespEvalEq(allowzero,flag,CorrAns,n,epsilon,indepVar)
return eqAppAlert(\eqNonzeroEntries,3), null;
} catch(e) { return syntaxError(), null; }
}
- var _v = TypeParameters(indepVar);
+ var _v = TypeParameters(indepVars);
var _V = _v.split(","); // e.g. _V[0] = "i:x"
var _n = _V.length;
if ( aUserAns.length != _n) {
@@ -777,21 +784,26 @@ function _ProcRespEvalEq(allowzero,flag,CorrAns,n,epsilon,indepVar)
return notifyField(success, flag, fieldname);
}
function ProcRespEvalEqList(flag,CorrAns,n,epsilon,domain,%
-indepVar,oComp) {
- var retn=_ProcRespEvalEqList(true,flag,CorrAns,n,epsilon,indepVar);
+indepVars,oComp) {
+ var UserAns=(arguments.length>7)?arguments[7]:event.value;
+ var retn=_ProcRespEvalEqList(true,flag,CorrAns,n,epsilon,%
+indepVars,UserAns);
return retn;
}
function ProcRespEvalEqListNonZero(flag,CorrAns,n,epsilon,domain,%
-indepVar,oComp){
- var retn=_ProcRespEvalEqList(false,flag,CorrAns,n,epsilon,indepVar);
+indepVars,oComp){
+ var UserAns=(arguments.length>7)?arguments[7]:event.value;
+ var retn=_ProcRespEvalEqList(false,flag,CorrAns,n,epsilon,%
+indepVars,UserAns);
return retn;
}
-function _ProcRespEvalEqList(allowzero,flag,CorrAns,n,epsilon,indepVar)
+function _ProcRespEvalEqList(allowzero,flag,CorrAns,n,epsilon,indepVars)
{
ok2Continue = true;
if (!ProcessIt) return null;
var fieldname = event.target.name;
- var UserAns = event.value;
+ var bSubstVars=(arguments.length>6); // dps17
+ var UserAns=(bSubstVars)?arguments[6]:event.value;
UserAns = stripWhiteSpace(UserAns);
if (!ok2Continue) return null;
var success;
@@ -805,7 +817,7 @@ function _ProcRespEvalEqList(allowzero,flag,CorrAns,n,epsilon,indepVar)
return eqAppAlert(\eqTooManyEntries,3), null;
if (l > aUserAns.length )
return eqAppAlert(\eqTooFewEntries,3), null;
- var _v = TypeParameters(indepVar);
+ var _v = TypeParameters(indepVars);
var _V = _v.split(","); // e.g. _V[0] = "i:x"
var _n = _V.length;
var testFunc="";
@@ -862,19 +874,20 @@ isCorrect *=Number(success);
\begin{newsegment}
{dljslib: Support for process numbers in the German format}
function ProcRespNumsDe (flag,CorrAns,n,epsilon,%
-domain,indepVar,oComp) {
+domain,indepVars,oComp) {
if (!ProcessIt) return null;
ok2Continue = true;
var fieldname = event.target.name;
- var UserAns = event.value;
+ var bSubstVars=(arguments.length>7); // dps17
+ var UserAns=(bSubstVars)?arguments[7]:event.value;
var success = _ProcRespNumsDe(flag,CorrAns,UserAns,n,%
-epsilon,domain,indepVar,oComp);
+epsilon,domain,indepVars,oComp);
if ( success == -1 || !ok2Continue ) return null;
if ( success == null ) { return syntaxError(), null; }
return notifyField(success, flag, fieldname);
}
function _ProcRespNumsDe(flag,CorrAns,UserAns,n,epsilon,%
-domain,indepVar,oComp) {
+domain,indepVars,oComp) {
ok2Continue = true;
CorrAns = ParseInput(CorrAns);
if (!ok2Continue) {
@@ -903,9 +916,9 @@ domain,indepVar,oComp) {
return -1;
}
UserAns = ParseInput(UserAns);
- indepVar = TypeParameters(indepVar);
+ indepVars = TypeParameters(indepVars);
if (!ok2Continue) return null;
- var success=randomPointCompare(n,domain,indepVar,%
+ var success=randomPointCompare(n,domain,indepVars,%
epsilon,CorrAns,UserAns,comp);
if ( success && (typeof(oComp)=="object") %
&& (typeof(oComp.postParse)!="undefined") )
@@ -931,16 +944,17 @@ epsilon,CorrAns,UserAns,comp);
\fi
\begin{library@holding}{factors}
\begin{newsegment}{dljslib: Contrib - Processing Factors as Responses}
-function ProcRespFactors(flag,CorrAns,n,epsilon,domain,indepVar,oComp)
+function ProcRespFactors(flag,CorrAns,n,epsilon,domain,indepVars,oComp)
{
ok2Continue = true;
if (!ProcessIt) return null;
var fieldname = event.target.name;
- var UserAns = event.value;
+ var bSubstVars=(arguments.length>7); // dps17
+ var UserAns=(bSubstVars)?arguments[7]:event.value;
UserAns = stripWhiteSpace(UserAns);
if (!ok2Continue) return null;
var retn = _ProcResp(flag,CorrAns,UserAns,n,epsilon,%
-domain,indepVar,oComp);
+domain,indepVars,oComp);
if ( retn == -1 ) return null;
if ( retn == null ) return syntaxError(), null;
if ( retn == 0 ) {
@@ -972,7 +986,7 @@ the proper form");
match = 0;
for ( var j=i; j< aUserAns.length; j++) {
var retn = _ProcResp(flag,aCorrAns[i],aUserAns[j],%
-n,epsilon,domain,indepVar,oComp);
+n,epsilon,domain,indepVars,oComp);
if ( retn == -1 ) return null;
if ( retn == null ) return syntaxError(), null;
if (retn==1) {
@@ -983,7 +997,7 @@ n,epsilon,domain,indepVar,oComp);
}
else {
var retn = _ProcResp(flag,aNegCorrAns[i],aUserAns[j],%
-n,epsilon,domain,indepVar,oComp);
+n,epsilon,domain,indepVars,oComp);
if ( retn == -1 ) return null;
if ( retn == null ) return syntaxError(), null;
if (retn==1) {
@@ -1071,14 +1085,15 @@ function getFactorArray(str) {
\fi
\begin{library@holding}{point}
\begin{newsegment}{dljslib: Contrib - Processing a Point Response}
-function ProcPoint(flag,CorrAns,n,epsilon,domain,indepVar,oComp)
+function ProcPoint(flag,CorrAns,n,epsilon,domain,indepVars,oComp)
{
if (!ProcessIt) return null;
ok2Continue = true;
var i, success, truthCnt=1;
var aScalar, scalar = 1;
var fieldname = event.target.name;
- var UserAns = event.value;
+ var bSubstVars=(arguments.length>7); // dps17
+ var UserAns=(bSubstVars)?arguments[7]:event.value;
UserAns = stripWhiteSpace (UserAns); // sets ok2Continue
CorrAns = stripWhiteSpace(CorrAns);
if ( !ok2Continue ) return null;
@@ -1127,7 +1142,7 @@ function ProcPoint(flag,CorrAns,n,epsilon,domain,indepVar,oComp)
eqAppAlert(\pointErrorMsgiii,3);
return null;
}
- indepVar = TypeParameters(indepVar);
+ indepVars = TypeParameters(indepVars);
for (i=0; i<aCorrAns.length; i++) {
aCorrAns[i] = ParseInput(aCorrAns[i]);
if (!ok2Continue) {
@@ -1141,7 +1156,7 @@ function ProcPoint(flag,CorrAns,n,epsilon,domain,indepVar,oComp)
}
if (!ok2Continue) return null;
success=randomPointCompare (
- n,domain,indepVar,epsilon,aCorrAns[i],aUserAns[i],comp)
+ n,domain,indepVars,epsilon,aCorrAns[i],aUserAns[i],comp)
if ( success == null ) {
eqAppAlert(\eqSyntaxErrorUndefVar,3); return null; }
truthCnt *= (success) ? 1 : 0;
@@ -1152,18 +1167,19 @@ function ProcPoint(flag,CorrAns,n,epsilon,domain,indepVar,oComp)
\end{library@holding}
\begin{library@holding}{intervals}
\begin{newsegment}{dljslib: Contrib - Processing Interval Responses}
-function ProcRespIntervals(flag,CorrAns,n,epsilon,domain,indepVar,oComp)
+function ProcRespIntervals(flag,CorrAns,n,epsilon,domain,indepVars,oComp)
{
ok2Continue = true;
if (!ProcessIt) return null;
var fieldname = event.target.name;
- var UserAns = event.value;
+ var bSubstVars=(arguments.length>7); // dps17
+ var UserAns=(bSubstVars)?arguments[7]:event.value;
UserAns = stripWhiteSpace(UserAns);
CorrAns = stripWhiteSpace(CorrAns);
if (!ok2Continue) return null;
UserAns = UserAns.replace(/inf/g, "x");
CorrAns = CorrAns.replace(/inf/g, "x");
- indepVar = "x";
+ indepVars = "x";
domain="[0,1]";
var aUserAns = UserAns.split("U");
var aCorrAns = CorrAns.split("U");
@@ -1193,12 +1209,12 @@ function ProcRespIntervals(flag,CorrAns,n,epsilon,domain,indepVar,oComp)
if (aCorrInt[0] == aUserInt[0]) matchparts+=1;
if (aCorrInt[3] == aUserInt[3]) matchparts+=1;
var retn1 = _ProcResp(flag,aCorrInt[1],aUserInt[1],%
-n,epsilon,domain,indepVar,oComp);
+n,epsilon,domain,indepVars,oComp);
if (retn1 == -1 ) return null;
if (retn1 == null) return syntaxError(), null;
if (retn1 == 1) matchparts+=1;
var retn2 = _ProcResp(flag,aCorrInt[2],aUserInt[2],%
-n,epsilon,domain,indepVar,oComp);
+n,epsilon,domain,indepVars,oComp);
if (retn2 == -1 ) return null;
if (retn2 == null) return syntaxError(), null;
if (retn2 == 1) matchparts+=1;