[Date Index]
[Thread Index]
[Author Index]
Re: Context Problem
*To*: mathgroup at smc.vnet.net
*Subject*: [mg109422] Re: Context Problem
*From*: Patrick Scheibe <pscheibe at trm.uni-leipzig.de>
*Date*: Mon, 26 Apr 2010 07:32:34 -0400 (EDT)
*References*: <201004260851.EAA12424@smc.vnet.net>
Hi,
what about using the global symbol?
BeginPackage["PackageContext`"];
Rule1::usage = "Rule1 is a test exported rule.";
Begin["`Private`"];
Rule1 = Cos[Global`x_]^2 + Sin[Global`x_]^2 :> Global`x;
End[];
EndPackage[];
Cheers
Patrick
Am Apr 26, 2010 um 10:51 AM schrieb David Park:
> I would like to export rules from a package in such a way that the
> pattern
> symbols did not include any contexts and in which I also did not
> have to
> export the symbols used in the pattern. In addition, If possible, I
> would
> like this to work even if the package was loaded from a notebook
> that had
> something other than the Global` context.
>
>
>
> Here is a sample package and exported rule:
>
>
>
> BeginPackage["PackageContext`"];
>
>
>
> Rule1::usage = "Rule1 is a test exported rule.";
>
>
>
> Begin["`Private`"];
>
>
>
> Rule1 = Cos[x_]^2 + Sin[x_]^2 -> 1;
>
>
>
> End[];
>
>
>
> EndPackage[];
>
>
>
> Then, if we evaluate Rule1 we obtain a very clumsy version of the
> rule,
> although I suppose it will work.
>
>
>
> Rule1
>
> Cos[PackageContext`Private`x_]^2 + Sin[PackageContext`Private`x_]^2 -
> > 1
>
>
>
> What I would like is the rule as written in the package. Is there a
> way to
> do this?
>
>
>
>
>
> David Park
>
> djmpark at comcast.net
>
> <http://home.comcast.net/~djmpark> http://home.comcast.net/~djmpark/
>
>
>
Prev by Date:
**Re: Context Problem**
Next by Date:
**Re: problems with NMinimize**
Previous by thread:
**Context Problem**
Next by thread:
**Re: Context Problem**
| |