loncom/xml/lontexconvert.pm - diff

Return to lontexconvert.pm CVS log

Up to [LON-CAPA] / loncom / xml

version 1.47, 2005/02/24 05:33:55	version 1.48, 2005/02/24 05:40:08
Line 242 sub prepare_algebra {	Line 242 sub prepare_algebra {
$string =~ s/<\=/\%/g;	$string =~ s/<\=/\%/g;
$string =~ s/>\=/\!/g;	$string =~ s/>\=/\!/g;

#protect the confusable greek symbols	# makes the decision about what is a minus sign easier
	$string =~ s/([\=\>\<\%\!\#] *)-/$1 zeroplace -/g;

	# protect the confusable greek symbols
$string =~ s/delta/zdelta/g;	$string =~ s/delta/zdelta/g;
$string =~ s/beta/bita/g;	$string =~ s/beta/bita/g;
$string =~ s/theta/thita/g;	$string =~ s/theta/thita/g;
Line 256 sub prepare_algebra {	Line 259 sub prepare_algebra {

sub postprocess_algebra {	sub postprocess_algebra {
my ($string)=@_;	my ($string)=@_;

	# remove the chunk used to sepearate out the minus signs
	$string =~ s/zeroplace//g;

# exapnd out some operators	# exapnd out some operators
$string =~ s/\#/\\not= /g;	$string =~ s/\#/\\not= /g;