/*Copyright 2008, Aspen Labs, LLC*/function JGetId(A){d=document;if(d.getElementById){x=d.getElementById(A)}else{if(d.all){x=d.all[A]}}return x}function RemoveNonLets(A,D){var B,C,E="";A=A.toUpperCase();D=D.toUpperCase();for(B=0;B<A.length;B++){C=A.charAt(B);if(D.indexOf(C)>=0){E+=C}}return E}function RemoveLets(A,D){var B,C,E="";for(B=0;B<A.length;B++){C=A.charAt(B);if(D.indexOf(C)<0){E+=C}}return E}var scrollTimer,DispHgt=4,lc=-1,lmax=0,lpos=0;function Complex(B,A){this.r=B;this.i=A}function cNum(B,A){return new Complex(B,A)}function rNum(A){return new Complex(A,0)}function iNum(A){return new Complex(0,A)}tol=1e-20;function cvalMake(val){var r="0",i="0",x="0",y="0";r=val;beg=val.indexOf("{");end=val.indexOf("}");if((beg==0)&&(end>-1)){end=Math.max(end,val.length-1);r=val.substring(beg+1,end);return rNum("{"+r+"}")}beg=val.indexOf("(");mid=val.indexOf(",");end=val.indexOf(")");if((beg==0)&&(mid>-1)&&(end>-1)){end=Math.max(end,val.length-1);r=val.substring(beg+1,mid);i=val.substring(mid+1,end);return cNum(eval(r),eval(i))}beg=val.indexOf("(");mid=val.indexOf("@");end=val.indexOf(")");if((beg==0)&&(mid>-1)&&(end>-1)){x=val.substring(1,mid);y=val.substring(mid+1,val.length-1);y=eval(y);yComp=cNum(y,0);x=eval(x);xComp=cNum(x,0);rComp=cNum(0,0);iComp=cNum(0,0);zComp=cNum(0,0);zComp=Cos(yComp);rComp=Mult(xComp,zComp);iComp=Mult(xComp,(Sin(yComp)));r=rComp.r;i=iComp.r;return cNum(eval(r),eval(i))}mid=val.indexOf("+i");if(mid>-1){x=val.substring(0,mid);y=val.substring(mid+2,val.length);r=x;i=y}mid=val.indexOf("@");if(mid>-1){x=val.substring(0,mid);y=val.substring(mid+1,val.length);y*=AngConst[AngUnit];r=eval(x)*Math.cos(eval(y));i=eval(x)*Math.sin(eval(y))}mid=val.indexOf("_b");if(mid>-1){num=RemoveNonLets(val.substring(0,mid),digits);base=val.substring(mid+2,val.length);sum=0;for(k=0;k<num.length;k++){sum+=Math.pow(base,num.length-1-k)*digits.indexOf(num.charAt(k))}r=sum}return cNum(eval(r),eval(i))}function isRnum(G){var F,E=0,B="+",C,H,A,D;G=G.toLowerCase();for(F=0;F<G.length;F++){B=G.charAt(F);if(isrDigit(B)){E=1;break}}C=G.indexOf("e");A=G.indexOf("e",C+1);if(A>C){return 0}H=G.indexOf(".");D=G.indexOf(".",H+1);if(D>H){return 0}if((C>-1)&(H>C)){return 0}for(F=0;F<G.length;F++){lastx=B;B=G.charAt(F);if(F==0){E&=(isrSign(B)|isrDigit(B)|(B=="."))}else{if(F==(G.length-1)){E&=isrDigit(B)}else{if(lastx.toLowerCase()=="e"){E&=(isrSign(B)|isrDigit(B))}else{if(lastx=="."){E&=isrDigit(B)}else{E&=(isrDigit(B)|(B.toLowerCase()=="e")|(B=="."))}}}}}return E}function isCnum(H){var F,E,C,B,G,A,D=0;C=H.indexOf("(");B=H.indexOf(",");G=H.lastIndexOf(",");A=H.indexOf(")");if((C==0)&(C<B)&(B==G)&(B<A)&(A==H.length-1)){F=H.substring(C+1,B);E=H.substring(B+1,A);if(isRnum(F)&isRnum(E)){D=1}}C=H.indexOf("(");B=H.indexOf("@");G=H.lastIndexOf("@");A=H.indexOf(")");if((C==0)&(C<B)&(B==G)&(B<A)&(A==H.length-1)){F=H.substring(C+1,B);E=H.substring(B+1,A);if(isRnum(F)&isRnum(E)){D=1}}C=0;B=H.indexOf("+i");A=H.length-1;if((C<=B)&(B<=A)){F=H.substring(C,B);E=H.substring(B+2,A);if(((F=="")|(isRnum(F)))&((E=="")|(isRnum(E)))){D=1}}return D}function formatNum(C,A){var F,B=JGetId("ecalc_precision").value,K=SFormatValue;if(A){K=7}switch(K){case 1:var G=C;G=G.toFixed(5).toString();C=formatNumNice(C,12);break;case 2:F=C;F=F.toFixed(B).toString();if(F==C){C=C.toFixed(B)}else{C=C.toExponential(B)}break;case 3:C=C.toExponential(B);break;case 4:C=C.toExponential(B);var H=C.indexOf("e"),G=C.substr(0,H),E=C.substr(H+1,C.length);var D=((E%3)+3)%3;var J=C.indexOf(".")+D;var G=G.replace(".","");newnum=G.substr(0,J)+"."+G.substr(J,G.length);E=E-D;C=""+newnum+"e"+E;break;case 7:F=C;F=F.toFixed(5).toString();if(F==C){C=C.toFixed(5)}else{C=C.toExponential(5)}break}return C.toString()}function formatNumNice(A,B){var D=0;var C=0;clearFlag=false;if(A==0){D="0"}else{var C=Math.floor(Math.log(Math.abs(A))/Math.log(10));if(C>=12||C<=-4){D=A.toExponential(B)}else{D=A.toFixed(B-C)}}D=stripZeros(D);return D}function stripZeros(B){if(B.indexOf(".")!=-1){if(B.indexOf("e")!=-1){var A=B.split("e");B=A[0];while(B.charAt(B.length-1)=="0"){B=B.substr(0,B.length-1)}if(B.charAt(B.length-1)=="."){B=B.substr(0,B.length-1)}B=B+"e"+A[1]}else{while(B.charAt(B.length-1)=="0"){B=B.substr(0,B.length-1)}if(B.charAt(B.length-1)=="."){B=B.substr(0,B.length-1)}}}return B}function cShow(D){var C,B,A;C=D.r;A=Math.round(C);if(Math.abs(C-A)<tol){C=A}B=D.i;A=Math.round(B);if(Math.abs(B-A)<tol){B=A}return"("+C+"+"+B+"i)"}function cShowPair(F){var E=F.r,C=F.i,B,D,A;if(Math.abs(E)>tol){B=Math.round(E);if(Math.abs(E-B)<tol){E=B}}if(Math.abs(C)>tol){B=Math.round(C);if(Math.abs(C-B)<tol){C=B}}D=formatNum(E,false);if(C==0){return D}D=formatNum(E,true);A=formatNum(C,true);return"("+D+","+A+")"}function cShowPairInfix(F){var E=F.r,C=F.i,B,D,A;if(Math.abs(E)>tol){B=Math.round(E);if(Math.abs(E-B)<tol){E=B}}if(Math.abs(C)>tol){B=Math.round(C);if(Math.abs(C-B)<tol){C=B}}if(C==0){return E}return"("+E+","+C+")"}function cShowPolar(F){var E=Abs(F).r,C=Arg(F).r,B,D,A;if(Math.abs(E)>tol){B=Math.round(E);if(Math.abs(E-B)<tol){E=B}}if(Math.abs(C)>tol){B=Math.round(C);if(Math.abs(C-B)<tol){C=B}}D=formatNum(E,false);if(F.i==0){return D}D=formatNum(E,true);A=formatNum(C,true);return"("+D+"@"+A+")"}function cShowPhasor(A){return""+Abs(A).r+"e^("+Arg(A).r+"i)"}Zero=cNum(0,0);One=cNum(1,0);Two=cNum(2,0);I=cNum(0,1);cNaN=cNum(NaN,NaN);digits="0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZ";function iscEq(B,A){if((B.r==A.r)&&(B.i==A.i)){return 1}return 0}function isRe(A){if((A.i==0)){return 1}return 0}function isIm(A){if((A.r==0)&&(A.i!=0)){return 1}return 0}function iscNaN(A){if(isNaN(A.r)||isNaN(A.i)){return 1}return 0}function iscInt(A){if((A.r==Math.floor(A.r))&&(A.i==Math.floor(A.i))){return 1}return 0}function isrInt(A){if((isRe(A))&&(iscInt(A))){return 1}return 0}function rriiio(B,A,C){if(isrInt(B)&&isrInt(A)){return Round(C)}else{return(C)}}function criiio(B,A,C){if(iscInt(B)&&isrInt(A)){return Round(C)}else{return(C)}}function cpriiio(B,A,C){if(iscInt(B)&&isrInt(A)&&(A.r>0)){return Round(C)}else{return(C)}}function cciiio(B,A,C){if(iscInt(B)&&iscInt(A)){return Round(C)}else{return(C)}}function isExp(A){if(A.toString().indexOf("e")>-1){return 1}return 0}function GetDLen(G){var F,D,A,C,E,B;F=(G.r).toString();A=F.indexOf("e");if(A>-1){F=F.substr(1,A-1)}C=F.indexOf(".");E=0;if(C>-1){E=F.length-C-1}D=(G.i).toString();A=D.indexOf("e");if(A>-1){D=D.substr(1,A-1)}C=D.indexOf(".");B=0;if(C>-1){B=D.length-C-1}return cNum(E,B)}function GetSciExp(G){var F,D,A,C,E,B;F=(G.r).toString();A=F.indexOf("e");if(A>-1){F=F.substr(A+1,F.length)}D=(G.i).toString();A=D.indexOf("e");if(A>-1){D=D.substr(A+1,F.length)}return cNum(F,D)}function Re(A){return rNum(A.r)}function Im(A){return rNum(A.i)}function Sgn(A){r=A.r;if(r!=0){r=r/Math.abs(r)}i=A.i;if(i!=0){i=i/Math.abs(i)}return cNum(r,i)}function Conj(A){return cNum(A.r,-A.i)}function Neg(A){return cNum(-A.r,-A.i)}function Add(c1,c2){var a=cNum(c1.r+c2.r,c1.i+c2.i);d1=GetDLen(c1);d2=GetDLen(c2);da=GetDLen(a);lenr=Math.min(20,da.r,Math.max(d1.r,d2.r));leni=Math.min(20,da.i,Math.max(d1.i,d2.i));if(!isExp(c1.r)&&!isExp(c2.r)&&!isExp(a.r)){a.r=eval(parseFloat(a.r).toFixed(lenr))}if(!isExp(c1.i)&&!isExp(c2.i)&&!isExp(a.i)){a.i=eval(parseFloat(a.i).toFixed(leni))}return cNum(a.r,a.i)}function Sub(B,A){return Add(B,Neg(A))}function Mult(c1,c2){var a=cNum(c1.r*c2.r-c1.i*c2.i,c1.r*c2.i+c1.i*c2.r);d1=GetDLen(c1);d2=GetDLen(c2);da=GetDLen(a);lenr=Math.min(20,da.r,Math.max((d1.r+d2.r),(d1.i+d2.i)));leni=Math.min(20,da.i,Math.max((d1.r+d2.i),(d1.i+d2.r)));if(!isExp(c1.r)&&!isExp(c2.r)&&!isExp(a.r)&&!isExp(c1.i)&&!isExp(c2.i)&&!isExp(a.i)){a.r=eval(parseFloat(a.r).toFixed(lenr));a.i=eval(parseFloat(a.i).toFixed(leni))}return cNum(a.r,a.i)}function AbsSqr(A){return Mult(A,Conj(A))}function Div(B,A){n=Mult(B,Conj(A));d=AbsSqr(A).r;return cNum(n.r/d,n.i/d)}function Abs(A){return rNum(Math.sqrt(AbsSqr(A).r))}function ArgRad(A){return rNum(Math.atan2(A.i,A.r))}function Arg(A){return rNum(Math.atan2(A.i,A.r)/AngConst[AngUnit])}function Polar(A){return cNum(Abs(A).r,Arg(A).r)}function Exp(A){if(A.r==-Infinity){return Zero}exp=Math.exp(A.r);cos=Math.cos(A.i);sin=Math.sin(A.i);d=A.i/Math.PI;if(Math.abs(d-Math.round(d))==0){sin=0}d+=0.5;if(Math.abs(d-Math.round(d))==0){cos=0}d=A.i/(2*Math.PI);if(Math.abs(d-Math.round(d))==0){cos=1}return cNum(exp*cos,exp*sin)}function Ln(A){return cNum(Math.log(Abs(A).r),ArgRad(A).r)}function Pow(B,A){if(iscEq(B,Zero)){if(iscEq(A,Zero)){return One}if((A.r<0)&&(A.i==0)){return cNaN}return Zero}a=Exp(Mult(Ln(B),A));return cpriiio(B,A,a)}function Inv(A){return Pow(A,Neg(One))}function Logx(B,A){return Div(Ln(B),Ln(A))}function Root(B,A){return Exp(Div(Ln(B),A))}function Sqr(A){return Mult(A,A)}function Sqrt(A){return Root(A,Two)}function Log(A){return Logx(A,rNum(10))}function Flr(A){return cNum(Math.floor(A.r),Math.floor(A.i))}function Round(A){return cNum(Math.round(A.r),Math.round(A.i))}function Ceil(A){return cNum(Math.ceil(A.r),Math.ceil(A.i))}function Int(A){r=(A.r>=0)?Math.floor(A.r):Math.ceil(A.r);i=(A.i>=0)?Math.floor(A.i):Math.ceil(A.i);return cNum(r,i)}function Frac(A){return Sub(A,Int(A))}AngUnit="R";AngConst=new Array();AngConst.C=2*Math.PI;AngConst.R=1;AngConst.D=Math.PI/180;AngConst.G=Math.PI/200;function AngIn(A){return Mult(A,rNum(AngConst[AngUnit]))}function AngOut(A){return Mult(A,rNum(1/AngConst[AngUnit]))}function AngCnvt(A){A=Re(c)}function Sin(A){return Mult(I,Sinh(Mult(Neg(I),A)))}function Cos(A){return Cosh(Mult(Neg(I),A))}function Tan(A){return Div(Sin(A),Cos(A))}function Csc(A){return Inv(Sin(A))}function Sec(A){return Inv(Cos(A))}function Cot(A){return Inv(Tan(A))}function Asin(A){return AngOut(Neg(Mult(I,Ln(Add(Mult(I,A),Sqrt(Sub(One,Sqr(A))))))))}function Acos(A){return AngOut(Neg(Mult(I,Ln(Add(A,Mult(I,Sqrt(Sub(One,Sqr(A)))))))))}function Atan(A){return AngOut(Div(Mult(I,Ln(Div(Sub(One,Mult(I,A)),Add(One,Mult(I,A))))),Two))}function Acsc(A){return Asin(Inv(A))}function Asec(A){return Acos(Inv(A))}function Acot(A){return Atan(Inv(A))}function Sinh(A){return Div(Sub(Exp(AngIn(A)),Exp(Neg(AngIn(A)))),Two)}function Cosh(B){var A;A=Div(Add(Exp(AngIn(B)),Exp(Neg(AngIn(B)))),Two);return A}function Tanh(A){return Div(Sinh(A),Cosh(A))}function Csch(A){return Inv(Sinh(A))}function Sech(A){return Inv(Cosh(A))}function Coth(A){return Inv(Tanh(A))}function Asinh(A){return AngOut(Ln(Add(A,Sqrt(Add(One,Sqr(A))))))}function Acosh(A){return AngOut(Ln(Add(A,Mult(Sqrt(Add(A,One)),Sqrt(Sub(A,One))))))}function Atanh(A){return AngOut(Div(Sub(Ln(Add(One,A)),Ln(Sub(One,A))),Two))}function Acsch(A){return Asinh(Inv(A))}function Asech(A){return Acosh(Inv(A))}function Acoth(A){return Atanh(Inv(A))}function IDiv(B,A){return rNum(Math.floor(B.r/A.r))}function Mod(B,A){return rNum(B.r%A.r)}function Gcd(B,A){a=B.r;b=A.r;if(b==0){return rNum(a)}else{return Gcd(rNum(b),rNum(a%b))}}function Lcm(B,A){return Div(Mult(B,A),Gcd(B,A))}function Factor(A){n=A.r;ns=Math.sqrt(n)+1;out="";if(n<0){n=-n;out="-1,"}while((n%2==0)&&(n!=0)){n/=2;out+="2,"}for(k=3;k<=n;k=k+2){if((n%k)==0){n/=k;out+=k+",";if(n==1){break}ns=Math.sqrt(n)+1;k-=2}else{if(k>ns){out+=n+",";break}}}if(out==""||out=="-1,"){out+=n+","}return rNum("{"+out.substr(0,out.length-1)+"}")}function Prime(A){n=A.r;p=new Array();p[1]=2;p[2]=3;i=2;chk=p[i]+2;while(i<n){for(j=1;j<=i;j++){if(chk%p[j]==0){chk+=2;break}if(j==i){i++;p[i]=chk}}}return rNum(p[n])}function Prime2(A){n=A.r;sz=20*n;while(true){pcnt=1;sptr=1;sieve=new Array();for(i=2;i<sz;i++){sieve[i]=1}while(sptr<sz){sptr++;if(sieve[sptr]>0){pcnt++;sieve[sptr]=pcnt;if(pcnt>n){return rNum(sptr)}for(i=2*sptr;i<sz;i=i+sptr){sieve[i]=0}}}sz*=2}}function LnGamma(A){cof=new Array(76.18009172947146,-86.50532032941678,24.01409824083091,-1.231739572450155,0.001208650973866179,-0.000005395239384953);y=A;x=A;tmp=Add(x,rNum(5.5));tmp=Sub(tmp,Mult(Add(x,rNum(0.5)),Ln(tmp)));ser=rNum(1.000000000190015);for(j=0;j<=5;j++){y=Add(y,One);ser=Add(ser,Div(rNum(cof[j]),y))}return Add(Neg(tmp),Ln(Mult(rNum(2.5066282746310007),Div(ser,x))))}function Gamma(A){if((isrInt(A))&&(A.r>0)){p=1;for(n=1;n<A.r;n++){p*=n}return rNum(p)}return Exp(LnGamma(A))}function Factorial(A){if(isrInt(A)&&(A.r>0)&&(A.r<100)){return ProdABx(One,A)}else{return Gamma(Add(A,One))}}function Beta(B,A){return Div(Mult(Gamma(B),Gamma(A)),Gamma(Add(B,A)))}function ProdABx(C,F){var E=One,D;for(D=Math.floor(C.r);D<=Math.floor(F.r);D++){E=Mult(E,cNum(D,0))}return E}function Perm(B,A){return ProdABx(rNum(B.r-A.r+1),rNum(B.r))}function Comb(B,A){sml=Math.min(A.r,(B.r-A.r));return Div(ProdABx(rNum(B.r-sml+1),rNum(B.r)),Factorial(rNum(sml)))}function Rand(A){return cNum(A.r*Math.random(),A.i*Math.random())}function Base(B,A){num=B.r;base=A.r;if((base<2)||(base>36)){return cNaN}sym="_b"+base;while(num>0){mod=num%base;sym=digits.charAt(mod)+sym;num=Math.floor(num/base)}return rNum(sym)}function b_NOT(A){return rNum(~A.r)}function b_ShfR(B,A){return rNum(B.r>>A.r)}function b_ShfL(B,A){return rNum(B.r<<A.r)}function b_XOR(B,A){return rNum(B.r^A.r)}function b_AND(B,A){return rNum(B.r&A.r)}function b_OR(B,A){return rNum(B.r|A.r)}function b_NAND(B,A){return rNum(~(B.r&A.r))}function b_NOR(B,A){return rNum(~(B.r|A.r))}function Bnot(A){return rNum(~A.r)}function Bxor(B,A){return rNum(B.r^A.r)}function Band(B,A){return rNum(B.r&A.r)}function Bor(B,A){return rNum(B.r|A.r)}function Bnand(B,A){return rNum(~(B.r&A.r))}function Bnor(B,A){return rNum(~(B.r|A.r))}function l_NOT(A){return rNum(!A.r)}function l_AND(B,A){return rNum(B.r&&A.r)}function l_OR(B,A){return rNum(B.r||A.r)}function l_XOR(B,A){return rNum(B.r!=A.r)}function l_NAND(B,A){return rNum(!(B.r&&A.r))}function l_NOR(B,A){return rNum(!(B.r||A.r))}function Lnot(A){return rNum(!A.r)}function Land(B,A){return rNum(B.r&&A.r)}function Lor(B,A){return rNum(B.r||A.r)}function Lxor(B,A){return rNum(B.r!=A.r)}function Lnand(B,A){return rNum(!(B.r&&A.r))}function Lnor(B,A){return rNum(!(B.r||A.r))}function OnesComp(A){return b_NOT(A)}function TwosComp(A){return Add(OnesComp(A),One)}function toJSlist(A){return RemoveLets(A,"}{")}function Min(c){x=toJSlist(c.r);return rNum(eval("Math.min("+x+")"))}function Max(c){x=toJSlist(c.r);return rNum(eval("Math.max("+x+")"))}function Cnt(A){x=toJSlist(A.r);x=x.split(",");return rNum(x.length)}function Sum(c){x=toJSlist(c.r);x=x.split(",");s=0;for(k=0;k<x.length;k++){s+=eval(x[k])}return rNum(s)}function Prod(c){x=toJSlist(c.r);x=x.split(",");s=1;for(k=0;k<x.length;k++){s*=eval(x[k])}return rNum(s)}function Avg(A){return Div(Sum(A),Cnt(A))}function Variance(c){x=toJSlist(c.r);x=x.split(",");av=Avg(c).r;N=Cnt(c).r;s=0;for(k=0;k<x.length;k++){s+=Math.pow(eval(x[k])-av,2)}s/=N;return rNum(s)}function StdDev(A){return Sqrt(Variance(A))}function ToJoeFrac(F){var B,E=GetDLen(F),A=Pow(rNum(10),rNum(E.r)),C=Mult(F,A),D=Gcd(C,A);C=Div(C,D);A=Div(A,D);B=rNum(C.r+"/"+A.r);if(cShowPair(B).length>24){return F}if(A.r==1){return rNum(C.r)}return B}function ToJoeMixed(H){var F=Int(H);var D=Frac(H);var B,G=GetDLen(D),A=Pow(rNum(10),rNum(G.r)),C=Mult(D,A),E=Gcd(C,A);C=Div(C,E);A=Div(A,E);D=rNum(C.r+"/"+A.r);B=rNum(F.r+"+"+D.r);if(cShowPair(B).length>24){return H}if(C.r==0){return rNum(F.r)}return B}function IntPow(B,A){ans=One;b=B;e=A.r;while(e>0){f=e%2;if(f==1){ans=Mult(ans,b)}e=Math.floor(e/2);b=Sqr(b)}return ans}function Attn(){JGetId("ecalc_stack0").focus();return }function AllClear(){lc=-1;lmax=0;JGetId("ecalc_stack0").value="0";for(i=-DispHgt;i<1;i++){inList[i]="<br>";stk[i]=Zero}DoMath("",0);return }function OFchk(A){if(A.length>=26){return A+"O!"}return A}function UpdateDisp(A){for(i=A-DispHgt+1;i<=A;i++){if(SCoordValue==1){inList[i]=cShowPair(stk[i])}temp=stk[i];temp1=temp.i;if((SCoordValue==2)){if(stk[i].i==0){inList[i]=cShowPair(stk[i])}else{inList[i]=cShowPolar(stk[i])}}}if(true){inList[A]=OFchk(inList[A])}for(i=1;i<=DispHgt;i++){JGetId("ecalc_stack"+i).innerHTML=inList[A-i+1]}clearInputBox();return }function DoChangeSign(){var A=JGetId("ecalc_stack0").value;if(A!=""){changeSign()}else{stk[lpos]=Neg(stk[lpos]);UpdateDisp(lpos)}Attn();return }JSmath=new Array("abs","acos","asin","atan","atan2","ceil","cos","E","exp","floor","LN10","LN2","log","LOG10E","LOG2E","max","min","PI","pow","random","round","sin","sqrt","SQRT1_2","SQRT2","tan");JSnum="0123456789";function DoMath(op,optype){inp=JGetId("ecalc_stack0").value;if((inp=="")&(op=="")){inp=cShowPairInfix(stk[lpos])}val="      "+inp;tmpval="";for(k=0;k<val.length;k++){addon=val.charAt(k);addonlen=0;for(jsk=0;jsk<JSmath.length;jsk++){if((val.indexOf(JSmath[jsk],k)==k)&&(val.indexOf("Math.",k-5)!=k-5)){addon="Math."+JSmath[jsk];addonlen=JSmath[jsk].length-1}}tmpval+=addon;k+=addonlen}val="";for(k=0;k<tmpval.length;k++){let=tmpval.charAt(k);if(let!=" "){val+=let}}if(val.toUpperCase()=="I"){val="(0,1)"}if(val!=""){cval=cvalMake(val)}else{cval=stk[lc]}opr=op;if(op=="+"){opr="Add"}if(op=="-"){opr="Sub"}if(op=="*"){opr="Mult"}if(op=="x"){opr="Mult"}if(op=="/"){opr="Div"}if(op=="!"){opr="Factorial"}if(inp!=""){switch(optype){case 0:z1="null";z2="cval";nxt=1;break;case 1:z1="cval";z2="null";nxt=1;break;case 2:z1="stk[lc]";z2="cval";nxt=0;break}}else{switch(optype){case 0:z1="null";z2="stk[lc]";nxt=0;break;case 1:z1="stk[lc]";z2="null";nxt=0;break;case 2:z1="stk[lc-1]";z2="stk[lc]";nxt=-1;break}}oldz1=eval(z1);oldz2=eval(z2);if((lc+nxt)>=0){stk[lc+nxt]=eval(opr+"("+z1+","+z2+")");lc+=nxt}else{return 0}inList[lc]="";if(optype==0){inList[lc]+=cShowPair(cval)}if(op!=""){inList[lc]+=cShowPair(stk[lc])}lpos=lc;lmax=Math.max(lmax,lpos);UpdateDisp(lpos);Attn();return }Array.prototype.indexOf=function(B){for(var A=0;A<this.length;A++){if(this[A]===B){return A}}return -1};rsign="+-";rdigits="0123456789";digits="0123456789.eE";extdigits=digits+"+-";lets="ABCDEFGHIJKLMNOPQRSTUVWXYZ";c_xor=String.fromCharCode(164);c_nor=String.fromCharCode(166);c_nand=String.fromCharCode(167);c_not=String.fromCharCode(172);b_ops="*/%+-><&|^="+c_xor+c_nor+c_nand;rgtacting_u_ops="~"+c_not;lftacting_u_ops="!";u_ops=rgtacting_u_ops+lftacting_u_ops;function isrSign(A){return(rsign.indexOf(A)>(-1))}function isrDigit(A){return(rdigits.indexOf(A)>(-1))}function isDigit(A){return(digits.indexOf(A)>(-1))}function isExtDigit(A){return(extdigits.indexOf(A)>(-1))}function isLet(A){return(lets.indexOf(A.toUpperCase())>(-1))}function isFnc(A){return(lets.indexOf(A.toUpperCase())>(-1))|(u_ops.indexOf(A)>(-1))}function isOp(A){return(b_ops.indexOf(A)>(-1))}function prcdnc(B){OpArr=new Array("~","!","^","*","/","%","+","-","<<",">>",">>>","<","<=",">",">=","==","!=","===","!==","&","|","&&","||","=");OpPrcArr=new Array(14,14,14,13,13,13,12,12,11,11,11,10,10,10,10,9,9,9,9,8,6,5,4,2);if(isFnc(B)){return 15}var A=OpArr.indexOf(B);if(A>-1){return OpPrcArr[A]}return 0}String.prototype.left=function(A){return(A>this.length)?this:this.substring(0,A)};String.prototype.right=function(A){return(A>this.length)?this:this.substring(this.length-A)};String.prototype.toProper=function(){var A=this.toLowerCase();return A.left(1).toUpperCase()+A.right(A.length-1)};function replaceAll(C,B,A){return C.replace(new RegExp(B,"g"),A)}function UpdateStr(str,cond,repl){var z="+",prevz="+",nextz="+",tstr="",lastz=str.length-1,i;for(i=0;i<str.length;i++){prevz=z;z=str.charAt(i);nextz=str.charAt(i+1);if(eval(cond)){tstr+=repl;if(tstr.right(1)=="z"){tstr=tstr.substring(0,tstr.length-1)+z}}else{tstr+=z}}return tstr}function Ans(A){return stk[lpos+1-A.r]}function Infix2RPN(G){JGetId("test2").value="";var C,E,H,F="",A="+",B="";var D=new Array;G=G.toLowerCase();G=replaceAll(G,"pi","(3.141592653589793)");G=replaceAll(G,"ans","(ans(1))");G=replaceAll(G,"exp","Exp");G=UpdateStr(G,"(z=='i')&(!isLet(prevz))&((!isLet(nextz))|(i==(lastz)))","(0,1)");G=UpdateStr(G,"((z=='(')|isFnc(z))&(prevz=='-')","1*z");G=UpdateStr(G,"((prevz==')')|isrDigit(prevz))&((z=='(')|( (isFnc(z))&(z!='!')&(z!='e')))","*z");G=UpdateStr(G,"((prevz==')')&((z=='(')|isDigit(z)))","*z");A="+";B="";for(C=0;C<G.length;C++){cs="";for(j=0;j<D.length;j++){cs+=D[j]+" "}JGetId("test2").value+=F+" : "+cs+"\n";lastx=A;A=G.charAt(C);if(A==" "){A=lastx;continue}if((A.toLowerCase()=="e")&isDigit(lastx)){F+=A;continue}if(((A=="+")|(A=="-"))&(lastx.toLowerCase()=="e")){F+=A;A="e";continue}if(isDigit(A)&(lastx.toLowerCase()=="e")){F+=A;continue}if(((A=="+")|(A=="-"))&((lastx=="(")|(lastx==",")|isOp(lastx))){F+=A;A="0";continue}if(A=="."){for(j=F.length;j>=0;j--){if((j==0)||(F.charAt(j)==" ")){F+=A;break}if((F.charAt(j)=="e")|(!isDigit(F.charAt(j)))&&(!isOp(F.charAt(j)))){return"Invalid expression"}}continue}if(isDigit(lastx)&!isDigit(A)&!((lastx=="e")&(A=="-"))){F+=" "}if(isDigit(A)&isFnc(lastx)){D[D.length-1]+=A;A=lastx;continue}if(isFnc(A)){if(isFnc(lastx)){D[D.length-1]+=A}else{D.push(A)}continue}if(isDigit(A)){F+=A;continue}if(isOp(A)){if((C==0)&(A=="-")){F+=A}else{if(isOp(lastx)){D[D.length-1]+=A}else{while((D.length>0)){if((prcdnc(A)>prcdnc(D[D.length-1]))){break}F+=D.pop()+" "}D.push(A)}}continue}if(A=="("){E=G.indexOf(")",C);H=G.substring(C,E+1);if(!isFnc(lastx)&isCnum(H)){F+=H+" ";C=E;A="0"}else{D.push(A)}continue}if(A==")"){while((D[D.length-1]!="(")){if(D.length==0){return"Invalid expression"}F+=D.pop()+" "}D.pop();if(D.length>0){if(D[D.length-1].length>1){F+=D.pop()+" "}}continue}}JGetId("test2").value+=F+" : "+cs+"\n=======================\n";while(D.length>0){lastx=A;A=D.pop();if(isDigit(lastx)&!isDigit(A)){F+=" "}JGetId("test2").value+=F+"\n";F+=A+" "}JGetId("test2").value+=F+"\n";return F}function DoMathBTS(str){if(str==""){return""}var inp=str;var inpArr=inp.split(" ");var stkBTS=new Array;binops="+-*/^PowRootAddSubMultDivMod&|"+c_xor+c_nor+c_nand;var ans=x=0;for(i=0;i<inpArr.length;i++){x=inpArr[i].toProper();opr=x;if(x=="+"){opr="Add"}if(x=="-"){opr="Sub"}if(x=="*"){opr="Mult"}if(x=="/"){opr="Div"}if(x=="^"){opr="Pow"}if(x=="!"){opr="Factorial"}if(x=="&"){opr="Band"}if(x=="|"){opr="Bor"}if(x==c_xor){opr="Bxor"}if(x==c_nor){opr="Bnor"}if(x==c_nand){opr="Bnand"}ans=0;if((x=="")|(x==" ")){JGetId("test2").value+=stkBTS+"\n";continue}if(binops.indexOf(x)>-1){c2=cvalMake(stkBTS.shift());c1=cvalMake(stkBTS.shift());ans=cShowPairInfix(eval(opr+"(c1,c2)"));stkBTS.unshift(""+ans);JGetId("test2").value+=stkBTS+"\n";continue}if(!(isRnum(x)|isCnum(x))){c1=cvalMake(stkBTS.shift());ans=cShowPairInfix(eval(opr+"(c1)"));stkBTS.unshift(""+ans);JGetId("test2").value+=stkBTS+"\n";continue}if(isRnum(x)|isCnum(x)){stkBTS.unshift(x);JGetId("test2").value+=stkBTS+"\n";continue}}return stkBTS[0]}function swap(){var A;A=stk[lpos];stk[lpos]=(stk[lpos-1]);stk[lpos-1]=A;UpdateDisp(lpos)}function LSsolve(){var A,B,F=solverSize;function E(){var L,J,G,K;for(L=0;L<F;L++){var H=L;for(J=L;J<F;J++){if(AbsSqr(A[J][L])>AbsSqr(A[H][L])){H=J}}for(G=L;G<F+1;G++){K=A[L][G];A[L][G]=A[H][G];A[H][G]=K}for(J=L+1;J<F;J++){for(G=F;G>L;G--){if(iscEq(A[L][L],Zero)){return false}else{A[J][G]=Sub(A[J][G],Div(Mult(A[L][G],A[J][L]),A[L][L]))}}}}return true}function C(){var H,G,J;for(H=F-1;H>=0;H--){J=Zero;for(G=H+1;G<F;G++){J=Add(J,Mult(A[H][G],B[G]))}B[H]=Div(Sub(A[H][F],J),A[H][H])}}var D;A=new Array();for(r=0;r<F;r++){A[r]=new Array()}B=new Array();for(r=0;r<F;r++){for(c=0;c<F;c++){D=solverArrayA[r*F+c];if(D==""){D="0"}A[r][c]=cvalMake(D);JGetId("test").value+=cShowPair(A[r][c])+" "}D=solverArrayB[r];if(D==""){D="0"}A[r][F]=cvalMake(D);B[r]=Zero;JGetId("test").value+=": "+cShowPair(A[r][F])+"\n"}chk=false;for(c=0;c<F;c++){for(r=0;r<F;r++){chk=chk||iscNaN(A[r][c])}chk=chk||iscNaN(B[c])}if(chk){window.alert("Invalid Input!");return }if(E()){C();for(c=0;c<F;c++){JGetId("solverOutput"+(c+1)).innerHTML=cShowPair(B[c])}}else{window.alert("Singular Matrix!")}}function CPolySolve(){var B=j=k=0;var A=40;ConvergeIter=40;var C=new Array();var E=new Array();var F=new Array();var G=new Array();var J="";JGetId("test").value=J;CPSize=solverSize;for(c=CPSize;c>=0;c--){fVal=solverArrayRoot[c];if(fVal==""){fVal="0"}C[c]=cvalMake(fVal)}for(B=0;B<CPSize;B++){E[B]=Zero;F[B]=Add(Rand(cNum(2,2)),cNum(-1,-1))}maxOrd=CPSize;for(ord=maxOrd;ord>=0;ord--){CPSize=ord;if(!iscEq(C[ord],Zero)){break}}if(CPSize<=0){J+="No Roots";JGetId("test").value=J;return 0}for(num=0;num<CPSize;num++){Num0Roots=num;if(!iscEq(C[num],Zero)){break}J+="0\n";JGetId("test").value=J;if(num==CPSize-1){return }}CPSize-=Num0Roots;for(c=CPSize;c>=0;c--){C[c]=C[c+Num0Roots]}div=C[CPSize];for(c=CPSize;c>=0;c--){C[c]=Div(C[c],div)}var H=Zero,D=One;for(k=0;k<=A;k++){for(B=0;B<CPSize;B++){E[B]=F[B]}for(B=0;B<CPSize;B++){H=Zero;D=One;zn=One;for(j=0;j<=CPSize;j++){H=Add(H,Mult(C[j],zn));zn=Mult(zn,E[B])}for(j=0;j<CPSize;j++){if(Math.abs(j-B)>0.01){D=Mult(D,Sub(E[B],E[j]))}}F[B]=Sub(E[B],Div(H,D))}Converged=1;for(B=0;B<CPSize;B++){Converged&=(AbsSqr(Sub(E[B],F[B]))).r<1e-20}if(Converged&&(ConvergeIter==A)){ConvergeIter=k}if(k>=ConvergeIter+2){break}if(k==A){J="Timed Out\nHere is last set\n"}}for(B=0;B<CPSize;B++){G[B]=cShowPair(F[B])}G.sort();for(B=0;B<G.length;B++){J+=G[B]+"\n";JGetId("solverOutput"+(B+1)).innerHTML=G[B]}J+="\n"+k+" iters";JGetId("test").value=J}function stackScrollUp(){return setInterval("if((lpos>0)&&(lpos<=lmax)){lpos--};UpdateDisp(lpos)",150)}function stackScrollDown(){return setInterval("if((lpos>=0)&&(lpos<lmax)){lpos++};UpdateDisp(lpos)",150)}function stackUp(){if((lpos>0)&&(lpos<=lmax)){lpos--}UpdateDisp(lpos)}function stackDown(){if((lpos>=0)&&(lpos<lmax)){lpos++}UpdateDisp(lpos)}var logicState="true";var dfState="false";var menuState="true";var paletteState="units";var SFractValue=0;var SAngleValue=1;var SCoordValue=1;var SFormatValue=1;var SModeValue=1;var solverSize;var solverType="";var cellVisitedFlag=0;var cellCurrent="a0";var logicBits=new Array();var logicBinary="";var solverArrayA=new Array();var solverArrayB=new Array();var solverArrayRoot=new Array();var unitBoxFocus;var greenLight="#C6E9AF";var greenDark="#AADE87";var greenState=greenDark;var blueLight="#AACCFF";var blueDark="#80B3FF";var blueLight="#AACCFF";var blueDark="#80B3FF";var blueState=blueDark;var constState=0;var varArray=new Array();var constArray=new Array();constArray[0]=new Array("c","Speed of Light","2.99792458e8","m/s");constArray[1]=new Array("Cc","Coulomb Constant","8.9875517873682e9","Nm&sup2;/coul&sup2;");constArray[2]=new Array("g","Acceleration of gravity","9.80665","m/s&sup2;");constArray[3]=new Array("G","Gravitational Constant","6.67259e-11","m&sup3;/kg/s&sup2;");constArray[4]=new Array("h","Plancks Constant","6.6260755e-34","Js");constArray[5]=new Array("k","Boltzmanns Constant","1.380658e-23","J/K");constArray[6]=new Array("F","Faraday Constant","9.64853383e4","Cmol&#8315;&sup1;");constArray[7]=new Array("Me","Electron Rest Mass","9.1093897e-31","kg");constArray[8]=new Array("Mn","Neutron Rest Mass","1.6749286e-27","kg");constArray[9]=new Array("Mp","Protron Rest Mass","1.6726231e-27","kg");constArray[10]=new Array("Na","Avogadros Number","6.02214179e23","mol&#8315;&sup1;");constArray[11]=new Array("q","Electron Charge","1.60217733e-19","coul");constArray[12]=new Array("Rb","Bohr Radius","5.29177249e-11","m");constArray[13]=new Array("Rc","Molar Gas Constant","8.31451","J/mol/K");constArray[14]=new Array("Rdb","Rydberg constant","1.097373153413e7","m&#8315;&sup1;");constArray[15]=new Array("Vm","Molar Volume","2.241409e-2","m&sup3;/mol");constArray[16]=new Array("&epsilon;0","Permittivity of a Vacuum","8.8541878176204e-12","F/m");constArray[17]=new Array("&sigma;","Stefan-Boltzmann Constant","5.6705119e-8","W/m&sup2;/K^4");constArray[18]=new Array("&phi;","Magnetic Flux Quantum","2.0678346161e-15","Wb");constArray[19]=new Array("&mu;o","Permeability of a Vacuum","1.2566370614359e-6","N/A&sup2;");constArray[20]=new Array("&mu;b","Bohr Magneton","9.2740154e-24","m&sup2;/Wb");constArray[21]=new Array("Kj","Josephson Constant","4.835979e14","Hz/V");constArray[22]=new Array("Zo","Impedance of Vacuum","3.76730313461e2","&#8486;");constArray[23]=new Array("Go","Conductance Quantum","7.7480917004e-5","S");var mass=new Array();mass[0]=new Array("ct","Carat",0.0002);mass[1]=new Array("g","Gram",0.001);mass[2]=new Array("kg","Kilogram",1);mass[3]=new Array("lb","Pound (ENG/US)",0.45359237);mass[4]=new Array("mg","Milligram",0.000001);mass[5]=new Array("ug","Microgram",1e-9);mass[6]=new Array("oz","Ounce",0.02834952);mass[7]=new Array("slug","Slug",14.5939029372);mass[8]=new Array("ton","Ton",907.1847);mass[9]=new Array("tonne","Metric Ton",1000);mass[10]=new Array("tonUK","Long Ton",1016.0469088);mass[11]=new Array("gr","Grain",0.00006479891);var speed=new Array();speed[1]=new Array("in/s","Inches per Second",0.0254);speed[2]=new Array("ft/s","Feet per Second",0.3048);speed[3]=new Array("m/s","Meters per Second",1);speed[4]=new Array("km/s","Kilometers per Second",1000);speed[5]=new Array("kph","Kilometers Per Hour",0.277777777777);speed[6]=new Array("mph","Miles Per Hour",0.44704);speed[7]=new Array("kt","Knot",0.5144444444444);speed[8]=new Array("mach","Mach (SI)",340.3);speed[9]=new Array("c","Speed of Light",299792458);var time=new Array();time[0]=new Array("yr","Year",31556925.9747);time[1]=new Array("mth","Month(30 Days)",2592000);time[2]=new Array("week","Week",604800);time[3]=new Array("day","Day",86400);time[4]=new Array("hr","Hour",3600);time[5]=new Array("min","Minute",60);time[6]=new Array("s","Second",1);time[7]=new Array("ms","Millisecond",0.001);time[8]=new Array("&mu;s","Microsecond",0.000001);time[9]=new Array("ns","NanoSecod",1e-9);time[10]=new Array("ps","PicoSecond",1e-12);time[11]=new Array("fs","FemptoSecond",1e-15);var power=new Array();power[3]=new Array("mW","milliWatt",0.001);power[4]=new Array("W","Watt",1);power[5]=new Array("kW","KiloWatt",1000);power[6]=new Array("MW","MegaWatt",1000000);power[7]=new Array("hp","Horsepower",745.699871582);var volume=new Array();volume[0]=new Array("m<sup>3</sup>","Cubic Meters",1);volume[1]=new Array("f<sup>3</sup>","Cubic Feet",0.02831685);volume[2]=new Array("gal","Gallon",0.003785412);volume[3]=new Array("gal","British Gallon",0.004546092);volume[4]=new Array("l","Liter",0.001);volume[5]=new Array("ml","Milliliter",0.000001);volume[6]=new Array("cup","Cup",0.0002365882);volume[7]=new Array("floz","Fluid Ounce",0.00002957353);volume[8]=new Array("pt","Pint",0.0004731765);volume[9]=new Array("qt","Quart",0.0009463529);volume[10]=new Array("tbsp","TableSpoon",0.00001478676);volume[11]=new Array("tsp","Teaspoon",0.000004928922);var area=new Array();area[1]=new Array("ac","Acre",4046.873);area[2]=new Array("cm<sup>2</sup>","Centimeters<sup>2</sup>",0.0001);area[3]=new Array("ft<sup>2</sup>","Feet<sup>2</sup>",0.09290304);area[4]=new Array("ha","Hectare",10000);area[5]=new Array("in<sup>2</sup>","Inches<sup>2</sup>",0.00064516);area[6]=new Array("km<sup>2</sup>","Kilometers<sup>2</sup>",1000000);area[7]=new Array("m<sup>2</sup>","Meters<sup>2</sup>",1);area[8]=new Array("mi<sup>2</sup>","Miles<sup>2</sup>",2589988);area[9]=new Array("mm<sup>2</sup>","Millimeters<sup>2</sup>",0.000001);area[10]=new Array("yd<sup>2</sup>","Yards<sup>2</sup>",0.8361274);var length=new Array();length[0]=new Array("&aring;","Angstrom",1e-10);length[1]=new Array("au","Astronomical Unit",149597900000);length[2]=new Array("cm","Centimeter",0.01);length[3]=new Array("ft","Foot",0.3048);length[4]=new Array("in","Inch",0.0254);length[5]=new Array("km","Kilometer",1000);length[6]=new Array("ltyr","Light Year",9460528404880000);length[7]=new Array("m","Meter",1);length[8]=new Array("mi","Mile",1609.344);length[9]=new Array("mm","Millimeter",0.001);length[10]=new Array("Nmi","Nautical Mile",1852);length[11]=new Array("yd","Yard",0.9144);var energy=new Array();energy[1]=new Array("btu","British Thermal Unit",1055.05585262);energy[2]=new Array("cal","Calorie",4.184);energy[3]=new Array("erg","Erg",1e-7);energy[4]=new Array("eV","Electron Volt",1.60219e-19);energy[5]=new Array("ftlb","Foot Pound",1.35582);energy[6]=new Array("J","Joule",1);energy[7]=new Array("kcal","kilocalorie",4184);energy[8]=new Array("kWh","Kilowatt Hour",3600000);energy[9]=new Array("therm","Therm",105505590);var temp=new Array();temp[4]=new Array("&deg;C","Celsius","C");temp[5]=new Array("&deg;F","Fahrenheit","F");temp[6]=new Array("K","Kelvin","K");temp[7]=new Array("&deg;R","Rankine","R");var force=new Array();force[0]=new Array("N","Newton",1);force[1]=new Array("dyn","Dyne",0.00001);force[2]=new Array("gf","Gram-Force",0.00980665);force[3]=new Array("kgf","Kilogram Force",9.80665);force[4]=new Array("kN","Kilonewton",1000);force[5]=new Array("kP","Kilopond",9.80665);force[6]=new Array("kip","Kip",4448.2216);force[7]=new Array("pdl","Poundal",0.138254954376);force[8]=new Array("tonf","Long Ton-Force(UK)",9964.0164);force[9]=new Array("tonf","Short Ton-Force(US)",8896.4432);force[10]=new Array("tonf","Ton Force Metric",9806.65);force[11]=new Array("lbf","Pound Force",4.44822161526);var press=new Array();press[1]=new Array("atm","Atmosphere",101325);press[2]=new Array("bar","Bar",100000);press[3]=new Array("inH20","Inches of Water",248.84);press[4]=new Array("inHg","Inches of Mercury",3386.38815789);press[5]=new Array("mmHg","Millimeters of Mercury",133.322368421);press[6]=new Array("pa","Pascal",1);press[7]=new Array("kPa","KiloPascal",1000);press[8]=new Array("psi","Lbs per Sqr Inch",6894.75729317);press[9]=new Array("torr","Torr",133.322368421);var unitType=new Array(mass,speed,time,power,volume,area,length,energy,temp,force,press);var ids=new Array("units","const","solver","logic","help","fract");function tempConvt(C,B,A){if(B=="C"){C=C+273.15}else{if(B=="F"){C=((C+459.67)*5)/9}else{if(B=="R"){C=(C*5)/9}}}if(C<0){return"Not Valid"}if(A=="C"){C=C-273.15}else{if(A=="F"){C=((C*9)/5)-459.67}else{if(A=="R"){C=(C*9)/5}}}return C}var unitListHovers=new Array();for(i=0;i<=11;i++){unitListHovers[i]=new Array(-1,-1)}var unitInputArray=new Array();for(i=0;i<=11;i++){unitInputArray[i]=1}function switchid(B){if(B!="fract"){paletteState=B;document.getElementById("df_gui").className="df_button";dfState="false"}for(var A=0;A<ids.length;A++){document.getElementById(ids[A]).style.display="none"}document.getElementById(B).style.display="block";document.getElementById("pButtons").className=B+"Button buttons";Attn()}function toggle_df(){if(dfState=="false"){document.getElementById("df_gui").className="df_button_hot";switchid("fract");dfState="true"}else{document.getElementById("df_gui").className="df_button";switchid(paletteState);dfState="false"}}function menuCycle(){if(menuState=="true"){document.getElementById("ecalc_screen").style.display="none";document.getElementById("ecalc_menu").style.display="block";document.getElementById("menu_gui").className="menu_button";menuState="false"}else{document.getElementById("ecalc_screen").style.display="block";document.getElementById("ecalc_menu").style.display="none";document.getElementById("menu_gui").className="menu_button_hot";menuState="true";Attn()}}function changeBase(A){if(logicState=="true"){document.getElementById("bases").className=A+" bases_1";switch(A){case"binMode":document.getElementById("hexButtons").className="hexDisabled";document.getElementById("numbers89").className="digits89Disabled";document.getElementById("numbers27").className="digits27Disabled";break;case"octMode":document.getElementById("hexButtons").className="hexDisabled";document.getElementById("numbers89").className="digits89Disabled";document.getElementById("numbers27").className="";break;case"decMode":document.getElementById("hexButtons").className="hexDisabled";document.getElementById("numbers89").className="";document.getElementById("numbers27").className="";break;case"hexMode":document.getElementById("hexButtons").className="hexButtons_1";document.getElementById("numbers89").className="";document.getElementById("numbers27").className="";break}}}function SAngleDisp(){document.getElementById("menu_rad").className="menu_radA";document.getElementById("menu_deg").className="menu_degA";document.getElementById("menu_grad").className="menu_gradA";switch(SAngleValue){case 1:document.getElementById("status_angle").className="status_rad";document.getElementById("menu_rad").className="menu_radB";AngUnit="R";break;case 2:document.getElementById("status_angle").className="status_deg";document.getElementById("menu_deg").className="menu_degB";AngUnit="D";break;case 3:document.getElementById("status_angle").className="status_grd";document.getElementById("menu_grad").className="menu_gradB";AngUnit="G";break}UpdateDisp(lpos)}function SCoordDisp(){document.getElementById("menu_rec").className="menu_recA";document.getElementById("menu_polar").className="menu_polarA";switch(SCoordValue){case 1:document.getElementById("status_coord").className="status_rec";document.getElementById("menu_rec").className="menu_recB";break;case 2:document.getElementById("status_coord").className="status_pol";document.getElementById("menu_polar").className="menu_polarB";break}UpdateDisp(lpos)}function SModeDisp(){document.getElementById("menu_rpn").className="menu_rpnA";document.getElementById("menu_alg").className="menu_algA";switch(SModeValue){case 1:document.getElementById("status_mode").className="status_alg";document.getElementById("enter_gui").className="alg_entr";document.getElementById("menu_alg").className="menu_algB";document.getElementById("ans_gui").className="ans_button";break;case 2:document.getElementById("status_mode").className="status_rpn";document.getElementById("enter_gui").className="rpn_entr";document.getElementById("menu_rpn").className="menu_rpnB";document.getElementById("ans_gui").className="swap_button";break}}function SFormatDisp(){document.getElementById("menu_std").className="menu_stdA";document.getElementById("menu_fix").className="menu_fixA";document.getElementById("menu_sci").className="menu_sciA";document.getElementById("menu_eng").className="menu_engA";switch(SFormatValue){case 1:document.getElementById("status_format").className="status_std";document.getElementById("menu_std").className="menu_stdB";break;case 2:document.getElementById("status_format").className="status_fix";document.getElementById("menu_fix").className="menu_fixB";break;case 3:document.getElementById("status_format").className="status_sci";document.getElementById("menu_sci").className="menu_sciB";break;case 4:document.getElementById("status_format").className="status_eng";document.getElementById("menu_eng").className="menu_engB";break}UpdateDisp(lpos)}function menuAngle(A){SAngleValue=A;SAngleDisp()}function menuFormat(A){SFormatValue=A;SFormatDisp()}function menuCoord(A){SCoordValue=A;SCoordDisp()}function menuMode(A){SModeValue=A;SModeDisp()}function incrtAngle(){if(SAngleValue==3){SAngleValue=1}else{SAngleValue+=1}SAngleDisp()}function incrtCoord(){if(SCoordValue==2){SCoordValue=1}else{SCoordValue=2}SCoordDisp()}function incrtMode(){if(SModeValue==2){SModeValue=1}else{SModeValue=2}SModeDisp()}function incrtFormat(){if(SFormatValue==4){SFormatValue=1}else{SFormatValue+=1}SFormatDisp()}function hide(){window.status="";return true}document.onmouseover=hide;document.onmouseout=hide;if(document.layers){document.captureEvents(Event.MOUSEOVER|Event.MOUSEOUT)}function OpenWindow(){var A=window.open("index2.html","NewWindow","width=800,height=600,scrollbars=no")}function flipBits(B){var A=base(B,"01");A=A+"";A=A.split("");for(i=31;i>=0;i--){if(i>A.length-1){document.getElementById("bit"+i.toString()).className="logic_zero";logicBits[i]="0"}else{j=A.length-i-1;if(A[i]=="1"){document.getElementById("bit"+j.toString()).className="logic_one";logicBits[j]="1"}else{document.getElementById("bit"+j.toString()).className="logic_zero";logicBits[j]="0"}}}}function bitFlip(A){var B;logicBits[A]^=1;logicBinary="";for(i=31;i>=0;i--){if(logicBits[i]==1){logicBinary+="1";document.getElementById("bit"+i.toString()).className="logic_one"}else{if(logicBits[i]==0){logicBinary+="0";document.getElementById("bit"+i.toString()).className="logic_zero"}}}B=unbase(logicBinary,"01");document.getElementById("dec_box").value=B;if(B==0){document.getElementById("hex_box").value=0;document.getElementById("oct_box").value=0}else{document.getElementById("hex_box").value=base(B,"0123456789ABCDEF");document.getElementById("oct_box").value=base(B,"01234567")}}function bitInit(){var A="";for(i=0;i<=31;i++){logicBits[i]=0;A="bit"+i.toString();document.getElementById(A).className="logic_zero"}}function UnitInit(A){var B="";var D="";var C="";for(i=0;i<=10;i++){C=i.toString();B="UC"+C;D="ucInit"+C;document.getElementById(B).className=D}B=A.toString();document.getElementById(("UC"+B)).className=("ucStick"+B)}function updateBases(A){if(A=="DEC"){decValue=document.getElementById("dec_box").value;if(decValue>=0){document.getElementById("hex_box").value=base(decValue,"0123456789ABCDEF");document.getElementById("oct_box").value=base(decValue,"01234567");flipBits(decValue)}}else{if(A=="OCT"){octValue=document.getElementById("oct_box").value;decValue=unbase(octValue,"01234567");if(decValue>=0){document.getElementById("hex_box").value=base(decValue,"0123456789ABCDEF");document.getElementById("dec_box").value=decValue;flipBits(decValue)}}else{if(A=="HEX"){hexValue=(document.getElementById("hex_box").value).toUpperCase();decValue=unbase(hexValue,"0123456789ABCDEF");if(decValue>=0){document.getElementById("oct_box").value=base(decValue,"01234567");document.getElementById("dec_box").value=decValue;flipBits(decValue)}}}}}function popDecBase(){if(document.getElementById("ecalc_stack0").value!=""){document.getElementById("dec_box").value=document.getElementById("ecalc_stack0").value}else{document.getElementById("dec_box").value=document.getElementById("ecalc_stack1").innerHTML}updateBases("DEC")}function clearBases(){document.getElementById("dec_box").value=0;document.getElementById("hex_box").value=0;document.getElementById("oct_box").value=0;flipBits(0)}function base(D,C){var A=C.length;var B="";while(D>0){B=C.charAt(D%A)+B;D=Math.floor(D/A)}return B}function unbase(D,E){var B=E.length;var C=0;for(var A=1;D.length>0;A*=B){C+=E.indexOf(D.charAt(D.length-1))*A;D=D.substr(0,D.length-1)}return C}function unitList(A){UnitInit(A);unitTypeState=A;document.getElementById("unitsInBox").value=unitInputArray[A];document.getElementById("unitsOutBox").value="";var B=unitType[A].length;for(i=0;i<=11;i++){if(unitType[A][i]!=undefined){document.getElementById("UL"+i.toString()).innerHTML=unitType[A][i][1];document.getElementById("ULAbv"+i.toString()).innerHTML=unitType[A][i][0]}else{document.getElementById("UL"+i.toString()).innerHTML="";document.getElementById("ULAbv"+i.toString()).innerHTML=""}}if((unitListHovers[unitTypeState][0]==-1)&&(unitListHovers[unitTypeState][1])==-1){unitBoxFocus="in";unitListRefresh(-1)}else{if((unitListHovers[unitTypeState][0]!=-1)&&(unitListHovers[unitTypeState][1])==-1){unitBoxFocus="out";unitListRefresh(unitListHovers[unitTypeState][0])}else{if((unitListHovers[unitTypeState][0]==-1)&&(unitListHovers[unitTypeState][1])!=-1){unitBoxFocus="in";unitListRefresh(unitListHovers[unitTypeState][1])}else{unitBoxFocus="out";unitListRefresh(unitListHovers[unitTypeState][1]);unitBoxFocus=""}}}}function unitListOver(B,A){if((A==unitListHovers[unitTypeState][0])&&(unitListHovers[unitTypeState][1]!=-1)){B.style.backgroundColor=blueDark}else{if((A==unitListHovers[unitTypeState][1])&&(unitListHovers[unitTypeState][0]!=-1)){B.style.backgroundColor=greenDark}else{if(document.getElementById("UL"+A.toString()).innerHTML!=""){unitListRefresh(A)}}}}function unitListRefresh(B){var A="ULRow";if(unitListHovers[unitTypeState][1]==-1){greenState=greenDark}else{greenState=greenLight}if((unitListHovers[unitTypeState][0]==-1)&&(unitListHovers[unitTypeState][1]==-1)){blueState=blueDark;greenState=greenLight}else{if((unitListHovers[unitTypeState][0]==-1)&&(unitListHovers[unitTypeState][1]!=-1)){blueState=blueDark}else{blueState=blueLight}}document.getElementById("unitsInBox").style.backgroundColor=blueState;document.getElementById("unitsOutBox").style.backgroundColor=greenState;for(i=0;i<=11;i++){if((i==unitListHovers[unitTypeState][0])){document.getElementById(A+i.toString()).style.backgroundColor=blueState;document.getElementById("unitsIn").innerHTML=unitType[unitTypeState][i][0]}else{if((i==unitListHovers[unitTypeState][1])){document.getElementById(A+i.toString()).style.backgroundColor=greenState;document.getElementById("unitsOut").innerHTML=unitType[unitTypeState][i][0]}else{if(i%2==0){document.getElementById(A+i.toString()).style.backgroundColor="#E6EAE9"}else{document.getElementById(A+i.toString()).style.backgroundColor="white"}}}}if((B!=-1)){if(unitBoxFocus=="in"){document.getElementById(A+B.toString()).style.backgroundColor=blueState}else{if(unitBoxFocus=="out"){document.getElementById(A+B.toString()).style.backgroundColor=greenState}}}if(unitListHovers[unitTypeState][0]==-1){document.getElementById("unitsIn").innerHTML="--";document.getElementById("unitsOutBox").value=""}if(unitListHovers[unitTypeState][1]==-1){document.getElementById("unitsOut").innerHTML="--";document.getElementById("unitsOutBox").value=""}if(B!=-1){if(unitBoxFocus=="in"){document.getElementById("unitsIn").innerHTML=unitType[unitTypeState][B][0];if(unitListHovers[unitTypeState][1]!=-1){A=(unitConvert(unitType[unitTypeState][B][2],unitType[unitTypeState][(unitListHovers[unitTypeState][1])][2]));if(isNaN(A)){document.getElementById("unitsOutBox").value=A}else{document.getElementById("unitsOutBox").value=A.toPrecision(4)}}}else{if(unitBoxFocus=="out"){document.getElementById("unitsOut").innerHTML=unitType[unitTypeState][B][0];A=(unitConvert(unitType[unitTypeState][(unitListHovers[unitTypeState][0])][2],unitType[unitTypeState][B][2]));if(isNaN(A)){document.getElementById("unitsOutBox").value=A}else{document.getElementById("unitsOutBox").value=A.toPrecision(4)}}}}}function unitListOut(B,A){unitListRefresh(-1)}function unitInputChanged(){if(((unitListHovers[unitTypeState][1])!=-1)&&((unitListHovers[unitTypeState][0])!=-1)){unitBoxFocus="out";unitInputArray[unitTypeState]=document.getElementById("unitsInBox").value;unitListRefresh((unitListHovers[unitTypeState][1]));unitBoxFocus=""}}function unitListDown(A){if(unitType[unitTypeState][A]!=undefined){if(unitBoxFocus==""){if(A==unitListHovers[unitTypeState][0]){unitBoxFocus="in";unitListHovers[unitTypeState][0]=-1;unitListRefresh(A)}else{if(A==unitListHovers[unitTypeState][1]){unitBoxFocus="out";unitListHovers[unitTypeState][1]=-1;unitListRefresh(A)}else{unitBoxFocus="in";unitListHovers[unitTypeState][0]=-1;unitListHovers[unitTypeState][1]=-1;unitListRefresh(A)}}}else{if(unitBoxFocus=="in"){unitListHovers[unitTypeState][0]=A;unitListRefresh(A);if((unitListHovers[unitTypeState][1]==-1)||(unitListHovers[unitTypeState][1]==A)){unitListHovers[unitTypeState][1]=-1;unitBoxFocus="out"}else{unitBoxFocus=""}}else{if(unitBoxFocus=="out"){unitListHovers[unitTypeState][1]=A;unitListRefresh(A);if(unitListHovers[unitTypeState][0]==A){unitListHovers[unitTypeState][0]=-1;unitBoxFocus="in"}else{unitBoxFocus=""}}}}}}function unitPopIn(){if(document.getElementById("ecalc_stack0").value!=""){document.getElementById("unitsInBox").value=document.getElementById("ecalc_stack0").value}else{if(document.getElementById("ecalc_stack1").innerHTML!="0"){document.getElementById("unitsInBox").value=document.getElementById("ecalc_stack1").innerHTML}else{document.getElementById("unitsInBox").value=1}}unitInputArray[unitTypeState]=document.getElementById("unitsInBox").value;unitList(unitTypeState)}function unitPopOut(){document.getElementById("ecalc_stack0").value=document.getElementById("unitsOutBox").value}function unitConvert(D,C){var A;var B=parseFloat(document.getElementById("unitsInBox").value);if(isNaN(D)){A=tempConvt(B,D,C)}else{A=(D/C)*document.getElementById("unitsInBox").value}return A}function debug(B,A){document.getElementById(B).innerHTML=A}function unitBoxClick(A){}function constLoad(){if(constState==0){for(var A=0;A<=11;A++){document.getElementById("CNSTAbv"+A.toString()).innerHTML=constArray[A][0];document.getElementById("CNSTDesc"+A.toString()).innerHTML=constArray[A][1];document.getElementById("CNSTDesc"+A.toString()).style.width="220px"}document.getElementById("CNSTDesc12").innerHTML="More"}else{if(constState==1){for(A=0;A<=11;A++){document.getElementById("CNSTAbv"+A.toString()).innerHTML=constArray[A+12][0];document.getElementById("CNSTDesc"+A.toString()).innerHTML=constArray[A+12][1];document.getElementById("CNSTDesc"+A.toString()).style.width="220px"}document.getElementById("CNSTDesc12").innerHTML="Back"}}}function constMore(){constState^=1;constLoad()}function constDisp(C,B){C.className="cnstFillHover";if(B!=12){var A=constArray[(B+constState*12)][2];A=parseFloat(A);if((A>10)||(A<1)){document.getElementById("constValueHover").innerHTML=A.toExponential(4)}else{document.getElementById("constValueHover").innerHTML=A.toFixed(4)}document.getElementById("constUnitsHover").innerHTML="&nbsp;"+constArray[(B+constState*12)][3]}}function constClear(B,A){if(A%2==0){B.className="cnstFillEven"}else{B.className="cnstFillOdd"}document.getElementById("constValueHover").innerHTML="";document.getElementById("constUnitsHover").innerHTML=""}function constPush(A){document.getElementById("ecalc_stack0").value=constArray[(A+constState*12)][2]}function handleStackEntry(C){C=C||window.event;var B;if(C.keyCode){B=C.keyCode}else{if(C.which){B=C.which}}var A=String.fromCharCode(B);if((A=="m")&&(SModeValue==2)){DoChangeSign();return false}if((A=="+")||(A=="/")||(A=="*")||(A=="-")||(A=="^")){if(SModeValue==1){if(JGetId("ecalc_stack0").value==""){document.getElementById("ecalc_stack0").value+="Ans"+A}else{document.getElementById("ecalc_stack0").value+=A}}else{if(A=="+"){DoMath("Add",2)}else{if(A=="-"){DoMath("Sub",2)}else{if(A=="*"){DoMath("Mult",2)}else{if(A=="/"){DoMath("Div",2)}else{if(A=="^"){DoMath("Pow",2)}}}}}}return false}if(B==13){JGetId("ecalc_stack0").value=DoMathBTS(Infix2RPN(JGetId("ecalc_stack0").value));DoMath("",0);return false}}function handle_keypress(C){C=C||window.event;var B;if(C.keyCode){B=C.keyCode}else{if(C.which){B=C.which}}var A=String.fromCharCode(B);var D=/\d/;if(A.search(D)!=-1){numPressed(A);return false}if(B==46){Decimal();return false}if((A=="+")||(A=="/")||(A=="*")||(A=="-")){Operation(A);return false}if(B==13){Operation("=")}return true}function moveCursor(){document.getElementById("ecalc_stack0").focus();setCaretTo()}function addLi(D,K,F){var G="";var M="";var C="";var B="";var E=30;var A=5;var H=F*(E+A+2);var J=K*(E+A+2)+A;document.getElementById(D).style.width=H.toString()+"px";document.getElementById(D).style.height=J.toString()+"px";document.getElementById("solverWrap").style.width=((K+F)*H+14).toString()+"px";document.getElementById("solverBracketsWrap").style.width=((K+F)*H+32).toString()+"px";document.getElementById("solverWrap").style.height=(J).toString()+"px";document.getElementById("solverBracketsWrap").style.height=(J+18).toString()+"px";for(i=0;i<=(K*F-1);i++){var L=document.createElement("LI");L.className="cell";C=Math.floor(i/F)+1;B=(i%K)+1;if(F==1){G="b"+i.toString();M="b"+C.toString();solverArrayB[i]=""}else{G="a"+i.toString();M="a"+C.toString()+B.toString();solverArrayA[i]=""}L.style.width=E.toString()+"px";L.style.height=E.toString()+"px";L.style.marginRight=A.toString()+"px";L.style.marginTop=A.toString()+"px";L.id=G;L.onmouseover=hoverCell;L.onmouseout=visitedCell;L.onclick=clickCell;L.appendChild(document.createTextNode(M));document.getElementById(D).appendChild(L)}}function clearList(B){var A;A=document.getElementById(B);if(A.hasChildNodes()){while(A.childNodes.length>=1){A.removeChild(A.firstChild)}}return false}function buildLinear(A){clearSolver();document.getElementById("cellInputBox").value="";solverDisplay("linearWrapper");addLi("AMatrix",A,A);addLi("BVector",A,1);solverSize=A;solverType="linearWrapper";activeCell("a0")}function buildSize(A,B){temp="";for(i=1;i<=7;i++){temp=B+i.toString();if(i<=A){document.getElementById(temp).style.display="block"}else{document.getElementById(temp).style.display="none"}}}function solverDisplay(A){document.getElementById("solverBuild").style.display="none";document.getElementById("linearWrapper").style.display="none";document.getElementById("rootWrapper").style.display="none";document.getElementById("answerWrapper").style.display="none";document.getElementById(A).style.display="block"}function buildRoot(A){clearRoots();solverDisplay("rootWrapper");buildSize(A,"roota");solverType="rootWrapper";solverSize=A-1}function exitSolver(){solverDisplay("solverBuild");cellCurrent="a0"}function solverAnswers(){solverDisplay("answerWrapper");buildSize(solverSize,"solverAnswer")}function backSolver(){solverDisplay(solverType)}function saveRootValues(){for(i=0;i<=solverSize;i++){solverArrayRoot[i]=document.getElementById("rootCoeff"+i.toString()).value}}function clearRoots(){for(i=0;i<=6;i++){solverArrayRoot[i]="";document.getElementById("rootCoeff"+i.toString()).value=""}}function clearSolver(){clearList("AMatrix");clearList("BVector")}function hoverCell(){if(this.id!=cellCurrent){this.style.backgroundColor="#FFB380";this.style.color="black";this.style.fontWeight="bold"}}function clickCell(){activeCell(this.id)}function activeCell(D){var E,C;document.getElementById(cellCurrent).style.backgroundColor="#D7E3F4";document.getElementById(cellCurrent).style.fontWeight="normal";document.getElementById(cellCurrent).style.color="#999999";document.getElementById(D).style.backgroundColor="#FF9955";document.getElementById(D).style.color="black";document.getElementById(D).style.fontWeight="bold";var B="";B=cellCurrent.replace(/a|b/,"");var A="";A=cellCurrent.replace(/\d\d|\d/,"");if(A=="a"){solverArrayA[parseInt(B)]=document.getElementById("cellInputBox").value}else{if(A=="b"){solverArrayB[parseInt(B)]=document.getElementById("cellInputBox").value}}A=D;A=A.replace(/\d\d|\d/,"");B=D;B=B.replace(/a|b/,"");if(A=="a"){document.getElementById("cellInputBox").value=solverArrayA[parseInt(B)]}else{if(A=="b"){document.getElementById("cellInputBox").value=solverArrayB[parseInt(B)]}}cellText=document.getElementById(D).innerHTML;A=cellText;A=A.replace(/\d\d|\d/,"");B=cellText;B=B.replace(/a|b/,"");document.getElementById("cellIDText").innerHTML=A;document.getElementById("cellIDTextSub").innerHTML=B;document.getElementById("cellInputBox").focus();cellCurrent=D}function visitedCell(){if(this.id!=cellCurrent){this.style.backgroundColor="#D7E3F4";this.style.color="#999999";this.style.fontWeight="normal"}}function handleEnter(C){var D=C.keyCode?C.keyCode:C.which?C.which:C.charCode;if(D==13){var B="";var A="";B=cellCurrent.replace(/a|b/,"");A=cellCurrent.replace(/\d\d|\d/,"");B=parseInt(B);if(A=="a"){if((B%solverSize)==(solverSize-1)){activeCell("b"+(Math.floor(B/solverSize)).toString())}else{B=B+1;activeCell("a"+B.toString())}}else{if(A=="b"){if(B==(solverSize-1)){activeCell("a0")}else{activeCell("a"+((B+1)*solverSize).toString())}}}}return false}function setCaretTo(){var C=document.getElementById("ecalc_stack0");var D=C.value.length;if(C.createTextRange){var B=C.createTextRange();B.move("character",D);B.select()}else{if(C.selectionStart!=null){C.focus();C.setSelectionRange(D,D);var A=document.createEvent("KeyboardEvent");A.initKeyEvent("keypress",true,true,null,false,false,false,false,27,0);C.dispatchEvent(A)}}}function setSelectionRange(B,C,D){if(B.createTextRange){var A=B.createTextRange();A.collapse(true);A.moveEnd("character",D);A.moveStart("character",C);A.select()}else{if(B.setSelectionRange){B.focus();B.setSelectionRange(C,D)}}}function popDecimal(){document.getElementById("dToFInput").value=document.getElementById("ecalc_stack0").value}function calc(){var C=document.getElementById("dToFInput");var K=document.getElementById("fractions");K.innerHTML="";var H=Math.abs(C.value);if(isNaN(H)){H=0}var B=[0,1];var E=[1,0];var J=getMaxNumerator(H);var A=H;var D,L=NaN;for(var G=2;G<1000;G++){var F=Math.round(A);B[G]=F*B[G-1]+B[G-2];E[G]=F*E[G-1]+E[G-2];D=B[G]/E[G];if(D==L||Math.abs(B[G])>J){break}K.innerHTML+="<b>"+Math.abs(B[G])+"</b>/<b>"+Math.abs(E[G])+"</b> = "+D+"<br>";if(D==H){break}L=D;A=1/(A-F)}}function getMaxNumerator(H){var E=null;var K=H.toString().indexOf("E");if(K==-1){K=H.toString().indexOf("e")}if(K==-1){E=H.toString()}else{E=H.toString().substring(0,K)}var B=null;var C=E.toString().indexOf(".");if(C==-1){B=E}else{if(C==0){B=E.substring(1,E.length)}else{if(C<E.length){B=E.substring(0,C)+E.substring(C+1,E.length)}}}var M=B;var A=M.toString().length;var F=H;var J=F.toString().length;if(F==0){J=0}var D=A-J;for(var G=D;G>0&&M%2==0;G--){M/=2}for(var G=D;G>0&&M%5==0;G--){M/=5}return M}function initGUI(){document.getElementById("ecalc_stack0").value="0";switchid("units");SAngleDisp();SCoordDisp();SFormatDisp();SModeDisp();bitInit();unitList(0);constLoad();Attn()}function numPressed(A){document.getElementById("ecalc_stack0").value+=A;moveCursor()}function clearInputBox(){JGetId("ecalc_stack0").value=""}function clearStack(){var A=JGetId("ecalc_stack0").value;if(A!=""){A=JGetId("ecalc_stack0").value=""}else{stackUp();lmax=lpos;lc=lpos}}function clearAll(){document.getElementById("ecalc_stack0").value="0";document.getElementById("ecalc_stack1").innerHTML="";document.getElementById("ecalc_stack2").innerHTML="";document.getElementById("ecalc_stack3").innerHTML="";document.getElementById("ecalc_stack4").innerHTML=""}function popStack(A){document.getElementById("ecalc_stack0").value+=document.getElementById("ecalc_stack"+A.toString()).innerHTML}function changeSign(){var C=(document.getElementById("ecalc_stack0").value).split("");var B="";var A="";var D=false;for(i=(C.length-1);i>=0;i--){A=C[i];if(D!=true){if(A=="-"){D=true}else{if(A=="+"){D=true;B="-"+B}else{if(A=="E"){B="E-"+B;D=true}else{if(A=="e"){B="e-"+B;D=true}else{if(A==","){B=",-"+B;D=true}else{if(A=="("){B="(-"+B;D=true}else{B=A+B}}}}}}}else{B=C[i]+B}}if(D==false){B="-"+B}document.getElementById("ecalc_stack0").value=B};