loncom/xml/lontexconvert.pm - diff

Return to lontexconvert.pm CVS log

Up to [LON-CAPA] / loncom / xml

version 1.54, 2005/02/24 09:48:05	version 1.55, 2005/02/24 09:54:01
Line 254 sub postprocess_algebra {	Line 254 sub postprocess_algebra {
# sqrt(3,4) -> \sqrt\let{3,4\right}, which is annoying	# sqrt(3,4) -> \sqrt\let{3,4\right}, which is annoying
$string =~s/\\left\{/\{/g;	$string =~s/\\left\{/\{/g;
$string =~s/\\right\}/\}/g;	$string =~s/\\right\}/\}/g;

	# remove the extra () in the denominator of a \frac
	$string =~s/\\frac{(.+?)}{\\left$(.+?)\\right$}/\\frac{$1}{$2}/gs;

# sqrt(3,4) means the 4 root of 3	# sqrt(3,4) means the 4 root of 3
$string =~s/\\sqrt{([^,]+),([^\}]+)}/\\sqrt[$2]{$1}/gs;	$string =~s/\\sqrt{([^,]+),([^\}]+)}/\\sqrt[$2]{$1}/gs;
Line 264 sub postprocess_algebra {	Line 267 sub postprocess_algebra {
# log(3,4) means the log base 4 of 3	# log(3,4) means the log base 4 of 3
$string =~s/\$(?:sin\|cos\|tan\|sec\|csc\|cot)(?:h)?)\\left\((.+?),(.+?)\\right$/\\$1^{$3}\\left($2\\right)/gs;	$string =~s/\$(?:sin\|cos\|tan\|sec\|csc\|cot)(?:h)?)\\left\((.+?),(.+?)\\right$/\\$1^{$3}\\left($2\\right)/gs;

# remove the extra () in the denominator of a \frac	# int(3,a,b) integral from a to b of 3
$string =~s/\\frac{(.+?)}{\\left$(.+?)\\right$}/\\frac{$1}{$2}/gs;	$string =~s/\\int\\left$(.+?),(.+?),(.+?)\\right$/\\int_{$2}^{$3}\\left($1\\right)/gs;

	# int( ... dx) -> ...
	$string =~s/\\int\\left$(.+?)d[a-z]\\right$/$1/gs;


&Apache::lonnet::logthis($string);	&Apache::lonnet::logthis($string);
return $string;	return $string;
}	}