-
Notifications
You must be signed in to change notification settings - Fork 0
/
grg.sl
35 lines (29 loc) · 943 Bytes
/
grg.sl
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
%==========================================================================%
% GRG 3.2 Startup File (C) 1988-2000 Vadim V. Zhytnikov %
%==========================================================================%
% This file is distributed without any warranty. You may modify it but you %
% are not allowed to remove author's name and/or distribute modified file. %
%==========================================================================%
(global '(![version!]))
(setq ![version!] "This is GRG 3.2 release 6 (July 16, 2000) ..." )
% Loading modules ...
(evload '(
grgdecl
grggeom
grggrav
grginit
grgclass
grgcomm
grgcoper
grgmain
grgmater
grgprin
grgproc
grgtrans
grgcfg
))
(matrix nil)
% Starting GRG ...
(cond (![autostart!] (grg))
(t(progn (terpri) (prin2 "Type ``grg;'' to start GRG ...") (terpri))))
%==========================================================================%