GLE - Graphics Layout Engine¶
Some examples using gle.spad.
GLE (Graphics Layout Engine) is a graphics scripting language designed for creating publication quality figures (e.g., a chart, plot, graph, or diagram). It supports various chart types (including function plot, histogram, bar chart, scatter plot, contour plot, color map, and surface plot) through a simple but flexible set of graphing commands. More complex output can be created by relying on GLE's scripting language, which is full featured with subroutines, variables, and logic control. GLE relies on LaTeX for text output and supports mathematical formulae in graphs and figures. GLE's output formats include EPS, PS, PDF, JPEG, and PNG. GLE is licenced under the BSD license.
In [0]:
)lib GLE
Out[0]:
In [1]:
drawSurface(f,xr,yr,name) ==
gle3d(f,xr,yr,name)
cmd:=concat ["system gle -d png ","_"",name,".gle_""]
png:=(concat [name,".png"])::FileName
systemCommand(cmd)
return png
Out[1]:
In [2]:
drawSurface(sin(x)*cos(y-x),x=-1..1,y=-1..1,"surf1")
Out[2]:
In [3]:
drawSurface(besselJ(4,sqrt(x^2+y^2)),x=-1..1,y=-1..1,"surf2")
Out[3]:
In [4]:
sombrero(r)==2*besselJ(1,%pi*r)/%pi/r
Out[4]:
In [5]:
drawSurface(sombrero(sqrt(x^2+y^2)),x=-2..2,y=-2..2,"surf3")
Out[5]:
In [6]:
drawSurface(x^2-y^4,x=-3..3,y=-1..1,"surf4")
Out[6]:
In [7]:
drawContour(f,xr,yr,L,name) ==
gleCp(f,xr,yr,L,name)
cmd:=concat ["system gle -d png ","_"",name,".gle_""]
png:=(concat [name,".png"])::FileName
systemCommand(cmd)
return png
Out[7]:
In [8]:
drawContour(sin(x)*cos(y-x),x=-1..1,y=-1..1,[-0.8,-0.6,-0.4,-0.2,0.0,0.2],"cont1")
Out[8]:
In [9]:
drawContour(x^2+y^2,x=-1..1,y=-1..1,[0.0,0.2,0.4,0.6,0.8],"cont2")
Out[9]:
In [10]:
drawContour2(f,xr,yr,r,step,name) ==
gleCp(f,xr,yr,r,step,name)
cmd:=concat ["system gle -d png ","_"",name,".gle_""]
png:=(concat [name,".png"])::FileName
systemCommand(cmd)
return png
Out[10]:
In [11]:
gleCpOpt("color","magenta");
gleCpOpt("title","My Title");
gleCpOpt("colormap","true");
gle3dOpt("size","22 22");
Out[11]:
In [12]:
drawContour2(sin(x)*cos(y-x),x=-1..1,y=-1..1,0.0..1.0,0.2,"cont3")
Out[12]:
In [13]:
drawContour2(x^2/3+y^2/5,x=-1..1,y=-1..1,0.0..1.0,0.2,"cont3")
Out[13]:
In [14]:
gleCpOpt("title","Another title");
gleCpOpt("colormap","true");
gle3dOpt("size","22 22");
gleCpOpt("cmap-args","120 120");
gleCpOpt("color","yellow");
Out[14]:
In [15]:
drawContour2(sin(x-y)*cos(y^2),x=-1..1,y=-1..1,0.0..1.0,0.1,"cont4")
Out[15]:
In [16]:
drawContour2(x^2/2+y^2/7,x=-1..1,y=-1..1,0.0..1.0,0.1,"cont5")
Out[16]:
In [17]:
drawGraph(f,xr,name) ==
gle2d(f,xr,name)
cmd:=concat ["system gle -d png ","_"",name,".gle_""]
png:=(concat [name,".png"])::FileName
systemCommand(cmd)
return png
Out[17]:
In [18]:
drawGraph(x^2,x=-1..1,"graph1")
Out[18]:
In [19]:
drawGraph(sin(x)^2/x^2*cos(x),x=-2..2,"graph2")
Out[19]:
In [20]:
gle2dOpt("math","math");
gle2dOpt("dn color","d1 color red");
gle2dOpt("title","title _"Bessel Function J_7_"");
Out[20]:
In [21]:
drawGraph(besselI(7,x) ,x=-3..3,"graph3")
Out[21]:
In [22]:
gle2dOpt("math","math");
gle2dOpt("dn color","d1 color red");
gle2dOpt("title","");
Out[22]:
In [23]:
drawGraph(exp(-x)*sin(x) ,x=-3..3,"graph4")
Out[23]:
In [24]:
gle2dOpt("math","");
gle2dOpt("dn color","d1 color magenta");
gle2dOpt("title","title _"The Gamma Function_"");
gle2dOpt("xaxis","xaxis grid");
Out[24]:
In [25]:
drawGraph(Gamma(x),x=0.5..3.0,"graph5")
Out[25]:
In [26]:
gle2dOpt("yaxis","yaxis grid");
gle2dOpt("dn color","d1 color orange");
Out[26]:
In [27]:
drawGraph(Gamma(x),x=0.5..3.0,"graph6")
Out[27]:
In [ ]: