Evaluated proc symbolab_fix a { set a [regsub -all {\\frac\{(.+?)\}\{(.+?)\}} $a "(\\1/\\2)"]; set a [regsub -all {\\sqrt\{(.+)\}} $a "sqrt(\\1)"]; set a [regsub {\\cdot} $a {*}] }