i4 : code methods use
o4 = -- code for method: use(Monoid)
/builddir/build/BUILD/M2-version-1.12.0.1/M2/Macaulay2/m2/orderedmonoidrings.m2:7:17-7:46: --source code:
use Monoid := x -> ( if x.?use then x.use x; x)
---------------------------------
-- code for method: use(Package)
/builddir/build/BUILD/M2-version-1.12.0.1/M2/Macaulay2/m2/packages.m2:475:20-488:31: --source code:
use Package := pkg -> (
a := member(pkg,loadedPackages);
b := member(pkg.Dictionary,dictionaryPath);
if a and not b then error("use: package ",toString pkg," appears in loadedPackages, but its dictionary is missing from dictionaryPath");
if b and not a then error("use: package ",toString pkg," does not appear in loadedPackages, but its dictionary appears in dictionaryPath");
if not a and not b then (
scan(pkg.Options.PackageExports, needsPackage);
loadedPackages = prepend(pkg,loadedPackages);
--- if mutable pkg.Dictionary then error("package ", toString pkg, " not completely loaded yet");
dictionaryPath = prepend(pkg.Dictionary,dictionaryPath);
checkShadow();
);
if pkg.?use then pkg.use pkg;
)
---------------------------------
-- code for method: use(Ring)
/builddir/build/BUILD/M2-version-1.12.0.1/M2/Macaulay2/m2/enginering.m2:350:15-355:6: --source code:
use Ring := R -> (
if R.?ring then use R.ring; -- I'm not sure what this is for. Which rings have this key?
generators R;
if R.?generators and R.?generatorSymbols then scan(R.generatorSymbols,R.generators,(sym,val) -> sym <- val);
if R.?use then R.use R;
R)
---------------------------------
-- code for method: use(Thing)
function identity: source code not available
|