@mathzetta/inlinemath 0.0.0-stage → 0.2.0

package/dist/cas.js

@@ -0,0 +1,2 @@
+/* Inline Math 0.2.0 — MIT licence; includes mathzetta (and @mathzetta/cas, for the CAS) */
+import{q as e,r as n,M as t,u as r,v as s,w as o,x as i,G as a,y as u,z as l,A as c,B as f,m as p,C as d,E as h,h as m,F as g,H as v}from"./chunks/lite-3Fb-OHbt.js";import{c as b}from"./chunks/calculate-Cz87Lt0N.js";import{a as y}from"./chunks/html-CupluJSh.js";const w=new Map,x=-1,q="\\:",k=e=>"string"==typeof e&&e.startsWith(q)&&e.length>2;function $(e){if(!e||!e.symbol)throw new Error("operator needs a symbol");if(!Number.isInteger(e.arity)||e.arity<0&&e.arity!==x)throw new Error(`operator "${e.symbol}" needs an integer arity >= 0, or VARIADIC`);if(e.commutative&&2!==e.arity)throw new Error(`only binary operators can be commutative ("${e.symbol}")`);const n={symbol:e.symbol,arity:e.arity,commutative:!!e.commutative,fold:"function"==typeof e.fold?e.fold:null,label:e.label||e.symbol};return w.set(n.symbol,n),n}const S=Object.freeze({symbol:q,arity:x,commutative:!1,fold:null,label:"function"});function O(e){const n=w.get(e);return n||(k(e)?{...S,symbol:e,label:e.slice(2)}:null)}function N(e){return w.has(e)||k(e)}const A=e=>Number.isFinite(e)&&Number.isInteger(e)?e:null,I=e=>Number.isFinite(e)?e:null;!function(){$({symbol:"+",arity:2,commutative:!0,label:"add",fold:(e,n)=>I(e+n)}),$({symbol:"-",arity:2,label:"subtract",fold:(e,n)=>I(e-n)}),$({symbol:"*",arity:2,commutative:!0,label:"multiply",fold:(e,n)=>I(e*n)}),$({symbol:"/",arity:2,label:"divide",fold:(e,n)=>0===n?null:A(e/n)}),$({symbol:"^",arity:2,label:"power",fold:(e,n)=>Number.isInteger(n)&&Math.abs(n)<=64?I(e**n):null}),$({symbol:"neg",arity:1,label:"negate",fold:e=>I(-e)}),$({symbol:"pm",arity:1,label:"plus or minus"}),$({symbol:"±",arity:2,label:"plus or minus"}),$({symbol:"mod",arity:2,label:"modulo",fold:(e,n)=>0===n?null:A((e%n+n)%n)}),$({symbol:"!",arity:1,label:"factorial",fold:e=>Number.isInteger(e)&&e>=0&&e<=18?[...Array(e).keys()].reduce((e,n)=>e*(n+1),1):null}),$({symbol:"_",arity:2,label:"subscript"}),$({symbol:"der",arity:2,label:"derivative"}),$({symbol:"int",arity:x,label:"integral"}),$({symbol:"lim",arity:x,label:"limit"}),$({symbol:"\\sumidx",arity:x,label:"sum over an index"}),$({symbol:"\\prodidx",arity:x,label:"product over an index"}),$({symbol:"abs",arity:1,label:"absolute value",fold:e=>I(Math.abs(e))}),$({symbol:"floor",arity:1,label:"floor",fold:e=>I(Math.floor(e))}),$({symbol:"ceil",arity:1,label:"ceiling",fold:e=>I(Math.ceil(e))}),$({symbol:"round",arity:2,label:"round",fold:(e,n)=>Number.isInteger(n)?I(Math.round(e*10**n)/10**n):null}),$({symbol:"fixed",arity:2,label:"fixed",fold:()=>null}),$({symbol:"sqrt",arity:1,label:"square root",fold:e=>A(Math.sqrt(e))}),$({symbol:"root",arity:2,label:"nth root",fold:(e,n)=>A(Math.round(n**(1/e))**e===n?Math.round(n**(1/e)):NaN)});for(const e of["sin","cos","tan","csc","sec","cot","sinh","cosh","tanh","arcsin","arccos","arctan","arcsinh","arccosh","arctanh","ln","loglog","logloglog","expm1"])$({symbol:e,arity:1,label:e});$({symbol:"log",arity:2,label:"log to a base"}),$({symbol:"atan2",arity:2,label:"atan2"}),$({symbol:"perm",arity:2,label:"permutations"}),$({symbol:"comb",arity:2,label:"combinations"}),$({symbol:"random",arity:0,label:"random"});for(const e of["max","min","gcd","mean","sum","prod"])$({symbol:e,arity:x,label:e});for(const e of["()","[]","{}","(]","[)"])$({symbol:e,arity:x,label:"group"});for(const e of["pmatrix","bmatrix","vmatrix"])$({symbol:e,arity:x,label:"matrix"});$({symbol:"det",arity:1,label:"determinant"});for(const e of["=","===","≠","≠=","<",">","≤","≥","∈","∉","∪","∩","≈","≡","→","pmod","&","|","\\xor","\\nand","\\nor"])$({symbol:e,arity:2,label:e});$({symbol:"\\not",arity:1,label:"not"}),$({symbol:"?:",arity:3,label:"if then else"})}();const M="num",E="sym",T="op",j=Object.freeze([]);class Z extends Error{constructor(e){super(e),this.name="ExprError"}}function z(e){if("number"!=typeof e||!Number.isFinite(e))throw new Z(`not a finite number: ${e}`);const n=(t=e,Object.is(t,-0)?"0":String(t));var t;return Object.freeze({type:M,token:n,value:e,args:j,s:n})}function D(e){if("string"!=typeof e||""===e)throw new Z("symbol needs a non-empty token");return Object.freeze({type:E,token:e,value:null,args:j,s:e})}function B(e){const n=/^(-?)0*(\d+?)(?:\.(\d*?)0*)?$/.exec(String(e));if(!n)throw new Z(`not an exact decimal: ${e}`);const[,t,r,s=""]=n,o=s?`${r}.${s}`:r,i=/^0(\.0*)?$/.test(o)?"0":t+o;return Object.freeze({type:M,token:i,value:Number(i),args:j,s:i})}const C=/^-?\d+(\.\d+)?$/;function F(e){const n=String(e);if(C.test(n))return B(n);if(""!==n&&!/\s/.test(n)){const e=Number(n);if(Number.isFinite(e))return z(e)}return D(n)}function V(e,n){const t=O(e);if(!t)throw new Z(`unknown operator "${e}"`);if(t.arity!==x&&n.length!==t.arity)throw new Z(`"${e}" takes ${t.arity} operand(s), got ${n.length}`);const r=Object.freeze(n.slice()),s=t.arity===x?` ${r.length}`:"",o=`${r.length?r.map(e=>e.s).join(" "):""}${r.length,""}${s} ${e}`.trimStart();return Object.freeze({type:T,op:e,token:e,value:null,args:r,s:o})}const R=e=>e.type===M,U=e=>e.type===T;function P(e){return W(function(e){const n=String(e).trim();return""===n?[]:n.split(/\s+/)}(e))}function W(e){if(!Array.isArray(e))throw new Z("fromPostfix needs an array of tokens");if(0===e.length)throw new Z("empty expression");const n=[];for(let t=0;t<e.length;t++){const r=String(e[t]);if(N(r)){let e=O(r).arity;if(e===x){const s=n.pop();if(e=s&&s.type===M&&Number.isInteger(s.value)&&s.value>=0?s.value:-1,e<0)throw new Z(`"${r}" at position ${t+1} takes any number of operands, so a count must come before it`)}if(n.length<e)throw new Z(`"${r}" at position ${t+1} needs ${e} operand(s), only ${n.length} on the stack`);const s=n.splice(n.length-e,e);n.push(V(r,s))}else n.push(F(r))}if(1!==n.length){const t=[...new Set(e.filter(e=>!N(e)))];throw new Z(`expression leaves ${n.length} values on the stack; it should leave exactly 1. Read as operands: ${t.join(", ")} — is one of those meant to be an operator?`)}return n[0]}function L(e){if(e.type!==T)return 0;let n=0;for(const t of e.args)n=Math.max(n,L(t));return n+1}function _(e){if(e.type!==T)return 1;let n=1;for(const t of e.args)n+=_(t);return n}function H(e,n=[]){if(e.type!==T)n.push(e.token);else for(const t of e.args)H(t,n);return n}function J(e){return e.type===M||e.type!==E&&e.args.every(J)}function Q(e,n="pre",t=[],r=[]){"pre"===n&&r.push({node:e,path:t});for(let s=0;s<e.args.length;s++)Q(e.args[s],n,t.concat(s),r);return"post"===n&&r.push({node:e,path:t}),r}function Y(e,n,t){if(0===n.length)return t;const[r,...s]=n,o=e.args.slice();return o[r]=Y(o[r],s,t),V(e.op,o)}class G extends Error{constructor(e){super(e),this.name="CasError"}}const K=1e5,X=e=>e<0n?-e:e,ee=e=>0n===e?0:X(e).toString(2).length;function ne(e,n){for(e=X(e),n=X(n);n;)[e,n]=[n,e%n];return e}class te{constructor(e,n=1n){if(0n===n)throw new G("division by zero");n<0n&&(e=-e,n=-n);const t=ne(e,n)||1n;if(this.n=e/t,this.d=n/t,ee(this.n)>K||ee(this.d)>K)throw new G("a number too large to keep exactly")}static of(e){return new te(BigInt(e))}add(e){return new te(this.n*e.d+e.n*this.d,this.d*e.d)}sub(e){return new te(this.n*e.d-e.n*this.d,this.d*e.d)}mul(e){return new te(this.n*e.n,this.d*e.d)}div(e){if(0n===e.n)throw new G("division by zero");return new te(this.n*e.d,this.d*e.n)}neg(){return new te(-this.n,this.d)}abs(){return this.n<0n?this.neg():this}inv(){return te.ONE.div(this)}pow(e){if((e=BigInt(e))<0n)return this.inv().pow(-e);if((0n===this.n||1n===X(this.n))&&1n===this.d)return 0n===e||-1n===this.n&&e%2n==0n?te.ONE:this;if(BigInt(Math.max(ee(this.n),ee(this.d)))*e>BigInt(K))throw new G("a power too large to work out exactly");return new te(this.n**e,this.d**e)}get isZero(){return 0n===this.n}get isOne(){return 1n===this.n&&1n===this.d}get isInteger(){return 1n===this.d}get sign(){return this.n<0n?-1:this.n>0n?1:0}equals(e){return this.n===e.n&&this.d===e.d}compare(e){const n=this.n*e.d,t=e.n*this.d;return n<t?-1:n>t?1:0}floor(){const e=this.n/this.d;return new te(this.n<0n&&e*this.d!==this.n?e-1n:e)}ceil(){return this.neg().floor().neg()}toNumber(){const e=Number(this.n),n=Number(this.d);if(Number.isFinite(e)&&Number.isFinite(n))return e/n;const t=BigInt(Math.max(ee(this.n),ee(this.d))-1e3);return Number(this.n>>t)/Number(this.d>>t)}toString(){return 1n===this.d?String(this.n):`${this.n}/${this.d}`}}function re(e){const n=/^(-?)(\d*)(?:\.(\d*))?(?:[eE]([+-]?\d+))?$/.exec(String(e));if(!n||""===n[2]&&!n[3])return null;const[,t,r,s="",o="0"]=n;let i=new te(BigInt((r||"0")+s),10n**BigInt(s.length));const a=Number(o);return a&&(i=i.mul(te.of(10).pow(a))),t?i.neg():i}function se(e,n){if(e<2n)return e;if(n>=ee(e))return 1n;const t=BigInt(n);let r=1n<<BigInt(Math.ceil(ee(e)/n));for(;;){const n=((t-1n)*r+e/r**(t-1n))/t;if(n>=r)break;r=n}for(;r**t>e;)r--;for(;(r+1n)**t<=e;)r++;return r}te.ZERO=new te(0n),te.ONE=new te(1n),te.MINUS_ONE=new te(-1n),te.HALF=new te(1n,2n);const oe=(()=>{const e=[],n=new Uint8Array(1e4);for(let t=2;t<n.length;t++)if(!n[t]){e.push(BigInt(t));for(let e=t*t;e<n.length;e+=t)n[e]=1}return e})();function ie(e,n){const t=BigInt(n);let r=1n,s=1n,o=e;for(const e of oe){if(e*e>o)break;if(o%e)continue;let n=0n;for(;o%e===0n;)o/=e,n++;r*=e**(n/t),s*=e**(n%t)}if(o>1n){const e=function(e,n){if(e<0n)return null;if(e<2n)return e;const t=se(e,n);return t**BigInt(n)===e?t:null}(o,n);null!==e?r*=e:s*=o}return{outside:r,inside:s}}const ae=new Set(["pi","e","π"]),ue={complex:!1};function le(e,n){const t=ue.complex;ue.complex=Boolean(e);try{return n()}finally{ue.complex=t}}const ce=e=>ae.has(e)||ue.complex&&"i"===e,fe=e=>ue.complex&&"atom"===e.k&&"sym"===e.node.type&&"i"===e.node.token,pe=e=>({k:"num",q:e}),de=pe(te.ONE),he=pe(te.ZERO),me=pe(te.HALF),ge=e=>"num"===e.k,ve=e=>({k:"atom",node:e}),be=new WeakMap;function ye(e){let n=be.get(e);return void 0===n&&be.set(e,n=Ge(e).s),n}function we(e){if("num"===e.k)return 0;if("atom"===e.k)return"sym"===e.node.type&&ce(e.node.token)?0:1;if("add"===e.k)return Math.max(...e.terms.map(e=>we(e.x)));let n=0;for(const t of e.fs){const e=we(t.b);e&&(n+=e*(ge(t.e)?t.e.q.toNumber():1))}return n}function xe(e,n){return"num"===e.k?n&&!ge(n)?3:0:fe(e)?1.5:"atom"===e.k&&"sym"===e.node.type?ce(e.node.token)?n&&!ge(n)?3:1:2:"atom"===e.k?3:4}const qe=(e,n)=>e<n?-1:e>n?1:0;function ke(e){const n=new Map,t=(e,t)=>{"atom"!==e.k||"sym"!==e.node.type||ce(e.node.token)||n.set(e.node.token,(n.get(e.node.token)??0)+t)};if("mul"===e.k)for(const n of e.fs)t(n.b,ge(n.e)?n.e.q.toNumber():1);else t(e,1);return n}function $e(e,n){const t=we(n.x)-we(e.x);if(t)return t;const r=ke(e.x),s=ke(n.x);for(const e of[...new Set([...r.keys(),...s.keys()])].sort()){const n=(s.get(e)??0)-(r.get(e)??0);if(n)return n}return qe(ye(e.x),ye(n.x))}function Se(e,n){return e.isOne?n:e.isZero?he:Ie([pe(e),n])}function Oe(e){if("num"===e.k)return{coef:e.q,rest:null};if("mul"!==e.k||e.c.isOne)return{coef:te.ONE,rest:e};const n=1===e.fs.length&&ge(e.fs[0].e)&&e.fs[0].e.q.isOne?e.fs[0].b:{k:"mul",c:te.ONE,fs:e.fs};return{coef:e.c,rest:n}}function Ne(e){let n=te.ZERO;const t=new Map,r=(e,n)=>{const r=ye(n),s=t.get(r);s?s.coef=s.coef.add(e):t.set(r,{coef:e,x:n})};for(const t of e)if("num"===t.k)n=n.add(t.q);else if("add"===t.k){n=n.add(t.c);for(const e of t.terms)r(e.coef,e.x)}else{const{coef:e,rest:n}=Oe(t);r(e,n)}const s=[...t.values()].filter(e=>!e.coef.isZero);return s.length?n.isZero&&1===s.length?Se(s[0].coef,s[0].x):(s.sort($e),{k:"add",c:n,terms:s}):pe(n)}function Ae(e,n){if(!ge(n))return e.isOne?{coef:te.ONE,fs:[]}:{coef:te.ONE,fs:[{b:pe(e),e:n}]};const t=n.q;if(t.isInteger)return{coef:e.pow(t.n),fs:[]};if(e.isZero){if(t.sign<0)throw new G("division by zero");return{coef:te.ZERO,fs:[]}}if(e.isOne)return{coef:te.ONE,fs:[]};if(e.sign<0){if(t.d%2n==1n){const{coef:r,fs:s}=Ae(e.neg(),n);return{coef:t.n%2n==0n?r:r.neg(),fs:s}}if(ue.complex&&2n===t.d){const{coef:r,fs:s}=Ae(e.neg(),n);return{coef:r,fs:[...s,{b:Te,e:pe(new te(t.n))}]}}return{coef:te.ONE,fs:[{b:pe(e),e:n}]}}if(!e.isInteger){const r=Ae(new te(e.n),n),s=Ae(new te(e.d),pe(t.neg()));return{coef:r.coef.mul(s.coef),fs:[...r.fs,...s.fs]}}const r=t.floor(),s=t.sub(r);if(BigInt(ee(e.n))*s.n>BigInt(K)||s.d>1000n)return{coef:te.ONE,fs:[{b:pe(e),e:n}]};let o=r.isZero?te.ONE:e.pow(r.n);const{outside:i,inside:a}=ie(e.n**s.n,Number(s.d));o=o.mul(new te(i));return{coef:o,fs:a>1n?[{b:pe(new te(a)),e:pe(new te(1n,s.d))}]:[]}}function Ie(e){let n=te.ONE;const t=new Map,r=(e,n)=>{const r=ye(e),s=t.get(r);s?s.e=Ne([s.e,n]):t.set(r,{b:e,e:n})};for(const t of e)if("num"===t.k)n=n.mul(t.q);else if("mul"===t.k){n=n.mul(t.c);for(const e of t.fs)r(e.b,e.e)}else r(t,de);if(n.isZero)return he;const s=[],o=new Map;for(const e of t.values())if(!ge(e.e)||!e.e.q.isZero){if("num"===e.b.k){if(ge(e.e)&&!e.e.q.isInteger&&e.b.q.sign>0&&e.b.q.isInteger){const n=e.e.q.toString(),t=o.get(n);t?t.n*=e.b.q.n:o.set(n,{n:e.b.q.n,e:e.e});continue}const t=Ae(e.b.q,e.e);n=n.mul(t.coef),s.push(...t.fs);continue}if("mul"===e.b.k&&ge(e.e)&&e.e.q.isInteger){const t=Me(e.b,e.e);"mul"===t.k?(n=n.mul(t.c),s.push(...t.fs)):"num"===t.k?n=n.mul(t.q):s.push({b:t,e:de});continue}s.push(e)}for(const{n:e,e:t}of o.values()){const r=Ae(new te(e),t);n=n.mul(r.coef),s.push(...r.fs)}if(n.isZero)return he;const i=new Map;for(const e of s){const n=ye(e.b),t=i.get(n);t?t.e=Ne([t.e,e.e]):i.set(n,{...e})}let a=[...i.values()].filter(e=>!(ge(e.e)&&e.e.q.isZero));if(ue.complex){a=a.flatMap(e=>{if(!fe(e.b)||!ge(e.e)||!e.e.q.isInteger)return[e];const t=(e.e.q.n%4n+4n)%4n;return t>=2n&&(n=n.neg()),t%2n?[{b:e.b,e:de}]:[]});const e=a.filter(e=>"add"===e.b.k&&ge(e.e)&&e.e.q.isInteger&&Ze(e.b)),t=a.some(e=>fe(e.b)),r=e.every(e=>(e.e.q.sign<0?-e.e.q.n:e.e.q.n)<=60n);if(e.length&&r&&(e.length>1||t||!e[0].e.q.isOne)){const r=a.filter(n=>!e.includes(n)&&!fe(n.b));let s=t?[Te]:[de];for(const n of e){const e=n.e.q.sign<0?Be(n.b):n.b;for(let t=0n;t<(n.e.q.sign<0?-n.e.q.n:n.e.q.n);t++)s=ze(s,nn(e))}return Ie([pe(n),Ne(s),...r.map(e=>Ee(e.b,e.e))])}}if(a.some(e=>"num"===e.b.k&&ge(e.e)&&e.e.q.compare(te.ONE)>=0))return Ie([pe(n),...a.map(e=>"num"===e.b.k?Me(e.b,e.e):{k:"mul",c:te.ONE,fs:[e]})]);if(!a.length)return pe(n);if(1===a.length&&!n.isOne&&"add"===a[0].b.k&&ge(a[0].e)&&a[0].e.q.isOne){const e=a[0].b;return Ne([pe(n.mul(e.c)),...e.terms.map(e=>Se(n.mul(e.coef),e.x))])}return n.isOne&&1===a.length&&ge(a[0].e)&&a[0].e.q.isOne?a[0].b:(a=a.sort((e,n)=>xe(e.b,e.e)-xe(n.b,n.e)||qe(ye(e.b),ye(n.b))),{k:"mul",c:n,fs:a})}function Me(e,n){if(ue.complex&&ge(n)&&n.q.isInteger){if(fe(e))return Ie([{k:"mul",c:te.ONE,fs:[{b:e,e:n}]}]);if("add"===e.k&&Ze(e)&&!n.q.isOne)return Ie([{k:"mul",c:te.ONE,fs:[{b:e,e:n}]}])}if(ge(n)){if(n.q.isZero){if(ge(e)&&e.q.isZero)throw new G("0^0 is undefined");return de}if(n.q.isOne)return e}if(ge(e)){const t=Ae(e.q,n);if(!t.fs.length)return pe(t.coef);if(t.fs.some(e=>fe(e.b)))return Ie([pe(t.coef),...t.fs.map(e=>({k:"mul",c:te.ONE,fs:[e]}))]);const r={k:"mul",c:t.coef,fs:t.fs};return t.coef.isOne&&1===t.fs.length&&ge(t.fs[0].e)&&t.fs[0].e.q.isOne?t.fs[0].b:r}if(ue.complex&&ge(n)&&2n===n.q.d&&Ze(e)){const t=De(e);if(t&&ge(t.im)&&!t.im.q.isZero){const e=e=>Me(e,pe(te.of(2))),r=Me(Ne([e(t.re),e(t.im)]),me),s=Me(Ie([Ne([r,t.re]),pe(te.HALF)]),me),o=Me(Ie([Ne([r,Ve(t.re)]),pe(te.HALF)]),me);return Me(Ne([s,Ie([pe(te.of(t.im.q.sign)),o,Te])]),pe(new te(n.q.n)))}}if("mul"===e.k){if(ge(n)&&n.q.isInteger)return Ie([pe(e.c.pow(n.q.n)),...e.fs.map(e=>Ee(e.b,Ie([e.e,n])))]);if(!e.c.isOne&&e.c.sign>0)return Ie([Me(pe(e.c),n),Me({k:"mul",c:te.ONE,fs:e.fs},n)]);if(e.c.isOne&&1===e.fs.length){const[t]=e.fs;if(ge(t.e)&&ge(n)&&1n===t.e.q.n&&t.e.q.d%2n==1n)return Ee(t.b,Ie([t.e,n]))}}return{k:"mul",c:te.ONE,fs:[{b:e,e:n}]}}function Ee(e,n){return ge(n)&&n.q.isZero?de:ge(e)?Me(e,n):ge(n)&&n.q.isOne?e:{k:"mul",c:te.ONE,fs:[{b:e,e:n}]}}const Te=ve(D("i")),je=e=>ue.complex&&Ge(e).s.split(" ").includes("i");function Ze(e){return ue.complex&&je(e)&&0===en(Ge(e)).size}function ze(e,n){const t=[];for(const r of e)for(const e of n)t.push(Ie([r,e]));return nn(Ne(t))}function De(e){const n=[],t=[];for(const r of nn(e)){const{coef:e,rest:s}=Oe(r),o=s?tn(s):[],i=o.filter(e=>fe(e)),a=o.filter(e=>!fe(e));if(a.some(e=>je(e)))return null;(i.length?t:n).push(Ie([pe(e),...a]))}return{re:Ne(n),im:Ne(t)}}function Be(e){const n=De(e);if(!n)return Me(e,pe(te.MINUS_ONE));const t=Ne([Me(n.re,pe(te.of(2))),Me(n.im,pe(te.of(2)))]);return Ie([Ne([n.re,Ie([pe(te.MINUS_ONE),n.im,Te])]),Me(t,pe(te.MINUS_ONE))])}const Ce={re:([e])=>De(e)?.re??null,im:([e])=>De(e)?.im??null,conj:([e])=>{const n=De(e);return n?Ne([n.re,Ie([pe(te.MINUS_ONE),n.im,Te])]):null},arg:([e])=>{const n=De(e);return n?We("atan2",[n.im,n.re]):null},abs:([e])=>{const n=De(e);return!n||ge(n.im)&&n.im.q.isZero?null:Me(Ne([Me(n.re,pe(te.of(2))),Me(n.im,pe(te.of(2)))]),me)}},Fe={Re:"re",re:"re",Im:"im",im:"im",conj:"conj",overline:"conj",bar:"conj",arg:"arg"},Ve=e=>Ie([pe(te.MINUS_ONE),e]),Re=(e,n)=>Ie([e,Me(n,pe(te.MINUS_ONE))]),Ue=3000n,Pe={abs:([e])=>ge(e)?pe(e.q.abs()):"mul"!==e.k||e.c.isOne?null:Ie([pe(e.c.abs()),We("abs",[Oe(e).rest])]),floor:([e])=>ge(e)?pe(e.q.floor()):null,ceil:([e])=>ge(e)?pe(e.q.ceil()):null,"!":([e])=>{if(!ge(e)||!e.q.isInteger||e.q.sign<0||e.q.n>Ue)return null;let n=1n;for(let t=2n;t<=e.q.n;t++)n*=t;return pe(new te(n))},mod:([e,n])=>ge(e)&&ge(n)&&!n.q.isZero?pe(e.q.sub(n.q.mul(e.q.div(n.q).floor()))):null,max:e=>e.every(ge)&&e.length?e.reduce((e,n)=>n.q.compare(e.q)>0?n:e):null,min:e=>e.every(ge)&&e.length?e.reduce((e,n)=>n.q.compare(e.q)<0?n:e):null,gcd:e=>e.length&&e.every(e=>ge(e)&&e.q.isInteger)?pe(new te(e.reduce((e,n)=>ne(e,n.q.n),0n))):null,log:([e,n])=>{if(!ge(e)||!ge(n)||e.q.sign<=0||n.q.sign<=0||e.q.isOne)return null;if(n.q.isOne)return he;const t=Math.log(n.q.toNumber())/Math.log(e.q.toNumber());if(!Number.isFinite(t))return null;for(let r=1;r<=12;r++){const s=Math.round(t*r);if(!(Math.abs(t*r-s)>1e-9||0===s)&&(Math.abs(s)<=256&&e.q.pow(BigInt(s)).equals(n.q.pow(BigInt(r)))))return pe(new te(BigInt(s),BigInt(r)))}return null},comb:([e,n])=>ge(e)&&ge(n)&&e.q.isInteger&&n.q.isInteger&&e.q.sign>=0&&n.q.sign>=0&&e.q.n<=Ue?pe(function(e,n){if(n>e)return te.ZERO;n>e-n&&(n=e-n);let t=1n;for(let r=1n;r<=n;r++)t=t*(e-n+r)/r;return new te(t)}(e.q.n,n.q.n)):null,perm:([e,n])=>{if(!(ge(e)&&ge(n)&&e.q.isInteger&&n.q.isInteger&&e.q.sign>=0&&n.q.sign>=0&&e.q.n<=Ue))return null;if(n.q.n>e.q.n)return he;let t=1n;for(let r=0n;r<n.q.n;r++)t*=e.q.n-r;return pe(new te(t))}};function We(e,n){if(ue.complex&&Ce[e]){const t=Ce[e](n);if(t)return t}const t=Pe[e];if(t){const e=t(n);if(e)return e}return ve(V(e,n.map(Ge)))}const Le=new Map;function _e(e){const n=ue.complex?`ℂ ${e.s}`:e.s,t=Le.get(n);if(t)return t;const r=function(e){if("num"===e.type){const n=re(e.token);if(!n)throw new G(`not an exact number: ${e.token}`);return pe(n)}if("sym"===e.type)return"π"===e.token?ve(D("pi")):ve(e);const n=e.args.map(_e);switch(e.op){case"+":return Ne(n);case"-":return((e,n)=>Ne([e,Ve(n)]))(n[0],n[1]);case"neg":return Ve(n[0]);case"*":return Ie(n);case"/":return Re(n[0],n[1]);case"^":return Me(n[0],n[1]);case"sqrt":return Me(n[0],me);case"root":return Me(n[1],Me(n[0],pe(te.MINUS_ONE)));default:{const t=e.op.startsWith("\\:")?e.op.slice(2):null;return t&&ue.complex&&Fe[t]&&1===n.length?We(Fe[t],n):t&&N(t)&&O(t).arity===n.length?We(t,n):We(e.op,n)}}}(e);return Le.size>2e4&&Le.clear(),Le.set(n,r),r}const He=e=>Ge(_e(e)),Je=e=>B(String(e));function Qe(e){return e.isInteger?Je(e.n):V("/",[Je(e.n),Je(e.d)])}const Ye=new WeakMap;function Ge(e){let n=Ye.get(e);return n||Ye.set(e,n=function(e){switch(e.k){case"num":return Qe(e.q);case"atom":return e.node;case"mul":return function(e,n){const t=[],r=[];for(const e of n)ge(e.e)&&e.e.q.sign<0?r.push(Ke(e.b,pe(e.e.q.neg()))):t.push(Ke(e.b,e.e));let s=1n!==e.n&&-1n!==e.n||!t.length?Xe([Je(e.n),...t]):Xe(t);-1n===e.n&&t.length&&(s=V("neg",[s]));1n!==e.d&&r.unshift(Je(e.d));return r.length?V("/",[s,Xe(r)]):s}(e.c,e.fs);case"add":return function(e){let n=null;const t=e=>ue.complex&&je(e.x)&&0===en(Ge(e.x)).size,r=[...e.terms.filter(e=>!t(e)),...e.terms.filter(t)],s=e.c,o=()=>{s.isZero||(n=n?s.sign<0?V("-",[n,Qe(s.neg())]):V("+",[n,Qe(s)]):Qe(s))};let i=!1;for(const e of r)!i&&t(e)&&(o(),i=!0),n=n?e.coef.sign<0?V("-",[n,Ge(Se(e.coef.neg(),e.x))]):V("+",[n,Ge(Se(e.coef,e.x))]):Ge(Se(e.coef,e.x));i||o();return n}(e);default:throw new Error(`bad form ${e.k}`)}}(e)),n}function Ke(e,n){const t=Ge(e);if(ge(n)){const e=n.q;if(e.isOne)return t;if(1n===e.n&&2n===e.d)return V("sqrt",[t]);if(1n===e.n)return V("root",[Je(e.d),t])}return V("^",[t,Ge(n)])}const Xe=e=>e.reduce((e,n)=>e?V("*",[e,n]):n,null);function en(e,n=new Set){if("sym"===e.type)ce(e.token)||n.add(e.token);else if(U(e))for(const t of e.args)en(t,n);return n}function nn(e){if("add"!==e.k)return[e];const n=e.terms.map(e=>Se(e.coef,e.x));return e.c.isZero||n.push(pe(e.c)),n}function tn(e){if("num"===e.k)return[e];if("mul"!==e.k)return[e];const n=e.c.isOne?[]:[pe(e.c)];for(const t of e.fs)n.push(Ee(t.b,t.e));return n}const rn="_",sn=new WeakMap;function on(e,n){return[...n,...O(e.op)?.arity===x?[String(e.args.length)]:[],e.op].join(" ")}function an(e,n){let t=sn.get(e);t||sn.set(e,t=new Map);const r=t.get(n);if(r)return r;const s=function(e,n){const t={key:rn,slots:[e]};if(e.type!==T||n<=0)return[t];const r=e.args.map(e=>an(e,n-1)),s=[t],o=new Array(r.length).fill(0);for(;;){const n=[],t=[];for(let e=0;e<r.length;e++){const s=r[e][o[e]];n.push(s.key);for(const e of s.slots)t.push(e)}if(s.push({key:on(e,n),slots:t}),s.length>=4096)break;let i=r.length-1;for(;i>=0&&!(++o[i]<r[i].length);i--)o[i]=0;if(i<0)break}return s}(e,n);return t.set(n,s),s}function un(e){return e.type!==T?rn:on(e,e.args.map(un))}function ln(e,n=[]){if(e.type!==T)n.push(e);else for(const t of e.args)ln(t,n);return n}const cn=new Map,fn=new Map;class pn extends Error{constructor(e){super(e),this.name="RequirementError"}}function dn(e,n,t=""){cn.set(e,{name:e,fn:n,doc:t,arity:Math.max(0,n.length-1)})}function hn(e,n,t=""){fn.set(e,{name:e,fn:n,doc:t})}function mn(e){return cn.get(e)||null}function gn(e){return fn.get(e)||null}const vn=e=>e.type===M;function bn(e,n){return e.type===T&&(e.op===n||e.args.some(e=>bn(e,n)))}dn("always",()=>!0,"matches anything"),dn("never",()=>!1,"matches nothing"),dn("isLeaf",e=>e.type!==T,"a bare operand, not an operation"),dn("isCompound",e=>e.type===T,"an operation, not a bare operand"),dn("isSymbol",e=>e.type===E,"a non-numeric operand such as x"),dn("isOperation",(e,n)=>e.type===T&&e.op===n,"is this specific operation"),dn("notOperation",(e,n)=>!(e.type===T&&e.op===n),"is anything except this operation"),dn("isNumber",vn,"a numeric literal"),dn("isInteger",e=>vn(e)&&Number.isInteger(e.value),"a whole number"),dn("isPositive",e=>vn(e)&&e.value>0,"greater than zero"),dn("isNegative",e=>vn(e)&&e.value<0,"less than zero"),dn("isNonNegative",e=>vn(e)&&e.value>=0,"zero or greater"),dn("isZero",e=>vn(e)&&0===e.value,"exactly 0"),dn("isOne",e=>vn(e)&&1===e.value,"exactly 1"),dn("isNonZero",e=>vn(e)&&0!==e.value,"a number that is provably not 0"),dn("isNotZeroLiteral",e=>!(vn(e)&&0===e.value),"anything except a literal 0"),dn("isPositiveInteger",e=>vn(e)&&Number.isInteger(e.value)&&e.value>0,"a whole number above 0"),dn("isNegativeInteger",e=>vn(e)&&Number.isInteger(e.value)&&e.value<0,"a whole number below 0"),dn("isEven",e=>vn(e)&&Number.isInteger(e.value)&&e.value%2==0,"a whole even number"),dn("isOdd",e=>vn(e)&&Number.isInteger(e.value)&&1===Math.abs(e.value%2),"a whole odd number"),dn("greaterThan",(e,n)=>vn(e)&&e.value>Number(n),"above a given value"),dn("lessThan",(e,n)=>vn(e)&&e.value<Number(n),"below a given value"),dn("isValue",(e,n)=>vn(e)&&e.value===Number(n),"equals a given number"),dn("isNumeric",J,"contains no symbols: a constant (it need not fold to a number: 1 sin)"),dn("hasSymbol",e=>!J(e),"mentions a symbol somewhere, so it is not just a number"),dn("isVar",(e,n)=>e.type===E&&e.token===String(n),"is exactly this symbol"),dn("contains",(e,n)=>H(e).includes(String(n)),"mentions this operand somewhere"),dn("isFree",(e,n)=>!H(e).includes(String(n)),"never mentions this operand"),dn("hasOperation",(e,n)=>bn(e,String(n)),"uses this operation somewhere inside"),dn("equals",(e,n)=>e.s===String(n),"is exactly this postfix expression");const yn=e=>e.type===T?null:e.token;function wn(e){if("string"==typeof e)return{name:e,args:[]};if(Array.isArray(e)&&e.length>0&&"string"==typeof e[0])return{name:e[0],args:e.slice(1)};throw new pn(`bad requirement: ${JSON.stringify(e)}`)}hn("freeOf",(e,n)=>{const t=yn(n);return null!==t&&!H(e).includes(t)},"the first operand never mentions the second"),hn("dependsOn",(e,n)=>{const t=yn(n);return null!==t&&H(e).includes(t)},"the first operand does mention the second"),hn("sameAs",(...e)=>e.every(n=>n.s===e[0].s),"these operands are structurally identical"),hn("differs",(...e)=>new Set(e.map(e=>e.s)).size===e.length,"these operands are all different"),hn("sameValue",(...e)=>e.every(e=>vn(e))&&e.every(n=>n.value===e[0].value),"these operands are the same number");const xn="simplify";class qn extends Error{constructor(e,n){super(n?`rule "${n}": ${e}`:e),this.name="RuleError",this.ruleId=n}}const kn=/^[A-Za-z_][A-Za-z0-9_]*$/;function $n(e,n){if(R(e))return{literal:e.value};const t=e.token;if(t.startsWith("=")){const e=t.slice(1);if(""===e)throw new qn('"=" needs an operand after it',n);return{token:e}}if(!kn.test(t))throw new qn(`"${t}" is not a usable slot name; use letters, digits and _`,n);if(N(t))throw new qn(`slot name "${t}" collides with an operator`,n);return{name:t}}function Sn(e){if(!U(e))return[e];const n=e.args.map(Sn),t=O(e.op),r=[];for(const s of function(e){let n=[[]];for(const t of e){const e=[];for(const r of n)for(const n of t)e.push(r.concat([n]));if(n=e,n.length>64)return n.slice(0,64)}return n}(n))if(r.push(V(e.op,s)),t.commutative&&2===s.length&&s[0].s!==s[1].s&&r.push(V(e.op,[s[1],s[0]])),r.length>=64)break;return r}function On(e,n=[]){return"op"===e.kind?e.args.forEach(e=>On(e,n)):"const"===e.kind&&e.free&&n.push(e.node.token),n}function Nn(e){if(!e||"object"!=typeof e)throw new qn("rule must be a mapping");const n=e.id||e.name;if(!n)throw new qn("rule needs an id");if(!e.pattern)throw new qn("rule needs a pattern",n);if(void 0===e.output||null===e.output)throw new qn("rule needs an output",n);let t;try{t=P(String(e.pattern))}catch(e){if(e instanceof Z)throw new qn(`bad pattern: ${e.message}`,n);throw e}const r=ln(t).map(e=>$n(e,n)),s=new Set(r.filter(e=>e.name).map(e=>e.name)),o=function(e,n,t){const r=[],s=e.when||{};if("object"!=typeof s||Array.isArray(s))throw new qn('"when" must map slot names to lists of requirements',t);for(const[e,o]of Object.entries(s)){if(!n.has(e))throw new qn(`"when" mentions "${e}", which is not a slot in the pattern`,t);const s=Array.isArray(o)?o:[o];for(const n of s){const{name:s,args:o}=wn(n),i=mn(s);if(!i)throw new qn(`unknown requirement "${s}"`,t);r.push({slot:e,name:s,args:o,fn:i.fn})}}return r}(e,s,n),i=function(e,n,t){const r=[],s=e.require||[];if(!Array.isArray(s))throw new qn('"require" must be a list of relations',t);for(const e of s){const{name:s,args:o}=wn(e),i=gn(s);if(!i)throw new qn(`unknown relation "${s}"`,t);if(o.length<2)throw new qn(`relation "${s}" needs at least two operands`,t);for(const e of o)if("string"==typeof e&&!n.has(e)&&kn.test(e))throw new qn(`relation "${s}" mentions "${e}", which is not a slot in the pattern`,t);r.push({name:s,args:o,fn:i.fn})}return r}(e,s,n),a=function(e,n,t){let r;try{r=P(e)}catch(n){throw new qn(`bad output "${e}": ${n.message}`,t)}const s=e=>U(e)?{kind:"op",op:e.op,args:e.args.map(s)}:R(e)?{kind:"const",node:e}:n.has(e.token)?{kind:"slot",name:e.token}:e.token.startsWith("=")?{kind:"const",node:D(e.token.slice(1))}:{kind:"const",node:e,free:!0};return s(r)}(String(e.output),s,n),u=e.commutative?Sn(t):[t],l=[],c=new Set;for(const e of u){const t=un(e),r=ln(e).map(e=>$n(e,n)),s=t+"\0"+r.map(e=>e.name??(void 0!==e.literal?`#${e.literal}`:`=${e.token}`)).join(",");c.has(s)||(c.add(s),l.push({key:t,slots:r}))}const f={id:String(n),name:e.name?String(e.name):String(n),pattern:String(e.pattern),patternTree:t,output:String(e.output),outputTemplate:a,explain:e.explain?String(e.explain).trim():"",mode:e.mode?String(e.mode):xn,tags:Array.isArray(e.tags)?e.tags.map(String):[],priority:Number.isFinite(e.priority)?e.priority:0,fold:!!e.fold,commutative:!!e.commutative,enabled:void 0===e.enabled||!!e.enabled,when:o,require:i,slots:[...s],depth:L(t),bindings:l,freeSymbols:On(a),source:e};for(const e of l)e.rule=f;return f}function An(e){const n={};for(const t of e.when)(n[t.slot]||=[]).push(t.args.length?[t.name,...t.args]:t.name);const t={id:e.id};return e.name!==e.id&&(t.name=e.name),e.mode!==xn&&(t.mode=e.mode),t.pattern=e.pattern,Object.keys(n).length&&(t.when=n),e.require.length&&(t.require=e.require.map(e=>[e.name,...e.args])),t.output=e.output,e.explain&&(t.explain=e.explain),e.fold&&(t.fold=!0),e.commutative&&(t.commutative=!0),e.priority&&(t.priority=e.priority),e.tags.length&&(t.tags=e.tags),e.enabled||(t.enabled=!1),t}class In extends Error{constructor(e,n){super(null==n?e:`${e} (line ${n+1})`),this.name="YamlError",this.line=n}}class Mn{constructor(e){this.records=e,this.i=0,this.pushed=[]}peek(){if(this.pushed.length)return this.pushed[this.pushed.length-1];for(;this.i<this.records.length&&this.records[this.i].blank;)this.i++;return this.i<this.records.length?this.records[this.i]:null}next(){if(this.pushed.length)return this.pushed.pop();const e=this.peek();return e&&this.i++,e}push(e){this.pushed.push(e)}}const En=e=>"-"===e||e.startsWith("- ");function Tn(e){let n=null,t=0;for(let r=0;r<e.length;r++){const s=e[r];if(n)s===n?"'"===n&&"'"===e[r+1]?r++:n=null:'"'===n&&"\\"===s&&r++;else if('"'===s||"'"===s)n=s;else if("["===s||"{"===s)t++;else if("]"===s||"}"===s)t--;else if(":"===s&&0===t&&(r+1===e.length||" "===e[r+1])){const n=e.slice(0,r).trim();return""===n?null:{key:jn(n),rest:e.slice(r+1).trim()}}}return null}function jn(e){return e.length>=2&&'"'===e[0]&&'"'===e[e.length-1]?JSON.parse(e):e.length>=2&&"'"===e[0]&&"'"===e[e.length-1]?e.slice(1,-1).replace(/''/g,"'"):e}function Zn(e){const n=new Mn(function(e){return String(e).split(/\r?\n/).map((e,n)=>{const t=e.search(/\S/);if(-1===t)return{raw:e,n:n,indent:0,text:"",blank:!0};const r=function(e){let n=null;for(let t=0;t<e.length;t++){const r=e[t];if(n)r===n?"'"===n&&"'"===e[t+1]?t++:n=null:'"'===n&&"\\"===r&&t++;else if('"'===r||"'"===r)n=r;else if("#"===r&&(0===t||/\s/.test(e[t-1])))return e.slice(0,t)}return e}(e.slice(t)).trimEnd();return{raw:e,n:n,indent:t,text:r,blank:""===r}})}(e));let t=n.peek();if(t&&"---"===t.text&&(n.next(),t=n.peek()),!t)return null;const r=Dn(n,t.indent),s=n.peek();if(s&&"..."!==s.text&&"---"!==s.text)throw new In(`unexpected content "${s.text}"`,s.n);return r}const zn=/^[|>][-+]?\d*$/;function Dn(e,n){const t=e.peek();return!t||t.indent<n?null:En(t.text)?Bn(e,t.indent):Tn(t.text)?function(e,n){const t={};for(;;){const r=e.peek();if(!r||r.indent!==n)break;const s=Tn(r.text);if(!s)break;e.next();const{key:o,rest:i}=s;if(""===i){const r=e.peek();r&&r.indent>n?t[o]=Dn(e,r.indent):r&&r.indent===n&&En(r.text)?t[o]=Bn(e,n):t[o]=null}else zn.test(i)?t[o]=Cn(e,i,n):t[o]=Fn(i,r.n)}return t}(e,t.indent):(e.next(),zn.test(t.text)?Cn(e,t.text,t.indent-1):Fn(t.text,t.n))}function Bn(e,n){const t=[];for(;;){const r=e.peek();if(!r||r.indent!==n||!En(r.text))break;if(e.next(),"-"===r.text){const r=e.peek();t.push(r&&r.indent>n?Dn(e,r.indent):null);continue}if(zn.test(r.text.slice(2).trim())){t.push(Cn(e,r.text.slice(2).trim(),n));continue}const s=r.text.slice(2),o=n+2+(s.length-s.trimStart().length);e.push({raw:r.raw,n:r.n,indent:o,text:s.trim(),blank:!1}),t.push(Dn(e,o))}return t}function Cn(e,n,t){const r=n[0],s=(n.match(/[-+]/)||[""])[0],o=(n.match(/\d+/)||[null])[0];let i=o?t+Number(o):null;const a=[];for(;e.i<e.records.length;){const n=e.records[e.i];if(""===n.raw.trim()){a.push(""),e.i++;continue}const r=n.raw.search(/\S/);if(r<=t)break;if(null===i&&(i=r),r<i)break;a.push(n.raw.slice(i)),e.i++}for(;a.length&&""===a[a.length-1];)a.pop();let u;if("|"===r)u=a.join("\n");else{const e=[];for(const n of a)""===n?e.push("\n"):e.length&&"\n"!==e[e.length-1]?e[e.length-1]+=" "+n:e.push(n);u=e.join("").replace(/\n(?!$)/g,"\n")}return"-"===s?u:"+"===s?u+"\n":""===u?"":u+"\n"}function Fn(e,n){const t=e.trim();return""===t||"~"===t||"null"===t||"Null"===t||"NULL"===t?null:"true"===t||"True"===t||"TRUE"===t||"false"!==t&&"False"!==t&&"FALSE"!==t&&("["===t[0]||"{"===t[0]?function(e,n){const t={text:e,i:0,line:n},r=Rn(t);if(Vn(t),t.i<t.text.length)throw new In(`unexpected "${t.text.slice(t.i)}" in flow value`,n);return r}(t,n):'"'===t[0]||"'"===t[0]?jn(t):/^[-+]?(\d+\.?\d*|\.\d+)([eE][-+]?\d+)?$/.test(t)?Number(t):t)}const Vn=e=>{for(;e.i<e.text.length&&/\s/.test(e.text[e.i]);)e.i++};function Rn(e){Vn(e);const n=e.text[e.i];return"["===n?function(e){e.i++;const n=[];for(;;){if(Vn(e),e.i>=e.text.length)throw new In("unterminated [",e.line);if("]"===e.text[e.i])return e.i++,n;if(n.push(Rn(e)),Vn(e),","===e.text[e.i])e.i++;else if("]"!==e.text[e.i])throw new In(`expected , or ] near "${e.text.slice(e.i)}"`,e.line)}}(e):"{"===n?function(e){e.i++;const n={};for(;;){if(Vn(e),e.i>=e.text.length)throw new In("unterminated {",e.line);if("}"===e.text[e.i])return e.i++,n;const t=String(Rn(e));if(Vn(e),":"!==e.text[e.i])throw new In(`expected : after "${t}"`,e.line);if(e.i++,n[t]=Rn(e),Vn(e),","===e.text[e.i])e.i++;else if("}"!==e.text[e.i])throw new In(`expected , or } near "${e.text.slice(e.i)}"`,e.line)}}(e):Fn(function(e){const n=e.text[e.i];if('"'===n||"'"===n){const t=e.i;for(e.i++;e.i<e.text.length;)if("\\"===e.text[e.i]&&'"'===n)e.i+=2;else if(e.text[e.i]===n){if("'"!==n||"'"!==e.text[e.i+1])return e.i++,e.text.slice(t,e.i);e.i+=2}else e.i++;throw new In("unterminated quoted string",e.line)}const t=e.i;for(;e.i<e.text.length;){const n=e.text[e.i];if(","===n||"]"===n||"}"===n)break;if(":"===n){const n=e.text[e.i+1];if(void 0===n||/[\s,\]}]/.test(n))break}e.i++}return e.text.slice(t,e.i).trim()}(e),e.line)}const Un=/^(true|false|null|yes|no|on|off|~)$/i;function Pn(e){if(null==e)return"null";if("boolean"==typeof e)return e?"true":"false";if("number"==typeof e){if(!Number.isFinite(e))throw new In(`cannot serialise ${e}`);return String(e)}const n=String(e);return function(e){return!!(""===e||/^\s|\s$/.test(e)||/[\u0000-\u001f\u007f]/.test(e)||/^[-?:,[\]{}#&*!|>'"%@`]/.test(e)||/: |\s#/.test(e)||Un.test(e)||/^[-+]?(\d+\.?\d*|\.\d+)([eE][-+]?\d+)?$/.test(e))}(n)?JSON.stringify(n):n}const Wn=e=>null==e||"object"!=typeof e;function Ln(e){return Array.isArray(e)?`[${e.map(Ln).join(", ")}]`:e&&"object"==typeof e?`{${Object.entries(e).map(([e,n])=>`${Pn(e)}: ${Ln(n)}`).join(", ")}}`:Pn(e)}function _n(e){return Array.isArray(e)?!!e.every(e=>Wn(e)||Array.isArray(e)&&e.every(Wn))&&Ln(e).length<=72:!(!e||"object"!=typeof e)&&(Object.values(e).every(e=>Wn(e)||Array.isArray(e)&&e.every(Wn))&&Ln(e).length<=72)}function Hn(e){const n=[];return Jn(e,0,n),n.length?n.join("\n")+"\n":""}function Jn(e,n,t){const r=" ".repeat(n);if(Array.isArray(e)){if(0===e.length)return void t.push(r+"[]");for(const r of e)Qn(r,n,t)}else{if(e&&"object"==typeof e){const s=Object.entries(e).filter(([,e])=>void 0!==e);if(0===s.length)return void t.push(r+"{}");for(const[e,r]of s)Yn(e,r,n,t);return}!function(e,n,t){if("string"==typeof e&&e.includes("\n")){t.push(n+"|-");for(const r of e.replace(/\n+$/,"").split("\n"))t.push(n+"  "+r);return}t.push(n+Pn(e))}(e,r,t)}}function Qn(e,n,t){const r=" ".repeat(n);if(null!==e&&"object"==typeof e&&!_n(e)){const s=[];if(Jn(e,n+2,s),0===s.length)return void t.push(r+"-");t.push(r+"- "+s[0].slice(n+2));for(let e=1;e<s.length;e++)t.push(s[e]);return}if(null===e||"object"!=typeof e)if("string"==typeof e&&e.includes("\n")){t.push(r+"- |-");for(const r of e.replace(/\n+$/,"").split("\n"))t.push(" ".repeat(n+4)+r)}else t.push(r+"- "+Pn(e));else t.push(r+"- "+Ln(e))}function Yn(e,n,t,r){const s=" ".repeat(t),o=Pn(e);if("string"==typeof n&&n.includes("\n")){r.push(`${s}${o}: |-`);for(const e of n.replace(/\n+$/,"").split("\n"))r.push(" ".repeat(t+2)+e)}else{if(null!==n&&"object"==typeof n)return _n(n)?void r.push(`${s}${o}: ${Ln(n)}`):(r.push(`${s}${o}:`),void Jn(n,Array.isArray(n)?t:t+2,r));r.push(`${s}${o}: ${Pn(n)}`)}}class Gn{constructor(e=[]){this.index=new Map,this.rules=[],this.maxDepth=0,this.name="",this.views=new Map;for(const n of e)this.add(n)}add(e){const n=e&&e.bindings?e:Nn(e);if(this.rules.some(e=>e.id===n.id))throw new qn(`duplicate rule id "${n.id}"`);return this.rules.push(n),n.enabled&&this.link(n),n.depth>this.maxDepth&&(this.maxDepth=n.depth),this.views.clear(),n}view(e){if(!e)return this;let n=this.views.get(e);return n||(n=new Gn(this.rules.filter(n=>n.mode===e)),n.name=this.name,this.views.set(e,n)),n}modes(){return[...new Set(this.rules.map(e=>e.mode))].sort((e,n)=>e===xn?-1:n===xn?1:e.localeCompare(n))}link(e){for(const n of e.bindings){let e=this.index.get(n.key);e||this.index.set(n.key,e=[]),e.push(n),e.sort((e,n)=>n.rule.priority-e.rule.priority||n.rule.depth-e.rule.depth)}}remove(e){const n=this.rules.findIndex(n=>n.id===e);return-1!==n&&(this.rules.splice(n,1),this.reindex(),!0)}setEnabled(e,n){const t=this.get(e);return!!t&&(t.enabled=!!n,this.reindex(),!0)}reindex(){this.index=new Map,this.maxDepth=0,this.views.clear();for(const e of this.rules)e.enabled&&this.link(e),e.depth>this.maxDepth&&(this.maxDepth=e.depth)}get(e){return this.rules.find(n=>n.id===e)||null}candidates(e){return this.index.get(e)||null}get size(){return this.rules.length}static fromYaml(e,{strict:n=!0}={}){const t=Zn(e);return Gn.fromSpecs(t,{strict:n})}static fromSpecs(e,{strict:n=!0}={}){let t=e,r="";if(e&&!Array.isArray(e)&&"object"==typeof e&&(t=e.rules,r=e.name?String(e.name):""),!Array.isArray(t))throw new qn('expected a list of rules, or a mapping with a "rules" list');const s=new Gn;s.name=r;const o=[];for(let e=0;e<t.length;e++)try{s.add(t[e])}catch(n){o.push(`#${e+1}: ${n.message}`)}if(o.length&&n)throw new qn(`${o.length} rule(s) failed to compile:\n  ${o.join("\n  ")}`);return s.errors=o,s}toSpecs(){return this.rules.map(An)}toYaml(){const e=this.toSpecs();return this.name?Hn({name:this.name,rules:e}):Hn(e)}keyReport(){return[...this.index.entries()].map(([e,n])=>({key:e,rules:n.map(e=>e.rule.id)})).sort((e,n)=>e.key.localeCompare(n.key))}}function Kn(e,n){const t=Object.create(null),r=e.slots;for(let e=0;e<r.length;e++){const s=r[e],o=n[e];if(void 0!==s.literal){if(!R(o)||o.value!==s.literal)return null;continue}if(void 0!==s.token){if(o.s!==s.token)return null;continue}const i=t[s.name];if(void 0!==i){if(i.s!==o.s)return null}else t[s.name]=o}return t}function Xn(e,n){for(const t of e.when){const e=n[t.slot];if(void 0===e)return!1;if(!t.fn(e,...t.args))return!1}for(const t of e.require){const e=t.args.map(e=>void 0!==n[e]?n[e]:e);if(!t.fn(...e))return!1}return!0}function et(e,n){return n.rule.priority-e.rule.priority||n.rule.depth-e.rule.depth}function nt(e,n){const t=[];if(0===n.maxDepth)return t;for(const{key:r,slots:s}of function(e,n){const t=an(e,n),r=[];for(const e of t)e.key!==rn&&r.push(e);return r}(e,n.maxDepth)){const e=n.candidates(r);if(e)for(const n of e){const e=Kn(n,s);e&&(Xn(n.rule,e)&&t.push({rule:n.rule,binding:n,key:r,bound:e}))}}return t.sort(et)}function tt(e,n){switch(e.kind){case"slot":{const t=n[e.name];if(!t)throw new Error(`output references unbound slot "${e.name}"`);return t}case"const":return e.node;case"op":return V(e.op,e.args.map(e=>tt(e,n)));default:throw new Error(`bad output template: ${JSON.stringify(e)}`)}}const rt=4e5,st=()=>new G("a number too large to approximate"),ot=e=>e<0n?-e:e;class it{constructor(e){this.P=e,this.S=10n**BigInt(e),this.cache=new Map}fromQ(e){return e.n*this.S/e.d}mul(e,n){return e*n/this.S}div(e,n){if(0n===n)throw new G("division by zero");return e*this.S/n}sqrt(e){if(e<0n)throw new G("the square root of a negative number is not real");return se(e*this.S,2)}series(e,n){let t=0n,r=e;for(let e=1;0n!==r;e++)if(t+=r,r=n(r,e),e>1e5)throw new G("a series did not converge");return t}atanhInv(e){const n=BigInt(e),t=n*n;let r=this.S/n,s=0n;for(let e=1n;0n!==r;e+=2n)s+=r/e,r/=t;return s}atanInv(e){const n=BigInt(e),t=n*n;let r=this.S/n,s=0n;for(let e=1n,n=1n;0n!==r;e+=2n,n=-n)s+=n*r/e,r/=t;return s}get pi(){return this.memo("pi",()=>16n*this.atanInv(5)-4n*this.atanInv(239))}get ln2(){return this.memo("ln2",()=>2n*this.atanhInv(3))}get e(){return this.memo("e",()=>this.exp(this.S))}memo(e,n){return this.cache.has(e)||this.cache.set(e,n()),this.cache.get(e)}exp(e){const n=(e+(e>=0n?this.ln2/2n:-this.ln2/2n))/this.ln2;if(n>BigInt(rt))throw st();if(n<-BigInt(rt))return 0n;const t=e-n*this.ln2,r=this.series(this.S,(e,n)=>e*t/this.S/BigInt(n));return n>=0n?r<<n:r>>-n}ln(e){if(e<=0n)throw new G("the log of a number that is not positive is not real");let n=0n,t=e;for(;t>=this.S;)t>>=1n,n++;for(;t<this.S/2n;)t<<=1n,n--;const r=this.div(t-this.S,t+this.S),s=this.mul(r,r);let o=r,i=0n;for(let e=1n;0n!==o;e+=2n)i+=o/e,o=this.mul(o,s);return 2n*i+n*this.ln2}sin(e){const n=2n*this.pi;let t=e%n;t>this.pi&&(t-=n),t<-this.pi&&(t+=n);const r=this.mul(t,t);return this.series(t,(e,n)=>-e*r/this.S/BigInt(2*n*(2*n+1)))}cos(e){return this.sin(e+this.pi/2n)}atan(e){if(ot(e)>this.S){const n=this.pi/2n;return(e>0n?n:-n)-this.atan(this.div(this.S,e))}let n=e;for(let e=0;e<2;e++)n=this.div(n,this.S+this.sqrt(this.S+this.mul(n,n)));const t=this.mul(n,n);let r=n,s=0n;for(let e=1n,n=1n;0n!==r;e+=2n,n=-n)s+=n*r/e,r=this.mul(r,t);return 4n*s}asin(e){if(ot(e)>this.S)throw new G("arcsin of a number beyond ±1 is not real");return ot(e)===this.S?e>0n?this.pi/2n:-this.pi/2n:this.atan(this.div(e,this.sqrt(this.S-this.mul(e,e))))}}function at(e,n,t){if(t>0n)return e.atan(e.div(n,t));if(t<0n)return e.atan(e.div(n,t))+(n>=0n?e.pi:-e.pi);if(0n===n)throw new G("the argument of 0 is undefined");return n>0n?e.pi/2n:-e.pi/2n}const ut={add:(e,n)=>[e[0]+n[0],e[1]+n[1]],sub:(e,n)=>[e[0]-n[0],e[1]-n[1]],mul:(e,n,t)=>[e.mul(n[0],t[0])-e.mul(n[1],t[1]),e.mul(n[0],t[1])+e.mul(n[1],t[0])],div(e,n,t){const r=e.mul(t[0],t[0])+e.mul(t[1],t[1]);if(0n===r)throw new G("division by zero");return[e.div(e.mul(n[0],t[0])+e.mul(n[1],t[1]),r),e.div(e.mul(n[1],t[0])-e.mul(n[0],t[1]),r)]},abs:(e,n)=>e.sqrt(e.mul(n[0],n[0])+e.mul(n[1],n[1])),exp(e,n){const t=e.exp(n[0]);return[e.mul(t,e.cos(n[1])),e.mul(t,e.sin(n[1]))]},ln(e,n){const t=ut.abs(e,n);if(0n===t)throw new G("the log of 0 is undefined");return[e.ln(t),at(e,n[1],n[0])]},pow(e,n,t,r){if(0n===n[0]&&0n===n[1])return[0n,0n];if(r&&r.isInteger){let t=r.n<0n?-r.n:r.n,s=[e.S,0n],o=n;for(;t>0n;)1n&t&&(s=ut.mul(e,s,o)),o=ut.mul(e,o,o),t>>=1n;return r.n<0n?ut.div(e,[e.S,0n],s):s}return ut.exp(e,ut.mul(e,t,ut.ln(e,n)))},sinh:(e,n)=>(e.exp(n)-e.exp(-n))/2n,cosh:(e,n)=>(e.exp(n)+e.exp(-n))/2n},lt={sin:(e,[n,t])=>[e.mul(e.sin(n),ut.cosh(e,t)),e.mul(e.cos(n),ut.sinh(e,t))],cos:(e,[n,t])=>[e.mul(e.cos(n),ut.cosh(e,t)),-e.mul(e.sin(n),ut.sinh(e,t))],tan:(e,n)=>ut.div(e,lt.sin(e,n),lt.cos(e,n)),ln:(e,n)=>ut.ln(e,n),sqrt:(e,n)=>ut.exp(e,ut.mul(e,[e.S/2n,0n],ut.ln(e,n))),sinh:(e,[n,t])=>[e.mul(ut.sinh(e,n),e.cos(t)),e.mul(ut.cosh(e,n),e.sin(t))],cosh:(e,[n,t])=>[e.mul(ut.cosh(e,n),e.cos(t)),e.mul(ut.sinh(e,n),e.sin(t))]},ct=e=>({q:e}),ft=([e,n])=>0n===n?{f:e}:{z:[e,n]};function pt(e,n,t){const r=e=>((e,n)=>n.z??[dt(e,n),0n])(t,n[e]);switch(e.op){case"+":return ft(ut.add(r(0),r(1)));case"-":return ft(ut.sub(r(0),r(1)));case"neg":return ft([-r(0)[0],-r(0)[1]]);case"*":return ft(ut.mul(t,r(0),r(1)));case"/":return ft(ut.div(t,r(0),r(1)));case"^":return ft(ut.pow(t,r(0),r(1),n[1].q));case"sqrt":return ft(lt.sqrt(t,r(0)));case"root":return ft(ut.pow(t,r(1),ut.div(t,[t.S,0n],r(0)),n[0].q?.inv()));case"abs":return{f:ut.abs(t,r(0))};case"arg":return{f:at(t,r(0)[1],r(0)[0])};case"re":return{f:r(0)[0]};case"im":return{f:r(0)[1]};case"conj":return ft([r(0)[0],-r(0)[1]]);case"log":return ft(ut.div(t,ut.ln(t,r(1)),ut.ln(t,r(0))));default:{const s=lt[e.op];if(!s||1!==n.length)throw new G(`no complex value for ${e.op}`);return ft(s(t,r(0)))}}}function dt(e,n){return n.q?e.fromQ(n.q):n.f}const ht={sin:(e,n)=>e.sin(n),cos:(e,n)=>e.cos(n),tan:(e,n)=>e.div(e.sin(n),e.cos(n)),sec:(e,n)=>e.div(e.S,e.cos(n)),csc:(e,n)=>e.div(e.S,e.sin(n)),cot:(e,n)=>e.div(e.cos(n),e.sin(n)),arcsin:(e,n)=>e.asin(n),arccos:(e,n)=>e.pi/2n-e.asin(n),arctan:(e,n)=>e.atan(n),sinh:(e,n)=>(e.exp(n)-e.exp(-n))/2n,cosh:(e,n)=>(e.exp(n)+e.exp(-n))/2n,tanh:(e,n)=>{const t=e.exp(n),r=e.exp(-n);return e.div(t-r,t+r)},arcsinh:(e,n)=>e.ln(n+e.sqrt(e.mul(n,n)+e.S)),arccosh:(e,n)=>{if(n<e.S)throw new G("arccosh of a number below 1 is not real");return e.ln(n+e.sqrt(e.mul(n,n)-e.S))},arctanh:(e,n)=>{if(ot(n)>=e.S)throw new G("arctanh of a number beyond ±1 is not real");return e.ln(e.div(e.S+n,e.S-n))/2n},ln:(e,n)=>e.ln(n),loglog:(e,n)=>e.ln(e.ln(n)),logloglog:(e,n)=>e.ln(e.ln(e.ln(n))),expm1:(e,n)=>e.exp(n)-e.S};function mt(e,n,t){if("num"===e.type)return ct(re(e.token));if("sym"===e.type){if("pi"===e.token||"π"===e.token)return{f:n.pi};if("e"===e.token)return{f:n.e};if("i"===e.token&&ue.complex)return{z:[0n,n.S]};if(t&&e.token in t){const n=t[e.token],r="number"==typeof n||"string"==typeof n||"bigint"==typeof n?re(String(n)):null;if(!r)throw new G(`the value of ${e.token} is not a number`);return ct(r)}throw new G(`${e.token} has no value`)}ue.complex&&e.op.startsWith("\\:")&&Fe[e.op.slice(2)]&&(e=V(Fe[e.op.slice(2)],e.args));const r=e.args.map(e=>mt(e,n,t));if(r.some(e=>e.z)||["re","im","conj","arg"].includes(e.op)||function(e,n){if(!ue.complex)return!1;const t=e=>e.q?e.q.sign<0:void 0!==e.f&&e.f<0n;return"sqrt"===e.op||"ln"===e.op||"log"===e.op?t(n["log"===e.op?1:0])||"log"===e.op&&t(n[0]):"^"===e.op?t(n[0])&&!(n[1].q&&n[1].q.d%2n==1n):"root"===e.op&&t(n[1])&&!(n[0].q&&n[0].q.isInteger&&n[0].q.n%2n==1n)}(e,r))return pt(e,r,n);const s=r.every(e=>e.q),o=e=>dt(n,r[e]);switch(e.op){case"+":return s?ct(r[0].q.add(r[1].q)):{f:o(0)+o(1)};case"-":return s?ct(r[0].q.sub(r[1].q)):{f:o(0)-o(1)};case"neg":return r[0].q?ct(r[0].q.neg()):{f:-r[0].f};case"*":return s?ct(r[0].q.mul(r[1].q)):{f:n.mul(o(0),o(1))};case"/":return s?ct(r[0].q.div(r[1].q)):{f:n.div(o(0),o(1))};case"^":return vt(n,r[0],r[1]);case"sqrt":return vt(n,r[0],ct(te.HALF));case"root":return vt(n,r[1],r[0].q?ct(r[0].q.inv()):{f:n.div(n.S,r[0].f)});case"abs":return r[0].q?ct(r[0].q.abs()):{f:ot(r[0].f)};case"floor":return ct(r[0].q?r[0].q.floor():new te(gt(r[0].f,n.S)));case"ceil":return ct(r[0].q?r[0].q.ceil():new te(-gt(-r[0].f,n.S)));case"log":return{f:n.div(n.ln(o(1)),n.ln(o(0)))};case"atan2":return{f:at(n,o(0),o(1))};case"max":case"min":if(!r.length)throw new G(`${e.op} of nothing`);return s?ct(r.map(e=>e.q).reduce((n,t)=>("max"===e.op?t.sub(n).sign>0:t.sub(n).sign<0)?t:n)):{f:r.map((e,n)=>o(n)).reduce((n,t)=>"max"===e.op?t>n?t:n:t<n?t:n)};case"sum":return s?ct(r.reduce((e,n)=>e.add(n.q),te.ZERO)):{f:r.reduce((e,n,t)=>e+o(t),0n)};case"prod":return s?ct(r.reduce((e,n)=>e.mul(n.q),te.ONE)):{f:r.reduce((e,t,r)=>n.mul(e,o(r)),n.S)};case"mean":if(!r.length)throw new G("mean of nothing");return s?ct(r.reduce((e,n)=>e.add(n.q),te.ZERO).div(new te(BigInt(r.length)))):{f:r.reduce((e,n,t)=>e+o(t),0n)/BigInt(r.length)};case"mod":{if(s){if(r[1].q.isZero)throw new G("mod 0 is undefined");return ct(r[0].q.sub(r[1].q.mul(r[0].q.div(r[1].q).floor())))}const e=o(1);if(0n===e)throw new G("mod 0 is undefined");return{f:o(0)-n.mul(e,gt(n.div(o(0),e),n.S)*n.S)}}case"round":{if(!r[1].q?.isInteger)throw new G("round needs a whole number of places");const e=10n**ot(r[1].q.n),t=r[0].q??new te(o(0),n.S),s=r[1].q.sign>=0,i=(s?t.mul(new te(e)):t.div(new te(e))).add(te.HALF).floor();return ct(s?i.div(new te(e)):i.mul(new te(e)))}case"!":{if(!r[0].q?.isInteger||r[0].q.sign<0)throw new G("factorial is only worked out for whole numbers");let e=1n;for(let n=2n;n<=r[0].q.n;n++)if(e*=n,0n==(255n&n)&&ee(e)>rt)throw st();return ct(new te(e))}default:{const t=ht[e.op];if(!t||1!==r.length)throw new G(`no numeric value for ${e.op}`);return{f:t(n,o(0))}}}}const gt=(e,n)=>{const t=e/n;return e<0n&&t*n!==e?t-1n:t};function vt(e,n,t){if(t.q&&t.q.isInteger){if(n.q)return ct(n.q.pow(t.q.n));let r=t.q.n;const s=r<0n;s&&(r=-r);let o=e.S,i=n.f;for(;r>0n;){if(1n&r&&(o=e.mul(o,i)),i=e.mul(i,i),ee(o)>rt+4*e.P||ee(i)>8e5){if(s)return{f:0n};throw st()}r>>=1n}return{f:s?e.div(e.S,o):o}}const r=dt(e,n);if(0n===r){if(t.q?t.q.sign>0:t.f>0n)return ct(te.ZERO);throw new G("0 to a power that is not positive is undefined")}if(r<0n){if(t.q&&t.q.d%2n==1n){const n=vt(e,{f:-r},t).f;return{f:t.q.n%2n==0n?n:-n}}throw new G("a negative number to a fractional power is not real")}if(t.q&&1n===ot(t.q.n)&&t.q.d<=64n){const n=se(r*e.S**(t.q.d-1n),Number(t.q.d));return{f:t.q.n<0n?e.div(e.S,n):n}}return{f:e.exp(e.mul(dt(e,t),e.ln(r)))}}function bt(e,n,t){const r=e<0n?"-":"",s=ot(e);if(0n===s)return{sign:"",digits:"0",point:1};const o=s.toString(),i=o.length-n.P;let a=o.slice(0,t);o.length>t&&o[t]>="5"&&(a=(BigInt(a)+1n).toString());let u=i;return a.length>t&&(a=a.slice(0,t),u++),{sign:r,digits:a.replace(/0+$/,"")||"0",point:u}}function yt({sign:e,digits:n,point:t}){if("0"===n)return"0";if(t>21||t<-6){return`${e}${n.length>1?`${n[0]}.${n.slice(1)}`:n}e${t-1}`}return t<=0?`${e}0.${"0".repeat(-t)}${n}`:t>=n.length?`${e}${n}${"0".repeat(t-n.length)}`:`${e}${n.slice(0,t)}.${n.slice(t)}`}function wt(e){let n=0n,t=0n,r=e.d;for(;r%2n==0n;)r/=2n,n++;for(;r%5n==0n;)r/=5n,t++;const s=n>t?n:t;let o=ot(e.n)*10n**s/e.d;if(0n===o)return 1;for(;o%10n==0n;)o/=10n;return o.toString().length}function xt(e){let n=e.d;for(;n%2n==0n;)n/=2n;for(;n%5n==0n;)n/=5n;return 1n===n}function qt(e){const n=/^(-?[\d.]+)e(-?\d+)$/.exec(e);return n?V("*",[B(n[1]),V("^",[B("10"),B(n[2])])]):B(e)}function kt(e,{digits:n=15,scope:t}={}){if(!Number.isInteger(n)||n<1||n>1e5)throw new G("digits must be a whole number from 1 to 100000");let r=n+25,s=null;for(let o=0;o<4;o++){const i=new it(r),a=mt(e,i,t);if(a.z){const e=St(a.z,i,n);if(e.retry&&o<3){r+=e.retry;continue}return void 0===e.real?e:$t(e.real,i,n,null)}if(a.q&&a.q.isInteger&&ot(a.q.n).toString().length<=n)return{text:a.q.n.toString(),node:B(a.q.n.toString()),number:Number(a.q.n),re:Number(a.q.n),im:0,exact:!0};const u=dt(i,a);if(0n===u&&(!a.q||!a.q.isZero)&&o<3){s=null,r*=4;continue}const l=bt(u,i,n);if(s&&l.point<-10&&s.point-l.point>=(r-s.P)/2)return{text:"0",node:B("0"),number:0,re:0,im:0,exact:!1};if(!(l.point<-10&&o<3)||s&&s.point===l.point)return $t(u,i,n,a.q);s={point:l.point,P:r},r+=10-l.point}throw new G("could not approximate")}function $t(e,n,t,r){const s=yt(bt(e,n,t));return{text:s,node:qt(s),number:Number(s),re:Number(s),im:0,exact:Boolean(r)&&xt(r)&&wt(r)<=t}}function St([e,n],t,r){const s=10n**BigInt(Math.max(0,t.P-r-12)),o=e=>ot(e)>s;if(!o(n))return{real:e};const i=bt(n,t,r);if(i.point<-10&&o(n))return{retry:10-i.point};const a=yt(i),u="1"===a?"i":"-1"===a?"-i":`${a}i`,l="1"===a?D("i"):V("*",[qt(a.replace(/^-/,"")),D("i")]);if(!o(e))return{text:u,node:a.startsWith("-")?V("neg",[l]):l,number:NaN,re:0,im:Number(a),exact:!1};const c=yt(bt(e,t,r)),f=a.startsWith("-"),p="1"===a.replace(/^-/,"")?D("i"):V("*",[qt(a.replace(/^-/,"")),D("i")]);return{text:`${c} ${f?"-":"+"} ${u.replace(/^-/,"")}`,node:V(f?"-":"+",[qt(c),p]),number:NaN,re:Number(c),im:Number(a),exact:!1}}function Ot(e,n={}){const t=e=>(e=>0===en(e).size)(e)?"num"===e.type&&/^-?\d+$/.test(e.token)?e:kt(e,n).node:U(e)?V(e.op,e.args.map(t)):e;return t(e)}const Nt={variable:null},At=(e,n)=>null!==n&&en(e).has(n);function It(e){if("num"===e.type)return re(e.token);if(U(e)&&"/"===e.op&&e.args.every(e=>"num"===e.type)){const n=re(e.args[0].token),t=re(e.args[1].token);return n&&t&&!t.isZero?n.div(t):null}return null}const Mt=e=>0===en(e).size;function Et(e,n,t){const r=function(e){const n=_e(e);return"num"===n.k?n.q.isZero?n.q:null:"atom"===n.k&&"sym"===n.node.type&&"pi"===n.node.token?re("1"):"mul"===n.k&&1===n.fs.length&&"atom"===n.fs[0].b.k&&"pi"===n.fs[0].b.node.token&&"num"===n.fs[0].e.k&&n.fs[0].e.q.isOne?n.c:null}(e);if(!r)return!1;const[s,o="1"]=String(n).split("/");return t(r.compare(re(s).div(re(o))))}function Tt(e){if(!Mt(e))return NaN;try{const{number:n}=kt(e,{digits:30});return Math.sign(n)}catch{return NaN}}function jt(){mn("hasVariable")||(dn("hasVariable",e=>At(e,Nt.variable),"mentions the variable being solved for"),dn("freeOfVariable",e=>null!==Nt.variable&&!At(e,Nt.variable),"does not mention the variable being solved for"),dn("isRational",e=>null!==It(e),"an exact number: 3, -2, 1/2"),dn("isWhole",e=>It(e)?.isInteger??!1,"a whole number (any size)"),dn("isEvenWhole",e=>{const n=It(e);return Boolean(n?.isInteger&&n.n%2n==0n)},"an even whole number"),dn("isOddWhole",e=>{const n=It(e);return Boolean(n?.isInteger&&n.n%2n!=0n)},"an odd whole number"),dn("isPositiveRational",e=>(It(e)?.sign??0)>0,"an exact number above 0"),dn("isNegativeRational",e=>(It(e)?.sign??0)<0,"an exact number below 0"),dn("isConstant",Mt,"has no unknowns (numbers, π and e only)"),dn("notOne",e=>{const n=It(e);return!n||!n.isOne},"anything except the number 1"),dn("notMinusOne",e=>{const n=It(e);return!n||!n.equals(re("-1"))},"anything except the number -1"),dn("hasMinusSign",e=>function(e){const n=_e(e);return"num"===n.k?n.q.sign<0:"mul"===n.k&&n.c.sign<0}(e),"written with a leading minus: -x, -2x, -π/6"),dn("piMultipleAtLeast",(e,n)=>Et(e,n,e=>e>=0),"a multiple of π, at least k·π"),dn("piMultipleAbove",(e,n)=>Et(e,n,e=>e>0),"a multiple of π, above k·π"),dn("piMultipleBelow",(e,n)=>Et(e,n,e=>e<0),"a multiple of π, below k·π"),dn("piMultipleAtMost",(e,n)=>Et(e,n,e=>e<=0),"a multiple of π, at most k·π"),dn("isPositiveConstant",e=>Tt(e)>0,"no unknowns, and above 0 (e, π, √2, 3)"),dn("isNegativeConstant",e=>Tt(e)<0,"no unknowns, and below 0"),dn("hasImaginaryPart",e=>{if(!ue.complex)return!1;const n=De(_e(e));return Boolean(n)&&!("num"===n.im.k&&n.im.q.isZero)},"complex mode: has a nonzero imaginary part (unknowns count as real)"),dn("isSymbolNode",e=>"sym"===e.type&&!ae.has(e.token),"a single unknown such as x"))}function Zt(e){const n=new Map;for(const t of e){const e=t.id??t.name;if(!e)throw new Error(`a rule needs an id (pattern ${t.pattern})`);n.set(String(e),{...n.get(String(e))??{},...t})}const t=[...n.values()].map(e=>{const n={...e};try{void 0!==n.pattern&&(n.pattern=function(e){const n=P(e),t=e=>"num"===e.type||("sym"===e.type?e.token.startsWith("="):e.args.every(t)),r=e=>"sym"===e.type?D(e.token.slice(1)):"num"===e.type?e:V(e.op,e.args.map(r)),s=e=>"sym"===e.type?D(`=${e.token}`):"num"===e.type?e:V(e.op,e.args.map(s)),o=e=>"op"!==e.type?e:t(e)?s(He(r(e))):V(e.op,e.args.map(o));return o(n).s}(String(n.pattern)))}catch(e){throw new Error(`rule "${n.id}": bad pattern "${n.pattern}": ${e.message}`)}return"hidden"===n.step&&(n.tags=[...n.tags??[],"hidden"]),n});return Gn.fromSpecs(t,{strict:!0})}function zt(e,n,t,r){return e.explain?e.explain.replace(/\{(\w+)\}/g,(e,s)=>"result"===s?t?r(t):e:n[s]?r(n[s]):e).trim():""}const Dt=e=>U(e)&&("+"===e.op||"-"===e.op),Bt=e=>U(e)&&("*"===e.op||"/"===e.op);function*Ct(e,n,{order:t="pre"}={}){for(const r of function(e,n,{order:t="post"}={}){const r=[];for(const{node:s,path:o}of Q(e,t))for(const e of nt(s,n))r.push({...e,node:s,path:o});return r}(e,n,{order:t})){const n=tt(r.rule.outputTemplate,r.bound);yield{rule:r.rule,bound:r.bound,path:r.path,before:r.node,after:n,next:()=>He(Y(e,r.path,n))}}for(const{node:r,path:s}of Q(e,t)){const t=Dt(r);if(!t&&!Bt(r))continue;const o=t?nn(_e(r)):tn(_e(r));if(o.length<3)continue;const i=t?Ne:Ie;for(let t=0;t<o.length;t++)for(let r=t+1;r<o.length;r++){const a=Ge(i([o[t],o[r]]));for(const u of nt(a,n)){const n=tt(u.rule.outputTemplate,u.bound),l=o.filter((e,n)=>n!==t&&n!==r);yield{rule:u.rule,bound:u.bound,path:s,before:a,after:n,next:()=>He(Y(e,s,Ge(i([_e(n),...l]))))}}}}}function Ft(e,n,{format:t,order:r="pre",maxSteps:s=200,variable:o=null}={}){const i=Nt.variable;Nt.variable=o;try{let o=He(e);const i=new Set([o.s]),a=[];for(let e=0;e<s;e++){let e=null;for(const t of Ct(o,n,{order:r})){const n=t.next();if(n.s!==o.s&&!i.has(n.s)){e={c:t,next:n};break}}if(!e)break;const{c:s,next:u}=e;a.push({id:s.rule.id,name:s.rule.name,tags:s.rule.tags,from:o.s,to:u.s,path:s.path,before:s.before.s,after:s.after.s,explanation:zt(s.rule,s.bound,He(s.after),t)}),o=u,i.add(o.s)}return{node:o,steps:a}}finally{Nt.variable=i}}const Vt={full:[],normal:["hidden"],brief:["hidden","tidy","identity","value","split","base","arithmetic"]},Rt=(e,n)=>"all"===n||"*"===n||Array.isArray(n)&&n.some(n=>n===e.id||e.tags?.includes(n));function Ut(e){if(!1===e)return null;if(void 0===e||!0===e)return{show:"all",hide:Vt.normal,explain:!0};if("string"==typeof e){if(!Vt[e])throw new Error(`steps: "${e}" is not one of ${Object.keys(Vt).join(", ")}`);return{show:"all",hide:Vt[e],explain:!0}}const n=e.detail??"normal";if(!Vt[n])throw new Error(`steps.detail: "${n}" is not one of ${Object.keys(Vt).join(", ")}`);return{show:e.show??"all",hide:[...Vt[n],...e.hide??[]],explain:e.explain??!0}}function Pt(e,n){if(!n)return[];const t=[];let r=null;for(const s of e){if(!(Rt(s,n.show)&&!Rt(s,n.hide))){r=r??{from:s.from,ids:[]},r.ids.push(s.id);continue}const e={...s};r&&(e.from=r.from,e.also=r.ids,e.path=null,r=null);!0===n.explain||!1!==n.explain&&Rt(s,n.explain)||delete e.explanation,t.push(e)}if(r&&t.length){const n=t[t.length-1];n.to=e[e.length-1].to,n.also=[...n.also??[],...r.ids]}return t}const Wt=pe(te.ONE),Lt=(e,n)=>"atom"===e.k&&"sym"===e.node.type&&e.node.token===n;function _t(e){switch(e.k){case"num":default:return e;case"atom":return"op"===e.node.type?We(e.node.op,e.node.args.map(e=>_t(_e(e)))):e;case"add":return Ne(nn(e).map(_t));case"mul":{let n=[pe(e.c)];for(const t of e.fs){const e=_t(t.b);if("add"===e.k&&ge(t.e)&&t.e.q.isInteger&&t.e.q.sign>0&&t.e.q.n<=BigInt(60))for(let r=0n;r<t.e.q.n;r++)n=Ht(n,nn(e));else n=Ht(n,[Ee(e,t.e)])}return Ne(n)}}}function Ht(e,n){const t=[];for(const r of e)for(const e of n)t.push(Ie([r,e]));return nn(Ne(t))}function Jt(e,n){const t=new Map;for(const r of nn(_t(e))){const{coef:e,rest:s}=Oe(r);let o=0;const i=[pe(e)];for(const e of s?tn(s):[]){const{b:t,e:r}="mul"===e.k&&1===e.fs.length&&e.c.isOne?e.fs[0]:{b:e,e:Wt};if(Lt(t,n)){if(!ge(r)||!r.q.isInteger||r.q.sign<0)return null;o+=Number(r.q.n)}else{if(Qt(t,n)||Qt(r,n))return null;i.push(e)}}t.set(o,Ne([t.get(o)??pe(te.ZERO),Ie(i)]))}for(const[e,n]of t)ge(n)&&n.q.isZero&&t.delete(e);return t}const Qt=(e,n)=>en(Ge(e)).has(n);function Yt(e){if(!e)return null;const n=Math.max(0,...e.keys());if(n>256)return null;const t=[];for(let r=0;r<=n;r++){const n=e.get(r)??pe(te.ZERO);if(!ge(n))return null;t.push(n.q)}return t}function Gt(e,n){const t=_e(D(n));return Ne(e.map((e,n)=>Ie([pe(e),Me(t,pe(te.of(n)))])))}const Kt=e=>{const n=e.slice();for(;n.length>1&&n[n.length-1].isZero;)n.pop();return n},Xt=(e,n)=>e.reduceRight((e,t)=>e.mul(n).add(t),te.ZERO);function er(e,n){const t=e.length-1,r=new Array(t);let s=te.ZERO;for(let o=t;o>=1;o--)s=e[o].add(s.mul(n)),r[o-1]=s;return r}function nr(e){if(0n===(e=(e=>e<0n?-e:e)(e)))return null;if(e>10n**14n)return null;const n=[];let t=e;for(let e=2n;e*e<=t;e+=2n===e?1n:2n){if(t%e)continue;let r=0;for(;t%e===0n;)t/=e,r++;n.push([e,r])}t>1n&&n.push([t,1]);let r=[1n];for(const[e,t]of n){const n=[];for(const s of r)for(let r=0,o=1n;r<=t;r++,o*=e)n.push(s*o);if(r=n,r.length>2e4)return null}return r.sort((e,n)=>e<n?-1:e>n?1:0)}function tr(e){let n=Kt(e);const t=[];for(;n.length>1&&n[0].isZero;)t.push(te.ZERO),n=n.slice(1);if(n.length<=1)return{roots:t,rest:n};const r=n.reduce((e,n)=>e*n.d/ne(e,n.d),1n),s=n.map(e=>e.n*r/e.d),o=nr(s[0]),i=nr(s[s.length-1]);if(!o||!i)return{roots:t,rest:n};const a=new Map;for(const e of o)for(const n of i)for(const t of[1n,-1n]){const r=new te(t*e,n);a.set(r.toString(),r)}const u=[...a.values()].sort((e,n)=>e.compare(n));for(const e of u)for(;n.length>1&&Xt(n,e).isZero;)t.push(e),n=er(n,e);return{roots:t.sort((e,n)=>e.compare(n)),rest:n}}function rr(e){if("num"===e.k)return{coef:e.q,factors:[],notes:[]};if("atom"===e.k)return{coef:te.ONE,factors:[{base:e,exp:Wt}],notes:[]};if("mul"===e.k){let n=e.c;const t=[],r=[];for(const s of e.fs)if("add"===s.b.k&&ge(s.e)&&s.e.q.isInteger){const e=rr(s.b);n=n.mul(e.coef.pow(s.e.q.n));for(const n of e.factors)t.push({base:n.base,exp:Ie([n.exp,s.e])});r.push(...e.notes)}else t.push({base:s.b,exp:s.e});return sr(n,t,r)}return function(e){const n=nn(e),t=[],r=n.map(e=>{const{coef:n,rest:t}=Oe(e);return{coef:n,fs:t?tn(t).map(ir):[]}}),s=r.reduce((e,n)=>({n:ne(e.n,n.coef.n),d:e.d*n.coef.d/ne(e.d,n.coef.d)}),{n:0n,d:1n});let o=new te(s.n||1n,s.d);or(e)<0&&(o=o.neg());const i=[];for(const e of r[0].fs){if(!ge(e.e)||e.e.q.sign<=0)continue;let n=e.e.q;const t=ye(e.b);let s=!0;for(const e of r.slice(1)){const r=e.fs.find(e=>ye(e.b)===t&&ge(e.e)&&e.e.q.sign>0);if(!r){s=!1;break}r.e.q.compare(n)<0&&(n=r.e.q)}s&&i.push({base:e.b,exp:pe(n)})}let a=e;if(!o.isOne||i.length){const e=Ie([pe(o),...i.map(e=>Ee(e.base,e.exp))]);a=Ne(n.map(n=>Ie([n,Me(e,pe(te.MINUS_ONE))]))),t.push({id:"factor.common",values:{common:e}})}const u="add"===a.k?function(e,n){const t=[...ar(e)];for(const r of t){const s=Yt(Jt(e,r));if(!s||s.length<3)continue;if(1!==t.length)break;const{roots:o,rest:i}=tr(s);if(!o.length)break;const a=[];let u=i[i.length-1]??te.ONE;const l=i.map(e=>e.div(u)),c=[...o].sort((e,n)=>e.abs().compare(n.abs())||n.sign-e.sign);for(const e of c){const t=Gt([new te(-e.n),new te(e.d)],r);a.push({base:t,exp:Wt}),u=u.div(new te(e.d)),n.push({id:"factor.root",values:{root:pe(e),factor:t}})}if(l.length>1){const e=l.reduce((e,n)=>e*n.d/ne(e,n.d),1n),n=l.map(n=>n.mul(new te(e))),t=n.reduce((e,n)=>ne(e,n.n),0n)||1n;u=u.mul(new te(t,e)),a.push({base:Gt(n.map(e=>e.div(new te(t))),r),exp:Wt})}return sr(u,a,[])}const r=nn(e);if(2===r.length){const[e,t]=r;for(const r of[2,3]){const s=ur(e,r),o=ur(Ve(t),r),i=3===r?ur(t,r):null;if(s&&o&&2===r){n.push({id:"factor.squares",values:{a:s,b:o}});const e=rr(Ne([s,Ve(o)])),t=rr(Ne([s,o]));return sr(e.coef.mul(t.coef),[...e.factors,...t.factors],[...e.notes,...t.notes])}if(3===r&&s&&(o||i)){const e=o??i,t=o?-1:1;n.push({id:t<0?"factor.cubes-difference":"factor.cubes-sum",values:{a:s,b:e}});const r=Ne(t<0?[s,Ve(e)]:[s,e]),a=Ne([Me(s,pe(te.of(2))),t<0?Ie([s,e]):Ve(Ie([s,e])),Me(e,pe(te.of(2)))]),u=rr(r);return sr(u.coef,[...u.factors,{base:a,exp:Wt}],u.notes)}}}return{coef:te.ONE,factors:[{base:e,exp:Wt}],notes:[]}}(a,t):rr(a);return sr(o.mul(u.coef),[...i,...u.factors],[...t,...u.notes.filter(e=>!t.includes(e))])}(e)}function sr(e,n,t){const r=new Map;for(const e of n){const n=ye(e.base),t=r.get(n);t?t.exp=Ne([t.exp,e.exp]):r.set(n,{...e})}return{coef:e,factors:[...r.values()].filter(e=>!(ge(e.exp)&&e.exp.q.isZero)),notes:t}}const or=e=>Oe(nn(e)[0]).coef.sign;const ir=e=>"mul"===e.k&&e.c.isOne&&1===e.fs.length?{b:e.fs[0].b,e:e.fs[0].e}:{b:e,e:Wt},ar=e=>en(Ge(e));function ur(e,n){const{coef:t,rest:r}=Oe(e);if(t.sign<0)return null;const s=function(e,n){const t=e=>{if(e<0n)return null;let t=0n,r=1n;for(;r**BigInt(n)<=e;)r*=2n;for(;t<r-1n;){const s=(t+r)/2n;s**BigInt(n)<=e?t=s:r=s}return t**BigInt(n)===e?t:null},r=t(e.n),s=t(e.d);return null!==r&&null!==s?new te(r,s):null}(t,n);if(!s)return null;const o=[pe(s)];for(const e of r?tn(r).map(ir):[]){if(!ge(e.e))return null;const t=e.e.q.div(te.of(n));if(!t.isInteger)return null;o.push(Ee(e.b,pe(t)))}return Ie(o)}function lr({coef:e,factors:n}){const t=[],r=[];for(const e of n){const n=ge(e.exp)&&e.exp.q.sign<0,s=n?pe(e.exp.q.neg()):e.exp,o=Ge(Ee(e.base,s));(n?r:t).push(o)}const s=e=>e.reduce((e,n)=>e?V("*",[e,n]):n,null),o=e.n<0n?-e.n:e.n;let i=t.length?s(1n===o?t:[Ge(pe(new te(o))),...t]):Ge(pe(new te(o)));return e.n<0n&&(i=V("neg",[i])),1n!==e.d&&r.unshift(Ge(pe(new te(e.d)))),r.length?V("/",[i,s(r)]):i}function cr(e){if("mul"!==e.k)return{num:e,den:Wt};const n=[pe(new te(e.c.n))],t=[pe(new te(e.c.d))];for(const r of e.fs)ge(r.e)&&r.e.q.sign<0?t.push(Ee(r.b,pe(r.e.q.neg()))):n.push(Ee(r.b,r.e));return{num:Ie(n),den:Ie(t)}}function fr(e){if("add"!==e.k)return cr(e);const n=nn(e).map(cr),t=new Map;let r=1n;for(const e of n){const{coef:n,rest:s}=Oe(e.den);r=r*n.n/ne(r,n.n);for(const e of s?tn(s).map(ir):[]){const n=ye(e.b),r=t.get(n);(!r||ge(e.e)&&ge(r.e)&&e.e.q.compare(r.e.q)>0)&&t.set(n,e)}}const s=Ie([pe(new te(r)),...[...t.values()].map(e=>Ee(e.b,e.e))]);if(ge(s)&&s.q.isOne)return{num:e,den:Wt};return{num:_t(Ne(n.map(e=>Ie([e.num,s,Me(e.den,pe(te.MINUS_ONE))])))),den:s}}function pr(e){const{num:n,den:t}=fr(e);if(ge(t)&&t.q.isOne)return null;const r=rr(n),s=rr(t),o=new Set(r.factors.map(e=>ye(e.base))),i=s.factors.filter(e=>o.has(ye(e.base))),a=[...r.factors,...s.factors.map(e=>({base:e.base,exp:Ve(e.exp)}))];return{...sr(r.coef.div(s.coef),a,[...r.notes,...s.notes]),cancelled:i.map(e=>e.base)}}const dr=(e,n)=>V("=",[e,n]),hr=He(V("+",[D("x"),V("neg",[D("x")])])),mr=e=>U(e)&&"="===e.op;function gr(e,n,t,r={}){const s=[],o=(n,t,r,o,i,a={})=>s.push(e.step(n,t,r,o,i,a));o.raw=e=>s.push(e);const i=mr(n)?n:dr(n,hr),a=dr(He(i.args[0]),He(i.args[1]));a.s!==i.s&&o("normal","Work out each side",["tidy","arithmetic"],i,a);const u=[],l=[],c=new Set;u.numeric=c,qr(e,a,t,r,o,u,l,0);const f=[],p=new Set;for(const n of u.map(n=>c.has(n)?n:(n=>Ft(n,e.set.view("simplify"),{format:e.format}).node)(n))){const e=n.s;if(p.has(e))continue;p.add(e);const r=c.has(n)?null:yr(i,t,n);r?o("solve.reject","Check the answer",["check"],dr(D(t),n),dr(D(t),n),{value:n,reason:r}):f.push(n)}return f.sort(vr),{solutions:f,unsolved:l,steps:s,always:l.some(e=>e.always)}}function vr(e,n){const t=br(e),r=br(n);return null===t||null===r?e.s<n.s?-1:1:(Math.abs(t.im)>0)-(Math.abs(r.im)>0)||t.re-r.re||t.im-r.im}function br(e){if(en(e).size)return null;try{const{re:n,im:t}=kt(e,{digits:20});return{re:n,im:t}}catch{return null}}function yr(e,n,t){const[r,s]=e.args,o=new Set([...en(r),...en(s),...en(t)]);if(o.delete(n),o.size)return null;const i=e=>wr(e,n,t);try{const e=kt(i(r),{digits:40}),n=kt(i(s),{digits:40}),t=Math.max(1,Math.hypot(e.re,e.im),Math.hypot(n.re,n.im));return Math.hypot(e.re-n.re,e.im-n.im)>1e-12*t?"it does not make the two sides equal":null}catch(e){return`the original equation has no value there (${e.message})`}}function wr(e,n,t){return"sym"===e.type?e.token===n?t:e:U(e)?V(e.op,e.args.map(e=>wr(e,n,t))):e}const xr=24;function qr(e,n,t,r,s,o,i,a){if(a>xr)return Ir(e,n,t,r,s,o,i);const u=function(e){const n=[],t=e=>{if(U(e)&&"|"===e.op)return void e.args.forEach(t);if(!mr(e))return void n.push(e);const r=e.args[1],s=Q(r,"pre").find(({node:e})=>U(e)&&"pm"===e.op);if(!s)return void n.push(e);const o=s.node.args[0],i=He(Y(r,s.path,o)),a=He(Y(r,s.path,V("neg",[o])));t(dr(e.args[0],i)),a.s!==i.s&&t(dr(e.args[0],a))};return t(e),n}(n);if(u.length>1){s("solve.split","Two cases",["split"],n,u.reduce((e,n)=>e?V("|",[e,n]):n,null));for(const n of u)qr(e,n,t,r,s,o,i,a+1);return}if(1===u.length&&u[0].s!==n.s)return qr(e,u[0],t,r,s,o,i,a+1);const[l,c]=n.args;if("sym"===l.type&&l.token===t&&!Qt(_e(c),t))return void o.push(c);const f=Ne([_e(l),Ve(_e(c))]);if(!Qt(f,t))return ge(f)&&f.q.isZero?(s("solve.always","Always true",["check"],n,n,{v:t}),void i.push(Object.assign(Object.create(n),{always:!0}))):void s("solve.never","No solution",["check"],n,n,{v:t});const p=nn(f).filter(e=>Qt(e,t)),d=nn(f).filter(e=>!Qt(e,t)),h=Ne(p),m=Ve(Ne(d));if(ue.complex){const u=Jt(f,t);if(u&&[...u.values()].every(e=>!Qt(e,t))&&Math.max(...u.keys())>=2){const l=dr(Ge(f),hr);return l.s!==n.s&&s("solve.one-side","Everything on one side",["move"],n,l,{v:t}),Nr(e,f,u,t,r,s,o,i,a,l)}}if(1===p.length)return kr(e,n,h,m,t,r,s,o,i,a);const g=dr(Ge(f),hr),v=Jt(f,t);if(v&&[...v.values()].every(e=>!Qt(e,t))&&Math.max(...v.keys())>=2)return g.s!==n.s&&s("solve.one-side","Everything on one side",["move"],n,g,{v:t}),Nr(e,f,v,t,r,s,o,i,a,g);const b=rr(f),y=b.factors.filter(e=>Qt(e.base,t)&&!(ge(e.exp)&&e.exp.q.sign<0));if(y.length>=2||1===y.length&&b.factors.length>1){const u=dr(lr(b),hr);g.s!==n.s&&s("solve.one-side","Everything on one side",["move"],n,g,{v:t}),u.s!==g.s&&s("solve.factor","Factor",["factor"],g,u,{});const l=y.map(e=>dr(Ge(e.base),hr));l.length>1&&s("solve.zero-product","A product is zero when a factor is",["split"],u,l.reduce((e,n)=>e?V("|",[e,n]):n,null),{});for(const n of l)qr(e,n,t,r,s,o,i,a+1);return}const w=fr(f);if(Qt(w.den,t)){const u=dr(Ge(w.num),hr);return s("solve.clear-denominator","Clear the denominator",["move"],n,u,{den:Ge(w.den)}),qr(e,u,t,r,s,o,i,a+1)}const x=p.filter(e=>!Or(e,t));if(1===x.length&&/\b(sqrt|root|abs)\b/.test(Ge(x[0]).s))return kr(e,n,x[0],Ve(Ne(nn(f).filter(e=>e!==x[0]))),t,r,s,o,i,a);const q=function(e,n){const t=Ge(e),r=new Map;for(const{node:e}of Q(t,"pre"))if(U(e)&&en(e).has(n))if("^"!==e.op||en(e.args[0]).has(n))["sin","cos","tan","ln","sqrt","abs"].includes(e.op)&&e.args[0].s===n&&r.set(e.s,e);else{const t=_e(e.args[1]),{coef:s,rest:o}=Oe(t);if(o&&s.isInteger&&Ge(o).s===n){const t=Ge(Me(_e(e.args[0]),_e(D(n))));r.set(t.s,t)}}const s="u"===n?"w":"u";for(const e of r.values()){const r=Ar(t,e,n,s);if(!r||en(r).has(n))continue;const o=_e(r),i=Jt(o,s);if(i&&Math.max(...i.keys())>=1)return{kernel:_e(e),poly:o,symbol:s}}return null}(f,t);if(q){const n=q.symbol;s("solve.substitute","Substitute",["substitute"],g,dr(Ge(q.poly),hr),{u:D(n),kernel:Ge(q.kernel)});const u=[];qr(e,dr(Ge(q.poly),hr),n,r,s,u,i,a+1);for(const n of u)qr(e,dr(Ge(q.kernel),n),t,r,s,o,i,a+1);return}return Ir(e,g,t,r,s,o,i)}function kr(e,n,t,r,s,o,i,a,u,l){let c=dr(Ge(t),Ge(r));c.s!==n.s&&i("solve.move","Move the terms",["move"],n,c,{v:s});const{coef:f,rest:p}=Oe(t),d=p?tn(p):[],h=Ie([pe(f),...d.filter(e=>!Qt(e,s))]);if(!ge(h)||!h.q.isOne){const e=Ie(d.filter(e=>Qt(e,s))),n=dr(Ge(e),Ge(Re(r,h))),t=ge(h)&&!h.q.isInteger&&(1n===h.q.n||-1n===h.q.n);i(t?"solve.multiply":"solve.divide",t?"Multiply both sides":"Divide both sides",["move"],c,n,{by:Ge(t?pe(h.q.inv()):h),v:s}),c=n}if("sym"===c.args[0].type&&c.args[0].token===s)return void a.push(c.args[1]);const m=_e(c.args[1]);if(ge(m)&&m.q.isZero){const n=_e(c.args[0]),t=tn(n).filter(e=>Qt(e,s)&&!$r(e));if(t.length>1||t.length<tn(n).filter(e=>Qt(e,s)).length){const n=t.map(e=>dr(Ge(Sr(e)),hr));i("solve.zero-product","A product is zero when a factor is",["split"],c,n.reduce((e,n)=>e?V("|",[e,n]):n,null),{});for(const t of n)qr(e,t,s,o,i,a,u,l+1);return}}const g=Ft(c,e.set.view("isolate"),{format:e.format,maxSteps:1,variable:s});return g.steps.length?(function(e,n){for(const t of n)e.raw(t)}(i,g.steps),qr(e,g.node,s,o,i,a,u,l+1)):Ir(e,c,s,o,i,a,u)}const $r=e=>"mul"===e.k&&e.c.isOne&&1===e.fs.length&&ge(e.fs[0].e)&&e.fs[0].e.q.sign<0,Sr=e=>"mul"===e.k&&e.c.isOne&&1===e.fs.length&&ge(e.fs[0].e)&&e.fs[0].e.q.sign>0?e.fs[0].b:e,Or=(e,n)=>{const t=Jt(e,n);return Boolean(t)&&[...t.values()].every(e=>!Qt(e,n))};function Nr(e,n,t,r,s,o,i,a,u,l){const c=Math.max(...t.keys()),f=Yt(t);if(ue.complex&&c>=3&&c<=64&&f&&f.every((e,n)=>0===n||n===c||e.isZero)&&!f[0].isZero){const n=f[0].neg().div(f[c]),t=Me(pe(n.abs()),pe(new te(1n,BigInt(c)))),s=[];for(let r=0;r<c;r++){const o=Ie([pe(new te(BigInt((n.sign<0?1:0)+2*r),BigInt(c))),_e(D("pi"))]),i=V("*",[Ge(t),V("+",[V("cos",[Ge(o)]),V("*",[D("i"),V("sin",[Ge(o)])])])]);s.push(Ft(i,e.set.view("simplify"),{format:e.format}).node)}return o("solve.roots","All n roots",["complex"],l,s.map(e=>dr(D(r),e)).reduce((e,n)=>e?V("|",[e,n]):n),{v:r,n:String(c),last:String(c-1),r:Ge(pe(n))}),void i.push(...s)}if(f){const{roots:t}=tr(f);if(t.length){const t=rr(n),c=dr(lr(t),hr);if(t.factors.length>1||t.factors.some(e=>!(ge(e.exp)&&e.exp.q.isOne))){o("solve.factor","Factor",["factor"],l,c,{});const n=t.factors.filter(e=>Qt(e.base,r)).map(e=>dr(Ge(e.base),hr));n.length>1&&o("solve.zero-product","A product is zero when a factor is",["split"],c,n.reduce((e,n)=>e?V("|",[e,n]):n,null),{});for(const t of n)qr(e,t,r,s,o,i,a,u+1);return}}}if(2===c){const e=t.get(2),n=t.get(1)??pe(te.ZERO),s=t.get(0)??pe(te.ZERO),a=Ne([Me(n,pe(te.of(2))),Ie([pe(te.of(-4)),e,s])]);if(ge(a)&&a.q.sign<0&&!ue.complex)return void o("solve.no-real","No real solutions",["quadratic"],l,l,{D:Ge(a)});const u=Ie([pe(te.of(2)),e]),c=Me(a,pe(te.HALF)),f=Ge(Re(Ne([Ve(n),c]),u)),p=Ge(Re(Ne([Ve(n),Ve(c)]),u)),d=f.s===p.s?dr(D(r),f):V("|",[dr(D(r),f),dr(D(r),p)]);return o(ue.complex&&ge(a)&&a.q.sign<0?"solve.quadratic-complex":"solve.quadratic","The quadratic formula",["quadratic"],l,d,{a:Ge(e),b:Ge(n),c:Ge(s),D:Ge(a),root:Ge(c),v:r}),i.push(f),void(p.s!==f.s&&i.push(p))}return Ir(e,l,r,s,o,i,a)}function Ar(e,n,t,r){if(e.s===n.s)return D(r);if(!U(e))return e;if("^"===e.op&&"^"===n.op&&e.args[0].s===n.args[0].s){const n=_e(e.args[1]),{coef:s,rest:o}=Oe(n);if(o&&Ge(o).s===t&&s.isInteger)return V("^",[D(r),Ge(pe(s))])}return V(e.op,e.args.map(e=>Ar(e,n,t,r)))}function Ir(e,n,t,r,s,o,i){if(r.approximate){const e="number"==typeof r.approximate?r.approximate:15,i=_e(V("-",[n.args[0],n.args[1]])),a=ue.complex?Yt(Jt(i,t)):null,u=a&&a.length>2?function(e,n){const t=e.length-1,r=e[t],s=e.map(e=>e/r),o=(e,n)=>{let r=1,o=0;for(let i=t-1;i>=0;i--)[r,o]=[r*e-o*n+s[i],r*n+o*e];return[r,o]};let i=Array.from({length:t},(e,n)=>[1.3*Math.cos(2*Math.PI*n/t+.4),1.3*Math.sin(2*Math.PI*n/t+.4)]);for(let e=0;e<500;e++){let e=0;if(i=i.map(([n,r],s)=>{let[a,u]=o(n,r);for(let e=0;e<t;e++){if(e===s)continue;const t=n-i[e][0],o=r-i[e][1],l=t*t+o*o;[a,u]=[(a*t+u*o)/l,(u*t-a*o)/l]}return e=Math.max(e,Math.hypot(a,u)),[n-a,r-u]}),e<1e-15)break}const a=e=>Math.abs(e)<1e-12?0:Number(e.toPrecision(n));return i.map(([e,n])=>[a(e),a(n)]).sort((e,n)=>(0!==e[1])-(0!==n[1])||e[0]-n[0]||e[1]-n[1]).map(([e,n])=>{const t=Mr(e);if(0===n)return t;const r=V("*",[Mr(Math.abs(n)),D("i")]);return 0===e?n<0?V("neg",[r]):r:V(n<0?"-":"+",[t,r])})}(a.map(e=>e.toNumber()),Math.min(e,14)):function(e,n,t){const r=_e(V("-",[e.args[0],e.args[1]])),s=Ge(r),o=e=>{try{return kt(wr(s,n,Er(e)),{digits:30}).number}catch{return NaN}},i=[],a=[];for(let e=-400;e<=400;e++)a.push(Math.sign(e)*(Math.abs(e)/20)**2);for(let e=0;e+1<a.length;e++){let n=a[e],r=a[e+1],s=o(n);const u=o(r);if(Number.isNaN(s)||Number.isNaN(u))continue;if(0===s){i.push(Er(n));continue}if(s*u>0)continue;for(let e=0;e<200&&r-n>1e-16*Math.abs(n);e++){const e=(n+r)/2,t=o(e);if(Number.isNaN(t))break;s*t<=0?r=e:(n=e,s=t)}const l=(n+r)/2;Math.abs(o(l))<1e-6&&i.push(Er(Number(l.toPrecision(Math.min(t,15)))))}return i}(n,t,e);for(const e of u)o.numeric?.add(e);return s("solve.numeric","Numeric solutions",["numeric"],n,u.length?u.map(e=>dr(D(t),e)).reduce((e,n)=>e?V("|",[e,n]):n):n,{v:t,count:String(u.length)}),void o.push(...u)}s("solve.unsolved","No exact method",["unsolved"],n,n,{v:t}),i.push(n)}const Mr=e=>B(String(e).includes("e")?e.toFixed(20):String(e)),Er=e=>B(Number.isInteger(e)?String(e):e.toFixed(17));const Tr=(e,n)=>V("int",[e,"string"==typeof n?D(n):n]);function jr(e,n,t,r=0){if(r>6)throw new G("integration went too deep");const s=[],o=e.set.view("integrate"),i=Ft(n,e.set.view("simplify"),{format:e.format});s.push(...i.steps);let a=He(Tr(i.node,t));for(let n=0;n<40;n++){const n=Ft(a,o,{format:e.format});s.push(...n.steps),a=n.node;const t=Q(a,"pre").find(({node:e})=>{return U(n=e)&&"int"===n.op&&2===n.args.length;var n});if(!t)return{node:a,steps:s};const i=Zr(e,t.node,r);if(!i)throw new G(`no rule for ∫ ${e.format(t.node.args[0])} d${t.node.args[1].token}`);s.push(...i.steps),a=He(Y(a,t.path,i.node))}throw new G("integration did not finish")}function Zr(e,n,t){const[r,s]=n.args,o=s.token,i=_e(r),a=function(e,n){const{num:t,den:r}=fr(e),s=rr(t),o=rr(r),i=s.coef.div(o.coef);if(i.isOne||!Qt(e,n))return null;const a=Ie([...s.factors.map(e=>Ee(e.base,e.exp)),...o.factors.map(e=>Ee(e.base,Ve(e.exp)))]);return{c:i,rest:a}}(i,o);if(a){const t=V("*",[Ge(pe(a.c)),Tr(Ge(a.rest),s)]);return{node:t,steps:[e.step("integrate.constant","Take the number out",["split"],n,t,{c:Ge(pe(a.c))})]}}const u=_t(i);if(Ge(u).s!==r.s&&"add"===u.k){const t=Tr(Ge(u),s);return{node:t,steps:[e.step("integrate.expand","Multiply out",["expand"],n,t,{})]}}const l=function(e,n){const t=new Map;for(const{node:r}of Q(e,"pre")){if(!U(r))continue;const e="^"===r.op?r.args:"/"===r.op?[r.args[1]]:"der"===r.op||"int"===r.op?[]:1===r.args.length||"root"===r.op?[r.args[r.args.length-1]]:[];for(const r of e){if("sym"===r.type||!en(r).has(n))continue;const e=Jt(_e(r),n);if(!e||1!==Math.max(...e.keys()))continue;const s=e.get(1);Qt(s,n)||ge(s)&&s.q.isZero||t.set(r.s,{node:r,a:s})}}for(const r of t.values()){if(!en(zr(e,r.node,D("§"))).has(n))return r}return null}(r,o);if(l){const s="u"===o?"t":"u",i=zr(r,l.node,D(s));if(!en(i).has(o)){const r=jr(e,He(i),s,t+1),a=He(wr(r.node,s,l.node)),u=Ge(Re(_e(a),l.a));return{node:u,steps:[e.step("integrate.substitute","Substitute",["substitute"],n,He(Tr(i,s)),{u:D(s),inside:l.node,a:Ge(l.a),v:o}),...r.steps,e.step("integrate.back","Substitute back",["substitute"],r.node,u,{u:D(s),inside:l.node})]}}}const c=function(e,n,t,r){const{num:s,den:o}=fr(t);if(!Qt(o,r))return null;const i=Yt(Jt(s,r)),a=Yt(Jt(o,r));if(!i||!a||a.length<2)return null;const u=_e(D(r)),l=e=>Gt(e,r);if(i.length>=a.length){const{q:t,r:s}=function(e,n){const t=Kt(n);let r=Kt(e);const s=t[t.length-1];if(s.isZero)throw new G("division by the zero polynomial");const o=new Array(Math.max(1,r.length-t.length+1)).fill(te.ZERO);for(;r.length>=t.length&&(1!==r.length||!r[0].isZero);){const e=r.length-t.length,n=r[r.length-1].div(s);if(o[e]=n,r=Kt(r.map((r,s)=>s>=e&&s-e<t.length?r.sub(n.mul(t[s-e])):r)),r.length-1<e+t.length-1&&r[r.length-1].isZero)break;if(r.length<t.length)break}return{q:Kt(o),r:r}}(i,a),o=Tr(Ge(Ne([l(t),Re(l(s),l(a))])),D(r));return{node:o,steps:[e.step("integrate.divide","Divide the polynomials",["divide"],n,o,{})]}}const{roots:c,rest:f}=tr(a),p=new Set(c.map(String)).size===c.length;if(!c.length||!p||1!==f.length)return null;const d=(e=>e.length<=1?[te.ZERO]:e.slice(1).map((e,n)=>e.mul(te.of(n+1))))(a),h=c.map(e=>Re(pe(Xt(i,e).div(Xt(d,e))),Ne([u,pe(e.neg())]))),m=Tr(Ge(Ne(h)),D(r));return{node:m,steps:[e.step("integrate.partial-fractions","Partial fractions",["partial-fractions"],n,m,{})]}}(e,n,i,o);return c||function(e,n,t,r,s){if(s>=6)return null;const o=tn(t),i=o.filter(e=>Dr(e,r)||!Qt(e,r)),a=o.filter(e=>!i.includes(e));if(1!==a.length)return null;const u=Ie(i),l=a[0];if(!Qt(u,r))return null;const c=Ge(l),f=U(c)?c.op:"";let p,d,h;"ln"===f||"arctan"===f||"arcsin"===f?(p=l,d=u):(p=u,d=l);try{h=jr(e,Ge(d),r,s+1)}catch{return null}const m=_e(e.differentiate(Ge(p),r)),g=Ie([p,_e(h.node)]),v=Tr(Ge(Ie([m,_e(h.node)])),D(r)),b=He(V("-",[Ge(g),v]));return{node:b,steps:[e.step("integrate.parts","Integration by parts",["parts"],n,b,{u:Ge(p),dv:Ge(d),V:h.node,du:Ge(m),v:r})]}}(e,n,i,o,t)}function zr(e,n,t){return e.s===n.s?t:U(e)?V(e.op,e.args.map(e=>zr(e,n,t))):e}const Dr=(e,n)=>{const t=Jt(e,n);return Boolean(t)&&[...t.values()].every(e=>!Qt(e,n))&&Math.max(...t.keys())>=1};function Br(e,n,t,r,s,o){for(const e of[r,s])if(en(e).has("∞")||/∞|infinity/.test(e.s))throw new G("integrals to infinity need limits, which this CAS does not do yet");if(o&&!en(r).size&&!en(s).size){const i=kt(r,{digits:20}).number,a=kt(s,{digits:20}).number,u=[...en(o)].filter(e=>e!==t);if(!u.length){const[r,s]=i<=a?[i,a]:[a,i];for(const i of function(e,n){const t=[],r={tan:"cos",sec:"cos",csc:"sin",cot:"sin"};return Q(e,"pre").forEach(({node:e})=>{if(!U(e))return;let s=null;"/"===e.op?s=e.args[1]:"^"===e.op&&"num"===e.args[1].type&&e.args[1].value<0||"^"===e.op&&U(e.args[1])&&"neg"===e.args[1].op?s=e.args[0]:r[e.op]&&(s=V(r[e.op],[e.args[0]])),s&&en(s).has(n)&&!t.some(e=>e.s===s.s)&&t.push(s)}),t}(o,t)){let o=[];try{o=e.solve(V("=",[i,B("0")]),t,{steps:!1}).solutions}catch{continue}for(const i of o){const o=kt(i,{digits:20});if(!Number.isFinite(o.number)||o.im||o.number<r||o.number>s)continue;if(o.number>r&&o.number<s)throw new G(`the integrand has no value at ${t} = ${e.format(i)}, between the limits, so F(b) - F(a) would be wrong`);let a=NaN;try{a=kt(He(wr(n,t,i)),{digits:15}).number}catch{}if(!Number.isFinite(a))throw new G(`the integral diverges at ${t} = ${e.format(i)}: F has no value at that limit`)}}}for(let e=0;!u.length&&e<=64;e++){const n=i+(a-i)*(e+.5)/65;try{const e=kt(wr(o,t,B(n.toFixed(15))),{digits:15}).number;if(!Number.isFinite(e))throw new G("not finite")}catch(e){throw new G(`the integrand has no value at ${t} = ${n.toPrecision(6)}, between the limits, so F(b) - F(a) would be wrong`)}}}const i=e=>He(wr(n,t,e)),a=He(V("-",[i(s),i(r)])),u=V("-",[i(s),i(r)]);return{value:a,step:e.step("integrate.evaluate","Between the limits",["evaluate"],n,u,{a:r,b:s,F:n,v:t})}}const Cr={"=":1,"≠":1,"<":1,">":1,"≤":1,"≥":1,"+":2,"-":2,"±":2,"*":3,"/":3,neg:4,pm:4,"^":5},Fr={pi:"π","≤":"≤","≥":"≥"};function Vr(e){return Lr(e).text}function Rr(e,n,t=!1){return e.prec<n||t&&e.prec===n?`(${e.text})`:e.text}const Ur=e=>"op"===e.type?e.op:null,Pr=e=>e.text.startsWith("-"),Wr={"()":["(",")"],"[]":["[","]"],"{}":["{","}"],"(]":["(","]"],"[)":["[",")"]};function Lr(e){if("num"===e.type)return{text:e.token,prec:e.token.startsWith("-")?4:9};if("sym"===e.type)return{text:Fr[e.token]??e.token,prec:9};const n=e.args.map(Lr),t=Cr[e.op];switch(e.op){case"+":case"-":case"±":{const r="+"===e.op&&["+","-"].includes(Ur(e.args[1])),s=Pr(n[1])?`(${n[1].text})`:r?n[1].text:Rr(n[1],t,!0);return{text:`${Rr(n[0],t)} ${"±"===e.op?"±":e.op} ${s}`,prec:t}}case"*":{const r=Rr(n[0],t),s=Pr(n[1])?`(${n[1].text})`:"*"===Ur(e.args[1])?n[1].text:Rr(n[1],t,!0);return{text:"num"===e.args[0].type&&"num"!==e.args[1].type&&!/^[\d(-]/.test(s)||"sym"===e.args[1].type&&"i"===e.args[1].token&&!/[\dA-Za-z]$/.test(r)?`${r}${s}`:`${r}·${s}`,prec:t}}case"/":return{text:`${Rr(n[0],t)}/${Rr(n[1],t,!0)}`,prec:t};case"^":return{text:`${Rr(n[0],t+1)}^${Rr(n[1],t)}`,prec:t};case"neg":return{text:`-${Rr(n[0],3)}`,prec:4};case"pm":return{text:`±${Rr(n[0],4)}`,prec:4};case"!":return{text:`${Rr(n[0],9)}!`,prec:6};case"abs":return{text:`|${n[0].text}|`,prec:9};case"root":return{text:`root(${n[0].text}, ${n[1].text})`,prec:9};case"der":return{text:`d/d${n[1].text} (${n[0].text})`,prec:6};case"int":return{text:4===n.length?`∫ from ${n[2].text} to ${n[3].text} of ${n[0].text} d${n[1].text}`:`∫ ${n[0].text} d${n[1].text}`,prec:1};case"|":return{text:`${n[0].text} or ${n[1].text}`,prec:0};case"_":return{text:`${Rr(n[0],9)}_${n[1].prec>=9&&!/\s/.test(n[1].text)?n[1].text:`(${n[1].text})`}`,prec:9};case"()":case"[]":case"{}":case"(]":case"[)":return{text:`${Wr[e.op][0]}${n.map(e=>e.text).join(", ")}${Wr[e.op][1]}`,prec:9};case"&":return{text:`${n[0].text} and ${n[1].text}`,prec:0};default:return void 0!==t?{text:`${Rr(n[0],t)} ${e.op} ${Rr(n[1],t,!0)}`,prec:t}:{text:`${e.op.replace(/^\\:?/,"")}(${n.map(e=>e.text).join(", ")})`,prec:9}}}const _r=['name: Differentiation\n\n# `u v der` means d(u)/dv (MathZetta\'s postfix: mathzetta/docs/postfix.md). Every rule here rewrites one derivative into smaller\n# derivatives, so differentiating always terminates: the expressions sitting\n# under a `D` get strictly smaller at every step.\n#\n# The variable is a slot, not a fixed letter, so these rules work for d/dx,\n# d/dt or anything else. That is what freeOf and dependsOn are for: they ask\n# whether one operand mentions whatever the variable slot bound to.\n#\n# Where two rules share a structure key, requirements keep them apart and\n# priority picks the one that reads better. The constant-multiple rule outranks\n# the product rule for exactly that reason.\n\nrules:\n  # ---- the two base cases ----------------------------------------------\n  - id: d-constant\n    name: Derivative of a constant\n    mode: differentiate\n    pattern: c v der\n    require:\n      - [freeOf, c, v]\n    output: "0"\n    priority: 10\n    explain: "{c} does not change when {v} changes, so its rate of change is 0."\n    tags: [base]\n\n  - id: d-variable\n    name: Derivative of the variable\n    mode: differentiate\n    pattern: u v der\n    require:\n      - [sameAs, u, v]\n    output: "1"\n    priority: 10\n    explain: "{v} changes exactly as fast as itself, so the rate is 1."\n    tags: [base]\n\n  # ---- splitting a derivative into smaller ones ------------------------\n  - id: d-sum\n    name: Sum rule\n    mode: differentiate\n    pattern: u w + v der\n    output: u v der w v der +\n    explain: "Differentiate {u} and {w} separately, then add the two results."\n    tags: [split]\n\n  - id: d-difference\n    name: Difference rule\n    mode: differentiate\n    pattern: u w - v der\n    output: u v der w v der -\n    explain: "Differentiate {u} and {w} separately, then subtract the second from the first."\n    tags: [split]\n\n  - id: d-negate\n    name: Derivative of a negative\n    mode: differentiate\n    pattern: u neg v der\n    output: u v der neg\n    explain: "The minus sign just carries through to the derivative of {u}."\n    tags: [split]\n\n  - id: d-constant-multiple\n    name: Constant multiple rule\n    mode: differentiate\n    pattern: c u * v der\n    commutative: true\n    require:\n      - [freeOf, c, v]\n      - [dependsOn, u, v]\n    output: c u v der *\n    priority: 5\n    explain: "{c} is only a scale factor, so it comes along unchanged while {u} is differentiated."\n    tags: [split]\n\n  - id: d-constant-divisor\n    name: Dividing by a constant\n    mode: differentiate\n    pattern: u c / v der\n    require:\n      - [freeOf, c, v]\n    output: u v der c /\n    priority: 5\n    explain: "Dividing by {c} is only a scale factor, so differentiate {u} and keep the division."\n    tags: [split]\n\n  - id: d-product\n    name: Product rule\n    mode: differentiate\n    pattern: u w * v der\n    require:\n      - [dependsOn, u, v]\n      - [dependsOn, w, v]\n    output: u v der w * u w v der * +\n    explain: "Differentiate {u} and keep {w}, then keep {u} and differentiate {w}, and add the two."\n    tags: [split]\n\n  - id: d-quotient\n    name: Quotient rule\n    mode: differentiate\n    pattern: u w / v der\n    output: u v der w * u w v der * - w 2 ^ /\n    explain: "Bottom times the derivative of the top, minus top times the derivative of the bottom, all over {w} squared."\n    tags: [split]\n\n  # ---- powers -----------------------------------------------------------\n  - id: d-power-of-variable\n    name: Power rule\n    mode: differentiate\n    pattern: u n ^ v der\n    require:\n      - [sameAs, u, v]\n      - [freeOf, n, v]\n    output: n u n 1 - ^ *\n    fold: true\n    priority: 6\n    explain: "Bring the {n} down in front and drop the power by one."\n    tags: [power]\n\n  - id: d-power-chain\n    name: Power rule with the chain rule\n    mode: differentiate\n    pattern: u n ^ v der\n    require:\n      - [freeOf, n, v]\n      - [dependsOn, u, v]\n    output: n u n 1 - ^ * u v der *\n    fold: true\n    explain: "Bring the {n} down and drop the power by one, then multiply by the derivative of {u}."\n    tags: [power, chain]\n\n  - id: d-exponential-base\n    name: Derivative of a constant to a power\n    mode: differentiate\n    pattern: a u ^ v der\n    require:\n      - [freeOf, a, v]\n      - [dependsOn, u, v]\n    output: a u ^ a ln * u v der *\n    explain: "A constant base gives itself back, multiplied by the natural log of {a} and the derivative of {u}."\n    tags: [power, chain]\n\n  # ---- the standard functions, each with its chain-rule factor ---------\n  # e^u is `=e u ^`: the base is the literal symbol e. Outranks the general\n  # a^u rule (which would give e^u · ln e · u\').\n  - id: d-exp\n    name: Derivative of e to a power\n    mode: differentiate\n    pattern: =e u ^ v der\n    require:\n      - [dependsOn, u, v]\n    output: =e u ^ u v der *\n    priority: 7\n    explain: "e to a power is its own derivative, times the derivative of {u}."\n    tags: [chain]\n\n  - id: d-ln\n    name: Derivative of a natural log\n    mode: differentiate\n    pattern: u ln v der\n    output: u v der u /\n    explain: "The derivative of {u} over {u} itself."\n    tags: [chain]\n\n  - id: d-sqrt\n    name: Derivative of a square root\n    mode: differentiate\n    pattern: u sqrt v der\n    output: u v der 2 u sqrt * /\n    explain: "The derivative of {u}, over twice the square root of {u}."\n    tags: [chain]\n\n  - id: d-sin\n    name: Derivative of sine\n    mode: differentiate\n    pattern: u sin v der\n    output: u cos u v der *\n    explain: "Sine differentiates to cosine, times the derivative of {u}."\n    tags: [chain, trig]\n\n  - id: d-cos\n    name: Derivative of cosine\n    mode: differentiate\n    pattern: u cos v der\n    output: u sin u v der * neg\n    explain: "Cosine differentiates to minus sine, times the derivative of {u}."\n    tags: [chain, trig]\n\n  - id: d-tan\n    name: Derivative of tangent\n    mode: differentiate\n    pattern: u tan v der\n    output: u v der u cos 2 ^ /\n    explain: "The derivative of {u}, over cosine squared of {u}."\n    tags: [chain, trig]\n\n  # ---- the rest of the standard functions -----------------------------\n  - id: d-csc\n    name: Derivative of cosecant\n    mode: differentiate\n    pattern: u csc v der\n    output: u csc u cot * u v der * neg\n    explain: "Cosecant differentiates to minus cosecant times cotangent, times the derivative of {u}."\n    tags: [chain, trig]\n\n  - id: d-sec\n    name: Derivative of secant\n    mode: differentiate\n    pattern: u sec v der\n    output: u sec u tan * u v der *\n    explain: "Secant differentiates to secant times tangent, times the derivative of {u}."\n    tags: [chain, trig]\n\n  - id: d-cot\n    name: Derivative of cotangent\n    mode: differentiate\n    pattern: u cot v der\n    output: u v der u sin 2 ^ / neg\n    explain: "Minus the derivative of {u}, over sine squared of {u}."\n    tags: [chain, trig]\n\n  - id: d-arcsin\n    name: Derivative of arcsine\n    mode: differentiate\n    pattern: u arcsin v der\n    output: u v der 1 u 2 ^ - sqrt /\n    explain: "The derivative of {u}, over the square root of 1 minus {u} squared."\n    tags: [chain, trig]\n\n  - id: d-arccos\n    name: Derivative of arccosine\n    mode: differentiate\n    pattern: u arccos v der\n    output: u v der 1 u 2 ^ - sqrt / neg\n    explain: "Minus the derivative of {u}, over the square root of 1 minus {u} squared."\n    tags: [chain, trig]\n\n  - id: d-arctan\n    name: Derivative of arctangent\n    mode: differentiate\n    pattern: u arctan v der\n    output: u v der 1 u 2 ^ + /\n    explain: "The derivative of {u}, over 1 plus {u} squared."\n    tags: [chain, trig]\n\n  - id: d-sinh\n    name: Derivative of hyperbolic sine\n    mode: differentiate\n    pattern: u sinh v der\n    output: u cosh u v der *\n    explain: "Hyperbolic sine differentiates to hyperbolic cosine, times the derivative of {u}."\n    tags: [chain, hyperbolic]\n\n  - id: d-cosh\n    name: Derivative of hyperbolic cosine\n    mode: differentiate\n    pattern: u cosh v der\n    output: u sinh u v der *\n    explain: "Hyperbolic cosine differentiates to hyperbolic sine — no minus sign, unlike cosine — times the derivative of {u}."\n    tags: [chain, hyperbolic]\n\n  - id: d-tanh\n    name: Derivative of hyperbolic tangent\n    mode: differentiate\n    pattern: u tanh v der\n    output: u v der u cosh 2 ^ /\n    explain: "The derivative of {u}, over hyperbolic cosine squared of {u}."\n    tags: [chain, hyperbolic]\n\n  - id: d-arcsinh\n    name: Derivative of inverse hyperbolic sine\n    mode: differentiate\n    pattern: u arcsinh v der\n    output: u v der u 2 ^ 1 + sqrt /\n    explain: "The derivative of {u}, over the square root of {u} squared plus 1."\n    tags: [chain, hyperbolic]\n\n  - id: d-arccosh\n    name: Derivative of inverse hyperbolic cosine\n    mode: differentiate\n    pattern: u arccosh v der\n    output: u v der u 2 ^ 1 - sqrt /\n    explain: "The derivative of {u}, over the square root of {u} squared minus 1."\n    tags: [chain, hyperbolic]\n\n  - id: d-arctanh\n    name: Derivative of inverse hyperbolic tangent\n    mode: differentiate\n    pattern: u arctanh v der\n    output: u v der 1 u 2 ^ - /\n    explain: "The derivative of {u}, over 1 minus {u} squared."\n    tags: [chain, hyperbolic]\n\n  # log base a: `a u log` in MathZetta\'s postfix\n  - id: d-log\n    name: Derivative of a logarithm\n    mode: differentiate\n    pattern: a u log v der\n    require:\n      - [freeOf, a, v]\n    output: u v der u a ln * /\n    explain: "The derivative of {u}, over {u} times the natural log of {a}."\n    tags: [chain]\n\n  - id: d-abs\n    name: Derivative of an absolute value\n    mode: differentiate\n    pattern: u abs v der\n    output: u u abs / u v der *\n    explain: "The absolute value keeps the sign of {u}: {u} over its absolute value, times the derivative of {u}."\n    tags: [chain]\n\n  # n-th root: `n u root`\n  - id: d-root\n    name: Derivative of a root\n    mode: differentiate\n    pattern: n u root v der\n    require:\n      - [freeOf, n, v]\n    output: u v der n n u root n 1 - ^ * /\n    fold: true\n    explain: "The derivative of {u}, over {n} times the {n}th root of {u} to the power {n} minus 1."\n    tags: [chain]\n','name: More derivatives\n\n# Derivative rules the CAS adds to rules/calculus.yaml (which calcvidnew also uses).\n\nrules:\n  - id: d-general-power\n    name: A power with the variable in both places\n    mode: differentiate\n    pattern: u w ^ v der\n    require:\n      - [dependsOn, u, v]\n      - [dependsOn, w, v]\n    output: u w ^ w v der u ln * w u v der * u / + *\n    explain: "Write {u}^{w} as e^({w} ln {u}) and use the chain rule: the derivative is {u}^{w} times the derivative of {w} ln {u}."\n    tags: [chain]\n','name: Integrals\n\n# mode: integrate. `f v 2 int` is ∫ f dv (MathZetta\'s postfix; the 2 counts f and v).\n# Each rule turns one integral into smaller ones, or into an answer. The CAS also\n# tries, when no rule fits: multiplying out, a linear substitution (∫ f(ax + b) dx\n# from the rule for ∫ f(u) du), and integration by parts for polynomial × e^, sin,\n# cos, ln, arctan. Definite integrals are the antiderivative between the limits.\n#\n# Patterns see the normal form: 1/x is "1 x /", x^-2 is "1 x 2 ^ /", √x is "x sqrt",\n# 1/√(1 - x²) is "1 x 2 ^ neg 1 + sqrt /".\n\nrules:\n  # ---- splitting -----------------------------------------------------------\n  - id: i-sum\n    name: Sum rule\n    mode: integrate\n    pattern: u w + v 2 int\n    output: u v 2 int w v 2 int +\n    explain: "Integrate {u} and {w} separately, and add."\n    tags: [split]\n\n  - id: i-difference\n    name: Difference rule\n    mode: integrate\n    pattern: u w - v 2 int\n    output: u v 2 int w v 2 int -\n    explain: "Integrate {u} and {w} separately, and subtract."\n    tags: [split]\n\n  - id: i-negate\n    name: A minus sign\n    mode: integrate\n    pattern: u neg v 2 int\n    output: u v 2 int neg\n    explain: "The minus sign comes out of the integral."\n    tags: [split]\n\n  - id: i-constant-multiple\n    name: Constant multiple\n    mode: integrate\n    pattern: c u * v 2 int\n    commutative: true\n    require:\n      - [freeOf, c, v]\n      - [dependsOn, u, v]\n    output: c u v 2 int *\n    priority: 5\n    explain: "{c} doesn\'t change with {v}, so it comes out of the integral."\n    tags: [split]\n\n  - id: i-constant-divisor\n    name: Dividing by a constant\n    mode: integrate\n    pattern: u c / v 2 int\n    require:\n      - [freeOf, c, v]\n      - [dependsOn, u, v]\n    output: u v 2 int c /\n    priority: 5\n    explain: "Dividing by {c} comes out of the integral."\n    tags: [split]\n\n  - id: i-constant-over\n    name: A constant over something\n    mode: integrate\n    pattern: c u / v 2 int\n    require:\n      - [freeOf, c, v]\n      - [dependsOn, u, v]\n    when:\n      c: [notOne]\n    output: c 1 u / v 2 int *\n    priority: 4\n    explain: "{c} comes out of the integral, leaving ∫ 1/{u}."\n    tags: [split]\n\n  # ---- the table -----------------------------------------------------------\n  - id: i-constant\n    name: Integral of a constant\n    mode: integrate\n    pattern: c v 2 int\n    require:\n      - [freeOf, c, v]\n    output: c v *\n    priority: 10\n    explain: "A constant {c} integrates to {c}·{v}."\n    tags: [base]\n\n  - id: i-variable\n    name: Integral of the variable\n    mode: integrate\n    pattern: u v 2 int\n    require:\n      - [sameAs, u, v]\n    output: v 2 ^ 2 /\n    priority: 10\n    explain: "∫ {v} d{v} = {v}²/2."\n    tags: [base]\n\n  - id: i-power\n    name: Power rule\n    mode: integrate\n    pattern: u n ^ v 2 int\n    require:\n      - [sameAs, u, v]\n      - [freeOf, n, v]\n    when:\n      n: [notMinusOne]\n    output: v n 1 + ^ n 1 + /\n    explain: "Add 1 to the power and divide by the new power: {result}."\n    tags: [power]\n\n  - id: i-reciprocal\n    name: Integral of 1/x\n    mode: integrate\n    pattern: 1 u / v 2 int\n    require:\n      - [sameAs, u, v]\n    output: v abs ln\n    explain: "∫ 1/{v} d{v} = ln|{v}| (the power rule can\'t divide by 0 here)."\n    tags: [log]\n\n  - id: i-reciprocal-power\n    name: Power rule (a power below)\n    mode: integrate\n    pattern: 1 u n ^ / v 2 int\n    require:\n      - [sameAs, u, v]\n      - [freeOf, n, v]\n    when:\n      n: [notOne]\n    output: v 1 n - ^ 1 n - /\n    explain: "1/{v}^{n} is {v}^(-{n}): add 1 to the power and divide by it."\n    tags: [power]\n\n  - id: i-sqrt\n    name: Integral of a square root\n    mode: integrate\n    pattern: u sqrt v 2 int\n    require:\n      - [sameAs, u, v]\n    output: 2 v 3 2 / ^ * 3 /\n    explain: "√{v} is {v}^(1/2): add 1 to the power and divide by 3/2."\n    tags: [power]\n\n  - id: i-reciprocal-sqrt\n    name: Integral of 1/√x\n    mode: integrate\n    pattern: 1 u sqrt / v 2 int\n    require:\n      - [sameAs, u, v]\n    output: 2 v sqrt *\n    explain: "1/√{v} is {v}^(-1/2): add 1 to the power and divide by 1/2."\n    tags: [power]\n\n  - id: i-root\n    name: Integral of a root\n    mode: integrate\n    pattern: n u root v 2 int\n    require:\n      - [sameAs, u, v]\n      - [freeOf, n, v]\n    output: v 1 n / 1 + ^ 1 n / 1 + /\n    explain: "The {n}th root of {v} is {v}^(1/{n}): add 1 to the power and divide by it."\n    tags: [power]\n\n  - id: i-exp\n    name: Integral of e^x\n    mode: integrate\n    pattern: =e u ^ v 2 int\n    require:\n      - [sameAs, u, v]\n    output: =e v ^\n    explain: "e^{v} is its own integral."\n    tags: [exp]\n\n  - id: i-exponential\n    name: Integral of a^x\n    mode: integrate\n    pattern: a u ^ v 2 int\n    require:\n      - [sameAs, u, v]\n      - [freeOf, a, v]\n    output: a v ^ a ln /\n    explain: "∫ {a}^{v} d{v} = {a}^{v} / ln {a}."\n    tags: [exp]\n\n  - id: i-ln\n    name: Integral of ln x\n    mode: integrate\n    pattern: u ln v 2 int\n    require:\n      - [sameAs, u, v]\n    output: v v ln * v -\n    explain: "By parts: ∫ ln {v} d{v} = {v} ln {v} - {v}."\n    tags: [log]\n\n  - { id: i-sin, name: Integral of sin, mode: integrate, pattern: u sin v 2 int, require: [[sameAs, u, v]], output: v cos neg, tags: [trig], explain: "The derivative of -cos {v} is sin {v}." }\n  - { id: i-cos, name: Integral of cos, mode: integrate, pattern: u cos v 2 int, require: [[sameAs, u, v]], output: v sin, tags: [trig], explain: "The derivative of sin {v} is cos {v}." }\n  - { id: i-tan, name: Integral of tan, mode: integrate, pattern: u tan v 2 int, require: [[sameAs, u, v]], output: v cos abs ln neg, tags: [trig], explain: "tan = sin/cos, and -ln|cos {v}| differentiates to it." }\n  - { id: i-sec-squared, name: Integral of sec², mode: integrate, pattern: 1 u cos 2 ^ / v 2 int, require: [[sameAs, u, v]], output: v tan, tags: [trig], explain: "The derivative of tan {v} is 1/cos²{v}." }\n  - { id: i-sec-squared-written, name: Integral of sec², mode: integrate, pattern: u sec 2 ^ v 2 int, require: [[sameAs, u, v]], output: v tan, tags: [trig], explain: "The derivative of tan {v} is sec²{v}." }\n  - { id: i-csc-squared, name: Integral of csc², mode: integrate, pattern: 1 u sin 2 ^ / v 2 int, require: [[sameAs, u, v]], output: v cot neg, tags: [trig], explain: "The derivative of -cot {v} is 1/sin²{v}." }\n  - { id: i-sin-squared, name: Integral of sin², mode: integrate, pattern: u sin 2 ^ v 2 int, require: [[sameAs, u, v]], output: v 2 / 2 v * sin 4 / -, tags: [trig], explain: "sin²{v} = (1 - cos 2{v})/2, which integrates term by term." }\n  - { id: i-cos-squared, name: Integral of cos², mode: integrate, pattern: u cos 2 ^ v 2 int, require: [[sameAs, u, v]], output: v 2 / 2 v * sin 4 / +, tags: [trig], explain: "cos²{v} = (1 + cos 2{v})/2, which integrates term by term." }\n  - { id: i-sinh, name: Integral of sinh, mode: integrate, pattern: u sinh v 2 int, require: [[sameAs, u, v]], output: v cosh, tags: [trig], explain: "The derivative of cosh {v} is sinh {v}." }\n  - { id: i-cosh, name: Integral of cosh, mode: integrate, pattern: u cosh v 2 int, require: [[sameAs, u, v]], output: v sinh, tags: [trig], explain: "The derivative of sinh {v} is cosh {v}." }\n  - { id: i-arctan, name: Integral of 1/(1 + x²), mode: integrate, pattern: 1 u 2 ^ 1 + / v 2 int, require: [[sameAs, u, v]], output: v arctan, tags: [trig], explain: "The derivative of arctan {v} is 1/(1 + {v}²)." }\n  - { id: i-arcsin, name: Integral of 1/√(1 - x²), mode: integrate, pattern: 1 u 2 ^ neg 1 + sqrt / v 2 int, require: [[sameAs, u, v]], output: v arcsin, tags: [trig], explain: "The derivative of arcsin {v} is 1/√(1 - {v}²)." }\n','name: Values and identities\n\n# The CAS\'s simplify rules (mode: simplify). They see expressions in normal form\n# (src/cas/form.js), as drawn: x/2, 2x - 3, -x, √x is "x sqrt",\n# ∛x is "3 x root", π/6 is "=pi 6 /", 2π/3 is "2 =pi * 3 /", e^x is "=e x ^".\n#\n#   - a word is a slot (u, v, n …); a fixed symbol is written =pi, =e\n#   - a number is itself; "1 2 /" is ½\n#   - arithmetic (2 + 3, x + x, √8 = 2√2) is done for you before and after every rule\n#   - a rule for a sum or product of two parts also fires on any two parts of a longer one\n#   - tags pick what a step list shows (steps: \'brief\' hides value, identity, tidy …)\n#\n# To change one: copy it into a file of your own with the same id and edit it;\n# to turn one off: give its id with enabled: false. createCAS({ rules: [yours] }).\n\nrules:\n  # ---- logs and exponentials -------------------------------------------\n  - id: ln-one\n    name: Log of 1\n    pattern: 1 ln\n    output: "0"\n    explain: "e^0 = 1, so ln 1 = 0."\n    tags: [value]\n\n  - id: ln-e\n    name: Log of e\n    pattern: =e ln\n    output: "1"\n    explain: "e^1 = e, so ln e = 1."\n    tags: [value]\n\n  - id: ln-exp\n    name: Log undoes e to a power\n    pattern: =e u ^ ln\n    output: u\n    explain: "ln and e^ undo each other: ln(e^{u}) = {u}."\n    tags: [inverse]\n\n  - id: exp-ln\n    name: e to a power undoes the log\n    pattern: =e u ln ^\n    output: u\n    explain: "e^ and ln undo each other: e^(ln {u}) = {u} (for {u} > 0)."\n    tags: [inverse]\n\n  - id: exp-multiple-ln\n    name: A multiple of a log in a power\n    pattern: =e n u ln * ^\n    when:\n      n: [isRational]\n    output: u n ^\n    explain: "e^({n} ln {u}) = (e^(ln {u}))^{n} = {result}."\n    tags: [inverse]\n\n  - id: log-same-base\n    name: Log of its own base\n    pattern: b b log\n    output: "1"\n    explain: "{b}^1 = {b}, so the log of {b} to base {b} is 1."\n    tags: [value]\n\n  - id: log-of-power\n    name: Log undoes a power of its base\n    pattern: b b u ^ log\n    output: u\n    explain: "log base {b} and {b}^ undo each other."\n    tags: [inverse]\n\n  - id: power-of-log\n    name: A power undoes the log to its base\n    pattern: b b u log ^\n    output: u\n    explain: "{b}^(log base {b} of {u}) = {u}."\n    tags: [inverse]\n\n  # ---- roots and absolute value --------------------------------------------\n  - id: sqrt-of-square\n    name: Square root of a square\n    pattern: u 2 ^ sqrt\n    output: u abs\n    explain: "√({u}²) is the size of {u}, whatever its sign: |{u}|."\n    tags: [identity]\n\n  - id: abs-squared\n    name: Absolute value squared\n    pattern: u abs 2 ^\n    output: u 2 ^\n    explain: "Squaring removes the sign anyway: |{u}|² = {u}²."\n    tags: [identity]\n\n  - id: abs-of-abs\n    name: Absolute value twice\n    pattern: u abs abs\n    output: u abs\n    explain: "|{u}| is never negative, so its absolute value is itself."\n    tags: [identity]\n\n  - id: abs-positive\n    name: Absolute value of a positive number\n    pattern: u abs\n    when:\n      u: [isPositiveConstant]\n    output: u\n    explain: "{u} is positive, so |{u}| = {u}."\n    tags: [value]\n\n  - id: abs-negative\n    name: Absolute value of a negative number\n    pattern: u abs\n    when:\n      u: [isNegativeConstant]\n    output: u neg\n    explain: "{u} is negative, so |{u}| = -({u})."\n    tags: [value]\n\n  - id: abs-of-exp\n    name: e to a power is positive\n    pattern: =e u ^ abs\n    output: =e u ^\n    explain: "e to any power is positive, so the absolute value changes nothing."\n    tags: [identity]\n\n  # ---- trigonometry: signs and turns ---------------------------------------\n  - id: sin-odd\n    name: Sine of a negative angle\n    pattern: u sin\n    when:\n      u: [hasMinusSign]\n    output: u neg sin neg\n    explain: "sin(-θ) = -sin θ."\n    tags: [symmetry]\n\n  - id: cos-even\n    name: Cosine of a negative angle\n    pattern: u cos\n    when:\n      u: [hasMinusSign]\n    output: u neg cos\n    explain: "cos(-θ) = cos θ."\n    tags: [symmetry]\n\n  - id: tan-odd\n    name: Tangent of a negative angle\n    pattern: u tan\n    when:\n      u: [hasMinusSign]\n    output: u neg tan neg\n    explain: "tan(-θ) = -tan θ."\n    tags: [symmetry]\n\n  - id: sin-full-turn\n    name: A full turn\n    pattern: u sin\n    when:\n      u: [[piMultipleAtLeast, 2]]\n    output: u 2 =pi * - sin\n    explain: "Turning a full 2π brings you back: sin({u}) = sin({u} - 2π)."\n    tags: [symmetry]\n\n  - id: cos-full-turn\n    name: A full turn\n    pattern: u cos\n    when:\n      u: [[piMultipleAtLeast, 2]]\n    output: u 2 =pi * - cos\n    explain: "Turning a full 2π brings you back: cos({u}) = cos({u} - 2π)."\n    tags: [symmetry]\n\n  - id: tan-half-turn\n    name: Tangent repeats every π\n    pattern: u tan\n    when:\n      u: [[piMultipleAtLeast, 1]]\n    output: u =pi - tan\n    explain: "tan repeats every π: tan({u}) = tan({u} - π)."\n    tags: [symmetry]\n\n  - id: sin-half-turn\n    name: A half turn\n    pattern: u sin\n    when:\n      u: [[piMultipleAbove, 1], [piMultipleBelow, 2]]\n    output: u =pi - sin neg\n    explain: "Half a turn flips the sign: sin({u}) = -sin({u} - π)."\n    tags: [symmetry]\n\n  - id: cos-half-turn\n    name: A half turn\n    pattern: u cos\n    when:\n      u: [[piMultipleAbove, 1], [piMultipleBelow, 2]]\n    output: u =pi - cos neg\n    explain: "Half a turn flips the sign: cos({u}) = -cos({u} - π)."\n    tags: [symmetry]\n\n  - id: sin-second-quarter\n    name: The second quarter turn\n    pattern: u sin\n    when:\n      u: [[piMultipleAbove, 1/2], [piMultipleAtMost, 1]]\n    output: =pi u - sin\n    explain: "sin({u}) = sin(π - {u})."\n    tags: [symmetry]\n\n  - id: cos-second-quarter\n    name: The second quarter turn\n    pattern: u cos\n    when:\n      u: [[piMultipleAbove, 1/2], [piMultipleAtMost, 1]]\n    output: =pi u - cos neg\n    explain: "cos({u}) = -cos(π - {u})."\n    tags: [symmetry]\n\n  - id: tan-second-quarter\n    name: The second quarter turn\n    pattern: u tan\n    when:\n      u: [[piMultipleAbove, 1/2], [piMultipleBelow, 1]]\n    output: =pi u - tan neg\n    explain: "tan({u}) = -tan(π - {u})."\n    tags: [symmetry]\n\n  # ---- trigonometry: the standard angles -------------------------------------\n  - { id: sin-0, name: Sine of 0, pattern: 0 sin, output: "0", tags: [value], explain: "sin 0 = 0." }\n  - { id: sin-pi-6, name: Sine of π/6, pattern: =pi 6 / sin, output: 1 2 /, tags: [value], explain: "sin(π/6) = 1/2." }\n  - { id: sin-pi-4, name: Sine of π/4, pattern: =pi 4 / sin, output: 2 sqrt 2 /, tags: [value], explain: "sin(π/4) = √2/2." }\n  - { id: sin-pi-3, name: Sine of π/3, pattern: =pi 3 / sin, output: 3 sqrt 2 /, tags: [value], explain: "sin(π/3) = √3/2." }\n  - { id: sin-pi-2, name: Sine of π/2, pattern: =pi 2 / sin, output: "1", tags: [value], explain: "sin(π/2) = 1." }\n  - { id: sin-pi, name: Sine of π, pattern: =pi sin, output: "0", tags: [value], explain: "sin π = 0." }\n  - { id: cos-0, name: Cosine of 0, pattern: 0 cos, output: "1", tags: [value], explain: "cos 0 = 1." }\n  - { id: cos-pi-6, name: Cosine of π/6, pattern: =pi 6 / cos, output: 3 sqrt 2 /, tags: [value], explain: "cos(π/6) = √3/2." }\n  - { id: cos-pi-4, name: Cosine of π/4, pattern: =pi 4 / cos, output: 2 sqrt 2 /, tags: [value], explain: "cos(π/4) = √2/2." }\n  - { id: cos-pi-3, name: Cosine of π/3, pattern: =pi 3 / cos, output: 1 2 /, tags: [value], explain: "cos(π/3) = 1/2." }\n  - { id: cos-pi-2, name: Cosine of π/2, pattern: =pi 2 / cos, output: "0", tags: [value], explain: "cos(π/2) = 0." }\n  - { id: cos-pi, name: Cosine of π, pattern: =pi cos, output: "-1", tags: [value], explain: "cos π = -1." }\n  - { id: tan-0, name: Tangent of 0, pattern: 0 tan, output: "0", tags: [value], explain: "tan 0 = 0." }\n  - { id: tan-pi-6, name: Tangent of π/6, pattern: =pi 6 / tan, output: 3 sqrt 3 /, tags: [value], explain: "tan(π/6) = √3/3." }\n  - { id: tan-pi-4, name: Tangent of π/4, pattern: =pi 4 / tan, output: "1", tags: [value], explain: "tan(π/4) = 1." }\n  - { id: tan-pi-3, name: Tangent of π/3, pattern: =pi 3 / tan, output: 3 sqrt, tags: [value], explain: "tan(π/3) = √3." }\n  - { id: arcsin-0, name: Arcsine of 0, pattern: 0 arcsin, output: "0", tags: [value], explain: "sin 0 = 0, so arcsin 0 = 0." }\n  - { id: arcsin-half, name: Arcsine of 1/2, pattern: 1 2 / arcsin, output: =pi 6 /, tags: [value], explain: "sin(π/6) = 1/2, so arcsin(1/2) = π/6." }\n  - { id: arcsin-1, name: Arcsine of 1, pattern: 1 arcsin, output: =pi 2 /, tags: [value], explain: "sin(π/2) = 1, so arcsin 1 = π/2." }\n  - { id: arccos-0, name: Arccosine of 0, pattern: 0 arccos, output: =pi 2 /, tags: [value], explain: "cos(π/2) = 0, so arccos 0 = π/2." }\n  - { id: arccos-half, name: Arccosine of 1/2, pattern: 1 2 / arccos, output: =pi 3 /, tags: [value], explain: "cos(π/3) = 1/2, so arccos(1/2) = π/3." }\n  - { id: arccos-1, name: Arccosine of 1, pattern: 1 arccos, output: "0", tags: [value], explain: "cos 0 = 1, so arccos 1 = 0." }\n  - { id: arccos-minus-1, name: Arccosine of -1, pattern: -1 arccos, output: =pi, tags: [value], explain: "cos π = -1, so arccos(-1) = π." }\n  - { id: arctan-0, name: Arctangent of 0, pattern: 0 arctan, output: "0", tags: [value], explain: "tan 0 = 0, so arctan 0 = 0." }\n  - { id: arctan-1, name: Arctangent of 1, pattern: 1 arctan, output: =pi 4 /, tags: [value], explain: "tan(π/4) = 1, so arctan 1 = π/4." }\n  - { id: sinh-0, name: sinh of 0, pattern: 0 sinh, output: "0", tags: [value], explain: "sinh 0 = 0." }\n  - { id: cosh-0, name: cosh of 0, pattern: 0 cosh, output: "1", tags: [value], explain: "cosh 0 = 1." }\n  - { id: tanh-0, name: tanh of 0, pattern: 0 tanh, output: "0", tags: [value], explain: "tanh 0 = 0." }\n\n  - { id: arctan-sqrt3, name: Arctangent of √3, pattern: 3 sqrt arctan, output: =pi 3 /, tags: [value], explain: "tan(π/3) = √3, so arctan √3 = π/3." }\n  - { id: arctan-sqrt3-over-3, name: Arctangent of √3/3, pattern: 3 sqrt 3 / arctan, output: =pi 6 /, tags: [value], explain: "tan(π/6) = √3/3, so arctan(√3/3) = π/6." }\n\n  # atan2(y, x): the angle of the point (x, y), in (-π, π]\n  - id: atan2-right\n    name: The angle of a point to the right\n    pattern: y x atan2\n    when:\n      x: [isPositiveConstant]\n    output: y x / arctan\n    explain: "For x > 0, atan2(y, x) = arctan(y/x)."\n    tags: [value]\n  - id: atan2-left-up\n    name: The angle of a point to the left\n    pattern: y x atan2\n    when:\n      x: [isNegativeConstant]\n      y: [isPositiveConstant]\n    output: y x / arctan =pi +\n    explain: "For x < 0 and y > 0, atan2(y, x) = arctan(y/x) + π."\n    tags: [value]\n  - id: atan2-left-down\n    name: The angle of a point to the left\n    pattern: y x atan2\n    when:\n      x: [isNegativeConstant]\n      y: [isNegativeConstant]\n    output: y x / arctan =pi -\n    explain: "For x < 0 and y < 0, atan2(y, x) = arctan(y/x) - π."\n    tags: [value]\n  - { id: atan2-negative-axis, name: The angle of a point on the negative axis, pattern: 0 x atan2, when: { x: [isNegativeConstant] }, output: =pi, tags: [value], explain: "A point on the negative x-axis is at angle π." }\n  - { id: atan2-up, name: Straight up, pattern: y 0 atan2, when: { y: [isPositiveConstant] }, output: =pi 2 /, tags: [value], explain: "A point straight up is at angle π/2." }\n  - { id: atan2-down, name: Straight down, pattern: y 0 atan2, when: { y: [isNegativeConstant] }, output: =pi 2 / neg, tags: [value], explain: "A point straight down is at angle -π/2." }\n\n  # the odd inverses take the sign out; arccos(-u) = π - arccos u\n  - id: arcsin-odd\n    name: Arcsine of a negative\n    pattern: u arcsin\n    when:\n      u: [hasMinusSign]\n    output: u neg arcsin neg\n    explain: "arcsin(-x) = -arcsin x."\n    tags: [symmetry]\n\n  - id: arctan-odd\n    name: Arctangent of a negative\n    pattern: u arctan\n    when:\n      u: [hasMinusSign]\n    output: u neg arctan neg\n    explain: "arctan(-x) = -arctan x."\n    tags: [symmetry]\n\n  - id: arccos-negative\n    name: Arccosine of a negative\n    pattern: u arccos\n    when:\n      u: [hasMinusSign]\n    output: =pi u neg arccos -\n    explain: "arccos(-x) = π - arccos x."\n    tags: [symmetry]\n\n  # ---- trigonometry: identities --------------------------------------------\n  - id: pythagorean\n    name: sin² + cos² = 1\n    pattern: u sin 2 ^ u cos 2 ^ +\n    commutative: true\n    output: "1"\n    explain: "sin²{u} + cos²{u} = 1 for every angle."\n    tags: [identity]\n\n  - id: pythagorean-multiple\n    name: sin² + cos² = 1\n    pattern: a u sin 2 ^ * a u cos 2 ^ * +\n    commutative: true\n    output: a\n    explain: "{a}·sin²{u} + {a}·cos²{u} = {a}(sin²{u} + cos²{u}) = {a}."\n    tags: [identity]\n\n  - id: one-minus-sin-squared\n    name: 1 - sin² = cos²\n    pattern: u sin 2 ^ neg 1 +\n    output: u cos 2 ^\n    explain: "1 - sin²{u} = cos²{u}."\n    tags: [identity]\n\n  - id: one-minus-cos-squared\n    name: 1 - cos² = sin²\n    pattern: u cos 2 ^ neg 1 +\n    output: u sin 2 ^\n    explain: "1 - cos²{u} = sin²{u}."\n    tags: [identity]\n\n  - id: sin-over-cos\n    name: sin/cos is tan\n    pattern: u sin u cos /\n    output: u tan\n    explain: "sin {u} / cos {u} = tan {u}."\n    tags: [identity]\n\n  - id: cos-over-sin\n    name: cos/sin is cot\n    pattern: u cos u sin /\n    output: u cot\n    explain: "cos {u} / sin {u} = cot {u}."\n    tags: [identity]\n\n  - id: sin-arcsin\n    name: sin undoes arcsin\n    pattern: u arcsin sin\n    output: u\n    explain: "sin(arcsin {u}) = {u}."\n    tags: [inverse]\n\n  - id: cos-arccos\n    name: cos undoes arccos\n    pattern: u arccos cos\n    output: u\n    explain: "cos(arccos {u}) = {u}."\n    tags: [inverse]\n\n  - id: tan-arctan\n    name: tan undoes arctan\n    pattern: u arctan tan\n    output: u\n    explain: "tan(arctan {u}) = {u}."\n    tags: [inverse]\n\n  - id: cosh-squared-minus-sinh-squared\n    name: cosh² - sinh² = 1\n    pattern: u cosh 2 ^ u sinh 2 ^ -\n    output: "1"\n    explain: "cosh²{u} - sinh²{u} = 1."\n    tags: [identity]\n\n  # ---- logs: opt-in rewrites (run with cas.rewrite(x, \'expand-log\') or \'combine-log\') ----\n  - id: ln-product\n    name: Log of a product\n    mode: expand-log\n    pattern: a b * ln\n    output: a ln b ln +\n    explain: "ln({a}·{b}) = ln {a} + ln {b} (for positive {a}, {b})."\n    tags: [log]\n\n  - id: ln-quotient\n    name: Log of a quotient\n    mode: expand-log\n    pattern: a b / ln\n    output: a ln b ln -\n    explain: "ln({a}/{b}) = ln {a} - ln {b} (for positive {a}, {b})."\n    tags: [log]\n\n  - id: ln-power\n    name: Log of a power\n    mode: expand-log\n    pattern: a n ^ ln\n    output: n a ln *\n    explain: "ln({a}^{n}) = {n}·ln {a} (for positive {a})."\n    tags: [log]\n\n  - id: ln-root\n    name: Log of a square root\n    mode: expand-log\n    pattern: a sqrt ln\n    output: a ln 2 /\n    explain: "ln √{a} = ½ ln {a}."\n    tags: [log]\n\n  - id: ln-sum-combine\n    name: Sum of logs\n    mode: combine-log\n    pattern: a ln b ln +\n    commutative: true\n    output: a b * ln\n    explain: "ln {a} + ln {b} = ln({a}·{b})."\n    tags: [log]\n\n  - id: ln-difference-combine\n    name: Difference of logs\n    mode: combine-log\n    pattern: a ln b ln -\n    output: a b / ln\n    explain: "ln {a} - ln {b} = ln({a}/{b})."\n    tags: [log]\n\n  - id: ln-multiple-combine\n    name: A multiple of a log\n    mode: combine-log\n    pattern: n a ln *\n    when:\n      n: [isRational]\n    output: a n ^ ln\n    explain: "{n}·ln {a} = ln({a}^{n})."\n    tags: [log]\n','name: Solving by undoing\n\n# mode: isolate. Each rule undoes the outermost function on the side with the\n# unknown: ln u = r → u = e^r. The predicates hasVariable and freeOfVariable mean\n# "mentions / doesn\'t mention the unknown being solved for".\n#\n# The CAS does the rest itself: it moves terms without the unknown to the other\n# side, divides by a coefficient, and when the unknown appears in several places\n# it uses the polynomial methods (factoring, the quadratic formula) or splits a\n# product equal to 0. Every answer is checked in the original equation, so a\n# rule may give extra candidates (squaring both sides does): the wrong ones are\n# dropped, with a step saying so.\n#\n# An output can give several answers: `pm` (±) splits into two, and so does\n# `|` (or): "u r arcsin = u =pi r arcsin - = |".\n\nrules:\n  - id: iso-swap\n    name: Unknown on the left\n    mode: isolate\n    pattern: l r =\n    when:\n      l: [freeOfVariable]\n      r: [hasVariable]\n    output: r l =\n    priority: 20\n    explain: "Swap the sides so the unknown is on the left."\n    tags: [tidy]\n\n  - id: iso-ln\n    name: Undo the log\n    mode: isolate\n    pattern: u ln r =\n    when:\n      u: [hasVariable]\n    output: u =e r ^ =\n    explain: "Raise e to each side: e^(ln {u}) = {u}."\n    tags: [inverse]\n\n  - id: iso-log\n    name: Undo the log\n    mode: isolate\n    pattern: b u log r =\n    when:\n      u: [hasVariable]\n      b: [freeOfVariable]\n    output: u b r ^ =\n    explain: "Raise {b} to each side: {b}^(log base {b} of {u}) = {u}."\n    tags: [inverse]\n\n  - id: iso-exp\n    name: Undo e to a power\n    mode: isolate\n    pattern: =e u ^ r =\n    when:\n      u: [hasVariable]\n    output: u r ln =\n    explain: "Take ln of each side: ln(e^{u}) = {u}."\n    tags: [inverse]\n\n  - id: iso-exponential\n    name: Undo a power of a number\n    mode: isolate\n    pattern: b u ^ r =\n    when:\n      u: [hasVariable]\n      b: [freeOfVariable]\n    output: u b r log =\n    explain: "Take the log to base {b} of each side."\n    tags: [inverse]\n\n  - id: iso-square\n    name: Undo the square\n    mode: isolate\n    pattern: u 2 ^ r =\n    when:\n      u: [hasVariable]\n    output: u r sqrt pm =\n    priority: 1\n    explain: "Take the square root of each side; {u} can be positive or negative."\n    tags: [inverse]\n\n  - id: iso-even-power\n    name: Undo an even power\n    mode: isolate\n    pattern: u n ^ r =\n    when:\n      u: [hasVariable]\n      n: [isEvenWhole]\n    output: u r 1 n / ^ pm =\n    explain: "Take the root of each side (the {n}th root); {u} can be positive or negative."\n    tags: [inverse]\n\n  - id: iso-odd-power\n    name: Undo an odd power\n    mode: isolate\n    pattern: u n ^ r =\n    when:\n      u: [hasVariable]\n      n: [isOddWhole]\n    output: u r 1 n / ^ =\n    explain: "Take the root of each side (the {n}th root)."\n    tags: [inverse]\n\n  - id: iso-fractional-power\n    name: Undo a power\n    mode: isolate\n    pattern: u n ^ r =\n    when:\n      u: [hasVariable]\n      n: [isRational]\n    output: u r 1 n / ^ =\n    priority: -1\n    explain: "Raise each side to the power 1/{n}."\n    tags: [inverse]\n\n  - id: iso-sqrt\n    name: Undo the square root\n    mode: isolate\n    pattern: u sqrt r =\n    when:\n      u: [hasVariable]\n    output: u r 2 ^ =\n    explain: "Square each side (this can add answers, so each one is checked at the end)."\n    tags: [inverse]\n\n  - id: iso-root\n    name: Undo the root\n    mode: isolate\n    pattern: n u root r =\n    when:\n      u: [hasVariable]\n      n: [freeOfVariable]\n    output: u r n ^ =\n    explain: "Raise each side to the power {n}."\n    tags: [inverse]\n\n  - id: iso-reciprocal\n    name: Undo the fraction\n    mode: isolate\n    pattern: c u / r =\n    when:\n      u: [hasVariable]\n      c: [freeOfVariable]\n    output: u c r / =\n    explain: "{c}/{u} = {r}, so {u} = {c}/{r}."\n    tags: [inverse]\n\n  - id: iso-abs\n    name: Undo the absolute value\n    mode: isolate\n    pattern: u abs r =\n    when:\n      u: [hasVariable]\n    output: u r pm =\n    explain: "|{u}| = {r} means {u} is {r} or -{r}."\n    tags: [inverse]\n\n  - id: iso-sin\n    name: Undo the sine\n    mode: isolate\n    pattern: u sin r =\n    when:\n      u: [hasVariable]\n    output: u r arcsin = u =pi r arcsin - = |\n    explain: "Two angles in a turn have sine {r}: arcsin {r} and π - arcsin {r} (add any whole number of turns, 2πk, for the rest)."\n    tags: [inverse, trig]\n\n  - id: iso-cos\n    name: Undo the cosine\n    mode: isolate\n    pattern: u cos r =\n    when:\n      u: [hasVariable]\n    output: u r arccos pm =\n    explain: "Two angles in a turn have cosine {r}: ±arccos {r} (add 2πk for the rest)."\n    tags: [inverse, trig]\n\n  - id: iso-tan\n    name: Undo the tangent\n    mode: isolate\n    pattern: u tan r =\n    when:\n      u: [hasVariable]\n    output: u r arctan =\n    explain: "Take arctan of each side (add πk for the rest)."\n    tags: [inverse, trig]\n\n  - { id: iso-arcsin, name: Undo arcsin, mode: isolate, pattern: u arcsin r =, when: { u: [hasVariable] }, output: u r sin =, tags: [inverse], explain: "Take sin of each side." }\n  - { id: iso-arccos, name: Undo arccos, mode: isolate, pattern: u arccos r =, when: { u: [hasVariable] }, output: u r cos =, tags: [inverse], explain: "Take cos of each side." }\n  - { id: iso-arctan, name: Undo arctan, mode: isolate, pattern: u arctan r =, when: { u: [hasVariable] }, output: u r tan =, tags: [inverse], explain: "Take tan of each side." }\n  - { id: iso-sinh, name: Undo sinh, mode: isolate, pattern: u sinh r =, when: { u: [hasVariable] }, output: u r arcsinh =, tags: [inverse], explain: "Take arcsinh of each side." }\n  - { id: iso-tanh, name: Undo tanh, mode: isolate, pattern: u tanh r =, when: { u: [hasVariable] }, output: u r arctanh =, tags: [inverse], explain: "Take arctanh of each side." }\n  - { id: iso-cosh, name: Undo cosh, mode: isolate, pattern: u cosh r =, when: { u: [hasVariable] }, output: u r arccosh pm =, tags: [inverse], explain: "Two numbers have cosh {r}: ±arccosh {r}." }\n  - { id: iso-arcsinh, name: Undo arcsinh, mode: isolate, pattern: u arcsinh r =, when: { u: [hasVariable] }, output: u r sinh =, tags: [inverse], explain: "Take sinh of each side." }\n  - { id: iso-arccosh, name: Undo arccosh, mode: isolate, pattern: u arccosh r =, when: { u: [hasVariable] }, output: u r cosh =, tags: [inverse], explain: "Take cosh of each side." }\n  - { id: iso-arctanh, name: Undo arctanh, mode: isolate, pattern: u arctanh r =, when: { u: [hasVariable] }, output: u r tanh =, tags: [inverse], explain: "Take tanh of each side." }\n'],Hr=['name: Complex numbers\n\n# Loaded only by createCAS({ complex: true }), where i is the imaginary unit.\n# The arithmetic (i² = -1, √-4 = 2i, (2 + 3i)(1 - i) = 5 + i, 1/(1 + i) = (1 - i)/2)\n# and Re, Im, conj, arg, |z| are the normal form\'s (src/cas/form.js); unknowns\n# count as real, so Re(x + 3i) = x. Write a complex unknown as a + bi.\n\noperators:\n  - { symbol: re, arity: 1, label: real part }\n  - { symbol: im, arity: 1, label: imaginary part }\n  - { symbol: conj, arity: 1, label: complex conjugate }\n  - { symbol: arg, arity: 1, label: argument }\n\nrules:\n  - id: euler\n    name: Euler\'s formula\n    pattern: =e u ^\n    when:\n      u: [hasImaginaryPart, isConstant]\n    output: =e u re ^ u im cos =i u im sin * + *\n    explain: "e^(a + bi) = e^a (cos b + i sin b)."\n    tags: [complex]\n\n  - id: ln-negative\n    name: Log of a negative number\n    pattern: u ln\n    when:\n      u: [isNegativeConstant]\n    output: u neg ln =i =pi * +\n    explain: "{u} = |{u}|·e^(iπ), so ln {u} = ln |{u}| + iπ (the principal value)."\n    tags: [complex]\n\n  - id: ln-complex\n    name: Log of a complex number\n    pattern: u ln\n    when:\n      u: [hasImaginaryPart, isConstant]\n    output: u abs ln u arg =i * +\n    explain: "ln z = ln |z| + i arg z (the principal value)."\n    tags: [complex]\n\n  - id: i-to-the-i\n    name: i to the power i\n    pattern: =i =i ^\n    output: =e =pi 2 / neg ^\n    explain: "i = e^(iπ/2), so i^i = e^(i·iπ/2) = e^(-π/2) (the principal value)."\n    tags: [complex]\n'],Jr={normal:"Work out the numbers and collect like terms.","simplify.cancel":"Cancel the factors the top and bottom share.","simplify.expand":"Multiplying out gives something shorter.","simplify.factor":"Factoring gives something shorter.",expand:"Multiply out the brackets.",factor:"Write it as a product of factors.","factor.common":"Take out the common factor {common}.","factor.polynomial":"Factor what is left: {roots}.",together:"Write it as one fraction over a common denominator.",cancel:"Cancel the factors the top and bottom share: {cancelled}.","solve.move":"Keep the terms with {v} on the left and move the others to the right.","solve.divide":"Divide both sides by {by}.","solve.multiply":"Multiply both sides by {by}.","solve.one-side":"Move everything to one side, so the equation reads … = 0.","solve.factor":"Factor the left side.","solve.zero-product":"A product is 0 exactly when one of its factors is 0.","solve.split":"There are two cases; solve each.","solve.quadratic":"The quadratic formula with a = {a}, b = {b}, c = {c}: {v} = (-b ± √(b² - 4ac)) / 2a, and b² - 4ac = {D}.","solve.no-real":"b² - 4ac = {D} is negative, so there are no real solutions.","solve.quadratic-complex":"The quadratic formula with a = {a}, b = {b}, c = {c}: {v} = (-b ± √(b² - 4ac)) / 2a. b² - 4ac = {D} is negative, so its square root is imaginary: √({D}) = {root}.","solve.roots":"{v}^{n} = {r} has {n} solutions, spaced evenly round a circle: |{r}|^(1/{n})·(cos θ + i sin θ), with θ = (arg {r} + 2πk)/{n} for k = 0 … {last}.","solve.clear-denominator":"Multiply both sides by {den} (an answer that makes it 0 is not allowed).","solve.substitute":"Write {u} for {kernel}: this is a polynomial in {u}.","solve.reject":"{value} is not a solution: {reason}.","solve.always":"This is true for every {v}.","solve.never":"This is never true, so there is no solution.","solve.unsolved":"There is no exact method here for solving for {v}; try { approximate: true }.","solve.numeric":"Found {count} solution(s) numerically.","system.eliminate":"Use one equation to remove {v} from the others.","integrate.expand":"Multiply out, then integrate term by term.","integrate.substitute":"Let {u} = {inside}, so d{u} = {a} d{v}.","integrate.back":"Put {inside} back for {u}.","integrate.parts":"By parts with u = {u} and dv = {dv} d{v}: ∫ u dv = u·v - ∫ v du, where v = {V} and du = {du} d{v}.","integrate.constant":"The number {c} comes out of the integral.","integrate.divide":"The top has at least the degree of the bottom: divide first.","integrate.partial-fractions":"Split the fraction into simple fractions, one for each factor below.","integrate.evaluate":"Evaluate {F} at {b} and at {a}, and subtract.",substitute:"Put in the values."},Qr=["normal","rewrite","simplify","expand","factor","cancel","diff","differentiate","integrate","solve","solveSystem","substitute","approximate","equivalent"];class Yr{constructor(e,n,t,r,s){this.set=e,this.messages=n,this.format=t,this.read=r,this.complex=s;for(const e of Qr){const n=Yr.prototype[e];this[e]=(...e)=>le(s,()=>n.apply(this,e))}}node(e){if(e&&"object"==typeof e&&!Array.isArray(e)&&e.type)return e;if(Array.isArray(e))return W(e);if("string"!=typeof e)throw new G("expected an expression");if(this.read){const n=this.read(e);return Array.isArray(n)?W(n):"string"==typeof n?P(n):n}return P(e)}step(e,n,t,r,s,o={}){return function(e,n,t,r,s,o,i,a,u=[]){const l=(o??"").replace(/\{(\w+)\}/g,(e,n)=>{const t=i?.[n];return void 0===t?e:"string"==typeof t?t:a(t)});return{id:e,name:n,tags:t,from:r.s,to:s.s,path:u,before:r.s,after:s.s,explanation:l}}(e,n,t,r,s,this.messages[e]??"",o,this.format)}result(e,n,t,r={}){let s=e;if(t.approximate&&s){s=Ot(s,{digits:"number"==typeof t.approximate?t.approximate:15})}return{result:s,text:s?this.format(s):"",steps:Pt(n,Ut(t.steps)),...r}}variable(e,n){if(n)return n;const t=[...en(e)];return 1===t.length?t[0]:t.includes("x")?"x":t[0]??"x"}tidyStep(e,n){return e.s===n.s?[]:[this.step("normal","Work out and collect",["tidy","arithmetic"],e,n)]}normal(e){return He(this.node(e))}rewrite(e,n,t={}){const r=this.node(e),s=this.set.view(n);if(!s.size)throw new G(`no rules in mode "${n}" (modes: ${this.set.modes().join(", ")})`);const o=Ft(r,s,{format:this.format,order:t.order,variable:t.variable});return this.result(o.node,[...this.tidyStep(r,He(r)),...o.steps],t)}simplify(e,n={}){const t=this.node(e),r=[...this.tidyStep(t,He(t))],s=Ft(t,this.set.view("simplify"),{format:this.format});r.push(...s.steps);let o=s.node,i=null;const a=_e(o),u=[],l=0===en(o).size,c=l?null:pr(a);c&&u.push({node:lr(c),id:"simplify.cancel",name:"Cancel"});const f=Ft(Ge(_t(a)),this.set.view("simplify"),{format:this.format});u.push({node:f.node,id:"simplify.expand",name:"Multiply out"}),"add"!==a.k||l||u.push({node:lr(rr(a)),id:"simplify.factor",name:"Factor"});for(const e of u)_(e.node)<_(o)&&(i=this.step(e.id,e.name,["shorter"],o,e.node),o=e.node);return i&&r.push(i),this.result(o,r,n)}expand(e,n={}){const t=this.node(e),r=Ge(_t(_e(t)));return this.result(r,t.s===r.s?[]:[this.step("expand","Multiply out",["expand"],t,r)],n)}factor(e,n={}){const t=this.node(e),r=rr(_e(t)),s=lr(r),o=[],i=r.notes.find(e=>"factor.common"===e.id);return s.s!==He(t).s&&o.push(this.step(i?"factor.common":"factor","Factor",["factor"],t,s,i?{common:Ge(i.values.common)}:{})),this.result(s,o,n)}cancel(e,n={}){const t=this.node(e),r=_e(t),s=pr(r);if(!s)return this.result(He(t),this.tidyStep(t,He(t)),n);const o=lr(s),i=fr(r),a=V("/",[Ge(i.num),Ge(i.den)]),u=[];return"/"===t.op&&a.s===He(t).s||u.push(this.step("together","One fraction",["together"],t,a)),o.s!==a.s&&u.push(this.step("cancel","Cancel",["cancel"],a,o,{cancelled:s.cancelled.length?s.cancelled.map(e=>this.format(Ge(e))).join(", "):"numbers"})),this.result(o,u,n)}diff(e,n,t={}){const r=this.node(e),s=this.variable(r,n);let o=r;const i=[];for(let e=0;e<(t.order??1);e++){const e=Ft(V("der",[o,D(s)]),this.set.view("differentiate"),{format:this.format,order:"pre"}),n=Ft(e.node,this.set.view("simplify"),{format:this.format});i.push(...e.steps,...n.steps),o=n.node}return this.result(o,i,t,{variable:s})}differentiate(e,n){const t=Ft(V("der",[e,D(n)]),this.set.view("differentiate"),{format:this.format,order:"pre"});return Ft(t.node,this.set.view("simplify"),{format:this.format}).node}integrate(e,n,t={}){let r=this.node(e);const s=e=>void 0===e?null:this.node("number"==typeof e?String(e):e);let o=s(t.from),i=s(t.to);if(U(r)&&"int"===r.op){const[e,t,s,a]=r.args;n=t.token,s&&a&&(o=s,i=a),r=e}const a=this.variable(r,n),u=jr(this,r,a),l=Ft(u.node,this.set.view("simplify"),{format:this.format}),c=[...u.steps,...l.steps];if(o&&i){const e=Br(this,l.node,a,o,i,r);c.push(e.step);const n=Ft(e.value,this.set.view("simplify"),{format:this.format});return c.push(...n.steps),this.result(n.node,c,t,{antiderivative:l.node,variable:a})}let f=l.node;return t.constant&&(f=V("+",[f,D(String(t.constant))])),this.result(f,c,t,{variable:a})}solve(e,n,t={}){const r=this.node(e),s=this.variable(r,n),o=gr(this,r,s,t);let i=o.solutions;if(t.approximate){const e="number"==typeof t.approximate?t.approximate:15;i=i.map(n=>Ot(n,{digits:e}))}const a=i.map(e=>V("=",[D(s),e])),u=a.length?a.reduce((e,n)=>e?V("|",[e,n]):n,null):null;return{solutions:i,result:u,variable:s,text:o.always?`true for every ${s}`:u?this.format(u):o.unsolved.length?`no exact solution found for ${s}`:"no solution",unsolved:o.unsolved.filter(e=>!e.always),always:o.always,steps:Pt(o.steps,Ut(t.steps))}}solveSystem(e,n,t={}){const r=e.map(e=>this.node(e)),s=n??[...new Set(r.flatMap(e=>[...en(e)]))].sort(),o=function(e,n,t){const r=[],s=n.map(n=>{const r=mr(n)?Ne([_e(n.args[0]),Ve(_e(n.args[1]))]):_e(n),s=t.map(n=>{const t=Jt(r,n);if(!t||Math.max(0,...t.keys())>1)throw new G(`not linear in ${n}`);const s=t.get(1)??pe(te.ZERO);if(!ge(s))throw new G(`the coefficient of ${n} must be a number (it is ${e.format(Ge(s))})`);return s.q});let o=r;for(let e=0;e<t.length;e++)o=Ne([o,Ie([pe(s[e].neg()),_e(D(t[e]))])]);for(const e of t)if(Qt(o,e))throw new G(`not linear in ${e}`);return{coeffs:s,rhs:Ve(o)}}),o=()=>s.map(e=>dr(Ge(Ne(e.coeffs.map((e,n)=>Ie([pe(e),_e(D(t[n]))])))),Ge(e.rhs))).reduce((e,n)=>e?V("&",[e,n]):n,null);let i=0;const a=[];for(let n=0;n<t.length&&i<s.length;n++){const u=s.findIndex((e,t)=>t>=i&&!e.coeffs[n].isZero);if(u<0)continue;[s[i],s[u]]=[s[u],s[i]];const l=o(),c=s[i],f=c.coeffs[n];c.coeffs=c.coeffs.map(e=>e.div(f)),c.rhs=Ie([pe(f.inv()),c.rhs]);for(let e=0;e<s.length;e++){if(e===i||s[e].coeffs[n].isZero)continue;const t=s[e].coeffs[n];s[e].coeffs=s[e].coeffs.map((e,n)=>e.sub(t.mul(c.coeffs[n]))),s[e].rhs=Ne([s[e].rhs,Ie([pe(t.neg()),c.rhs])])}r.push(e.step("system.eliminate","Eliminate",["eliminate"],l,o(),{v:D(t[n])})),a.push(n),i++}for(const e of s.slice(i))if(!ge(e.rhs)||!e.rhs.q.isZero)return{solution:null,steps:r,status:"none"};if(a.length<t.length)return{solution:null,steps:r,status:"many"};const u=new Map;return a.forEach((e,n)=>u.set(t[e],Ge(s[n].rhs))),{solution:u,steps:r,status:"one"}}(this,r,s),i=o.solution?Object.fromEntries([...o.solution].map(([e,n])=>[e,n])):null,a="one"===o.status?s.map(e=>`${e} = ${this.format(i[e])}`).join(", "):"none"===o.status?"no solution":"infinitely many solutions";return{solution:i,status:o.status,text:a,steps:Pt(o.steps,Ut(t.steps))}}substitute(e,n,t={}){const r=this.node(e);let s=r;for(const[e,t]of Object.entries(n))s=wr(s,e,"number"==typeof t?this.node(String(t)):this.node(t));const o=this.simplify(s,t),i=[this.step("substitute","Substitute",["substitute"],r,s)];return{...o,steps:[...Pt(i,Ut(t.steps)),...o.steps]}}defined(e){const n=this.set.view("define");return n.size?Ft(e,n,{format:this.format}).node:e}approximate(e,n={}){const t=this.defined(this.node(e));if(en(t).size&&!n.scope){const e=Ot(He(t),n);return{result:e,text:this.format(e),number:null,exact:!1}}const r=kt(t,n);return{result:r.node,text:r.text,number:r.number,re:r.re,im:r.im,exact:r.exact}}equivalent(e,n){const t=this.node(e),r=this.node(n),s=this.defined(V("-",[t,r])),o=this.simplify(s,{steps:!1}).result;if("num"===o.type&&"0"===o.token)return{equal:!0,how:"exact"};const i=[...en(s)];if(!i.length)try{return{equal:Math.abs(kt(s,{digits:30}).number)<1e-25,how:"numeric"}}catch{return{equal:!1,how:"numeric"}}const a=[.31,1.7,2.9,-.83,.57];let u=0;for(let e=0;e<a.length;e++){const n=Object.fromEntries(i.map((n,t)=>[n,String(a[(e+t)%a.length]+t/7)]));let t;try{t=kt(s,{digits:30,scope:n}).number}catch{continue}if(u++,Math.abs(t)>1e-20)return{equal:!1,how:"numeric"}}return{equal:u>0,how:"numeric"}}modes(){return this.set.modes()}}function Gr(e={}){const n=!1===e.defaults?[]:[..._r,...e.complex?Hr:[]],{specs:t,messages:r}=function(e){jt();const n=[],t={};for(const r of e){const e="string"==typeof r?Zn(r):r,s=Array.isArray(e)?e:e?.rules??[];for(const n of(Array.isArray(e)?[]:e?.operators)??[]){if(!n?.symbol)throw new Error("an operator needs a symbol");N(n.symbol)||$({symbol:String(n.symbol),arity:"any"===n.arity?x:Number(n.arity),label:n.label})}Object.assign(t,(Array.isArray(e)?null:e?.messages)??{});for(const e of s)n.push(e)}return{specs:n,messages:t}}([...n,...e.rules??[]]),s=le(e.complex,()=>Zt(t));return new Yr(s,{...Jr,...r},e.format??Vr,e.read??null,Boolean(e.complex))}function Kr(h){const m=h=>e("op"===h.type?function(e,a){const{op:h,args:m}=e,[g,v]=m,b=(e,n)=>u(h,l(e),n)?`(${a(e)})`:a(e),y=()=>m.map(a).join(", "),w=e=>d(h,e)?`(${a(e)})`:a(e);if("*"===h&&n(e))return"-"+a(v);if("+"===h&&n(v))return`${b(g,"left")} ${a(v)}`;if("-"===h&&n(v))return`${b(g,"left")} + ${a(v).slice(1)}`;if("^"===h){const e=b(g,"left");return`${e.startsWith("-")?`(${e})`:e}^${b(v,"right")}`}if(Xr[h])return`${b(g,"left")} ${Xr[h]} ${b(v,"right")}`;if(t[h])return`${h}(${r(e).map(e=>`[${e.map(a).join(", ")}]`).join(", ")})`;if(es[h])return es[h][0]+y()+es[h][1];if(s(h))return`${o(h)}(${y()})`;switch(h){case"neg":return"-"+w(g);case"pmod":return`${a(g)} (mod ${a(v)})`;case"pm":return"±"+w(g);case"!":return w(g)+"!";case"\\not":return"¬"+w(g);case"sqrt":return`√(${a(g)})`;case"root":{const e="number"===g.type?{3:"∛",4:"∜"}[g.value]:null;return e?`${e}(${a(v)})`:`root(${a(g)}, ${a(v)})`}case"abs":return`|${a(g)}|`;case"floor":return`⌊${a(g)}⌋`;case"ceil":return`⌈${a(g)}⌉`;case"log":return`log_${"op"===g.type?`(${a(g)})`:a(g)}(${a(v)})`;case"loglog":return`ln(ln(${a(g)}))`;case"logloglog":return`ln(ln(ln(${a(g)})))`;case"perm":return`perm(${a(g)}, ${a(v)})`;case"comb":return`comb(${a(g)}, ${a(v)})`;case"_":return`${a(g)}_${a(v)}`;case"?:":return`${a(g)} ? ${a(v)} : ${a(m[2])}`;case"sum":return m.map(a).join(" + ");case"prod":return m.map(a).join(" * ");case"der":{const{n:n,body:t,by:r,variable:s}=i(e),o=n>1?`^${n}`:"";return s?`d${o}${a(t)}/d${a(r)}${o}`:`d${o}/d${a(r)}${o}(${a(t)})`}case"int":return function(e,n){const[t,r,s,o]=e,i=e.length>=2&&f(r)?n(r):p(t)||"x",a=`${n(t)} d${i}`;switch(e.length){case 1:return`∫ ${a}`;case 2:return f(r)?`∫ ${a}`:`∫[${n(r)}] ${a}`;case 3:return f(r)?`∫[${n(s)}] ${a}`:`∫[${n(r)}, ${n(s)}] ${a}`;default:return`∫[${n(s)}, ${n(o)}] ${a}`}}(m,a);case"lim":return function(e,n){const[t,r,s,o]=e;switch(e.length){case 1:return`lim ${n(t)}`;case 2:return`lim[${n(r)}] ${n(t)}`;case 3:return`lim[${n(r)}→${n(s)}] ${n(t)}`;default:{const e=c(o).toLowerCase().startsWith("r")?"⁺":"⁻";return`lim[${n(r)}→${n(s)}${e}] ${n(t)}`}}}(m,a);case"\\sumidx":return ns("∑",m,a);case"\\prodidx":return ns("∏",m,a)}return`${h}(${y()})`}(h,m):function(e){const n=e.value;return"symbol"!==e.type?n:a[n]?a[n]:"\\+"===n||"\\-"===n?n[1]:n}(h));return m(h)}const Xr={"+":"+","-":"-","*":"*","/":"/","^":"^",mod:"mod","±":"±","=":"=","===":"===","≠":"≠","≠=":"≠","<":"<",">":">","≤":"≤","≥":"≥","∈":"∈","∉":"∉","→":"→","≈":"≈","∪":"∪","∩":"∩","≡":"≡","&":"∧","|":"∨","\\xor":"⊕","\\nand":"↑","\\nor":"↓"},es={"()":["(",")"],"[]":["[","]"],"{}":["{","}"],"(]":["(","]"],"[)":["[",")"]};function ns(e,n,t){const[r,s,o]=n,i="∑"===e?"sum":"prod";return 3===n.length&&"op"===s.type&&"="===s.op?`${i}(${t(r)}, ${t(s)}, ${t(o)})`:2===n.length&&"op"===s.type&&"∈"===s.op?`${i}(${t(r)}, ${t(s)})`:1===n.length?`${e} ${t(r)}`:2===n.length?`${e}[${t(s)}] ${t(r)}`:`${e}[${t(s)}, ${t(o)}] ${t(r)}`}for(const e of[Xr,es])Object.setPrototypeOf(e,null);const ts=Symbol.for("inlinemath.expressions"),rs=new Map,ss={re:"Re",im:"Im",conj:"overline"},os=["Re","Im","re","im","conj","arg"];function is(e){const n=[],t=e=>{"op"===e.type?(e.args.forEach(t),v(e.op)?(-1===v(e.op).arity&&n.push(String(e.args.length)),n.push(e.op)):n.push(String(e.args.length),`\\:${ss[e.op]??e.op}`)):n.push(e.token)};return t(e),n}function as(e={}){const n=e.rules||e.names?null:e.complex?"complex":"default";if(n&&rs.has(n))return rs.get(n);const t=[...e.names??[],...e.complex?os:[]],r=Gr({...e,read:e=>g(e,t.length?{names:t}:{}),format:Vr});return n&&rs.set(n,r),r}const us=new Set(["simplify","expand","factor","cancel","diff","integrate","solve","approx"]),ls={integral:"integrate",differentiate:"diff",approximate:"approx",simp:"simplify"};function cs(e={}){const n=e.cas??as(),t=void 0===e.steps?{}:{steps:e.steps},r=(e,s)=>{let o;try{o=n.read(e)}catch{return b(e,s)}const i=s&&s[ts];i&&(o=o.flatMap(e=>Object.hasOwn(i,e)?i[e]:[e]));const a=o[o.length-1],u=a?.startsWith("\\:")?ls[a.slice(2)]??a.slice(2):null,l=u&&us.has(u);if(!l&&!("der"===a||"int"===a))return b(e,s);const c=n.node(o),f=l?c.args:[c],p=e=>e?e.s:void 0;let d;try{switch(l?u:"der"===a?"derivative":"antiderivative"){case"simplify":d=n.simplify(f[0],t);break;case"expand":d=n.expand(f[0],t);break;case"factor":d=n.factor(f[0],t);break;case"cancel":d=n.cancel(f[0],t);break;case"diff":d=n.diff(f[0],p(f[1]),{...t,order:f[2]?Number(f[2].s):1});break;case"integrate":d=n.integrate(f[0],p(f[1]),{...t,...f[3]?{from:f[2].s,to:f[3].s}:{}});break;case"solve":d=n.solve(f[0],p(f[1]),t);break;case"approx":d=n.approximate(f[0],{...t,digits:f[1]?Number(f[1].s):15});break;case"derivative":d=n.diff(c.args[0],c.args[1].s,t);break;default:d=n.integrate(c,void 0,t)}}catch(n){return`(${e})`}if(r.last=d,!d.result)return`"${d.text}"`;const g=(v=is(d.result),h(v)?"":Kr(m(v)));var v;return/^-?\d+(\.\d+)?$/.test(g)?g:`(${g})`};return r}const fs=e=>String(e).replace(/&/g,"&amp;").replace(/</g,"&lt;").replace(/>/g,"&gt;").replace(/"/g,"&quot;");function ps(e,n={}){return`<ol class="mv-steps">${e.map(e=>{const t=is(P(e.from)),r=y(t,{...n,highlight:e.path&&e.path.length?{path:e.path}:void 0}),s=e.to===e.from?"":`<span class="mv-step-arrow" aria-label="becomes">⟶</span>${y(is(P(e.to)),n)}`,o=e.explanation?`<p class="mv-step-why">${fs(e.explanation)}</p>`:"";return`<li class="mv-step" data-rule="${fs(e.id)}"><span class="mv-step-name">${fs(e.name)}</span><div class="mv-step-maths">${r}${s}</div>${o}</li>`}).join("")}</ol>`}export{cs as casBlocks,as as mathCAS,ps as stepsHTML,is as tokensOf};

package/dist/chunks/calculate-Cz87Lt0N.js

@@ -0,0 +1,2 @@
+/* Inline Math 0.2.0 — MIT licence; includes mathzetta (and @mathzetta/cas, for the CAS) */
+import{h as t,i as n,j as e,k as r,m as o,o as i}from"./lite-3Fb-OHbt.js";function a(t){return Array.isArray(t)&&t.length>0&&t.every(n=>Array.isArray(n)&&n.length>0&&n.length===t[0].length&&!n.some(Array.isArray))}const s=t=>Array.isArray(t)&&t.length>0&&!t.some(Array.isArray);function u(t){const n=t,e=n.make??(t=>t),r=n.size??(()=>1),o=t=>`${t.length} by ${t[0].length}`,i=(t,r)=>e(Array.from({length:t},(e,r)=>Array.from({length:t},(t,e)=>r===e?n.one():n.zero())),r);function s(t,r){return t[0].length!==r.length&&n.fail(`a ${o(t)} matrix times a ${o(r)} one`),e(t.map(t=>r[0].map((e,o)=>t.reduce((t,e,i)=>n.add(t,n.mul(e,r[i][o])),n.zero()))),t)}function u(t){const e=t.map(t=>t.slice()),o=e.length,i=e[0].length;let a=n.one(),s=0;for(let t=0;t<i&&s<o;t++){let i=-1;for(let a=s;a<o;a++)n.isZero(e[a][t])||(i<0||r(e[a][t])>r(e[i][t]))&&(i=a);if(i<0){a=n.zero();continue}i!==s&&([e[i],e[s]]=[e[s],e[i]],a=n.sub(n.zero(),a));const u=e[s][t];a=n.mul(a,u),e[s]=e[s].map(t=>n.div(t,u));for(let r=0;r<o;r++){if(r===s||n.isZero(e[r][t]))continue;const o=e[r][t];e[r]=e[r].map((t,r)=>n.sub(t,n.mul(o,e[s][r])))}s++}return s<o&&(a=n.zero()),{M:e,det:a,rank:s}}function c(t){const r=t.length;r!==t[0].length&&n.fail(`a ${o(t)} matrix has no inverse`);const a=i(r),{M:s,rank:c}=u(t.map((t,n)=>[...t,...a[n]]));return(c<r||s.some((t,e)=>n.isZero(t[e])))&&n.fail("the matrix has no inverse (its determinant is 0)"),e(s.map(t=>t.slice(r)),t)}return{identity:i,transpose:t=>e(t[0].map((n,e)=>t.map(t=>t[e])),t),times:s,det:function(t){return t.length!==t[0].length&&n.fail(`a ${o(t)} matrix has no determinant`),u(t).det},inverse:c,power:function(t,e){t.length!==t[0].length&&n.fail(`a ${o(t)} matrix has no powers`);let r=e<0n?c(t):t,a=e<0n?-e:e,u=i(t.length,t);for(;a>0n;)1n&a&&(u=s(u,r)),r=s(r,r),a>>=1n;return u},trace:t=>(t.length!==t[0].length&&n.fail(`a ${o(t)} matrix has no trace`),t.reduce((t,e,r)=>n.add(t,e[r]),n.zero())),dot:(t,e)=>(t.length!==e.length&&n.fail("vectors of different lengths"),t.reduce((t,r,o)=>n.add(t,n.mul(r,e[o])),n.zero())),cross:(t,e)=>(3===t.length&&3===e.length||n.fail("the cross product is for vectors of 3 numbers"),[n.sub(n.mul(t[1],e[2]),n.mul(t[2],e[1])),n.sub(n.mul(t[2],e[0]),n.mul(t[0],e[2])),n.sub(n.mul(t[0],e[1]),n.mul(t[1],e[0]))]),solve:function(t,n){return a(n)?s(c(t),n):s(c(t),n.map(t=>[t])).map(t=>t[0])},rank:t=>u(t).rank,rref:t=>e(u(t).M,t),timesVector:(t,n)=>s(t,n.map(t=>[t])).map(t=>t[0]),vectorTimes:(t,n)=>s([t],n)[0]}}const c=u({add:(t,n)=>t+n,sub:(t,n)=>t-n,mul:(t,n)=>t*n,div:(t,n)=>t/n,isZero:t=>Math.abs(t)<1e-12,zero:()=>0,one:()=>1,size:Math.abs,fail:t=>{throw new Error(t)}}),l=t=>a(t)&&(t.length>1||t[0].length>1),f=t=>s(t)&&!l(t),h=t=>{const n=(e,r)=>{if(Array.isArray(e)&&Array.isArray(r)){if(e.length!==r.length)throw new Error("Lists of different lengths");return e.map((t,e)=>n(t,r[e]))}return Array.isArray(e)?e.map(t=>n(t,r)):Array.isArray(r)?r.map(t=>n(e,t)):t(e,r)};return n},m=(t,n)=>l(t)&&l(n)?c.times(t,n):l(t)&&f(n)?c.timesVector(t,n):f(t)&&l(n)?c.vectorTimes(t,n):h((t,n)=>t*n)(t,n),g=t=>n=>t(n.length>1&&n.every(f)?n:n[0]),p={det:g(c.det),inv:g(c.inverse),inverse:g(c.inverse),transpose:g(c.transpose),trace:g(c.trace),tr:g(c.trace),rank:g(c.rank),rref:g(c.rref),identity:([t])=>c.identity(t),dot:([t,n])=>c.dot(t,n),cross:([t,n])=>c.cross(t,n),linsolve:([t,n])=>c.solve(t,n)},d=(t,n)=>t.args.map(t=>"op"===t.type&&"[]"===t.op?t.args.map(t=>A(t,n)):[A(t,n)]),b={pi:Math.PI,"π":Math.PI,e:Math.E,tau:2*Math.PI,"τ":2*Math.PI,"∞":1/0,"-∞":-1/0,true:!0,false:!1},w=(t,n)=>n?w(n,t%n):Math.abs(t),M={neg:t=>-t,pm:t=>[t,-t],"!":t=>{if(!Number.isInteger(t)||t<0)return NaN;if(t>170)return 1/0;let n=1;for(let e=2;e<=t;e++)n*=e;return n},"\\not":t=>!t,sqrt:Math.sqrt,abs:Math.abs,floor:Math.floor,ceil:Math.ceil,det:t=>c.det(t),ln:Math.log,loglog:t=>Math.log(Math.log(t)),logloglog:t=>Math.log(Math.log(Math.log(t))),expm1:Math.expm1,sin:Math.sin,cos:Math.cos,tan:Math.tan,csc:t=>1/Math.sin(t),sec:t=>1/Math.cos(t),cot:t=>1/Math.tan(t),sinh:Math.sinh,cosh:Math.cosh,tanh:Math.tanh,arcsin:Math.asin,arccos:Math.acos,arctan:Math.atan,arcsinh:Math.asinh,arccosh:Math.acosh,arctanh:Math.atanh},y={"+":(t,n)=>Array.isArray(t)||Array.isArray(n)?h((t,n)=>t+n)(t,n):t+n,"-":(t,n)=>Array.isArray(t)||Array.isArray(n)?h((t,n)=>t-n)(t,n):t-n,"*":m,"/":(t,n)=>l(n)?m(t,c.inverse(n)):Array.isArray(t)||Array.isArray(n)?h((t,n)=>t/n)(t,n):t/n,"^":(t,n)=>{if(!l(t))return Array.isArray(t)?h((t,n)=>t**n)(t,n):t**n;if(!Number.isInteger(n))throw new Error("A matrix to a power that is not a whole number");return c.power(t,BigInt(n))},mod:(t,n)=>t%n,log:(t,n)=>Math.log(n)/Math.log(t),root:(t,n)=>n**(1/t),atan2:Math.atan2,round:(t,n)=>Math.round(t*10**n)/10**n,"±":(t,n)=>[t+n,t-n],fixed:(t,n)=>Number(t).toFixed(n),perm:(t,n)=>{if(!Number.isInteger(t)||!Number.isInteger(n)||n<0||n>t)return NaN;let e=1;for(let r=t-n+1;r<=t&&e!==1/0;r++)e*=r;return e},comb:(t,n)=>{if(!Number.isInteger(t)||!Number.isInteger(n)||n<0||n>t)return NaN;n=Math.min(n,t-n);let e=1;for(let r=1;r<=n&&e!==1/0;r++)e=e*(t-n+r)/r;return Math.round(e)},"=":(t,n)=>t==n,"===":(t,n)=>t===n,"≠":(t,n)=>t!=n,"≠=":(t,n)=>t!==n,"≈":(t,n)=>Math.abs(t-n)<1e-9,"≡":(t,n)=>t===n,"∪":(t,n)=>[...new Set([...[].concat(t),...[].concat(n)])],"∩":(t,n)=>[].concat(t).filter(t=>[].concat(n).includes(t)),"<":(t,n)=>t<n,">":(t,n)=>t>n,"≤":(t,n)=>t<=n,"≥":(t,n)=>t>=n,"&":(t,n)=>t&&n,"|":(t,n)=>t||n,"\\xor":(t,n)=>Boolean(t)!==Boolean(n),"\\nor":(t,n)=>!(t||n),"\\nand":(t,n)=>!(t&&n)},v={max:t=>Math.max(...t),min:t=>Math.min(...t),sum:t=>t.reduce((t,n)=>t+n,0),prod:t=>t.reduce((t,n)=>t*n,1),mean:t=>t.reduce((t,n)=>t+n,0)/t.length,gcd:t=>t.reduce(w),"()":t=>t,"[]":t=>t,"{}":t=>t};const x=5e6;let N=0,I=0;function A(t,e){if(++N>x)throw new Error("Too much to work out");switch(t.type){case"number":return Number(t.value);case"string":return t.value.slice(1,-1);case"symbol":if(Object.prototype.hasOwnProperty.call(e,t.value))return e[t.value];if(Object.prototype.hasOwnProperty.call(b,t.value))return b[t.value];throw new Error(`No value for '${t.value}'`)}const r=n(t);if(r)return A(r,e);const{op:o,args:i}=t;if("?:"===o)return A(i[0],e)?A(i[1],e):A(i[2],e);if("∈"===o||"∉"===o)return function(t,n){const[e,r]=t.args,o=A(e,n);let i;if("symbol"===r.type&&$[r.value])return i=$[r.value](o),"∈"===t.op?i:!i;if("op"===r.type&&["()","[]","(]","[)"].includes(r.op)&&2===r.args.length){const[t,e]=r.args.map(t=>A(t,n)),a="["===r.op[0]?o>=t:o>t,s="]"===r.op[1]?o<=e:o<e;i=a&&s}else{const t=A(r,n);i=Array.isArray(t)&&t.includes(o)}return"∈"===t.op?i:!i}(t,e);if("random"===o)return Math.random();if(("\\sumidx"===o||"\\prodidx"===o)&&3===i.length&&"op"===i[1].type&&"="===i[1].op&&"symbol"===i[1].args[0].type){const[t,n,r]=[i[0],i[1].args[1],i[2]],a=i[1].args[0].value,s=A(n,e),u=A(r,e);if(!Number.isFinite(s)||!Number.isFinite(u)||u-s>1e6)throw new Error(`Can't evaluate '${o}' over that range`);let c="\\sumidx"===o?0:1;for(let n=s;n<=u;n++){const r=A(t,{...e,[a]:n});c="\\sumidx"===o?c+r:c*r}return c}if("pmod"===o){const[t,n]=i,r=A(n,e);if("op"===t.type&&["≡","="].includes(t.op)){const[n,o]=t.args.map(t=>A(t,e));return(n-o)%r===0}return A(t,e)%r}if("pmatrix"===o||"bmatrix"===o)return d(t,e);if("vmatrix"===o)return c.det(d(t,e));if("^"===o&&"symbol"===i[1].type&&"T"===i[1].value&&!Object.prototype.hasOwnProperty.call(e,"T")){const t=A(i[0],e);if(l(t))return c.transpose(t)}const a=i.map(t=>A(t,e));if(o.startsWith("\\:")&&Object.prototype.hasOwnProperty.call(p,o.slice(2)))return p[o.slice(2)](a);if(M[o]&&1===a.length)return M[o](a[0]);if(y[o]&&2===a.length)return y[o](a[0],a[1]);if(v[o])return v[o](a);throw new Error(`Can't evaluate '${o}'`)}const $={"ℝ":Number.isFinite,"ℤ":Number.isInteger,"ℕ":t=>Number.isInteger(t)&&t>0,"ℚ":Number.isFinite,"ℂ":t=>"number"==typeof t&&!Number.isNaN(t)};for(const t of[b,M,y,v,$,p])Object.setPrototypeOf(t,null);class B extends Error{}class F extends Error{}const O={bits:2e5,factorial:2e4,terms:1e5,rootIndex:12,steps:5e6};let k=0,j=0;const P=t=>t<0n?-t:t,S=t=>0n===t?0:P(t).toString(2).length;function z(t,n){for(t=P(t),n=P(n);n;)[t,n]=[n,t%n];return t}function E(t,n=1n){if(0n===n)throw new B("division by zero");n<0n&&(t=-t,n=-n);const e=z(t,n)||1n;return{n:t/e,d:n/e}}const T=E(0n),W=E(1n),Z=(t,n)=>E(t.n*n.d+n.n*t.d,t.d*n.d),q=(t,n)=>E(t.n*n.n,t.d*n.d),D=(t,n)=>E(t.n*n.d,t.d*n.n),_=t=>({n:-t.n,d:t.d}),C=(t,n)=>{const e=t.n*n.d-n.n*t.d;return e<0n?-1:e>0n?1:0},V=t=>{const n=t.n/t.d;return t.n<0n&&n*t.d!==t.n?n-1n:n};function L(t){const n=S(t.n),e=S(t.d);if(n<1e3&&e<1e3)return Number(t.n)/Number(t.d);const r=BigInt(Math.max(n,e)-1e3),o=t.d>>r;return 0n===o?t.n<0n?-1/0:1/0:Number(t.n>>r)/Number(o)}function G(t){let n=String(t).trim(),e=1n;n.startsWith("-")&&(e=-1n,n=n.slice(1));const r=n.endsWith("..");r&&(n=n.slice(0,-2));let o=0;const i=n.search(/e/i);i>=0&&(o=Number(n.slice(i+1)),n=n.slice(0,i));const[a="",s=""]=n.split(".");if(!(/^\d*$/.test(a)&&/^\d*$/.test(s)&&a+s))throw new F(`'${t}' is not a number`);let u;if(r&&s){let t=1;for(let n=1;2*n<=s.length;n++)if(s.slice(-n)===s.slice(-2*n,-n)){t=n;break}const n=s.slice(-t);let e=s;for(;e.endsWith(n);)e=e.slice(0,-t);const r=BigInt(e||"0"),o=BigInt(e+n);u=Z(E(BigInt(a||"0")),E(o-r,(10n**BigInt(t)-1n)*10n**BigInt(e.length)))}else u=E(BigInt(a+s||"0"),10n**BigInt(s.length));return o&&(u=o>0?q(u,E(10n**BigInt(o))):D(u,E(10n**BigInt(-o)))),e<0n?_(u):u}function J(t,n=0,e=0,r=null){return 0n===t.n?{kind:"x",c:T,pi:0,e:0,root:null}:{kind:"x",c:t,pi:n,e:e,root:r}}const R=(t,n=1n)=>J(E(BigInt(t),BigInt(n))),X=J(W,1),H=J(W,0,1),K=t=>null!==t&&"object"==typeof t&&"x"===t.kind,Q=t=>K(t)&&!t.pi&&!t.e&&!t.root,U=t=>K(t)?0n===t.c.n:0===t,Y=t=>Q(t)&&1n===t.c.d?t.c.n:null,tt=(t,n)=>Object.assign(t,{group:n}),nt=t=>({kind:"s",text:t});function et(t,n){return t&&n?t.n===n.n&&t.r===n.r:t===n}const rt=(t,n)=>0===C(t.c,n.c)&&t.pi===n.pi&&t.e===n.e&&et(t.root,n.root);function ot(t){if("number"==typeof t)return t;if(K(t)){let n=L(t.c);return t.pi&&(n*=Math.PI**t.pi),t.e&&(n*=Math.E**t.e),t.root&&(n*=L(E(t.root.r))**(1/t.root.n)),n}if("boolean"==typeof t)return t?1:0;throw new F("not a number")}function it(t,...n){if(Number.isNaN(t))throw new B("undefined");if(!Number.isFinite(t)&&n.every(Number.isFinite))throw new F("too large to calculate");return t}const at=t=>"boolean"==typeof t?t:K(t)?0n!==t.c.n:"number"==typeof t?0!==t:Boolean(t);function st(t){if("bigint"==typeof t)return J(E(t));if("number"==typeof t)return Number.isFinite(t)?J(Number.isInteger(t)&&Math.abs(t)<=Number.MAX_SAFE_INTEGER?E(BigInt(t)):G(String(t))):t;if("boolean"==typeof t)return t;if("string"==typeof t)return/^-?(\d+\.?\d*|\.\d+)(\.\.)?$/.test(t.trim())?J(G(t)):Yt(e(t),{});if(Array.isArray(t))return!t.group&&a(t)?tt(t.map(t=>tt(t.map(st),"[]")),"[]"):tt(t.map(st),t.group||"()");if(K(t)||"function"==typeof t)return t;throw new F(`can't use ${typeof t} as a value`)}function ut(t){return Array.isArray(t)?t.map(ut):t&&"s"===t.kind?t.text:"boolean"==typeof t?t:ot(t)}function ct(t,n){if(t<2n)return t;const e=BigInt(n);let r=1n<<BigInt(Math.ceil(S(t)/n));for(;;){const n=((e-1n)*r+t/r**(e-1n))/e;if(n>=r)return r;r=n}}function lt(t,n,e,r=0,o=0){if(0n===e)return J(T);const{coef:i,root:a}=function(t,n){let e=1n,r=n;const o=BigInt(t),i=r<10n**24n?1000000n:10000n;for(let t=2n;t<=i&&t*t<=r;t+=2n===t?1n:2n){const n=t**o;for(;r%n===0n;)r/=n,e*=t}const a=ct(r,t);if(a**o===r&&(e*=a,r=1n),1n===r)return{coef:e,root:null};for(let n=t;n>=2;n--){if(t%n!==0)continue;const o=ct(r,n);if(o**BigInt(n)===r)return{coef:e,root:{n:t/n,r:o}}}return{coef:e,root:{n:t,r:r}}}(n,e);return a&&1===a.n?J(q(t,E(i*a.r)),r,o):J(q(t,E(i)),r,o,a)}function ft(t,n){const e=q(t.c,n.c);if(S(e.n)+S(e.d)>O.bits)return null;const r=t.pi+n.pi,o=t.e+n.e;if(!t.root||!n.root)return J(e,r,o,t.root||n.root);const i=Wt(t.root.n,n.root.n);if(i>O.rootIndex)return null;const a=t.root.r**BigInt(i/t.root.n)*n.root.r**BigInt(i/n.root.n);return S(a)>4e3?null:lt(e,i,a,r,o)}function ht(t){if(0n===t.c.n)throw new B("division by zero");const n=J(D(W,t.c),-t.pi,-t.e);if(!t.root)return n;const{n:e,r:r}=t.root;return ft(n,lt(E(1n,r),e,r**BigInt(e-1)))}function mt(t,n){if(0n===n){if(0n===t.c.n)throw new B("0^0 is undefined");return J(W)}if(n<0n){const e=ht(t);return e&&mt(e,-n)}if((S(t.c.n)+S(t.c.d)+(t.root?S(t.root.r):0))*Number(n)>O.bits||n>100000n)return null;const e=E(t.c.n**n,t.c.d**n),r=Number(n);if(!t.root)return J(e,t.pi*r,t.e*r);const{n:o,r:i}=t.root,a=i**(n/BigInt(o));return lt(q(e,E(a)),o,i**(n%BigInt(o))||1n,t.pi*r,t.e*r)}function gt(t,n,e){if(!Q(t)||e>1000n)return null;const r=mt(t,n);if(!r)return null;let{n:o,d:i}=r.c,a=!1;if(o<0n){if(e%2n==0n)throw new B("not a real number");a=!0,o=-o}const s=function(t,n){const e=t.n*t.d**BigInt(n-1);return S(e)>4e3?null:lt(E(1n,t.d),n,e)}({n:o,d:i},Number(e));return s?a?J(_(s.c),s.pi,s.e,s.root):s:null}function pt(t){return n=>Array.isArray(n)?tt(n.map(n=>pt(t)(n)),n.group):t(n)}function dt(t){const n=(e,r)=>{const o=Array.isArray(e),i=Array.isArray(r);if(o&&i){if(e.length!==r.length)throw new B("lists of different lengths");return tt(e.map((t,e)=>n(t,r[e])),e.group)}return o?tt(e.map(t=>n(t,r)),e.group):i?tt(r.map(t=>n(e,t)),r.group):t(e,r)};return n}const bt=dt((t,n)=>K(t)&&K(n)&&function(t,n){if(0n===t.c.n)return n;if(0n===n.c.n)return t;if(t.pi!==n.pi||t.e!==n.e||!et(t.root,n.root))return null;const e=Z(t.c,n.c);return S(e.n)+S(e.d)>O.bits?null:J(e,t.pi,t.e,t.root)}(t,n)||it(ot(t)+ot(n),ot(t),ot(n))),wt=pt(t=>K(t)?J(_(t.c),t.pi,t.e,t.root):-ot(t)),Mt=(t,n)=>bt(t,wt(n)),yt=dt((t,n)=>K(t)&&K(n)&&ft(t,n)||it(ot(t)*ot(n),ot(t),ot(n))),vt=dt((t,n)=>{if(U(n))throw new B("division by zero");if(K(t)&&K(n)){const e=ht(n),r=e&&ft(t,e);if(r)return r}return it(ot(t)/ot(n),ot(t),ot(n))}),xt=dt((t,n)=>{if(K(t)&&Q(n)){const{n:e,d:r}=n.c,o=1n===r?mt(t,e):gt(t,e,r);if(o)return o}const e=ot(t),r=ot(n);if(0===e&&0===r)throw new B("0^0 is undefined");if(0===e&&r<0)throw new B("division by zero");if(e<0&&!Number.isInteger(r))throw new B("not a real number");return it(e**r,e,r)});function Nt(t,n){if(Q(t)&&Q(n))return C(t.c,n.c);if(K(t)&&K(n)&&rt(t,n))return 0;const e=ot(t),r=ot(n);return e===r||Number.isFinite(e)&&Number.isFinite(r)&&Math.abs(e-r)<=1e-12*Math.max(1,Math.abs(e),Math.abs(r))?0:e<r?-1:1}function It(t,n){return Array.isArray(t)||Array.isArray(n)?Array.isArray(t)&&Array.isArray(n)&&t.length===n.length&&t.every((t,e)=>It(t,n[e])):t&&"s"===t.kind?Boolean(n&&"s"===n.kind&&t.text===n.text):"boolean"==typeof t||"boolean"==typeof n?t===n:0===Nt(t,n)}const At={0:()=>R(0),2:()=>R(1,2),3:()=>lt(E(1n,2n),2,2n),4:()=>lt(E(1n,2n),2,3n),6:()=>R(1)};function $t(t){t=(t%24+24)%24;const[n,e]=t<=6?[t,1]:t<=12?[12-t,1]:t<=18?[t-12,-1]:[24-t,-1],r=At[n];return r?e<0?wt(r()):r():null}const Bt=t=>$t(t+6),Ft=(t,n)=>Math.abs(t)<1e-15&&Math.abs(n)>1e-6?0:t;function Ot(t,n){const e=function(t){if(U(t))return 0;if(!K(t)||1!==t.pi||t.e||t.root)return null;const n=q(t.c,E(12n));return 1n!==n.d?null:Number((n.n%24n+24n)%24n)}(n);if(null!==e){const n=$t(e),r=Bt(e);if(n&&r)switch(t){case"sin":return n;case"cos":return r;case"tan":return vt(n,r);case"cot":return vt(r,n);case"sec":return vt(R(1),r);case"csc":return vt(R(1),n)}}const r=ot(n),o=Ft(Math.sin(r),r),i=Ft(Math.cos(r),r),a={sin:o,cos:i,tan:o/i,cot:i/o,sec:1/i,csc:1/o}[t];if(!Number.isFinite(a)&&Number.isFinite(r))throw new B("undefined");return it(a)}function kt(t,n){const e={arcsin:[-6,6],arccos:[0,12],arctan:[-5,5]}[t],r=n=>"arcsin"===t?$t(n):"arccos"===t?Bt(n):Bt(n)&&!U(Bt(n))?vt($t(n),Bt(n)):null;if(K(n))for(let t=e[0];t<=e[1];t++){const e=r(t);if(e&&K(e)&&rt(e,n))return J(E(BigInt(t),12n),1)}const o=ot(n);if("arctan"!==t&&Math.abs(o)>1)throw new B("not a real number");return{arcsin:Math.asin,arccos:Math.acos,arctan:Math.atan}[t](o)}function jt(t){if(K(t)){if(0n===t.c.n)throw new B("ln 0 is undefined");if(t.c.n<0n)throw new B("not a real number");if(1n===t.c.n&&1n===t.c.d&&!t.pi&&!t.root)return R(t.e)}const n=ot(t);if(n<=0)throw new B(0===n?"ln 0 is undefined":"not a real number");return Math.log(n)}function Pt(t){if(t<.5)return Math.PI/(Math.sin(Math.PI*t)*Pt(1-t));const n=[.9999999999998099,676.5203681218851,-1259.1392167224028,771.3234287776531,-176.6150291621406,12.507343278686905,-.13857109526572012,9984369578019572e-21,1.5056327351493116e-7];let e=n[0];const r=(t-=1)+7+.5;for(let r=1;r<9;r++)e+=n[r]/(t+r);return Math.sqrt(2*Math.PI)*r**(t+.5)*Math.exp(-r)*e}function St(t,n){const e=Y(t)??("number"==typeof t&&Number.isInteger(t)?BigInt(t):null);if(null===e)throw new B(`${n} needs whole numbers`);return e}const zt=pt(t=>Q(t)?J(E(V(t.c))):st(Math.floor(ot(t)))),Et=pt(t=>Q(t)?J(E(-V(_(t.c)))):st(Math.ceil(ot(t))));function Tt(t,n){const e=Number(St(n,"round"));if(Q(t)){const n=E(10n**BigInt(Math.abs(e))),r=e>=0?q(t.c,n):D(t.c,n),o=V(Z(q(E(2n),E(P(r.n),r.d)),W))/2n,i=E(r.n<0n?-o:o);return J(e>=0?D(i,n):q(i,n))}const r=10**e;return Math.sign(ot(t))*Math.round(Math.abs(ot(t))*r)/r}const Wt=(t,n)=>t/Zt(t,n)*n,Zt=(t,n)=>n?Zt(n,t%n):t,qt={pi:()=>X,"π":()=>X,tau:()=>J(E(2n),1),"τ":()=>J(E(2n),1),e:()=>H,"∞":()=>1/0,"-∞":()=>-1/0,true:()=>!0,false:()=>!1},Dt={abs:t=>K(t)?J(E(P(t.c.n),t.c.d),t.pi,t.e,t.root):Math.abs(ot(t)),floor:zt,ceil:Et,sqrt:t=>xt(t,R(1,2)),ln:pt(jt),loglog:pt(t=>jt(jt(t))),logloglog:pt(t=>jt(jt(jt(t)))),expm1:pt(t=>U(t)?R(0):Math.expm1(ot(t))),sinh:pt(t=>U(t)?R(0):Math.sinh(ot(t))),cosh:pt(t=>U(t)?R(1):Math.cosh(ot(t))),tanh:pt(t=>U(t)?R(0):Math.tanh(ot(t))),arcsinh:pt(t=>U(t)?R(0):Math.asinh(ot(t))),arccosh:pt(t=>{const n=ot(t);if(n<1)throw new B("not a real number");return 1===n?R(0):Math.acosh(n)}),arctanh:pt(t=>{const n=ot(t);if(Math.abs(n)>=1)throw new B("undefined");return U(t)?R(0):Math.atanh(n)}),"!":pt(function(t){const n=Y(t)??("number"==typeof t&&Number.isInteger(t)?BigInt(t):null);if(null!==n){if(n<0n)throw new B("factorial of a negative number");if(n>BigInt(O.factorial))throw new F("too large to calculate");let t=1n;for(let e=2n;e<=n;e++)t*=e;return J(E(t))}const e=ot(t);if(e<0&&Number.isInteger(e))throw new B("factorial of a negative number");return it(Pt(e+1),e)}),neg:wt,pm:t=>tt([t,wt(t)],"pm"),"\\not":t=>!at(t),det:t=>Xt.det(t)};for(const t of["sin","cos","tan","csc","sec","cot"])Dt[t]=pt(n=>Ot(t,n));for(const t of["arcsin","arccos","arctan"])Dt[t]=pt(n=>kt(t,n));const _t=new Set(["pmatrix","bmatrix"]),Ct=t=>a(t)&&(_t.has(t.group)||"[]"===t.group&&t.every(t=>"[]"===t.group)&&(t.length>1||t[0].length>1)),Vt=t=>s(t)&&!Ct(t)&&"pm"!==t.group,Lt=u({add:bt,sub:Mt,mul:yt,div:vt,isZero:t=>K(t)?0n===t.c.n:Math.abs(ot(t))<1e-12,zero:()=>R(0),one:()=>R(1),size:t=>Math.abs(ot(t)),fail:t=>{throw new B(t)},make:(t,n)=>tt(t.map(t=>tt(t,"[]")),n&&n.group?n.group:"bmatrix")}),Gt=(t,n)=>tt(t,n&&n.group?n.group:"[]"),Jt=(t,n)=>(...e)=>{const r=e.length>1&&e.every(Vt)?tt(e.map(t=>tt(t,"[]")),"[]"):e[0];if(e.length>1&&r===e[0])throw new F(`${t} of more than one thing`);if(!Ct(r))throw new F(`${t} of something that isn't a matrix`);return n(r)};function Rt(t,n){return Ct(t)&&Ct(n)?Lt.times(t,n):Ct(t)&&Vt(n)?Gt(Lt.timesVector(t,n),n):Vt(t)&&Ct(n)?Gt(Lt.vectorTimes(t,n),t):yt(t,n)}const Xt={det:Jt("det",Lt.det),inv:Jt("inv",Lt.inverse),inverse:Jt("inverse",Lt.inverse),transpose:Jt("transpose",Lt.transpose),trace:Jt("trace",Lt.trace),tr:Jt("tr",Lt.trace),rank:Jt("rank",t=>R(Lt.rank(t))),rref:Jt("rref",Lt.rref),identity:t=>{const n=Y(t);if(null===n||n<1n||n>100n)throw new F("identity(n) needs a whole number n");return Lt.identity(Number(n))},dot:(t,n)=>{if(!Vt(t)||!Vt(n))throw new F("dot of something that isn't a vector");return Lt.dot(t,n)},cross:(t,n)=>{if(!Vt(t)||!Vt(n))throw new F("cross of something that isn't a vector");return Gt(Lt.cross(t,n),t)},linsolve:(t,n)=>{if(!Ct(t)||!Ct(n)&&!Vt(n))throw new F("linsolve(A, b) needs a matrix and a vector");return Ct(n)?Lt.solve(t,n):Gt(Lt.solve(t,n),n)}};function Ht(t,n){const e=t.args.map(t=>tt("op"===t.type&&"[]"===t.op?t.args.map(n):[n(t)],"[]"));if(e.some(t=>t.length!==e[0].length))throw new B("rows of different lengths");return tt(e,"vmatrix"===t.op?"bmatrix":t.op)}const Kt={"+":bt,"-":Mt,"*":Rt,"/":(t,n)=>Ct(n)?Rt(t,Lt.inverse(n)):vt(t,n),"^":function(t,n){if(!Ct(t))return xt(t,n);const e=Y(n);if(null===e)throw new F("a matrix to a power that is not a whole number");return Lt.power(t,e)},"±":(t,n)=>tt([bt(t,n),Mt(t,n)],"pm"),mod:dt(function(t,n){if(U(n))throw new B("division by zero");if(Q(t)&&Q(n))return J(Z(t.c,_(q(n.c,E(V(D(t.c,n.c)))))));const e=ot(t),r=ot(n);return it((e%r+r)%r)}),log:dt(function(t,n){if(K(t)&&rt(t,H))return jt(n);const e=ot(t),r=ot(n);if(e<=0||1===e)throw new B("not a valid base");if(r<=0)throw new B(0===r?"log 0 is undefined":"not a real number");const o=Math.log(r)/Math.log(e);if(Q(t)&&Q(n))for(let e=1n;e<=12n;e++){const r=Math.round(o*Number(e));if(Math.abs(o*Number(e)-r)>1e-9)continue;const i=mt(t,BigInt(r)),a=mt(n,e);if(i&&a&&rt(i,a))return J(E(BigInt(r),e))}return o}),root:dt((t,n)=>xt(n,vt(R(1),t))),atan2:(t,n)=>Math.atan2(ot(t),ot(n)),round:Tt,fixed:function(t,n){const e=Number(St(n,"fixed"));if(e<0)throw new B("fixed needs 0 or more decimal places");const r=Tt(t,n);if(Q(r)){const t=r.c.n*10n**BigInt(e)/r.c.d,n=(t<0n?-t:t).toString().padStart(e+1,"0");return nt(`${t<0n?"-":""}${n.slice(0,n.length-e)}${e?"."+n.slice(-e):""}`)}return nt(Number(ot(r)).toFixed(e))},perm:function(t,n){const e=St(t,"permutations"),r=St(n,"permutations");if(r<0n||r>e)throw new B("undefined");if(r>BigInt(O.terms))throw new F("too large to calculate");let o=1n;for(let t=e-r+1n;t<=e;t++)o*=t;return J(E(o))},comb:function(t,n){const e=St(t,"combinations");let r=St(n,"combinations");if(r<0n||r>e)throw new B("undefined");if(e-r<r&&(r=e-r),r>BigInt(O.terms))throw new F("too large to calculate");let o=1n;for(let t=1n;t<=r;t++)o=o*(e-r+t)/t;return J(E(o))},"=":(t,n)=>It(t,n),"===":(t,n)=>It(t,n),"≠":(t,n)=>!It(t,n),"≠=":(t,n)=>!It(t,n),"≈":(t,n)=>Math.abs(ot(t)-ot(n))<=1e-9*Math.max(1,Math.abs(ot(t)),Math.abs(ot(n))),"<":(t,n)=>Nt(t,n)<0,">":(t,n)=>Nt(t,n)>0,"≤":(t,n)=>Nt(t,n)<=0,"≥":(t,n)=>Nt(t,n)>=0,"&":(t,n)=>at(t)&&at(n),"|":(t,n)=>at(t)||at(n),"\\xor":(t,n)=>at(t)!==at(n),"\\nor":(t,n)=>!(at(t)||at(n)),"\\nand":(t,n)=>!(at(t)&&at(n))},Qt={sum:t=>t.reduce((t,n)=>bt(t,n),R(0)),prod:t=>t.reduce((t,n)=>yt(t,n),R(1)),max:t=>t.reduce((t,n)=>Nt(n,t)>0?n:t),min:t=>t.reduce((t,n)=>Nt(n,t)<0?n:t),mean:t=>vt(Qt.sum(t),R(t.length)),gcd:t=>J(E(t.map(t=>St(t,"gcd")).reduce(z)))},Ut=["∈","∉","∪","∩","pmod","random","(]","[)"];function Yt(e,r){if(++k>O.steps)throw new F("too much to work out");switch(e.type){case"number":return J(G(e.value));case"string":return nt(e.value.slice(1,-1));case"symbol":return tn(e.value,r)}const i=n(e);if(i)return Yt(i,r);const{op:a,args:s}=e,u=t=>Yt(t,r);if("?:"===a)return at(u(s[0]))?u(s[1]):u(s[2]);if("_"===a){if(s.every(t=>"op"!==t.type))return tn(`${s[0].value}_${s[1].value}`,r);throw new F("subscript")}if("der"===a)return function(t,n){const[e,r]=t.args,o=en(r);if(!o||!Object.prototype.hasOwnProperty.call(n,o))throw new F(`a derivative needs a value for ${o||"its variable"}`);const i=ot(n[o]),a=nn(e,o,n);if(!Number.isFinite(a(i)))throw new B("undefined");const s=1e-6*Math.max(1,Math.abs(i)),u=(a(i+s)-a(i))/s,c=(a(i)-a(i-s))/s;if(!Number.isFinite(u)||!Number.isFinite(c)||Math.abs(u-c)>.001*Math.max(1,Math.abs(u)))throw new B("not differentiable here");let l=.1*Math.max(1,Math.abs(i));const f=1.4,h=[[(a(i+l)-a(i-l))/(2*l)]];let m=h[0][0],g=1/0;for(let t=1;t<12;t++){l/=f,h[t]=[(a(i+l)-a(i-l))/(2*l)];let n=f*f;for(let e=1;e<=t;e++){h[t][e]=(h[t][e-1]*n-h[t-1][e-1])/(n-1),n*=f*f;const r=Math.max(Math.abs(h[t][e]-h[t][e-1]),Math.abs(h[t][e]-h[t-1][e-1]));r<=g&&(g=r,m=h[t][e])}if(Math.abs(h[t][t]-h[t-1][t-1])>=2*g)break}if(!Number.isFinite(m))throw new B("not differentiable here");return sn(m,g)}(e,r);if("int"===a)return function(t,n){const[e,r,i,a]=t,s=t=>t&&"symbol"===t.type&&/^[a-zA-Zʹ-Ͽ]$/.test(t.value);let u,c,l;if(4===t.length)[u,c,l]=[en(r),i,a];else{if(3!==t.length||s(r))throw new F("an integral needs limits to be calculated");[u,c,l]=[o(e)||"x",r,i]}let f=ot(Yt(c,n)),h=ot(Yt(l,n));if(f===h)return R(0);let m=1;f>h&&([f,h]=[h,f],m=-1);const g=nn(e,u,n),{value:p,error:d}=rn(g,f,h);return sn(m*p,d)}(s,r);if("lim"===a)return function(t,n){const[e,r,i,a]=t;let s,u,c=0;if(2===t.length&&"op"===r.type&&"→"===r.op)[s,u]=[en(r.args[0]),r.args[1]];else if(2===t.length)[s,u]=[o(e),r];else{if(!(t.length>=3))throw new F("a limit needs a point");[s,u]=[en(r),i]}if(4===t.length){const t="op"===a.type?"":String(a.value).toLowerCase();c=t.startsWith("r")||"+"===t?1:-1}if(!s)throw new F("a limit needs a variable");const l=Yt(u,n),f=ot(l),h=nn(e,s,n);let m,g;if(Number.isFinite(f))if(c)({value:m,error:g}=an(t=>h(f+c*t*Math.max(1,Math.abs(f)))));else{const t=an(t=>h(f+t*Math.max(1,Math.abs(f)))),r=an(t=>h(f-t*Math.max(1,Math.abs(f))));if(t.value===r.value)({value:m,error:g}=t);else{if(!(Number.isFinite(t.value)&&Number.isFinite(r.value)&&Math.abs(t.value-r.value)<=1e-6*Math.max(1,Math.abs(t.value))))throw new B("the limit does not exist");m=(t.value+r.value)/2,g=Math.max(t.error,r.error,Math.abs(t.value-r.value))}try{const t=Yt(e,{...n,[s]:l});if(Math.abs(ot(t)-m)<=1e-6*Math.max(1,Math.abs(m)))return t}catch(t){if(!(t instanceof B))throw t}}else({value:m,error:g}=an(t=>h(Math.sign(f)/t)));return Number.isFinite(m)?sn(m,g):m}(s,r);if("\\sumidx"===a||"\\prodidx"===a)return function(t,n,e){const[r,i,a]=n;if(n.length<3)throw new F("a sum needs its limits");let s,u=i;"op"===i.type&&"="===i.op&&"symbol"===i.args[0].type?[s,u]=[i.args[0].value,i.args[1]]:s=o(r)||"n";const c=St(Yt(u,e),"a sum"),l=Yt(a,e),f=t?bt:yt;if(l===1/0){if(!t)throw new F("an infinite product");return function(t,n){const e=[],r=[];let o=0,i=n;for(let a=4;a<=17;a++){const s=2**a;for(;i<n+s;i++){const n=t(i);if(!Number.isFinite(n))throw new B("undefined");o+=n}if(e.push(s),r.push(o),a>=6&&r[r.length-1]===r[r.length-2])return sn(o,0)}const a=r[r.length-1]-r[r.length-2],s=r[r.length-2]-r[r.length-3];if(Math.abs(a)>=.9*Math.abs(s)&&Math.abs(a)>1e-12)throw new B("the series diverges");const u=e.slice(-7).map(t=>1/t),c=r.slice(-7),l=r.slice(-8,-1),f=(t,n)=>{const e=n.slice();for(let n=1;n<t.length;n++)for(let r=0;r<t.length-n;r++)e[r]=(t[r+n]*e[r]-t[r]*e[r+1])/(t[r+n]-t[r]);return e[0]},h=f(u,c),m=f(e.slice(-8,-1).map(t=>1/t),l);return sn(h,Math.abs(h-m))}(nn(r,s,e),Number(c))}const h=St(l,"a sum");if(h-c+1n>BigInt(O.terms))throw new F("too many terms to add one by one");let m=R(t?0:1);for(let t=c;t<=h;t++)m=f(m,Yt(r,{...e,[s]:J(E(t))}));return m}("\\sumidx"===a,s,r);if(["()","[]","{}"].includes(a))return tt(s.map(u),a);if("pmatrix"===a||"bmatrix"===a)return Ht(e,u);if("vmatrix"===a)return Lt.det(Ht(e,u));if("^"===a&&"symbol"===s[1].type&&"T"===s[1].value&&!Object.prototype.hasOwnProperty.call(r,"T")){const t=u(s[0]);if(Ct(t))return Lt.transpose(t)}if(Ut.includes(a))return function(n,e){const r={};for(const[t,n]of Object.entries(e))"function"!=typeof n&&(r[t]=ut(n));try{return st(function(n,e={}){0===I&&(N=0),I++;try{return A(t(n),e)}finally{I--}}(n,r))}catch(t){throw new F(t.message)}}(e,r);if(a.startsWith("\\:")){const t=a.slice(2);if("function"!=typeof r[t]&&Object.prototype.hasOwnProperty.call(Xt,t))return Xt[t](...s.map(u));const n=r[t];if("function"!=typeof n)throw new F(`no function ${a.slice(2)}`);return st(n(...s.map(t=>ut(u(t)))))}if(Dt[a]&&1===s.length)return Dt[a](u(s[0]));if(Kt[a]&&2===s.length)return Kt[a](u(s[0]),u(s[1]));if(Qt[a])return Qt[a](s.map(u));throw new F(`can't calculate '${a}'`)}function tn(t,n){if(Object.prototype.hasOwnProperty.call(n,t))return n[t];if(Object.prototype.hasOwnProperty.call(qt,t))return qt[t]();throw new F(`no value for '${t}'`)}function nn(t,n,e){return r=>{try{return ot(Yt(t,{...e,[n]:r}))}catch(t){if(t instanceof B)return NaN;throw t}}}const en=t=>"symbol"===t.type?t.value:null;function rn(t,n,e){if(n===-1/0&&e===1/0){const n=rn(t,-1/0,0),e=rn(t,0,1/0);return{value:n.value+e.value,error:n.error+e.error}}return e===1/0?on(e=>t(n+e/(1-e))/((1-e)*(1-e)),0,1):n===-1/0?on(n=>t(e-n/(1-n))/((1-n)*(1-n)),0,1):on(t,n,e)}function on(t,n,e){const r=(e-n)/2;let o=1,i=0,a=NaN,s=NaN,u=0;const c=o=>{const i=Math.PI/2*Math.sinh(Math.abs(o)),a=Math.exp(-2*i),s=2*r*a/(1+a),c=r*(Math.PI/2)*Math.cosh(o)*(4*a)/((1+a)*(1+a));if(0===s||0===c)return 0;const l=o>0?e-s:n+s;if(0!==o&&(l<=n||l>=e))return 0;const f=t(0===o?(n+e)/2:l);if(!Number.isFinite(f)){if(s<1e-6*r)return 0;throw new B("the integral diverges")}return Math.abs(o)>3.5&&(u=Math.max(u,Math.abs(c*f))),c*f};i=c(0);for(let t=o;t<=4;t+=o)i+=c(t)+c(-t);a=o*i;for(let t=1;t<=8;t++){o/=2;for(let t=o;t<=4;t+=2*o)i+=c(t)+c(-t);s=a,a=o*i;const n=Math.max(1,Math.abs(a));if(u>1e-8*n)throw new B("the integral diverges");if(t>=3&&Math.abs(a-s)<=1e-13*n)break}const l=Math.abs(a-s);if(!Number.isFinite(a)||l>1e-6*Math.max(1,Math.abs(a)))throw new B("the integral does not converge");return{value:a,error:l}}function an(t){const n=[],e=[];for(let r=0;r<30;r++){const o=.1/2**r,i=t(o);Number.isFinite(i)&&(n.push(o),e.push(i))}if(e.length<6)throw new B("undefined");const r=e.slice(1).map((t,n)=>t-e[n]).slice(-6);if(r.every(t=>Math.sign(t)===Math.sign(r[0])&&0!==t)&&Math.abs(r[5])>=.95*Math.abs(r[0])&&Math.abs(e[e.length-1])>10)return{value:Math.sign(r[0])*(1/0),error:0};const o=t=>{const r=n.slice(t,t+8),o=e.slice(t,t+8);for(let t=1;t<r.length;t++)for(let n=0;n<r.length-t;n++)o[n]=(r[n+t]*o[n]-r[n]*o[n+1])/(r[n+t]-r[n]);return o[0]};let i=null;for(let t=0;t+9<=e.length;t++){const n=o(t),e=o(t+1),r=Math.abs(n-e);Number.isFinite(n)&&(!i||r<i.error)&&(i={value:n,error:r})}const a=e[e.length-1],s=Math.abs(a-e[e.length-2]);if(!i||i.error>Math.max(s,1e-6*Math.max(1,Math.abs(a)))){if(s<=1e-6*Math.max(1,Math.abs(a)))return{value:a,error:10*s};throw new B("the limit could not be found")}return i}function sn(t,n=0){if(!Number.isFinite(t))return t;const e=Math.max(1e-10,4*n)*Math.max(1,Math.abs(t));if(e>1e-6*Math.max(1,Math.abs(t)))return t;if(Math.abs(t)<e)return R(0);const r=[[R(1),1e3],[X,100],[J(W,2),100],[H,100],...[2n,3n,5n,6n,7n].map(t=>[J(W,0,0,{n:2,r:t}),100])];for(const[n,o]of r){const r=t/ot(n),i=un(r,o);if(i&&Math.abs(Number(i.n)/Number(i.d)-r)*ot(n)<=e)return ft(J(i),n)}return t}function un(t,n){if(!Number.isFinite(t)||Math.abs(t)>1e12)return null;let[e,r,o,i]=[0,1,1,0],a=t;for(let t=0;t<40;t++){const t=Math.floor(a),s=t*r+e,u=t*i+o;if(u>n)break;if([e,r,o,i]=[r,s,i,u],Math.abs(a-t)<1e-15)break;a=1/(a-t)}return i?E(BigInt(r),BigInt(i)):null}function cn(t,n){if("boolean"==typeof t)return String(t);if(t&&"s"===t.kind)return JSON.stringify(t.text);if(Array.isArray(t)){if("pm"===t.group&&2===t.length&&It(t[1],wt(t[0])))return`±${ln(t[0],n)}`;if(_t.has(t.group)&&a(t))return`${t.group}(${t.map(t=>`[${t.map(t=>cn(t,n)).join(", ")}]`).join(", ")})`;const[e,r]={"()":"()","[]":"[]","{}":"{}"}[t.group]||"{}";return e+t.map(t=>cn(t,n)).join(", ")+r}return"number"==typeof t?fn(t,n):n.decimal||null!==n.places?function(t,n){if(Q(t)&&null===n.places){let e=t.c.d,r=0,o=0;for(;e%2n==0n;)e/=2n,r++;for(;e%5n==0n;)e/=5n,o++;const i=Math.max(r,o);if(1n===e&&i<=n.digits){const e=t.c.n*10n**BigInt(i)/t.c.d,r=e<0n,o=P(e).toString().padStart(i+1,"0"),a=i?`${o.slice(0,-i)}.${o.slice(-i)}`:o;if(o.length<=n.maxDigits)return(r?"-":"")+hn(a)}}return Q(t)&&null!==n.places?cn(Tt(t,R(n.places)),{...n,places:null,decimal:!0}):fn(ot(t),n)}(t,n):function(t,n){const{c:e}=t,r=P(e.n);if(r.toString().length>n.maxDigits||e.d.toString().length>n.maxDigits)return function(t,n){if(!Q(t)||1n!==t.c.d)return fn(ot(t),n);const e=P(t.c.n).toString(),r=BigInt(e.slice(0,n.digits+1)),o=((r+5n)/10n).toString(),i=e.length-1+(o.length>n.digits?1:0),a=hn(`${o[0]}.${o.slice(1,n.digits)}`);return`${t.c.n<0n?"-":""}${a}*10^(${i})`}(t,n);const o=(t,n)=>1===n?t:`${t}^${n}`,i=[],a=[];t.pi>0&&i.push(o("pi",t.pi));t.pi<0&&a.push(o("pi",-t.pi));t.e>0&&i.push(o("e",t.e));t.e<0&&a.push(o("e",-t.e));t.root&&i.push(2===t.root.n?`sqrt(${t.root.r})`:`root(${t.root.n}, ${t.root.r})`);1n===r&&i.length||i.unshift(r.toString());1n!==e.d&&a.unshift(e.d.toString());const s=t=>t.length>1?`(${t.join("*")})`:t[0],u=a.length?`${s(i)}/${s(a)}`:i.join("*");return(e.n<0n?"-":"")+u}(t,n)}const ln=(t,n)=>{const e=cn(t,n);return/^[\d.]+$|^[a-zπ]+$/i.test(e)?e:`(${e})`};function fn(t,n){if(t===1/0)return"∞";if(t===-1/0)return"-∞";if(Object.is(t,-0)||0===t)return"0";if(null!==n.places&&Math.abs(t)<1e21)return t.toFixed(n.places);const e=Math.abs(t);if(e>=1e15||e<1e-6){const[e,r]=t.toExponential(n.digits-1).split("e");return`${hn(e)}*10^(${Number(r)})`}return String(Number(t.toPrecision(n.digits)))}const hn=t=>t.includes(".")?t.replace(/\.?0+$/,""):t;function mn(t,n={},o={}){const i="string"==typeof t?e(t):r(t),a={};for(const[t,e]of Object.entries(n))a[t]=st(e);let s;0===j&&(k=0),j++;try{s=Yt(i,a)}finally{j--}const u={decimal:!1,places:null,digits:12,maxDigits:50,...o};void 0===u.places&&(u.places=null);const c=t=>Array.isArray(t)?t.every(c):"number"!=typeof t;return{value:ut(s),text:cn(s,u),exact:c(s)}}function gn(t,n={}){let e=t.trim();const r={},o=/^(~|≈)\s*(\d+)?/.exec(e);o&&(r.decimal=!0,void 0!==o[2]&&(r.places=Number(o[2])),e=e.slice(o[0].length)),/\d\.\d|\.\d/.test(e)&&(r.decimal=!0);try{const{text:t}=mn(e,n,r);return t.startsWith('"')||/^\d+(\.\d+)?$/.test(t)?t:`(${t})`}catch(t){if(t instanceof B)return'"undefined"';if(t instanceof F)return`(${e})`;throw t}}i(gn);for(const t of[O,At,qt,Dt,Kt,Qt])Object.setPrototypeOf(t,null);Object.setPrototypeOf(Xt,null);export{mn as a,gn as c};

package/dist/chunks/draw-Bev17BJJ.js

@@ -0,0 +1,2 @@
+/* Inline Math 0.2.0 — MIT licence; MathZetta not included: map mathzetta, mathzetta/speech and mathzetta/calculate with an import map */
+import{GREEK as t,isCustomFunction as e,matrixRows as r,unaryNeedsBrackets as s,isMinusOneTimes as i,bracketedSides as n,isImplicitProduct as a,customName as l,needsBrackets as h,derivativeOrder as o,bracketOp as c,precedenceOf as u,isVariable as d,firstLeaf as p,firstVariable as m,MATRICES as f,walk as g,toPostfix as b,operator as $,VARIADIC as x,parseTree as v,fromPostfix as y}from"mathzetta";import{toAudioSpeech as w}from"mathzetta/speech";const L={"(":{fill:"M0.92,0 C0.1,0.2 0.1,0.8 0.92,1 L1,0.975 C0.48,0.75 0.48,0.25 1,0.025 Z"},")":{fill:"M0.08,0 C0.9,0.2 0.9,0.8 0.08,1 L0,0.975 C0.52,0.75 0.52,0.25 0,0.025 Z"},"{":{fill:"M1,0 C0.45,0 0.5,0.05 0.5,0.2 L0.5,0.38 C0.5,0.46 0.35,0.49 0.05,0.5 C0.35,0.51 0.5,0.54 0.5,0.62 L0.5,0.8 C0.5,0.95 0.45,1 1,1 L1,0.985 C0.68,0.985 0.64,0.95 0.64,0.8 L0.64,0.62 C0.64,0.53 0.55,0.505 0.3,0.5 C0.55,0.495 0.64,0.47 0.64,0.38 L0.64,0.2 C0.64,0.05 0.68,0.015 1,0.015 Z"},"}":{fill:"M0,0 C0.55,0 0.5,0.05 0.5,0.2 L0.5,0.38 C0.5,0.46 0.65,0.49 0.95,0.5 C0.65,0.51 0.5,0.54 0.5,0.62 L0.5,0.8 C0.5,0.95 0.55,1 0,1 L0,0.985 C0.32,0.985 0.36,0.95 0.36,0.8 L0.36,0.62 C0.36,0.53 0.45,0.505 0.7,0.5 C0.45,0.495 0.36,0.47 0.36,0.38 L0.36,0.2 C0.36,0.05 0.32,0.015 0,0.015 Z"},sqrt:{stroke:"M0,0.62 L0.18,0.55 L0.45,0.97 L0.98,0.015"},cancel:{stroke:"M0,1 L1,0"},int:{stroke:"M0.95,0.09 C0.9,0.01 0.72,0 0.66,0.12 C0.6,0.25 0.42,0.75 0.34,0.88 C0.28,0.99 0.1,0.99 0.05,0.91"},sum:{fill:"M0.04,0 L0.94,0 L0.98,0.24 L0.94,0.24 C0.9,0.1 0.8,0.07 0.62,0.07 L0.24,0.07 L0.58,0.5 L0.2,0.93 L0.64,0.93 C0.82,0.93 0.92,0.9 0.95,0.76 L0.99,0.76 L0.94,1 L0.02,1 L0.47,0.47 Z"},prod:{fill:"M0,0 L1,0 L1,0.04 L0.88,0.05 L0.88,0.95 L1,0.96 L1,1 L0.62,1 L0.62,0.96 L0.74,0.95 L0.74,0.06 L0.26,0.06 L0.26,0.95 L0.38,0.96 L0.38,1 L0,1 L0,0.96 L0.12,0.95 L0.12,0.05 L0,0.04 Z"}};function M(t,e,r=""){const s=L[t];return`<svg class="${e}" viewBox="0 0 1 1" preserveAspectRatio="none" aria-hidden="true"${r?` style="${r}"`:""}>${s.fill?`<path d="${s.fill}" fill="currentColor"/>`:`<path d="${s.stroke}" fill="none" stroke="currentColor" vector-effect="non-scaling-stroke"/>`}</svg>`}const k=.8,C=.2,z=.25,P=.7,j="−",A={"+":"add","-":"sub","*":"mul","/":"frac","^":"pow",_:"subscript",neg:"neg",pm:"pm","!":"factorial","=":"eq","===":"eq","≠":"neq","≠=":"neq","<":"lt",">":"gt","≤":"le","≥":"ge","≈":"approx","≡":"equiv","∈":"in","∉":"notin","∪":"union","∩":"intersect","→":"to","±":"pm","&":"and","|":"or","\\not":"not","\\xor":"xor","\\nand":"nand","\\nor":"nor","?:":"cases","()":"tuple","[]":"list","{}":"set","(]":"interval","[)":"interval","\\sumidx":"sum","\\prodidx":"prod",mod:"mod",pmod:"pmod",pmatrix:"matrix",bmatrix:"matrix",vmatrix:"matrix"},Z={"=":"=","===":"=","≠":"≠","≠=":"≠","<":"<",">":">","≤":"≤","≥":"≥","∈":"∈","∉":"∉","→":"→","≈":"≈","≡":"≡","&":"∧","|":"∨","\\xor":"⊕","\\nand":"↑","\\nor":"↓"},q={"±":"±","∪":"∪","∩":"∩",mod:"mod"},B=["sin","cos","tan","csc","sec","cot","sinh","cosh","tanh"],F={arcsin:"sin",arccos:"cos",arctan:"tan",arcsinh:"sinh",arccosh:"cosh",arctanh:"tanh"},O=[...B,...Object.keys(F),"ln","det"],S={atan2:"atan2",max:"max",min:"min",gcd:"gcd",mean:"mean",round:"round",fixed:"fixed",expm1:"expm1",random:"random"},W={"()":["(",")"],"[]":["[","]"],"{}":["{","}"],"(]":["(","]"],"[)":["[",")"]},E={"\\partial":"∂","\\nabla":"∇","\\ell":"ℓ","\\infty":"∞","\\emptyset":"∅"},_={vec:"→",hat:"ˆ",widehat:"ˆ",tilde:"˜",dot:"˙",ddot:"¨"},I=["boxed","overline","bar","underline","cancel",...Object.keys(_)],N={prefix:"mv",display:!0,fnParens:"auto",trigPowers:!0,inverseTrig:"arc",derivativeBrackets:"[",scriptFractions:"slash",cases:!0,label:!0,mathml:null,attributes:null,style:null},T=t=>String(t).replace(/&/g,"&amp;").replace(/</g,"&lt;").replace(/>/g,"&gt;").replace(/"/g,"&quot;"),D=t=>+t.toFixed(3)+"em",R=(t,e=k,r=C)=>({html:t,h:e,d:r});function G(...t){const e=t.flat().filter(Boolean);return{html:e.map(t=>t.html).join(""),h:Math.max(k,...e.map(t=>t.h)),d:Math.max(C,...e.map(t=>t.d))}}function H(t,e={}){const r=new J({...N,...e}),s=r.render(t,{level:0}),i=`${r.p}${r.o.display?` ${r.p}-display`:""}`,n="function"==typeof r.o.mathml?function(t,e,r,s){try{return String(t(e)).replace(/ id="mz-\d+"/g,"").replace(/^<math>/,`<math class="${r}-sr-math"${s?' display="block"':""}>`)}catch{return""}}(r.o.mathml,t,r.p,r.o.display):"",a=n?null:function(t,e){if(!1===e||null===e)return null;if("string"==typeof e)return e;try{return"function"==typeof e?e(t):w(t)}catch{return null}}(t,r.o.label),l=null!==a||n?s.html.replace(/^<span /,'<span aria-hidden="true" '):s.html;return{html:`<span class="${i}"${null===a?"":` role="math" aria-label="${T(a)}"`}>${l}${n}</span>`,h:s.h,d:s.d}}class J{constructor(t){this.o=t,this.p=t.prefix}el(t,e,r="",s=""){return`<span class="${t.split(" ").map(t=>`${this.p}-${t}`).join(" ")}"${r?` style="${r}"`:""}${s}>${e}</span>`}text(t,e){const r=R(this.el(t,T(e)));return r.leaf={kind:t,content:T(e)},r}bin(t){return this.text("bin",t)}rel(t){return this.text("rel",t)}punct(t){return this.text("punct",t)}word(t){return this.text("word",t)}wrap(t,e,r){let s="";void 0!==t.id&&(s+=` data-node="${t.id}"`),"op"===t.type&&(s+=` data-op="${T(t.op)}"`);const i=this.o.attributes&&this.o.attributes(t)||{};for(const[t,e]of Object.entries(i))"class"!==t&&"style"!==t&&(s+=` ${t}="${T(e)}"`);const n=[i.style,this.o.style&&this.o.style(t)].filter(Boolean).join(";"),a=(r.leaf?["n",...e,r.leaf.kind]:["n",...e]).map(t=>`${this.p}-${t}`).concat(i.class?[i.class]:[]).join(" "),l=r.leaf?r.leaf.content:r.html;return{html:`<span class="${a}"${n?` style="${T(n)}"`:""}${s}>${l}</span>`,h:r.h,d:r.d}}render(t,e){return"number"===t.type?this.number(t):"string"===t.type?this.wrap(t,["text"],this.text("text",t.value.replace(/^["'`]|["'`]$/g,""))):"symbol"===t.type?this.wrap(t,["symbol"],this.symbol(t.value)):this.operation(t,e)}number(t){return this.wrap(t,["number"],this.text("num",t.value.replace(/^-/,j)))}symbol(e){return t[e]&&(e=t[e]),E[e]?this.text("ord",E[e]):"\\+"===e||"\\-"===e?this.text("ord",e[1]):"-∞"===e?this.text("ord","−∞"):/^[A-Za-z]$/.test(e)||/^[α-ω]$/.test(e)?this.text("var",e):/^[A-Za-z]′+$/.test(e)?R(this.el("var",T(e[0]))+this.el("prime",T(e.slice(1)))):/^Δ[A-Za-z]$/.test(e)?R(this.el("ord","Δ")+this.el("var",e[1])):e.endsWith("⁻¹")?this.script(this.symbol(e.slice(0,-2)),this.text("num","−1"),{level:0}):/^\\[A-Za-z]+$/.test(e)?this.text("name",e.slice(1)):/^[A-Za-z]{2,}$/.test(e)?this.text("name",e):this.text("ord",e)}operation(t,n){const{op:a,args:l}=t,[o,c]=l,u=(t,e={})=>this.render(t,{...n,...e,forceParens:e.forceParens||!1,before:e.before||!1}),d=A[a]??(/^[a-z0-9]+$/i.test(a)?a:"other"),p=e=>this.wrap(t,["op",`op-${d}`],e),m=(e,r)=>h(t,e,r)&&"/"!==e.op?this.fence(u(e)):u(e);if(O.includes(a)||"log"===a)return p(this.named(t,n));if(S[a])return p(G(this.word(S[a]),this.fence(this.list(l,n))));if(e(a))return p(this.custom(t,n));const f=r(t);if(f)return p(this.matrix(t,f,n));if(W[a])return p(this.fence(this.list(l,n),...W[a]));if(Z[a]&&2===l.length)return p(G(m(o,"left"),this.rel(Z[a]),m(c,"right")));if(q[a]&&2===l.length)return p(G(m(o,"left"),this.bin(q[a]),m(c,"right")));switch(a){case"+":return i(c)?p(G(m(o,"left"),this.bin(j),this.wrap(c,["op","op-mul"],this.render(c.args[1],n)))):"number"===c.type&&c.value.startsWith("-")?p(G(m(o,"left"),this.bin(j),this.wrap(c,["number"],this.text("num",c.value.slice(1))))):p(G(m(o,"left"),this.bin("+"),this.signed(c,m(c,"right"))));case"-":return p(G(m(o,"left"),this.bin(j),this.signed(c,m(c,"right"))));case"*":return p(this.product(t,n));case"/":return p(this.fraction(t,n));case"^":return p(this.power(t,n));case"_":return p(this.script(u(o,{forceParens:!0}),null,n,u(c,{level:n.level+1})));case"neg":return p(G(this.text("sign",j),s(a,o)?this.fence(u(o)):u(o,{before:n.before})));case"pm":return p(G(this.text("sign","±"),s(a,o)?this.fence(u(o)):u(o)));case"!":return p(G(s(a,o)?this.fence(u(o)):u(o,{forceParens:!0}),this.text("ord","!")));case"\\not":return p(G(this.text("sign","¬"),s(a,o)?this.fence(u(o)):u(o)));case"pmod":return p(G(u(o),this.fence(G(this.word("mod"),this.text("space",""),u(c)))));case"sqrt":return p(this.radical(u(o)));case"root":return p(this.radical(u(c),this.render(o,{level:n.level+2})));case"abs":return p(this.fence(u(o),"|","|"));case"floor":return p(this.fence(u(o),"⌊","⌋"));case"ceil":return p(this.fence(u(o),"⌈","⌉"));case"loglog":return p(G(this.word("ln"),this.fence(G(this.word("ln"),this.fence(u(o))))));case"logloglog":return p(G(this.word("ln"),this.fence(G(this.word("ln"),this.fence(G(this.word("ln"),this.fence(u(o))))))));case"perm":return p(this.script(this.script(R(""),this.render(o,{level:n.level+1}),n),null,n,this.render(c,{level:n.level+1}),this.word("P")));case"comb":return p(this.fence(this.stack(u(o),u(c),!1)));case"?:":return p(this.o.cases?this.cases(t,n):G(u(o),this.bin("?"),u(c),this.bin(":"),u(l[2])));case"sum":return p(G(l.map((t,e)=>e?[this.bin("+"),u(t)]:[u(t)]).flat()));case"prod":return p(G(l.map((t,e)=>e?[this.bin("·"),u(t)]:[u(t)]).flat()));case"der":return p(this.derivative(t,n));case"int":return p(this.integral(l,n));case"lim":return p(this.limit(l,n));case"\\sumidx":return p(this.bigOperator("sum",l,n));case"\\prodidx":return p(this.bigOperator("prod",l,n))}throw new Error(`Inline Math cannot draw '${a}'`)}signed(t,e){return("number"===t.type?t.value.startsWith("-"):"neg"===t.op||"pm"===t.op)&&!e.fenced?this.fence(e):e}list(t,e){return G(t.map((t,r)=>r?[this.punct(","),this.render(t,e)]:[this.render(t,e)]).flat())}product(t,r){const[s,l]=t.args;if(i(t))return G(this.text("sign",j),this.render(l,r));const h=n(t),o=a(s,l,h),c=function(t){for(;"op"===t.type;){if(O.includes(t.op)||"log"===t.op||S[t.op]||e(t.op))return!0;if("^"!==t.op&&"*"!==t.op)return!1;t=t.args[0]}return!1}(l),u=h.left?this.fence(this.render(s,r)):this.render(s,{...r,before:o&&!c}),d=h.right?this.fence(this.render(l,r)):this.render(l,{...r,before:r.before});return G(u,o?R(this.el(c?"fnspace":"times","")):this.bin("·"),d)}named(t,e,r=null){const{op:s,args:i}=t,n="log"===s?i[1]:i[0];let a;a=F[s]&&"power"===this.o.inverseTrig?this.script(this.word(F[s]),this.text("num","−1"),e):this.word(s),r&&(a=this.script(a,r,e)),"log"===s&&(a=this.script(a,null,e,this.render(i[0],{level:e.level+1})));const l="auto"===this.o.fnParens&&!e.forceParens&&!e.before&&K(n),h=this.render(n,{...e,forceParens:!1,before:!1});return G(a,l?G(R(this.el("fnspace","")),h):this.fence(h))}custom(t,e){const r=l(t.op),s=t.args;if(I.includes(r)&&1===s.length)return this.decorate(r,this.render(s[0],e));return G(/^[A-Za-z]′*(⁻¹)?$/.test(r)?this.symbol(r):this.word(r),R(this.el("callgap","")),this.fence(this.list(s,e)))}decorate(t,e){switch(t){case"boxed":return R(this.el("boxed",e.html),e.h+.22,e.d+.22);case"cancel":return R(this.el("cancel",e.html+M("cancel",`${this.p}-cancel-line`)),e.h,e.d);case"underline":return R(this.el("underline",e.html),e.h,e.d+.12);case"overline":case"bar":return R(this.el("over",e.html),e.h+.14,e.d);default:return R(this.el("accent",this.el("accent-mark",_[t])+e.html),e.h+.3,e.d)}}fraction(t,e){const[r,s]=t.args;if(e.level>0&&"slash"===this.o.scriptFractions&&K(r,!0)&&K(s,!0)){const t=t=>"op"!==t.type||K(t)?this.render(t,e):this.fence(this.render(t,e));return G(t(r),this.text("ord","/"),t(s))}const i=e.level>0||e.inFraction||!this.o.display?.8:1,n={...e,inFraction:!0,forceParens:!1,before:!1};return this.stack(this.render(r,n),this.render(s,n),!0,i)}stack(t,e,r=!0,s=1){const i=t=>1===s?t.html:this.el("scaled",t.html,`font-size:${D(s)}`),n=r?.06:0,a=z+n/2+.1+Math.max(C,s*t.d),l=this.el("frac"+(r?"":" frac-nobar"),this.el("numer",i(t))+this.el("denom",i(e)),`vertical-align:${D(a)}`);return R(l,a+Math.max(k,s*t.h),Math.max(k,s*e.h)+Math.max(C,s*e.d)+.1+n/2-z)}power(t,e){const[r,s]=t.args,i={...e,level:e.level+1,forceParens:!1,before:!1,inFraction:!1},n=()=>this.render(s,i);if(this.o.trigPowers&&B.includes(r.op)&&U(s))return this.wrap(r,["op",`op-${r.op}`],this.named(r,e,n()));if("_"===r.op){const t=this.render(r.args[1],i);return this.wrap(r,["op","op-subscript"],this.script(this.render(r.args[0],{...e,forceParens:!0}),n(),e,t))}const a=h(t,r,"left")||"number"===r.type&&r.value.startsWith("-")||"/"===r.op||O.includes(r.op)?this.fence(this.render(r,e)):this.render(r,{...e,forceParens:!0});return this.script(a,n(),e)}script(t,e,r,s=null,i=null){const n=r.level>0?.8:P,a=i?G(t,i):t;let l=e?Math.max(.42,t.h-.38,n*e.d+.12):0,h=s?Math.max(.2,t.d-.05,n*s.h-.45):0;if(e&&s){const t=.1-(l-n*e.d-(n*s.h-h));t>0&&(h+=t)}const o=t=>this.el("script",t.html,`font-size:${D(n)}`);if(e&&!s)return R(t.html+this.el("sup",e.html,`font-size:${D(n)};vertical-align:${D(l/n)}`),Math.max(a.h,l+n*e.h),Math.max(a.d,n*e.d-l));if(s&&!e)return R(a.html+this.el("sub",s.html,`font-size:${D(n)};vertical-align:${D(-h/n)}`),Math.max(a.h,n*s.h-h),Math.max(a.d,h+n*s.d));const c=l+n*e.h,u=h+n*s.d,d=this.el("subsup",o(e)+o(s),`vertical-align:${D(l)};height:${D(c+u)}`);return R(a.html+d,Math.max(a.h,c),Math.max(a.d,u))}radical(t,e=null){const r=Math.max(t.h,k)+.1+.06,s=Math.max(t.d,C),i=r+s,n=M("sqrt",`${this.p}-hook`,`height:${D(i)};width:${D(.5+.06*(i-1))};vertical-align:${D(-s)}`);let a="";if(e){const t=.8*P;a=this.el("rootindex",e.html,`font-size:${D(t)};vertical-align:${D((.55*i-s)/t)}`)}return R(this.el("sqrt",a+n+this.el("radicand",t.html)),r,s)}fence(t,e="(",r=")"){const s=Math.max(t.h,k)+Math.max(t.d,C),i=s>1.25,n=i?.1:0,a=(t,e)=>{if(!t)return{html:"",w:0};const r={"(":.26,")":.26,"{":.36,"}":.36}[t];if(r){const n=r+(i?Math.min(.2,.05*(s-1)):0);return{html:M(t,`${this.p}-delim ${this.p}-delim-${e}`,`width:${D(n)}`),w:n+.1}}const n={"[":"lbrack","]":"rbrack","|":"vert","⌊":"lfloor","⌋":"rfloor","⌈":"lceil","⌉":"rceil"}[t];return{html:this.el(`delim ${n} delim-${e}`,""),w:"|"===t?.18:.3}},l=a(e,"l"),h=a(r,"r"),o=`padding:${D(n)} ${D(h.w)} ${D(n)} ${D(l.w)}`,c=R(this.el("fence",l.html+t.html+h.html,o),Math.max(t.h,k)+n,Math.max(t.d,C)+n);return c.fenced=!0,c}derivative(t,e){const{n:r,body:s,by:i,variable:n}=o(t),a={...e,level:e.level+1},l=()=>this.text("d","d"),h=()=>r>1?this.render({type:"number",value:String(r)},a):null,d={...e,inFraction:!0},p=G(l(),h()?this.script(this.render(i,d),h(),d):this.render(i,d)),m=t=>G(h()?this.script(l(),h(),d):l(),t||[]),f=e.level>0||e.inFraction||!this.o.display?.8:1;if(n)return this.stack(m(this.render(s,d)),p,!0,f);const g=c(s)&&u(c(s))<100,[b,$]="("===this.o.derivativeBrackets?["(",")"]:["[","]"],x=g?this.fence(this.render(s,e),b,$):this.render(s,e);return G(this.stack(m(),p,!0,f),x)}integral(t,e){const[r,s,i,n]=t,a=t=>this.render(t,e),l=t=>t?this.render(t,{...e,level:e.level+1}):null,h=()=>this.text("var",m(r)||"x");let o,c=null,u=null;switch(t.length){case 1:o=h();break;case 2:d(s)?o=a(s):(o=h(),c=l(s));break;case 3:d(s)?(o=a(s),c=l(i)):(o=h(),c=l(s),u=l(i));break;default:o=a(s),c=l(i),u=l(n)}const p=a(r),f=R(this.el("dx",this.el("d","d")+o.html),o.h,o.d);return G(this.bigSign("int",p,c,u,e),p,f)}bigSign(t,e,r,s,i){const n=!this.o.display||i.level>0,a=Math.max(n?.6:.95,Math.max(e.h-z,e.d+z)+.12),l=M(t,`${this.p}-bigsign ${this.p}-${t}sign`,`height:${D(2*a)};width:${D(n?.38:.5)};vertical-align:${D(z-a)}`);if(!r&&!s)return R(l,z+a,a-z);const h=P,o=s||R(""),c=r||R(""),u=z+a-h*o.h;c.d;const d=this.el("limits",this.el("script",o.html,`font-size:${D(h)}`)+this.el("script lower",c.html,`font-size:${D(h)}`),`vertical-align:${D(u)};height:${D(2*a)}`);return R(l+d,z+a,a-z)}limit(t,e){const[r,s,i,n]=t,a={...e,level:e.level+1},l=t=>this.render(t,a),h=()=>this.rel("→");let o;switch(t.length){case 1:return G(this.word("lim"),R(this.el("fnspace","")),this.render(r,e));case 2:{const t=m(r),e="number"===s.type||"symbol"===s.type&&s.value.includes("∞");o=t&&e?G(this.text("var",t),h(),l(s)):l(s);break}case 3:o=G(l(s),h(),l(i));break;default:{const t=p(n).toLowerCase().startsWith("r")?"+":j;o=G(l(s),h(),this.script(l(i),this.wrap(n,["symbol"],this.text("ord",t)),a))}}return G(this.under(this.word("lim"),o,e),this.render(r,e))}under(t,e,r){return!this.o.display||r.level>0?this.script(t,null,r,e):R(this.el("under",t.html+this.el("script",e.html,`font-size:${D(.7)}`)),t.h,Math.max(t.d,C)+.05+.7*(e.h+e.d))}bigOperator(t,e,r){const[s,i,n]=e,a={...r,level:r.level+1},l=i?this.render(i,a):null,h=n?this.render(n,a):null,o=this.render(s,r);if(!this.o.display||r.level>0){const e=.55,s=M(t,`${this.p}-bigsign`,`height:${D(2*e)};width:${D(.8)};vertical-align:${D(z-e)}`);return G(this.script(R(s,z+e,e-z),h,r,l),o)}const c=.68,u=P,d=M(t,`${this.p}-bigsign`,`height:${D(1.36)};width:${D("sum"===t?1:1.05)}`),p=h?1.01+u*h.d:z-c,m=t=>this.el("script",t.html,`font-size:${D(u)}`),f=this.el("bigop",(h?m(h):"")+d+(l?m(l):""),`vertical-align:${D(p)}`);return G(R(f,.93+(h?.08+u*(h.h+h.d):0),c-z+(l?.08+u*(l.h+l.d):0)),o)}matrix(t,e,r){const s=e.map(t=>t.map(t=>this.render(t,r))),i=s.map(t=>({h:Math.max(k,...t.map(t=>t.h)),d:Math.max(C,...t.map(t=>t.d))})),n=i.reduce((t,e)=>t+e.h+e.d,0)+.3*(e.length-1),a=z+n/2-i[0].h,l=s.map((e,r)=>{const s=e.map(t=>this.el("matrix-cell",t.html)).join(""),i=t.args[r];return i&&"op"===i.type&&"[]"===i.op?this.wrap(i,["op","op-list","matrix-row"],R(s)).html:s}).join(""),h=e[0].length,o=R(this.el("matrix",l,`grid-template-columns:repeat(${h},auto);vertical-align:${D(a)}`),z+n/2,n/2-z),[c,u]=f[t.op]??["[","]"];return this.fence(o,c,u)}cases(t,e){const r=[];let s=t;for(;"op"===s.type&&"?:"===s.op;)r.push([this.render(s.args[1],e),G(this.word("if"),this.text("space",""),this.render(s.args[0],e))]),s=s.args[2];"symbol"===s.type&&"unchanged"===s.value||r.push([this.render(s,e),this.word("otherwise")]);const i=r.map(([t,e])=>({h:Math.max(t.h,e.h),d:Math.max(t.d,e.d)})),n=i.reduce((t,e)=>t+e.h+e.d,0)+.25*(r.length-1),a=z+n/2-i[0].h,l=r.map(([t,e])=>this.el("case-value",t.html)+this.el("case-cond",e.html)).join(""),h=R(this.el("cases",l,`vertical-align:${D(a)}`),z+n/2,n/2-z);return this.fence(h,"{","")}}function K(t,e=!1){return"number"===t.type?!t.value.startsWith("-")||e:"symbol"===t.type||"op"===t.type&&("abs"===t.op||r(t)?!e:!e||"neg"!==t.op&&"^"!==t.op?"*"===t.op&&!i(t)&&t.args.every(t=>"number"===t.type&&!t.value.startsWith("-")||Q(t)||"*"===t.op&&K(t,e)):K(t.args[0],!0)&&("neg"===t.op||K(t.args[1],!0)))}const Q=e=>"symbol"===e.type&&(1===e.value.length||/^[α-ωΑ-Ω]$/.test(e.value)||Boolean(t[e.value])),U=t=>"number"===t.type&&/^[1-9]\d*$/.test(t.value)&&Number(t.value)<10;const V=t=>b(t).join(" ");function X(t,e){const r=new Set;Y(t,e,r);const s=[];return g(t,t=>{r.has(t)&&s.push(t)}),s}function Y(t,e,r){if(null!=e)if(Array.isArray(e))e.forEach(e=>Y(t,e,r));else if("number"!=typeof e)if("function"!=typeof e){if("string"==typeof e){const s=V(v(e));return void g(t,t=>{V(t)===s&&r.add(t)})}if(e.path){const s=tt(t,e.path);return void(s&&r.add(s))}if(e.type){const s=V(e);g(t,t=>{t!==e&&V(t)!==s||r.add(t)})}}else g(t,(t,s)=>{e(t,s)&&r.add(t)});else g(t,t=>{t.id===e&&r.add(t)})}function tt(t,e){let r=t;for(const t of e){if("op"!==r.type||!r.args[t])return null;r=r.args[t]}return r}function et(t,e){const r=[],s=t=>{if(t.id===e)return!0;if("op"!==t.type)return!1;for(let e=0;e<t.args.length;e++){if(r.push(e),s(t.args[e]))return!0;r.pop()}return!1};return s(t)?r:null}function rt(t){let e=0;const r=t=>{"op"===t.type&&(t.args.forEach(r),$(t.op)?.arity===x&&e++),t.id=e++};return r(t),t}function st(t,e={}){const{blocks:r}=e;if("string"==typeof t)return v(t,r?{blocks:t=>r(t,e.scope)}:{});if(Array.isArray(t))return y(t);if(t&&"object"==typeof t&&t.type)return void 0===t.id?rt(structuredClone(t)):t;throw new Error("Inline Math needs an expression, standard postfix or a tree")}function it(t,e={}){const r=st(t,e);return H(r,nt(r,e)).html}function nt(t,e){const{colors:r,highlight:s,scope:i,blocks:n,...a}=e,l=new Map;for(const[e,s]of function(t){return t?Array.isArray(t)?t:Object.entries(t).map(([t,e])=>[/^\d+$/.test(t)?Number(t):t,e]):[]}(r))if(at(s))for(const r of X(t,e))l.set(r,`color:${s}`);const h=new Set(void 0===s?[]:X(t,s));if(!l.size&&!h.size)return a;const o=a.prefix||"mv";return{...a,style:t=>[l.get(t),a.style&&a.style(t)].filter(Boolean).join(";"),attributes:t=>{const e={...a.attributes?a.attributes(t):{}};return h.has(t)&&(e.class=[e.class,`${o}-hl`].filter(Boolean).join(" ")),e}}}function at(t){return"string"==typeof t&&/^[#\w\s.,%()/+-]+$/.test(t)&&!/url\s*\(|expression/i.test(t)}export{N as D,L as P,st as a,nt as b,tt as c,V as d,H as l,rt as n,et as p,X as s,it as t};

package/dist/chunks/edit-C65xXzo8.js

@@ -0,0 +1,2 @@
+/* Inline Math 0.2.0 — MIT licence; MathZetta not included: map mathzetta, mathzetta/speech and mathzetta/calculate with an import map */
+const e=Symbol.for("inlinemath.expressions"),t=new Set(["symbol","number"]);function n(e){return e?"symbol"===e.type?e.value:"op"===e.type&&"_"===e.op&&2===e.args.length&&"symbol"===e.args[0].type&&t.has(e.args[1].type)?`${e.args[0].value}_${e.args[1].value}`:null:null}function s(e){const{id:t,from:n,...r}=e;return r.args&&(r.args=r.args.map(s)),r}function r(e){const{id:t,...n}=e;return n.args&&(n.args=n.args.map(r)),n}function i(e,t){const n=(e,s)=>{if(!s&&void 0!==e.from)return t(e.from);const{id:r,from:i,...o}=e;return o.args&&(o.args=o.args.map(e=>n(e,!1))),o};return n(e,!0)}function o(e,t){let i=!1;const o=new Set,a=e=>{const r=n(e);if(null!==r){if(!o.has(r)){const e=t(r);if(e){i=!0,o.add(r);const t={...a(s(e)),from:r};return o.delete(r),t}}return e}return e.args?{...e,args:e.args.map(a)}:e},l=a(e);return{tree:i?r(l):e,changed:i}}const a="[-+]?(?:\\d+\\.?\\d*|\\.\\d+)",l=new RegExp(`^(${a})\\s*\\.\\.\\s*(${a})(?:\\s+step\\s+(${a}))?(?:\\s*=\\s*(${a}))?$`);function u(e){const t=/^\s*\[\[([\s\S]*)\]\]\s*$/.exec(e);if(!t||/\]\s*,\s*\[/.test(t[1]))return null;const n=t[1].trim(),s=l.exec(n);if(s){const e=Number(s[1]),t=Number(s[2]);if(!(t>e))return null;const n=void 0!==s[3]?Number(s[3]):Number.isInteger(e)&&Number.isInteger(t)?1:(t-e)/100;if(!(n>0))return null;const r=void 0!==s[4]?Math.min(t,Math.max(e,Number(s[4]))):e;return{kind:"slider",min:e,max:t,step:n,default:String(r)}}if(n.includes("|")){const e=n.split("|").map(e=>e.trim()).filter(Boolean);if(e.length)return{kind:"dropdown",options:e,default:e[0]}}return{kind:"textbox",default:n}}const c=Symbol("set on the page");class f{constructor(){this.owners=new Map,this.chosen=new Map,this.listeners=new Set}definitions(e){const t=new Map;for(const[n,s]of this.owners)if(n!==e)for(const[e,n]of s)t.delete(e),t.set(e,n);return t}textOf(e){const t=this.chosen.get(e.name);return t&&t.key===e.key?t.text:e.text}get(e){const t=this.definitions().get(e);return t?this.textOf(t):void 0}names(){return[...this.definitions().keys()]}set(e,t){t=String(t);const n=this.definitions().get(e);if(n&&n.input){const s=this.chosen.get(e);if(s&&s.key===n.key&&s.text===t)return this;this.chosen.set(e,{key:n.key,text:t})}else{const n=new Map(this.owners.get(c));n.set(e,{name:e,text:t,key:`page:${t}`,input:null}),this.owners.delete(c),this.owners.set(c,n)}return this.notify(null,e),this}clear(e){return void 0===e?(this.owners.clear(),this.chosen.clear()):(this.owners.get(c)?.delete(e),this.chosen.delete(e)),this.notify(null,e),this}subscribe(e){return this.listeners.add(e),()=>this.listeners.delete(e)}own(e,t){const n=this.owners.get(e);var s,r;(s=n,r=t,(s?.size??0)===(r?.size??0)&&[...s??[]].every(([e,t])=>r?.get(e)?.key===t.key))?t&&this.owners.set(e,t):(t&&t.size?this.owners.set(e,t):this.owners.delete(e),this.notify(e))}notify(e,t){for(const n of[...this.listeners])n(e,t)}}function h(){return new f}const d=h();function g(e,t,n){const r=(e,s)=>s===t.length?n:{...e,args:e.args.map((e,n)=>n===t[s]?r(e,s+1):e)};return s(r(e,0))}function m(e,t,{parse:n,commit:s,cancel:r,label:i="Edit"}){const o=e.ownerDocument;if(!o||!o.body)return null;const a=o.defaultView,l=e.getBoundingClientRect(),u=o.createElement("input");u.type="text",u.className="mv-edit",u.value=t,u.spellcheck=!1,u.autocomplete="off",u.setAttribute("aria-label",i);const c=()=>{u.style.width=`${Math.max(4,u.value.length+2)}ch`},f=a.getComputedStyle(e);Object.assign(u.style,{position:"absolute",left:`${l.left+a.scrollX}px`,top:`${l.top+a.scrollY+l.height/2}px`,minWidth:`${Math.max(l.width,32)}px`,fontSize:f.fontSize}),c(),o.body.appendChild(u),a.getSelection?.()?.removeAllRanges(),u.focus(),u.select();let h=!1;const d=()=>{h=!0,u.remove()},g=e=>{if(h)return!0;if(!e||u.value===t)return d(),r&&r(),!0;let i;try{i=n(u.value)}catch(e){return u.setAttribute("aria-invalid","true"),u.title=e.message,!1}return d(),s(i,u.value),!0};return u.addEventListener("keydown",e=>{e.stopPropagation(),"Enter"===e.key&&(e.preventDefault(),g(!0)),"Escape"===e.key&&(e.preventDefault(),g(!1))}),u.addEventListener("input",()=>{c(),u.removeAttribute("aria-invalid"),u.removeAttribute("title")}),u.addEventListener("blur",()=>{g(!0)||g(!1)}),u}export{e as E,f as V,s as b,h as c,u as i,n,m as o,g as r,o as s,i as u,d as v};

package/dist/chunks/edit-M68aRA5o.js

@@ -0,0 +1,2 @@
+/* Inline Math 0.2.0 — MIT licence; includes mathzetta (and @mathzetta/cas, for the CAS) */
+const e=Symbol.for("inlinemath.expressions"),t=new Set(["symbol","number"]);function n(e){return e?"symbol"===e.type?e.value:"op"===e.type&&"_"===e.op&&2===e.args.length&&"symbol"===e.args[0].type&&t.has(e.args[1].type)?`${e.args[0].value}_${e.args[1].value}`:null:null}function s(e){const{id:t,from:n,...r}=e;return r.args&&(r.args=r.args.map(s)),r}function r(e){const{id:t,...n}=e;return n.args&&(n.args=n.args.map(r)),n}function i(e,t){const n=(e,s)=>{if(!s&&void 0!==e.from)return t(e.from);const{id:r,from:i,...o}=e;return o.args&&(o.args=o.args.map(e=>n(e,!1))),o};return n(e,!0)}function o(e,t){let i=!1;const o=new Set,a=e=>{const r=n(e);if(null!==r){if(!o.has(r)){const e=t(r);if(e){i=!0,o.add(r);const t={...a(s(e)),from:r};return o.delete(r),t}}return e}return e.args?{...e,args:e.args.map(a)}:e},l=a(e);return{tree:i?r(l):e,changed:i}}const a="[-+]?(?:\\d+\\.?\\d*|\\.\\d+)",l=new RegExp(`^(${a})\\s*\\.\\.\\s*(${a})(?:\\s+step\\s+(${a}))?(?:\\s*=\\s*(${a}))?$`);function u(e){const t=/^\s*\[\[([\s\S]*)\]\]\s*$/.exec(e);if(!t||/\]\s*,\s*\[/.test(t[1]))return null;const n=t[1].trim(),s=l.exec(n);if(s){const e=Number(s[1]),t=Number(s[2]);if(!(t>e))return null;const n=void 0!==s[3]?Number(s[3]):Number.isInteger(e)&&Number.isInteger(t)?1:(t-e)/100;if(!(n>0))return null;const r=void 0!==s[4]?Math.min(t,Math.max(e,Number(s[4]))):e;return{kind:"slider",min:e,max:t,step:n,default:String(r)}}if(n.includes("|")){const e=n.split("|").map(e=>e.trim()).filter(Boolean);if(e.length)return{kind:"dropdown",options:e,default:e[0]}}return{kind:"textbox",default:n}}const c=Symbol("set on the page");class f{constructor(){this.owners=new Map,this.chosen=new Map,this.listeners=new Set}definitions(e){const t=new Map;for(const[n,s]of this.owners)if(n!==e)for(const[e,n]of s)t.delete(e),t.set(e,n);return t}textOf(e){const t=this.chosen.get(e.name);return t&&t.key===e.key?t.text:e.text}get(e){const t=this.definitions().get(e);return t?this.textOf(t):void 0}names(){return[...this.definitions().keys()]}set(e,t){t=String(t);const n=this.definitions().get(e);if(n&&n.input){const s=this.chosen.get(e);if(s&&s.key===n.key&&s.text===t)return this;this.chosen.set(e,{key:n.key,text:t})}else{const n=new Map(this.owners.get(c));n.set(e,{name:e,text:t,key:`page:${t}`,input:null}),this.owners.delete(c),this.owners.set(c,n)}return this.notify(null,e),this}clear(e){return void 0===e?(this.owners.clear(),this.chosen.clear()):(this.owners.get(c)?.delete(e),this.chosen.delete(e)),this.notify(null,e),this}subscribe(e){return this.listeners.add(e),()=>this.listeners.delete(e)}own(e,t){const n=this.owners.get(e);var s,r;(s=n,r=t,(s?.size??0)===(r?.size??0)&&[...s??[]].every(([e,t])=>r?.get(e)?.key===t.key))?t&&this.owners.set(e,t):(t&&t.size?this.owners.set(e,t):this.owners.delete(e),this.notify(e))}notify(e,t){for(const n of[...this.listeners])n(e,t)}}function h(){return new f}const d=h();function g(e,t,n){const r=(e,s)=>s===t.length?n:{...e,args:e.args.map((e,n)=>n===t[s]?r(e,s+1):e)};return s(r(e,0))}function m(e,t,{parse:n,commit:s,cancel:r,label:i="Edit"}){const o=e.ownerDocument;if(!o||!o.body)return null;const a=o.defaultView,l=e.getBoundingClientRect(),u=o.createElement("input");u.type="text",u.className="mv-edit",u.value=t,u.spellcheck=!1,u.autocomplete="off",u.setAttribute("aria-label",i);const c=()=>{u.style.width=`${Math.max(4,u.value.length+2)}ch`},f=a.getComputedStyle(e);Object.assign(u.style,{position:"absolute",left:`${l.left+a.scrollX}px`,top:`${l.top+a.scrollY+l.height/2}px`,minWidth:`${Math.max(l.width,32)}px`,fontSize:f.fontSize}),c(),o.body.appendChild(u),a.getSelection?.()?.removeAllRanges(),u.focus(),u.select();let h=!1;const d=()=>{h=!0,u.remove()},g=e=>{if(h)return!0;if(!e||u.value===t)return d(),r&&r(),!0;let i;try{i=n(u.value)}catch(e){return u.setAttribute("aria-invalid","true"),u.title=e.message,!1}return d(),s(i,u.value),!0};return u.addEventListener("keydown",e=>{e.stopPropagation(),"Enter"===e.key&&(e.preventDefault(),g(!0)),"Escape"===e.key&&(e.preventDefault(),g(!1))}),u.addEventListener("input",()=>{c(),u.removeAttribute("aria-invalid"),u.removeAttribute("title")}),u.addEventListener("blur",()=>{g(!0)||g(!1)}),u}export{e as E,f as V,s as b,h as c,u as i,n,m as o,g as r,o as s,i as u,d as v};

package/dist/chunks/html-BimAqn7x.js

@@ -0,0 +1,2 @@
+/* Inline Math 0.2.0 — MIT licence; MathZetta not included: map mathzetta, mathzetta/speech and mathzetta/calculate with an import map */
+import{calculateBlock as t}from"mathzetta/calculate";import{t as a,a as o}from"./draw-Bev17BJJ.js";function r(a,r={}){return o(a,{...r,blocks:r.blocks??t})}function s(o,r={}){return a(o,{...r,blocks:r.blocks??t})}export{s as a,r as t};

package/dist/chunks/html-CupluJSh.js

@@ -0,0 +1,2 @@
+/* Inline Math 0.2.0 — MIT licence; includes mathzetta (and @mathzetta/cas, for the CAS) */
+import{c as o}from"./calculate-Cz87Lt0N.js";import{e as s,f as t}from"./lite-3Fb-OHbt.js";function c(s,c={}){return t(s,{...c,blocks:c.blocks??o})}function r(t,c={}){return s(t,{...c,blocks:c.blocks??o})}export{r as a,c as t};