1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18boolean contextlmtxmode ; contextlmtxmode := if known fontmaking : false else: true fi;
19
20prologues := 0 ;
21mpprocset := 1 ;
22
23input "mp-base.mpiv" ;
24input "mp-tool.mpiv" ;
25input "mp-mlib.mpiv" ;
26input "mp-luas.mpiv" ;
27input "mp-cont.mpiv" ;
28input "mp-page.mpiv" ;
29input "mp-butt.mpiv" ;
30input "mp-shap.mpiv" ;
31input "mp-grph.mpiv" ;
32input "mp-grid.mpiv" ;
33input "mp-form.mpiv" ;
34input "mp-figs.mpiv" ;
35input "mp-func.mpiv" ;
36input "mp-node.mpiv" ;
37input "mp-apos.mpiv" ;
38input "mp-abck.mpiv" ;
39input "mp-blob.mpiv" ;
40
41string metafunversion ; metafunversion = "metafun iv " & mfun_timestamp;
42
43let normalend = end ;
44
45if known mplib :
46 def end = ; message "" ; message metafunversion ; message "" ; endinput ; enddef ;
47 def bye = ; message "" ; message metafunversion ; message "" ; endinput ; enddef ;
48else :
49 def end = ; message "" ; message metafunversion ; message "" ; normalend ; enddef ;
50fi ;
51 |