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
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
|
// Default file prefix used for inline LaTeX mode
string defaultfilename;
file _outpipe;
if(settings.xasy)
_outpipe=output(mode="pipe");
string[] file3;
string outprefix(string prefix=stripextension(defaultfilename)) {
return prefix != "" ? prefix : outname();
}
string outformat(string format="")
{
if(format == "") format=settings.outformat;
if(format == "") format=nativeformat();
return format;
}
frame currentpatterns;
frame Portrait(frame f) {return f;};
frame Landscape(frame f) {return rotate(90)*f;};
frame UpsideDown(frame f) {return rotate(180)*f;};
frame Seascape(frame f) {return rotate(-90)*f;};
typedef frame orientation(frame);
orientation orientation=Portrait;
// Forward references to functions defined in module three.
object embed3(string, frame, string, string, string, light, projection);
string Embed(string name, string text="", string options="", real width=0,
real height=0);
bool primitive() { // Encode primitive objects
return settings.outformat == "html" || settings.outformat=="v3d" || settings.v3d;
}
bool prconly(string format="")
{
return outformat(format) == "prc";
}
bool prc0(string format="")
{
return settings.outformat == "prc" || (settings.prc && (outformat(format) == "pdf" || prconly() || settings.inlineimage ));
}
bool prc(string format="") {
return prc0(format) && Embed != null;
}
bool is3D(string format="")
{
return prc(format) || settings.render != 0;
}
frame enclose(string prefix=defaultfilename, object F, string format="")
{
if(prc(format)) {
frame f;
label(f,F.L);
return f;
} return F.f;
}
void deconstruct(picture pic=currentpicture)
{
if(currentpicture.nodes3.length > 0) {
if(currentpicture.xsize3 == 0 &&
currentpicture.ysize3 == 0 &&
currentpicture.zsize3 == 0)
currentpicture.size3(hypot(currentpicture.xsize,currentpicture.ysize));
currentpicture.size(0);
}
frame f;
transform t=pic.calculateTransform();
if(currentpicture.fitter == null)
f=pic.fit(t);
else
f=pic.fit();
deconstruct(f,currentpatterns,t);
}
bool implicitshipout=false;
void shipout(string prefix=defaultfilename, frame f,
string format="", bool wait=false, bool view=true,
string options="", string script="",
light light=currentlight, projection P=currentprojection,
transform t=identity)
{
if(is3D(f)) {
f=enclose(prefix,embed3(prefix,f,format,options,script,light,P));
if(settings.render != 0 && !prc(format)) {
return;
}
}
bool defaultprefix=prefix==defaultfilename;
if(settings.xasy || (!implicitshipout && defaultprefix)) {
if(defaultprefix) {
currentpicture.clear();
add(f,group=false);
}
return;
}
// Applications like LaTeX cannot handle large PostScript coordinates.
pair m=min(f);
int limit=2000;
if(abs(m.x) > limit || abs(m.y) > limit) f=shift(-m)*f;
_shipout(prefix,f,currentpatterns,format,wait,view,t);
}
void shipout(string prefix=defaultfilename, picture pic=currentpicture,
orientation orientation=orientation,
string format="", bool wait=false, bool view=true,
string options="", string script="",
light light=currentlight, projection P=currentprojection)
{
pic.uptodate=true;
if(!uptodate()) {
bool inlinetex=settings.inlinetex;
bool prc=prc(format) || settings.v3d;
bool empty3=pic.empty3();
if(prc && !empty3) {
if(settings.render == 0) {
string image=outprefix(prefix)+"+"+(string) file3.length;
if(settings.inlineimage) image += "_0";
settings.inlinetex=false;
settings.prc=false;
shipout(image,pic,orientation,nativeformat(),view=false,light,P);
settings.prc=true;
}
settings.inlinetex=settings.inlineimage;
}
frame f;
transform t=pic.calculateTransform();
if(currentpicture.fitter == null) {
pen background=currentlight.background;
if(settings.outformat == "html" && background == nullpen)
background=white;
if(background != nullpen)
f=bbox(pic,nullpen,Fill(background));
else
f=pic.fit(t);
}
else
f=pic.fit(prefix,format,view=view,options,script,light,P);
if(!prconly() && (!pic.empty2() || settings.render == 0 || prc || empty3))
shipout(prefix,orientation(f),format,wait,view,t);
settings.inlinetex=inlinetex;
}
}
void newpage(picture pic=currentpicture)
{
pic.add(new void(frame f, transform) {
newpage(f);
},true);
}
|
