[system] / trunk / pg / macros / contextInequalities.pl Repository:
ViewVC logotype

Diff of /trunk/pg/macros/contextInequalities.pl

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

Revision 5442 Revision 5443
537 my ($a,$b,$open,$close) = $self->value; 537 my ($a,$b,$open,$close) = $self->value;
538 my $context = $self->context; 538 my $context = $self->context;
539 my $x = $self->{varName} || ($context->variables->names)[0]; 539 my $x = $self->{varName} || ($context->variables->names)[0];
540 $x = $context->{variables}{$x}{TeX} if defined $context->{variables}{$x}{TeX}; 540 $x = $context->{variables}{$x}{TeX} if defined $context->{variables}{$x}{TeX};
541 $x =~ s/^([^_]+)_?(\d+)$/$1_{$2}/; 541 $x =~ s/^([^_]+)_?(\d+)$/$1_{$2}/;
542 my $left = ($open eq '(' ? ' < ' : ' <= '); 542 my $left = ($open eq '(' ? ' < ' : ' \le ');
543 my $right = ($close eq ')' ? ' < ' : ' <= '); 543 my $right = ($close eq ')' ? ' < ' : ' \le ');
544 my $inequality = ""; 544 my $inequality = "";
545 $inequality .= $a->string.$left unless $self->{leftInfinite}; 545 $inequality .= $a->string.$left unless $self->{leftInfinite};
546 $inequality .= $x; 546 $inequality .= $x;
547 $inequality .= $right.$b->string unless $self->{rightInfinite}; 547 $inequality .= $right.$b->string unless $self->{rightInfinite};
548 $inequality = "-\\infty < $x < \\infty " if $inequality eq $x; 548 $inequality = "-\\infty < $x < \\infty " if $inequality eq $x;

Legend:
Removed from v.5442  
changed lines
  Added in v.5443

aubreyja at gmail dot com
ViewVC Help
Powered by ViewVC 1.0.9