-
Notifications
You must be signed in to change notification settings - Fork 8
/
read.g
46 lines (42 loc) · 1.36 KB
/
read.g
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 read.g Laurent Bartholdi
##
#Y Copyright (C) 2008, Laurent Bartholdi
##
#############################################################################
##
## This file reads the implementations, and in principle could be reloaded
## during a GAP session.
#############################################################################
#############################################################################
##
#R Read the install files.
##
ReadPackage("float", "lib/polynomial.gi");
ReadPackage("float", "lib/pslq.gi");
if IsBound(MPFR_INT) then
ReadPackage("float", "lib/mpfr.gi");
fi;
if IsBound(MPFI_INT) then
ReadPackage("float", "lib/mpfi.gi");
fi;
if IsBound(MPC_INT) then
ReadPackage("float", "lib/mpc.gi");
fi;
if IsBound(@FPLLL) then
ReadPackage("float", "lib/fplll.gi");
fi;
if IsBound(CXSC_INT) then
ReadPackage("float", "lib/cxsc.gi");
fi;
if IsBound(IO_Pickle) then
ReadPackage("float","lib/pickle.g");
else
if not IsBound(IO_PkgThingsToRead) then
IO_PkgThingsToRead := [];
fi;
Add(IO_PkgThingsToRead, ["float","lib/pickle.g"]);
fi;
#############################################################################
#E read.g . . . . . . . . . . . . . . . . . . . . . . . . . . . . . ends here