1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
|
.PS
# Incleps.m4 : Illustrating one way to import and overwrite .eps graphics
# Note: gpic doesn't fill the arrows
darrow_init
s_init(Incleps)
sinclude(F_Incleps.dim) # Inserted for the web-page version.
sinclude(examples.dim) # Change examples to the name of the main LaTeX file.
define(`backarrow',`darrow(`$1',,,2pt__,6pt__,6pt__,<-|)')
S: s_box(`\includegraphics[width=3in]{Incl}')
ifgpic(`S: box invis ht s_ht wid s_wd with .c at S.n')
thinlines_
backarrow( from boxcoord(S,0.4,0.95) up 0.4 right 0.7 )
s_box(\sf Basket) ljust
backarrow( from boxcoord(S,0.9,0.41) up 0.2 right 0.5 )
s_box(\sf Ball) ljust
backarrow( from boxcoord(S,0.85,0.32) up 0.2 right 0.5 )
s_box(`\sf\shortstack[l]{Star\\ player}') ljust
.PE
|
