Quellcodebibliothek Statistik Leitseite products/Sources/formale Sprachen/GAP/pkg/difsets/lib/   (Algebra von RWTH Aachen Version 4.15.1©)  Datei vom 14.8.2019 mit Größe 1 kB image not shown  

Quelle  loader.gi   Sprache: unbekannt

 
#############################################################################
##
#W  loader.gi                DifSets Package                     Dylan Peifer
##
##  Functions provide access to the precomputed difference sets in the data
##  directory.
##

#############################################################################
##
#F  CanLoadDifferenceSets( <v>, <cn> )
##
InstallGlobalFunction( CanLoadDifferenceSets, function (v, n)
    local path, src;

    path := DirectoriesPackageLibrary("DifSets")[1];
    src := Concatenation("../data/groups/", String(v), "/",
                         String(v), "-", String(n), ".txt");

    return IsExistingFile(Filename(path, src));
end );

#############################################################################
##
#F  LoadDifferenceSets( <v>, <cn> )
##
InstallGlobalFunction( LoadDifferenceSets, function (v, n)
    local path, src;

    path := DirectoriesPackageLibrary("DifSets")[1];
    src := Concatenation("../data/groups/", String(v), "/",
                         String(v), "-", String(n), ".txt");

    if IsExistingFile(Filename(path, src)) then
        return ReadAsFunction(Filename(path, src))();
    else
        ErrorNoReturn("no precomputed list of difference sets for group ",
                      [v, n], "\n");
    fi;
end );

#############################################################################
##
#E

[ Dauer der Verarbeitung: 0.7 Sekunden  (vorverarbeitet)  ]