something is "wrong" with the Fills option in InequalityGraphics
- To: mathgroup at smc.vnet.net
- Subject: [mg71835] something is "wrong" with the Fills option in InequalityGraphics
- From: ab_def at prontomail.com
- Date: Thu, 30 Nov 2006 06:05:42 -0500 (EST)
Chris Chiasson <chris at chiasson.name> wrote:
> When I load InequalityGraphics as part of a BeginPackage statement and
> then use the Fills option of Inequality plot, it ignores the option
> and doesn't produce an error.
>
> BeginPackage["blah`",{"Graphics`InequalityGraphics`"}];
> Begin["`p`"];
> InequalityPlot[1<x^2-y^2<4&&x*y<1&&x>0&&y>0,{x,-2,3},{y,-2,2},
> Fills->{White}]
> Context@Fills
> End[];
> EndPackage[];
> Context@Fills
>
> \[SkeletonIndicator]Graphics\[SkeletonIndicator]
> blah`p`
> Graphics`FilledPlot`
>
> One can work around this problem by adding "Graphics`FilledPlot`" to
> the List in BeginPackage, but that should not be required, AFAIK.
>
> --
> http://chris.chiasson.name/
The problem is that Graphics`InequalityGraphics` loads
Graphics`FilledPlot` and uses the Graphics`FilledPlot`Fills symbol but
BeginPackage["blah`", "Graphics`InequalityGraphics`"] adds only
Graphics`InequalityGraphics` to $ContextPath, not Graphics`FilledPlot`:
In[1]:= BeginPackage["blah`", "Graphics`InequalityGraphics`"]
In[2]:= $ContextPath
Out[2]= {"blah`", "Graphics`InequalityGraphics`", "System`"}
You can access the symbol Fills by its full name (granted, it's not
very convenient):
In[3]:= InequalityPlot[
1 < x^2 - y^2 < 4 && x*y < 1 && x > 0 && y > 0,
{x, -2, 3}, {y, -2, 2},
Graphics`FilledPlot`Fills -> {White}]
Then EndPackage adds other loaded contexts to $ContextPath:
In[4]:= EndPackage[]
In[5]:= $ContextPath
Out[5]= {"blah`", "Graphics`InequalityGraphics`",
"Graphics`FilledPlot`", "Utilities`FilterOptions`", "Global`",
"System`"}
Maxim Rytin
m.r at inbox.ru