/usr/share/gap/pkg/AtlasRep/init.g is in gap-atlasrep 1.5.1-1.
This file is owned by root:root, with mode 0o644.
The actual contents of the file can be viewed below.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 | #############################################################################
##
#W init.g GAP 4 package AtlasRep Thomas Breuer
##
#Y Copyright (C) 2001, Lehrstuhl D für Mathematik, RWTH Aachen, Germany
##
if UserPreference( "AtlasRep", "AtlasRepDataDirectory") = fail then
Perform(["datagens", "dataword"], function(dirname)
local package, l, dir;
package := "AtlasRep";
dir := GAPInfo.UserGapRoot;
for l in ["","pkg",package,dirname] do
dir := Concatenation([dir,"/",l]);
if not IsDirectoryPath(dir) then
CreateDir(dir);
fi;
od;
return 0;
end);
SetUserPreference( "AtlasRep", "AtlasRepDataDirectory",Concatenation(GAPInfo.UserGapRoot,"/pkg/AtlasRep/"));
fi;
# Read the declaration part.
ReadPackage( "atlasrep", "gap/userpref.g" );
ReadPackage( "atlasrep", "gap/bbox.gd" );
ReadPackage( "atlasrep", "gap/access.gd" );
if not IsBound( InfoCMeatAxe ) then
# This file is also part of the C-MeaAxe package.
ReadPackage( "atlasrep", "gap/scanmtx.gd" );
ReadPackage( "atlasrep", "gap/scanmtx.gi" );
fi;
ReadPackage( "atlasrep", "gap/types.gd" );
ReadPackage( "atlasrep", "gap/interfac.gd" );
ReadPackage( "atlasrep", "gap/mindeg.gd" );
ReadPackage( "atlasrep", "gap/utils.gd" );
# Read obsolete variable names if this happens also in the GAP library.
if UserPreference( "gap", "ReadObsolete" ) <> false then
ReadPackage( "atlasrep", "gap/obsolete.gd" );
fi;
#############################################################################
##
#E
|