blob: 3a1c265e98983290a995b8c12a96965ce802eab9 (
plain)
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
|
.PS
# ex03.m4
cct_init
circlerad = 0.35/2
define(`elen_',`dimen_')
del = linewid*0.6
"$u_k$" above
line
{
arrow right_ del
B0: circle "$b_0$"
arrow right linewid/2
S: circle "$\sum$"
line right 2*circlerad + del + S.w.x-B0.e.x
{arrow ; "$y_k$" above }
down_
delay
{line left_ del ; circle "$-a_1$" ; arrow from last circle to S chop}
line dashed down_ del
delay
{line left_ del ; circle "$-a_n$" ; arrow from last circle to S chop}
}
down_
delay
{line right_ del ; circle "$b_1$" ; arrow from last circle to S chop}
line dashed down_ del
delay
{line right_ del ; circle "$b_n$" ; arrow from last circle to S chop}
.PE
|